home *** CD-ROM | disk | FTP | other *** search
/ Publication 51 / Publication_51_2003_Civitas_de_Side_B.d64 / 4x4 bas. (.txt) next >
Encoding:
Commodore BASIC  |  2003-01-01  |  151 b   |  9 lines
  1. 0 print"[129][147]";:poke53270,216:poke53280,0:poke53281,0:poke53272,29
  2. 10 a=5632
  3. 20 b=3
  4. 30 fori=0to3
  5. 50 forx=0to3
  6. 60 poke1024+i*40+x,peek(a+(b*16)+h):h=h+1
  7. 70 nextx
  8. 80 nexti
  9.