home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tiger Disk 88
/
Tiger_Disk_088_20xx_Tiger-Crew-Disk_de_Side_D.d64
/
lader_3
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
329b
|
12 lines
1 ifpeek(816)=165andpeek(817)=244then3
2 print"[147]kill cartridge!":end
3 ifa=0thena=1:load"irq 5*",8,1
4 rem ** musik an $1000 **
5 ifa=1thena=2:load"player*",8,1
6 rem ** player an $2000 **
7 ifa=2thena=3:load"char*",8,1
8 rem ** charset an $3000 **
9 poke43,0:poke44,64
10 load"show/3",8
11 rem ** programm an $4000 **