home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1993 February / 64er_Magazin_93-02_1993_Markt__Technik_de_Side_A.d64 / ext.makeit (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  228b  |  8 lines
  1. 0 a$=chr$(1)
  2. 1 ifa=0thena=1:load"pic"+a$,8,1
  3. 2 ifa=1thena=2:load"clr"+a$,8,1
  4. 3 ifa=2thena=3:load"set"+a$,8,1
  5. 4 fort=0to512:poke 57344+t,peek(51712+t):next:poke53265,peek(53265)or64
  6. 5 poke648,204:poke53272,57:poke56576,peek(56576)and252
  7. 6 fort=0to4:poke53280+t,peek(53224+t):next
  8.