[CustomTag] Cleanup CrumbleFloorTag
This commit is contained in:
@@ -1,12 +1,14 @@
|
||||
org $01CC04 ; holes_1 tag routine
|
||||
JSL NewTagRoutine
|
||||
JSL CrumbleFloorTag_Main
|
||||
RTS
|
||||
|
||||
pullpc
|
||||
NewTagRoutine:
|
||||
|
||||
; check under link feet what tile he is standing on
|
||||
; save somewhere in ram last tile we were on so it doesn't turn it back off
|
||||
; save in ram last tile we were on so it doesn't turn back off
|
||||
; kill room tag
|
||||
CrumbleFloorTag_Main:
|
||||
{
|
||||
LDA.b $20 : CLC : ADC #$10 : AND.b #$F0
|
||||
STA.w $0224 ; y
|
||||
|
||||
@@ -23,7 +25,8 @@ JMP .sameTile
|
||||
REP #$30
|
||||
|
||||
LDA.w $022A : AND.w #$01F0 : LSR #$02 : STA.b $00
|
||||
LDA.w $0228 : AND.w #$01F0 : ASL #$04 : CLC : ADC.b $00 : STA.b $06
|
||||
LDA.w $0228 : AND.w #$01F0 : ASL #$04
|
||||
CLC : ADC.b $00 : STA.b $06
|
||||
TAX
|
||||
|
||||
LDA.l $7E2000, X : CMP.w #$0CCC : BNE +
|
||||
@@ -46,9 +49,11 @@ LDA.w $0225 : STA.w $0227 : STA.w $022A ; Last X
|
||||
LDA.b $21 : STA.w $0229
|
||||
LDA.b $23 : STA.w $022B
|
||||
RTL
|
||||
}
|
||||
|
||||
|
||||
spawnFallingTile:
|
||||
{
|
||||
LDX.b #$1D
|
||||
|
||||
.next
|
||||
@@ -86,9 +91,11 @@ BPL .next
|
||||
|
||||
.exit
|
||||
RTS
|
||||
}
|
||||
|
||||
|
||||
update_crack_tile:
|
||||
{
|
||||
STZ.b $0E
|
||||
REP #$30
|
||||
|
||||
@@ -100,9 +107,10 @@ LDA.b #$01
|
||||
STA.b $14
|
||||
REP #$30
|
||||
RTS
|
||||
|
||||
}
|
||||
|
||||
update_pit_tile:
|
||||
{
|
||||
STZ.b $0E
|
||||
REP #$30
|
||||
|
||||
@@ -114,8 +122,10 @@ LDA.b #$01
|
||||
STA.b $14
|
||||
REP #$30
|
||||
RTS
|
||||
}
|
||||
|
||||
replace_crack_pit:
|
||||
{
|
||||
LDX.w $1000
|
||||
|
||||
LDA.w #$0CCC
|
||||
@@ -151,8 +161,10 @@ STA.b $08
|
||||
STA.b $09
|
||||
|
||||
JMP replace_tile_continue
|
||||
}
|
||||
|
||||
replace_tile_pit:
|
||||
{
|
||||
LDX.w $1000
|
||||
|
||||
LDA.w #$01E9
|
||||
@@ -187,10 +199,11 @@ STA.b $08
|
||||
STA.b $09
|
||||
|
||||
JMP replace_tile_continue
|
||||
}
|
||||
|
||||
|
||||
replace_tile_continue:
|
||||
|
||||
{
|
||||
LDX.w $1000
|
||||
|
||||
LDA.w #$0000
|
||||
@@ -224,10 +237,11 @@ ADC.w #$0018
|
||||
STA.w $1000
|
||||
|
||||
RTS
|
||||
|
||||
}
|
||||
; ---------------------------------------------------------
|
||||
|
||||
draw_one_corner:
|
||||
{
|
||||
CLC
|
||||
ADC.b $06
|
||||
STA.b $0E
|
||||
@@ -256,4 +270,5 @@ ORA.b $08
|
||||
XBA
|
||||
|
||||
RTS
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user