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