Bu sayfadaki yazılar
Sayfanın metni
Sayfa 29
dc.w $0000,$0000,$0000,$0000,$C000,$D000,$0000,$0400 dc.w $C000,$C200,$0200,$0100,$0100,$0080,$0080,$0000 dc.w $0080,$0040,$0040,$0000,$0040,$0000,$00C0,$0080 dc.w $00C0,$0080,$0040,$0080,$01C0,$0100,$02C0,$0300 dc.w $0480,$0640,$0980,$0D00,$1500,$1E80,$2200,$3500 dc.w $4C00,$6A00,$7800,$8400,$E000,$1000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000 Spr0IRo: dc.w $7088,$9180 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$3000,$0000,$1C00,$0000 dc.w $C600,$0000,$0300,$0000,$0180,$0000,$0080,$0000 dc.w $00C0,$0000,$0040,$0000,$0040,$0000,$00C0,$0000 dc.w $00C0,$0000,$00C0,$0000,$01C0,$0000,$03C0,$0000 dc.w $07C0,$0000,$0E80,$0000,$1980,$0000,$3B00,$0000 dc.w $7600,$0000,$FC00,$0000,$F000,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000 Spr02Le: dc.w $7080,$9100 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$00 0,$0000,$0000,$000F,$001 F,$0030,$0070 dc.w 001 F,$00FF,$002E,$01 DE,$0174,$038C,$02AC,$02DC dc.w $02D8,$06F8,$05F0,$05F0,$0580,$0580,$0500,$0500 dc.w $0500,$0500,$0400,$0400,$0000,$0000,$0000,$0000 dc.w $0000,$0400,$0000,$0000,$0100,$0200,$0080,$0100 dc.w $0040,$0080,$0033,$0043,$000F,$00I0,$0000,$0000 dc.w $0000.$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,50000 Spr02Lo: dc.w $7080,$9180 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$0010,$0000,$0040,$0000 dc.w $00BF,$0000,$017E,$0000,$02DC,$0000,$00FC,$0000 dc.w $04F8,$0000,$01F0,$0000,$0180,$0000,$0100,$0000 dc.w $0100,$0000,$0000,$0000,$0400,$0000,$0400,$0000 dc.w $0600,$0000,$0200,$0000,$0300,$00002$0180,$0000 dc.w $00C0,$0000,$0073,$0000,$001F,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000 Spr02Re dc.w $7088,$9100 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$C000,$D000,$0000,$0400 dc.w $C000,$C200,$0200.$0100.#0100,$0080.$0080,$0000 dc.w $0080.$0040.$0040,S0000,$0040,$0000,$00C0,$0080 dc.w $00C0,$0080,$0040.$0080,$1C00,$0100,$02C0,$0300 dc.w $0480,$0640,$0980,$0D00,$1500,,$1E80,$2200,$3500 dc.w $4C00,$6A00,$7800,$8400,$E000,$1000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000 Spr02Ro: dc.w $7088,$9180 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$3000,$0000,$1C00,$0000 dc.w $C600,$0000,$0300,$0000,$0180,$0000,$0080,$0000 dc.w $00C0,$0000,$0040,$0000,$0040,$0000,$00C0,$0000 de w $00C0,$0000,$00C0,$0000,$01C0,$0000,$03C0,$0000 dc.w $07C0,$0000,$0E80,$0000,$1980,Ş0000,$3B00,$0000 dc.w $7600,$0000,$FC00,$0000,$F000,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000 Spr03Le: dc.w $7080,$9100 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$000F,$001 F,$0030,$0070 dc.w $001 F,$00FF,$002E,$01 DE,$0174,$038C,$02AC,$02DC dc.w $02D8,$06F8,$05F0,$05F0,$0580,$0580,$0500,$0500
dc.w $050E,$0509,$043C,$0420,$0038,$0008,$0030.S0010 dc.w $0038,$0428,$0018,$0010,$0138,$0220,$00F8.S0108 dc.w $0040,$0080,$0033,$0043,$000F,$0010,$0000,S0000 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000 Spr03Lo: dc.w $7080,$9180 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$0010,$0000,$0040,$0000 dc.w $00BF,$0000,$017E,$0000,$02DC,$0000,$00FC,$0000 dc.w $04F8,$0000,$01F0,$0000,$0180,$0000,$0100,$0000 dc.w $010F,$0000,$003C,$0000,$0438,$0000,$0430,$0000 dc.w $0638,$0000,$0218,$0000,$0338,$0000,$01 F8,$0000 dc.w $00C0,$0000,$0073,$0000,$001 F,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000 Spr03Re: dc.w $7088,$9100 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000,$0000.$0000,$C000,$D000,$0000,$0400 dc.w $C000,$C200,$0600,$0500,$0F00,$0A80,$1C80,$1400 dc.w $1880,$0840,$1C40,$1400,$0E40,$0A00,$06C0,$0480 dc.w $8EC0,$8A80,$5C40,$6480,$01 C0,$0100,$02C0,$0300 dc.w $0480,$0640,$0980,$0D00,$1500,$1E80,$2200,$3500 dc.w $4C00,$6A00,$7800,$8400,$E000,$1000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000 Spr03Ro: dc.w $7088,$9180 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$3000,$0000,$1C00,$0000 dc.w $C600,$0000,$0700,$0000,$0F80,$0000,$1C80,$0000 dc.w $18C0,$0000,$1C40,$0000,$0E40,$0000,$06C0.$0000 dc.w $8EC0,$0000,$7CC0,$0000,$01C0,$0000,$03C0.$0000 dc.w $07C0,$0000,$0E80,$0000,$ 1980,$0000,$3B00,$0000 dc.w $7600,$0000,$FC00,$0000,$F000,$0000.$0000,$0000 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000 Spr04Le: dc.w $7080,$9100 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$000F,$001F,$0030,$0070 dc.w $001F,$00FF,$002E,$01DE,$0174,$038C,$02AC,$02DC dc.w $02D8.$06F8,$05D0,$05B0,$0580,$0500,$0581,$0501 dc.w $05C0,$0541,$04E1,$04A0,$0071,$0050,$0039,$0029 dc.w $0018,$0410,$0078,$0048,$01F0,$0210,$0080,$0100 dc.w $0040,$0080,$0033,$0043,$000F,$0010,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000 Spr04Lo: dc.w $7080,$9180 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$0010,$0000,$0040,$0000 dc.w $00BF,$0000,$007E,$0000,$02DC,$0000,$00FC,$0000 dc.w $04F8,$0000,$01F0,$0000,$0180,$0000,$0181.$0000 dc.w $01C1,$0000,$000E1,$0000,$0471,$0000,$0439,$0000 dc.w $0618,$0000,$0278,$0000,$03F0,$0000,$0180,$0000 dc.w $00C0,$0000,$0073,$0000,$001F,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000 Spr04Re: dc.w $7088,$9100 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$C000,$D000,$0000.$0400 dc.w $D800,$D200,$3A00,$2900,$3100,$1080,$6080,$4000 dc.w $6080,$2040,$7040,$5000,$3840,$0800,$3CC0.$2480 dc.w $0CC0,$0880,$1C40,$1080,$BDC0,$A500,$FAC0.S0B00 dc.w $0480,$0640,$0980,$0D00,$1500,$1E80,$2200,$3500 dc.w $4C00,$6A00,$7800,$8400,$E000,$1000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 28
move, w d0,10(a0)
move.l #Spritel,d0 move.l #Spritel,d1 swap d1 and.l #$ffff,d0 and.l #$ffff,d1 move, w d1.l4(a0) move.w d0,18(a0)
move.l #Sprite2,d0 move.l #Sprite2,d1 swap d1 and.l #$ffff,d0 and.l #$ffff,d1 move.w d1,22(a0) move.w d0,26(a0)
move.l #Sprite3,d0 move.l #Sprite3,d1 swap d1 and.l #$ffff,d0 and.l #$ffff,d1 move.w d1,30(a0) move.w d0,34(a0) rts
CopySprites: move.l Count,d0 add.l #1.d0 ^ move.l d0,Count cmp.l #20,d0 beq.b OK rts
OK: move.l #0,Count lea Sprite0Table,a0 lea Sprite ITableal lea Sprite2Table,a2 lea Sprite3Table,a3 move.l SpriteNumber,d0 mulu #4,d0 move.l (a0,d0),a0 move.l (al,d0),al move.l (a2,d0),a2 move.l (a3,d0),a3 lea Sprite0,a5 lea Sprite2,a6 move.l #31,d7 SprCopy:
move.l (a0)+,0(a5) move.l (al)+,256(a5) move.l (a2)+,0(a6) move.l (a3)+,256(a6) add.l #4,a5 add.l #4,a6 dbf d7,SprCopy add.l #1,SpriteNumber move.l SpriteNumber,d0 cmp.l #15,d0 beq.b D0Zero rts
D0Zero: move.l #0,SpriteNumber rts
NewCopper: dc.w $0100,$ 1200 dc.w $0120,$0000,$0122,$0000
dc.w $0124,$0000,$0126,$0000 dc.w $0128,$0000,$012a,$0000 dc.w $012c,$0000,$012e,$0000 dc.w $0102,$0000,$0104,$0000 dc.w $0092,$0038,$0094,$00d0 dc.w $008e,$2c81,$0090,$2ccl dc.w $0180,$0000,$0182,$0000 dc.w $01a0,$0000,$01a2,$0fff dc.w $01a4,$0ff0,$01a6,$0f00 dc.w $01a8,$0c00,$01aa,$0900 dc.w $01ac,$0700,$01ae,$0400 dc.w $01b0,$00b6,$01b2,$00dd dc.w $01b4,$00af,$01b6,$007c dc.w $01b8,$000f,$01ba,$070f dc.w $01bc,$0c0e,$01be,$0c08 dc.w $00e0,$0004.S00c2.$0000 dc.w $ffff,$fffe
GfxName: dc.b 'graphics.library',0,0 GfxBase: dc.l 0 OldCopper: dc.l 0 SpriteNumber: dc.l 0 Count dc.l 0
Sprite0: blk.b 256.0 Sprite 1: blk.b 256,0 Sprite2: blk.b 256.0 Sprite3: blk.b 256,0
Sprite0Table: del Spr01Le,Spr02Le,Spr03Le,Spr04Le,Spr05Le del Spr06Le,Spr07Le,Spr08Le,Spr09Le,Spr10Le del Spr11Le,Spr12Le,Spr13Le,Spr14Le,Spr15Le Sprite 1 Table: del Spr01Lo,Spr02Lo,Spr03Lo,Spr04Lo,Spr05Lo del Spr06Lo,Spr07Lo,Spr08Lo,Spr09Lo,Spr10Lo del Spr11Lo,Spr12Lo,Spr13Lo,Spr14Lo,Spr15Lo Sprite2Table: del Spr01Re,Spr02Re,Spr03Re,Spr04Re,Spr05Re del Spr06Re,Spr07Re,Spr08Re,Spr09Re,Spr10Re del Spr11Re,Spr12Re,Spr13Re,Spr14Re,Spr15Re Sprite3Table: del Spr01Ro,Spr02Ro,Spr03Ro,Spr04Ro,Spr05Ro del Spr06Ro,Spr07Ro,Spr08Ro,Spr09Ro,Spr10Ro del Spr11Ro,Spr12Ro,Spr13Ro,Spr14Ro,Spr15Ro
Spr01Le: dc.w $7080,$9100
dc.w $0000,$0000,$0000,$0000.$0000,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$000F,$001F,$0030,$0070 dc.w $0011,$00FF.$002E,$01DE,$0174,$038C,$02AC,$02DC dc.w $02D8.$06F8,$05F0,$05F0,$0580,$0580,$0500,$0500 dc.w $0500,$0500.$0400.$0400,$0000,$0000,$0000,$0000 dc.w $0000,$0400.$0000.$0000,$0100,$0200,$0080,$0100 dc.w $00405$0080.$0033.$0043,$000F,$0010,$0000,$0000 dc.w $0000.$0000.$0000.$0000,$0000,$0000,$0000,$0000 dc.w $0000,$0000 Spr01Lo: dc.w $7080.S9180 dc.w S0000.$0000,$0000.S0000,$0000,$0000,$0000,$0000 dc.w S0000.S0000.$0000.S0000,$0010,$0000,$0040,$0000 dc.w $00bF,$0000,$017E,$0000,$02DC,$0000,$00FC,$0000 dc.w $04F8,$0000,S01F0.$0000,$0180,$0000,$0100,$0000 dc.w S0100.$0000.$0000.$0000,$0400,$0000,$0400,$0000 dc.w $0600,$0000,$0200,$0000,$0300,$0000,$0180,$0000 dc.w $00C0,$0000,$0073,$0000,$001 F,$0000,$0000,$0000 dc.w $0000,$0000,$0000,$0000,$0000,$0000,$00(K),$0000 dc.w $0000,$0000 Spr01Re: dc.w $7088,$9100 dc.w $0000.$0000.$0000.$0000.$0000.$0000.$0000.$0000