home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Compute! Gazette 1987 August
/
1987-08.d64
/
sprite flip.ldr
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
993b
|
35 lines
10 rem copyright 1987 compute! publications, inc. all rights reserved
20 poke 53280,0:poke 53281,0:printchr$(14)"[147][155][195]reating ml..."
30 fort=49152to49329:readh:poket,h:ck=ck+h:next
40 if ck<>25249 then print "[197]rror in data."
50 data76,68,192,76,65,192
60 data165,251,72,165,252,72
70 data32,145,192,32,54,192
80 data160,0,162,60,32,46
90 data192,32,46,192,32,46
100 data192,202,202,202,202,202
110 data202,16,239,104,133,252
120 data104,133,251,96,189,180
130 data192,145,251,200,232,96
140 data160,63,177,251,153,180
150 data192,136,16,248,96,56
160 data176,1,24,169,0,105
170 data0,141,178,192,165,251
180 data72,165,252,72,32,145
190 data192,32,54,192,160,0
200 data185,180,192,72,185,182
210 data192,153,180,192,104,153
220 data182,192,200,200,200,192
230 data66,208,235,160,63,185
240 data180,192,174,178,192,208
250 data39,162,7,74,46,179
260 data192,202,16,249,173,179
270 data192,145,251,136,16,231
280 data104,133,252,104,133,251
290 data96,169,0,133,251,134
300 data252,70,252,102,251,70
310 data252,102,251,96,162,7
320 data74,8,74,46,179,192
330 data40,46,179,192,202,202
340 data16,242,48,208