home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1990 November / 64er_Magazin_90-11_1990_Markt__Technik_de_Side_A.d64 / makechr (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  426b  |  11 lines
  1. 1 poke56334,0:poke1,51:fora=0to1023:poke8192+a,peek(56320+a):next:poke1,55
  2. 2 poke56334,1:fora=1to6:readc:forb=0to7:readd:pokec+b,d:next:next
  3. 3 open1,8,1,"plachrs":print#1,chr$(0)chr$(204);
  4. 4 fora=8192to9215:print#1,chr$(peek(a));:next:close1
  5. 10 data8664,153,255,195,249,193,153,193,255
  6. 11 data8424,153,231,195,153,129,153,153,255
  7. 12 data8656,153,255,195,153,153,153,195,255
  8. 13 data8408,153,195,153,153,153,153,195,255
  9. 14 data8192,153,255,153,153,153,153,193,255
  10. 15 data9168,153,219,153,153,153,153,195,255
  11.