home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 236
/
236.d81
/
pp2
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
217b
|
10 lines
5 d=peek(186)
10 ifa=0thena=1:load"simonsbasic",d,1
20 q=8:poke44,q:pokeq*256,0
30 forx=1to11:reada:poke630+x,a:next:poke198,11
40 poke637,d+48
50 sys2096
60 data76,207,34,80,34,44,56,13,82,213,13
9999 end
10000 n$="pp2":open1,8,15,"s0:"+n$:close1:saven$,8:end