home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C64'er
/
C64'er.iso
/
85xx
/
8512.d64
/
sprite-demo
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-03-30
|
323b
|
11 lines
5 REM HYPERSCREEN DEMO 2
6 REM DIESES PROGRAMM LAESST SPRITES
7 REM UEBER DEN BILDSCHIRM LAUFEN
10 SYS49152:PRINT"[147]"
20 POKE53269,3:POKE53277,3
30 FORX=832TO832+63STEP6:FORY=XTOX+2:POKEY,5*16+5:NEXTY
40 FORY=X+3TOX+5:POKEY,10*16+10:NEXTY,X
50 POKE2040,832/64:POKE2041,832/64
55 D=53249:E=53251:F=53248:G=53250
60 FORX=0TO255:POKED,X:POKEE,X:POKEF,X:POKEG,255-X:NEXTX:GOTO60