home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1987 June / 1987-06.d64 / impatient.note (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  563b  |  15 lines
  1. 10 poke 53280,0:poke 53281,0
  2. 20 printchr$(14)"[147][155][201]mpatient [201]nput is a machine language"
  3. 21 print"routine that you can use with your own"
  4. 22 print"programs.  [193] demo program is included"
  5. 23 print"on the menu."
  6. 24 print"[211]ee the article in the magazine for"
  7. 25 print"information on using [201]npatient [201]nput"
  8. 26 print"in your own programs."
  9. 90 print"   [208][210][197][211][211] [193][206][217] [203][197][217] [212][207] [210][197][204][207][193][196] [212][200][197][160][205][197][206][213][146]"
  10. 100 poke198,0:wait198,1:getdh$
  11. 110 print"[147]":s$="l[207]"+chr$(34)+"mn"+chr$(34)+",8:"+chr$(131)
  12. 120 fori=1tolen(s$):poke630+i,asc(mid$(s$,i)):next:poke198,i
  13. 130 poke53281,15:poke53280,15
  14. 140 printchr$(142)"[145]          reloading the menu[155]":end
  15.