home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1987 May / 1987-05.d64 / speedsearch.boot (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1987-01-01  |  353 b   |  11 lines
  1. 10 poke 198,0
  2. 15 print"[147]the screen will blank while"
  3. 16 print"loading speedsearch."
  4. 20 print"press a key to load speedsearch"
  5. 30 get a$:if a$="" then30
  6. 40 print"[147][155]":s$="l[207]"+chr$(34)+"speedsearch"+chr$(34)+",8:"
  7. 50 print s$
  8. 60 poke631,13:poke 632,asc("r"):poke633,asc("u"):poke634,asc("n"):poke635,13
  9. 70 poke198,5:poke53281,15:poke53280,15
  10. 80 printchr$(142)"[145]loading...":end
  11.