home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / sh1x / sh15a.d64 / the (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  582b  |  17 lines
  1. 0 REM *********************************
  2. 1 REM *                               *
  3. 2 REM *  THE STAMPING COLLECTION KIT  *
  4. 3 REM *                               *
  5. 4 REM *    5.9.1986 BY ARNDT GANSE    *
  6. 5 REM *    IN DEN DORNEN 32           *
  7. 6 REM *    5810 WITTEN-ANNEN          *
  8. 7 REM *    TEL. 02302/60698           *
  9. 8 REM *                               *
  10. 9 REM *********************************
  11. 10 IFA=0THENA=1:LOAD"STAMPING",8,1
  12. 20 IFA=1THENA=2:POKE648,204:POKE53272,56:POKE56576,0
  13. 30 PRINT"[147]LOAD"CHR$(34);"COLLECTION KIT";CHR$(34)",8,1"
  14. 40 POKE198,6
  15. 50 DATA19,13,82,85,78,13
  16. 60 FORI=1TO6:READA:POKE630+I,A:NEXT
  17.