home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1998 Special / special1988b.d64 / boot.note (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  1KB  |  32 lines
  1. 10 poke53280,6:poke53281,6:poke646,3
  2. 20 printchr$(142)chr$(147)tab(13)"special note[159]"
  3. 30 print"this program will not run from the menu"
  4. 40 print"for one of several reasons: it writes"
  5. 50 print"to disk (this disk is write-protected);"
  6. 60 print"there are memory conflicts; or there are";
  7. 70 print"multiple files that make up the program"
  8. 80 print"(refer to the corresponding magazine"
  9. 90 print"article to determine the number of"
  10. 100 print"files). these are saved together on disk";
  11. 110 print"in the same order as the magazine table"
  12. 120 print"of contents."
  13. 130 printspc(17)"***[159]"
  14. 140 print"to copy a machine language program to"
  15. 150 print"disk, you need to use a copying program"
  16. 160 print"for machine language files. the gazette"
  17. 170 print"has published several of these, most"
  18. 180 print"recently "chr$(34)"disk rapid transit"chr$(34)" in the"
  19. 190 print"december issue. these also abound in the";
  20. 200 print"public domain and user group libraries."
  21. 210 ford=1to40:print"[164]";:next
  22. 220 print"    press any key to reload the menu    [146]"
  23. 230 ifpeek(65530)=5then290
  24. 240 poke198,0:wait198,1:getdh$
  25. 250 print"[147][155]":s$="l[207]"+chr$(34)+"mn"+chr$(34)+",8:"+chr$(131)
  26. 260 fori=1tolen(s$):poke630+i,asc(mid$(s$,i)):next:poke198,i
  27. 270 poke53281,15:poke53280,15
  28. 280 printchr$(142)"[145]          reloading the menu[155]":end
  29. 290 get dh$
  30. 300 if dh$=""then290
  31. 310 sys 65341
  32.