home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Compute! Gazette 1991 May
/
1991-05.d64
/
loader.note
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
597b
|
16 lines
10 printchr$(14):poke 53280,11:poke 53281,11:poke 646,15
20 print"[147]":a$="[212]he [204][207][193][196][197][210]-[205][193][203][197][210][155] program is":gosub270
30 a$=" machine code for use as specified in ":gosub270
40 a$="the current issue of ":gosub270:a$="[195][207][205][208][213][212][197]'s [199]azette[155].":gosub270
50 a$=" [208]lease refer to that article for ":gosub270
80 a$=" instructions. ":gosub270
200 ford=1to40:print"[155][164]";:next
210 print" [208]ress any key to reload the menu [146]"
220 getdh$:ifdh$=""then220
225 poke53280,0:poke53281,0:print"[147]":print" [204]oading [199][207][211]"
230 print"[144]load";chr$(34);"gos.menu";chr$(34);",8"
240 print"run"
250 poke198,4:poke631,19:poke632,13:poke633,13
260 end
270 for x=1 to 20-len(a$)/2:printchr$(32);:next:printa$:return