home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Transactor
/
Transactor_11_1986_Transactor_Publishing.d64
/
saverify
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
293b
|
8 lines
10 rem ** saverify -- bob hayes **
20 rem ** wpg, man. canada **
25 sa=828: rem start address-note: relocatable
30 q$=chr$(34): a=0: for x=0 to 18: read q: poke sa+x,q: a=a+q: next
40 print: print"format: sys"sa;q$"filename"q$",8"
50 end
60 data 32,212,225,32,89,225,169,1,133,147,44,169,0,133,10,32,111,225,96