home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 165
/
165.d81
/
b.beagle
(
.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,"[204] [197] [199] [193] [204][160] [194] [197] [193] [199] [204] [197]":sysce,17,"[194]y [202]eff [202]ones
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 [151]44,16:[151]4096,0:[158]dy,"beagle",dv
6000 [131]0