home *** CD-ROM | disk | FTP | other *** search
/ Brotikasten / BROTCD01.iso / games / dis1893.d64 / 244 (.txt) < prev    next >
Commodore BASIC  |  1995-07-31  |  2KB  |  40 lines
  1. 2 POKE50050,2:POKE50051,4:POKE50052,4
  2. 3 PRINT"[147][159][200]ARALD ERSCHEINT PUENKTLICH ZU [196]EINEM   "
  3. 4 PRINT"[198]EST.[196]ER MODISCH BUNTE [193]NZU PASST NICHT "
  4. 5 PRINT"ZU DEM POCKENNARBIGEN [199]ESICHT UND DEM   "
  5. 6 PRINT"POMADIGEN [200]AAR.[213]ND OFFENSICHTLICH IST ER"
  6. 7 PRINT"EINE [206]UMMER ZU GROSS GEKAUFT, DENN ER   "
  7. 8 PRINT"SCHLOTTERT UM [200]ARALDS DUERRE [193]RME UND   "
  8. 9 PRINT"[194]EINE.[196]U FUEHRST [200]ARALD HEREIN.[204]OTTE    "
  9. 10 PRINT"SITZT GERADE MIT EINER [218]IGARETTE IN DER "
  10. 11 PRINT"[200]AND DA, DIE SIE NOCH NICHT ANGEZUENDET "
  11. 12 PRINT"HAT.[200]ARALD SPRINGT SOFORT HINZU, FRAGT, "
  12. 13 PRINT"[196]ARF ICH [201]HNEN [198]EUER GEBEN, AEH ?       "
  13. 14 PRINT"            >[215]EITER MIT [212]ASTENDRUCK<"
  14. 15 POKE198,0:WAIT198,1
  15. 16 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. 17 PRINT"[221][151]     [197]NTSCHEIDUNGSMOEGLICHKEIT  :     [221]";
  17. 18 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. 19 PRINT"[221][152]           [211]PIELSITUATION 41          [221]";
  19. 20 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. 21 PRINT"  [196]U HAST KEINE [197]NTSCHEIDUNGS-          "
  21. 22 PRINT"  MOEGLICHKEIT.[214]ON HIER AUS GIBT'S NUR  "
  22. 23 PRINT"  EINE MOEGLICHE [198]ORTSETZUNG !          "
  23. 24 PRINT"                                        "
  24. 25 PRINT"                                        "
  25. 26 PRINT"                                        "
  26. 27 PRINT"                                        "
  27. 28 PRINT"                                        "
  28. 29 PRINT"               >[215]EITER MIT [212]ASTENDRUCK<"
  29. 30 POKE198,0:WAIT198,1:GETA$
  30. 31 IFA$=""THEN34
  31. 32 A$="257":POKE50053,2:POKE50054,4:POKE50055,5
  32. 33 GOTO35
  33. 34 A$="256"
  34. 35 Q=PEEK(50100)
  35. 36 W=Q+50100
  36. 37 IFPEEK(W)=200THENW=W+1:POKE50100,Q+1:GOTO37
  37. 38 E=PEEK(W):POKEW,E+1
  38. 39 PRINT"[147][144]LOAD";CHR$(34);A$;CHR$(34);",8":PRINT"RUN"
  39. 40 POKE631,13:POKE632,13:POKE633,13:POKE198,3
  40.