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