home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 246 / 246.d81 / quik (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  190b  |  8 lines
  1. 10 a$="qread"
  2. 20 print"[147]loada$,8":print"sys5217"
  3. 21 q$="sammy"+chr$(13)
  4. 30 poke198,2:poke631,13:poke632,13
  5. 35 forx=1to6:poke632+x,asc(mid$(q$,x)):next
  6. 40 poke198,8: end
  7. 10000 n$="quik":open1,8,15,"s0:"+n$:close1:saven$,8:end
  8.