home *** CD-ROM | disk | FTP | other *** search
/ Brotikasten / BROTCD01.iso / games / dis1893.d64 / 217 (.txt) < prev    next >
Commodore BASIC  |  1995-07-31  |  1KB  |  39 lines
  1. 1 POKE50050,2:POKE50051,1:POKE50052,7
  2. 2 PRINT"[147][159][196]EIN [194]RIEF WAR DEUTLICH GENUG           "
  3. 3 PRINT"FORMULIERT.                             "
  4. 4 PRINT"[212]ROTZDEM STEHT [204]OTTE ZWEI [212]AGE SPAETER  "
  5. 5 PRINT"WIEDER VOR [196]EINER [212]UER.[193]UF [196]EINE [198]RAGE  "
  6. 6 PRINT"ANTWORTET SIE, KEINE [208]OST VON [196]IR       "
  7. 7 PRINT"BEKOMMEN ZU HABEN.                      "
  8. 8 PRINT"[201]CH WILL [196]ICH NICHT MEHR SEHEN,         "
  9. 9 PRINT"KAPIERT ? SAGST [196]U SCHROFF.             "
  10. 10 PRINT"[211]IE ZIEHT EIN WEHLEIDIGES [199]ESICHT UND   "
  11. 11 PRINT"GEHT WORTLOS.                           "
  12. 12 PRINT"                                        "
  13. 13 PRINT"            >[215]EITER MIT [212]ASTENDRUCK<"
  14. 14 POKE198,0:WAIT198,1
  15. 15 PRINT"[147][176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]";
  16. 16 PRINT"[221][151]     [197]NTSCHEIDUNGSMOEGLICHKEIT  :     [221]";
  17. 17 PRINT"[171][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][179]";
  18. 18 PRINT"[221][152]          [211]PIELSITUATION 390          [221]";
  19. 19 PRINT"[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]"
  20. 20 PRINT"1.) [196]IR TUT ES FAST LEID, SIE SO SCHROFF"
  21. 21 PRINT"    BEHANDELT ZU HABEN.                 "
  22. 22 PRINT"2.) [196]U FINDEST ES IN [207]RDNUNG, DASS [196]U   "
  23. 23 PRINT"    IHR KNALLHART DEN [193]BSCHIED GEGEBEN  "
  24. 24 PRINT"    HAST.                               "
  25. 25 POKE198,0:WAIT198,1:GETA$
  26. 26 IFA$=""THEN32
  27. 27 IFA$="1"THENPOKE50053,2:POKE50054,2:POKE50055,8:GOTO30
  28. 28 IFA$="2"THENPOKE50053,2:POKE50054,1:POKE50055,8:GOTO30
  29. 29 GOTO25
  30. 30 A$="257"
  31. 31 GOTO33
  32. 32 A$="256"
  33. 33 Q=PEEK(50100)
  34. 34 W=Q+50100
  35. 35 IFPEEK(W)=200THENW=W+1:POKE50100,Q+1:GOTO35
  36. 36 E=PEEK(W):POKEW,E+1
  37. 37 PRINT"[147][144]LOAD";CHR$(34);A$;CHR$(34);",8":PRINT"RUN"
  38. 38 POKE631,13:POKE632,13:POKE633,13:POKE198,3
  39.