home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / COMMODOR / MAN.SDA / MODULE1 (.txt) < prev    next >
Commodore BASIC  |  2000-06-30  |  617b  |  20 lines
  1. 10 REM MENSCH AERGERE DICH NICHT
  2. 11 REM 64'ER SH 3
  3. 100 POKE53281,0:POKE53280,0
  4. 120 PRINT"[147]":POKE211,7:POKE214,7:SYS58640:POKE646,1
  5. 130 PRINT"ME[159]N[156]SCH [158]A[129]E[149]R[150]G[151]E[153]R[154]E ";
  6. 140 PRINT"DI[158]CH [155]N[150]I[158]CHT"
  7. 150 PRINT"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]"
  8. 155 PRINT"DON'T GET UP-SET!"
  9. 158 PRINT"INTERPRETED BY H.STEINBECK"
  10. 160 PRINT"[155] DO YOU NEED INSTRUCTIONS TO PLAY? (Y/N)"
  11. 170 GETA$:IFA$=""THEN170
  12. 180 IFA$="Y"THENP$="MODULE2":GOTO210
  13. 190 IFA$="N"THENP$="MODULE3":GOTO210
  14. 200 GOTO170
  15. 210 PRINT"[147]PLEASE WAIT!"
  16. 220 Q=PEEK(186)
  17. 230 PRINT"[144]LOAD";CHR$(34);P$;CHR$(34);",";Q:PRINT"RUN"
  18. 240 POKE23040,0:POKE43,1:POKE44,90
  19. 250 POKE198,5:POKE631,19:POKE632,13:POKE633,13:POKE634,13:POKE635,0:NEW
  20.