home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Compute! Gazette 1993 October
/
1993-10.d64
/
sidnote
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
462b
|
15 lines
10 print"[147]":poke53280,6:poke53281,6
50 a$="[212]his is a self-disolving archive.":gosub500:print
70 a$="[217]ou'll need to load the program":gosub500
90 a$="[211][201][196]10.[211][196][193]":gosub500:print
100 a$="and replace the [199]azette [196]isk with":gosub500
110 a$="a blank one. [215]hen the program is":gosub500
120 a$="run, it will place the required":gosub500
130 a$="software on the blank disk - which":gosub500
140 a$="may then be used to run the program.":gosub500
200 end
500 y= (40-len(a$))/2
510 for x=1 to y:printchr$(32);:next
520 printa$
530 return