home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 170
/
170.d81
/
b.gallerymaker
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
1KB
|
10 lines
10 restore:reada:bo=peek(66)*256+peek(65)+3
12 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:sysbo:poke53272,23
50 sysce,15,"[199][160][193][160][204][160][204] [197] [210] [217] -[160][205][160][193][160][203][160][197][160][210] v3":sysce,17,"[194]y [203]en [210]obinson
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
120 [143]
5000 [158]dy,"gallerymaker",dv
6000 [131]0