home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 88 / 088.d81 / problem report / problem report.a7ae (.txt)
Encoding:
Commodore BASIC  |  1991-01-01  |  48.2 KB  |  19 lines
  1. 5 poke53281,0:poke53280,0
  2. 10 print"[147][159]    [212]his program will fix a few bugs in"
  3. 20 print"[205][201][206][196][160][217][207][213][210] [194][213][211][201][206][197][211][211][159]. [201]nsert system disk.
  4. 30 [153]"(NULL)hich drive will you be working from?"
  5. 40 [151]781,[194](214):[158]59903:[133]"openstr$rive number sys(8open-31sys)";dn$
  6. 50 dn[178][197](dn$):[139]dn[179]8[176]dn[177]31[167][153]"onon":[137]40
  7. 60 [159]2,dn,2:[160]2:[139]st[167][153]"onon":[137]40
  8. 70 [153]"   (NULL)(NULL)atnlenval wait opento continue.   (NULL) waitopen to (NULL)uit"
  9. 80 [161]a$:[139]a$[179][177]"q"[175]a$[179][177]" "[167]80
  10. 90 [139]a$[178]"q"[167][153]"load":[158]49152[170]512:[128]
  11. 100 [153]"loadopenload"[199](34)"myb"[199](34)","dn
  12. 110 [153]"";:[158]49152
  13. 120 [153]"open15,"dn",15,"[199](34)"scratch:myb"[199](34)":close15"
  14. 130 [153]"save"[199](34)"myb"[199](34)","dn
  15. 140 [153]"stoppoke646,1:printchr$(147)"[199](34)"ascright$(NULL)right$(NULL)left$valstr$!"[199](34)":s(NULL)49152+512
  16. 160 print"";:poke631,19:poke198,10:fori=0to8:poke632+i,13:next:new
  17. 9999 stop
  18. 10000 _"@0:exterminator
  19.