home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1989 October / 64er_Magazin_89-10_1989_Markt__Technik_de_Side_A.d64 / small-loader (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  333b  |  15 lines
  1. 10 rem lader fuer "small-char"
  2. 20 :
  3. 30 poke 53281,15:print"[144][147]";
  4. 40 input"filename ";f$
  5. 50 iff$=""thenf$="small-char"
  6. 100 print"[147]poke 43,1:poke 44,64:poke 16384,0:new"
  7. 110 print"load";chr$(34);f$;chr$(34);",8";
  8. 120 :
  9. 130 rem tastaturpuffer belegen
  10. 140 :
  11. 150 poke 631,13 :rem << return >>
  12. 160 poke 632,13 :rem << return >>
  13. 170 poke 198,2 :rem 2 zeichen im puffer
  14. 180 end
  15.