home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Big Mouth 21
/
Big_Mouth_The_21_1998_-_Side_B.d64
/
menu
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
978b
|
35 lines
1 rem" "bm eyes only!(NULL)
2 poke808,234:poke53280,0:poke53281,0
4 fort=1to500:next
6 print"[147][155]"tab(7)"the big mouth - main menu"
8 fort=1to2000:next
10 print"[147]"
15 fort=1to500:next
20 printtab(7)"the big mouth - main menu"
30 print"a - frosty the snowman"
31 print"b - snowball sunday"
32 print"c - christmas demo"
33 print"d - cosmic combat"
34 print"e - brain spasm"
35 print"f - jukebox 64"
36 print"g - morbid covers"
50 print"pick a program to load (a-g) ?"
55 geta$:ifa$=""then55
60 a=asc(a$):ifa-64<1ora-64>7then55
65 print""tab(15)" loading "
66 ifa-64=2ora-64=3then80
70 forx=49152to49170:ready:pokex,y:nextx
75 sys49152
76 data120,169,013,141,040,003,169,192,141,041,003,088,096,238,032,208,076,237,246
80 ona-64goto101,102,103,104,105,106,107
99 :
101 load" frosty snowman ",8,1
102 a$="snowball sunday ":goto 110
103 a$=" christmas demo ":goto 110
104 load" cosmic combat ",8,1
105 load"brain sp.+hi/avt",8,1
106 load" jukebox 64 ",8,1
107 load"morbid cover/rbl",8,1
110 print"[147]load"chr$(34)+a$+chr$(34)",8,1"
111 print"":poke198,4:poke631,13:poke632,82:poke633,213:poke634,13:end