home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 57 / 64er_Magazin_Sonderheft_57_19xx_Markt__Technik_de_Side_A.d64 / sprite-demo (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  355b  |  12 lines
  1. 5 rem hyperscreen demo 2
  2. 6 rem dieses programm laesst sprites
  3. 7 rem ueber den bildschirm laufen
  4. 8 ifa=0thena=1:load"hyperscreen",8,1
  5. 10 sys49152:print"[147]"
  6. 20 poke53269,3:poke53277,3
  7. 30 forx=832to832+63step6:fory=xtox+2:pokey,5*16+5:nexty
  8. 40 fory=x+3tox+5:pokey,10*16+10:nexty,x
  9. 50 poke2040,832/64:poke2041,832/64
  10. 55 d=53249:e=53251:f=53248:g=53250
  11. 60 forx=0to255:poked,x:pokee,x:pokef,x:pokeg,255-x:nextx:goto60
  12.