home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 242 / 242.d81 / b.ldw (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  239b  |  10 lines
  1. 10 rem: letter drop writer loader
  2. 20 :
  3. 30 dv=peek(186):ifdv<8thendv=8
  4. 40 poke646,peek(53281):print"[147]load"chr$(34)"l/d.pkd"chr$(34)","dv
  5. 50 print"run"
  6. 60 poke631,13:poke632,13:poke198,2:end
  7. 10000 n$="b.ld write"
  8. 10001 open1,8,15,"i0":close1
  9. 10002 open1,8,15,"s0:"+n$:close1:saven$,8:end
  10.