home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 166
/
166.d81
/
b.qbix
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
1KB
|
8 lines
10 restore:reada:bo=peek(66)*256+peek(65)+3:dv=peek(186):ifdv<8thendv=8
20 ce=bo+3:bl=bo+6:co=bo+9:sw=bo+12:c2=bo+15:dy=bo+18:poke53265,11:sysbo
50 poke53265,27:sysce,15,"[209] [194] [201] [216]":sysce,17,"[194]y [202]on [205]attson
70 [158]ce,19,"(len) 1998 by mid$&asc (NULL)ublishing
80 sysce,20,"[212]his [208]rogram [201]sn't [208]ublic [196]omain
5000 [153]"";:[158]dy,"qbix",dv
6000 [131]0