mirror of
https://frontier.innolan.net/github/AmigaExamples.git
synced 2026-09-12 15:22:06 +00:00
124 lines
2.7 KiB
ArmAsm
124 lines
2.7 KiB
ArmAsm
include "includes.i"
|
|
|
|
xdef SetupItemSpriteData
|
|
xdef ScrollItemSprites
|
|
xdef RenderItemSprite
|
|
|
|
ScrollItemSprites:
|
|
move.l #1,d0
|
|
lsl.w #4,d0 ; multiply by 16 (item control structure size)
|
|
lea item1,a1
|
|
add.l d0,a1
|
|
|
|
move.l foregroundScrollPixels,d0
|
|
sub.w d0,ITEM_X(a1)
|
|
rts
|
|
|
|
SetupItemSpriteData:
|
|
;; d0 - item slot
|
|
;; d1 - sprite slot
|
|
move.l #1,d0
|
|
lsl.w #4,d0 ; multiply by 16 (item control structure size)
|
|
lea item1,a1
|
|
add.l d0,a1
|
|
|
|
move.l currentItemSprite,a0
|
|
;; add.l #64+4,a0
|
|
|
|
cmp.w #13<<3,ITEM_INDEX(a1)
|
|
ble .dontResetIndex
|
|
move.l #0,ITEM_INDEX(a1)
|
|
.dontResetIndex:
|
|
cmp.l #deadSprite,a0
|
|
bne .setupSprite
|
|
bra .c1
|
|
.setupSprite:
|
|
|
|
move.l #0,d0
|
|
move.w ITEM_INDEX(a1),d0
|
|
lsr.l #3,d0
|
|
mulu.w #ITEM_SPRITE_BYTES,d0
|
|
add.l d0,a0
|
|
move.w ITEM_LAGX(a1),d0
|
|
lsr.w #FOREGROUND_SCROLL_SHIFT_CONVERT,d0 ; convert to pixels
|
|
move.w ITEM_X(a1),ITEM_LAGX(a1)
|
|
add.w #32,d0
|
|
move.w d0,d1
|
|
andi #1,d1
|
|
move.b d1,3(a0) ;spriteControl
|
|
lsr.l #1,d0
|
|
move.b d0,1(a0) ;spriteHStart
|
|
move.w ITEM_LAGY(a1),d0
|
|
move.w ITEM_Y(a1),ITEM_LAGY(a1)
|
|
move.b d0,(a0) ;spriteVStart
|
|
move.w ITEM_LAGYEND(a1),d0
|
|
move.w ITEM_YEND(a1),ITEM_LAGYEND(a1)
|
|
move.b d0,2(a0) ;spriteVStop
|
|
.c1:
|
|
|
|
|
|
move.l a0,SPR2PTH(a6)
|
|
|
|
add.w #1,ITEM_INDEX(a1)
|
|
rts
|
|
|
|
RenderItemSprite:
|
|
;; d2 - y tile index ?
|
|
movem.l d2-d3,-(sp)
|
|
|
|
move.l #1,d0
|
|
lsl.w #4,d0 ; multiply by 16 (item control structure size)
|
|
lea item1,a1
|
|
add.l d0,a1
|
|
|
|
move.l foregroundScrollX,d0
|
|
lsr.w #FOREGROUND_SCROLL_SHIFT_CONVERT,d0 ; convert to pixels
|
|
andi.w #$f,d0
|
|
cmp.b #$f,d0
|
|
bne .dontAddSprite
|
|
move.l a2,a3
|
|
add.l mapSize,a3
|
|
cmpi.w #0,(a3)
|
|
beq .dontAddSprite
|
|
move.l #deadSprite,currentItemSprite
|
|
move.w #336<<FOREGROUND_SCROLL_SHIFT_CONVERT,ITEM_X(a1)
|
|
mulu.w #16,d2
|
|
move.w #255-10,d3
|
|
sub.w d2,d3
|
|
move.w d3,ITEM_Y(a1)
|
|
add.w #ITEM_SPRITE_HEIGHT,d3
|
|
move.w d3,ITEM_YEND(a1)
|
|
;; move.w #0,itemIndex
|
|
move.l #spriteCoin1,currentItemSprite
|
|
.dontAddSprite:
|
|
movem.l (sp)+,d2-d3
|
|
rts
|
|
|
|
currentItemSprite:
|
|
dc.l deadSprite
|
|
|
|
ItemControl item1
|
|
ItemControl item2
|
|
ItemControl item3
|
|
ItemControl item4
|
|
ItemControl item5
|
|
ItemControl item6
|
|
ItemControl item7
|
|
ItemControl item8
|
|
|
|
ItemSprite spriteCoin1,sprite_coin1.bin
|
|
ItemSprite spriteCoin1_1,sprite_coin1.bin
|
|
ItemSprite spriteCoin2,sprite_coin2.bin
|
|
ItemSprite spriteCoin3,sprite_coin3.bin
|
|
ItemSprite spriteCoin4,sprite_coin4.bin
|
|
ItemSprite spriteCoin5,sprite_coin3.bin
|
|
ItemSprite spriteCoin6,sprite_coin6.bin
|
|
ItemSprite spriteCoin7,sprite_coin7.bin
|
|
ItemSprite spriteCoin7_1,sprite_coin7.bin
|
|
ItemSprite spriteCoin8,sprite_coin6.bin
|
|
ItemSprite spriteCoin9,sprite_coin3.bin
|
|
ItemSprite spriteCoin10,sprite_coin4.bin
|
|
ItemSprite spriteCoin11,sprite_coin3.bin
|
|
ItemSprite spriteCoin12,sprite_coin2.bin
|
|
|