Compare commits
11 Commits
goldstar-i
...
minecart-r
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
7f87622f00 | ||
|
|
716a681d6d | ||
|
|
b0b3ca242b | ||
|
|
58dd5aab1f | ||
|
|
e0a20a98cd | ||
|
|
0f241bfddd | ||
|
|
12ef39ff79 | ||
|
|
3324a13fb2 | ||
|
|
53561eab31 | ||
|
|
4c4f531929 | ||
|
|
dad37bdee7 |
@@ -1,13 +1,11 @@
|
|||||||
; =========================================================
|
|
||||||
; Goldstar ASM disassembly/restoration
|
; Goldstar ASM disassembly/restoration
|
||||||
; Originally from the all in patch by Conn
|
; Originally from the all in patch by Conn
|
||||||
; Restored by scawful with help from Zarby
|
; Restored by scawful with help from Zarby
|
||||||
;
|
;
|
||||||
; $22XXXX - Denotes the source address from all in patch
|
; $22XXXX - Denotes the source address from all in patch
|
||||||
; =========================================================
|
|
||||||
|
|
||||||
org $07D576
|
org $07D576
|
||||||
Hookshot_CheckTileCollision:
|
Hookshot_CheckTileCollision:
|
||||||
|
|
||||||
pullpc
|
pullpc
|
||||||
TransferGFXinRAM:
|
TransferGFXinRAM:
|
||||||
@@ -19,7 +17,8 @@ TransferGFXinRAM:
|
|||||||
LDX #$80
|
LDX #$80
|
||||||
--
|
--
|
||||||
LDA.l .morningstargfx, X : STA.l $7EA180, X
|
LDA.l .morningstargfx, X : STA.l $7EA180, X
|
||||||
DEX : DEX : BPL --
|
DEX : DEX
|
||||||
|
BPL --
|
||||||
|
|
||||||
PLP
|
PLP
|
||||||
PLX
|
PLX
|
||||||
@@ -36,8 +35,7 @@ org $0085C4
|
|||||||
pullpc
|
pullpc
|
||||||
|
|
||||||
; =========================================================
|
; =========================================================
|
||||||
; Zarby Code
|
; Start Zarby
|
||||||
; Handles the layout of OAM tile patterns for the hookshot
|
|
||||||
|
|
||||||
pushpc
|
pushpc
|
||||||
org $0DABA2 ; LinkOAM_SetWeaponVRAMOffsets
|
org $0DABA2 ; LinkOAM_SetWeaponVRAMOffsets
|
||||||
@@ -53,12 +51,12 @@ org $008542
|
|||||||
dw $A1C0, $A1C0, $A1E0, $A1E0
|
dw $A1C0, $A1C0, $A1E0, $A1E0
|
||||||
pullpc
|
pullpc
|
||||||
|
|
||||||
|
|
||||||
HookMaskCheck:
|
HookMaskCheck:
|
||||||
{
|
{
|
||||||
LDA GoldstarOrHookshot : AND.w #$00FF : CMP.w #$0002 : BNE .not_mask
|
LDA GoldstarOrHookshot : AND.w #$00FF : CMP.w #$0002 : BNE .not_mask
|
||||||
LDA $0202 : AND.w #$00FF : CMP.w #$0003 : BNE .not_mask
|
LDA $0202 : AND.w #$00FF : CMP.w #$0003 : BNE .not_mask
|
||||||
; morning star graphics oam tile pattern id
|
LDA.w $0109 : AND #$FF00 : ORA.w #$004A ; morning star graphics oam tile pattern id
|
||||||
LDA.w $0109 : AND #$FF00 : ORA.w #$004A
|
|
||||||
RTL
|
RTL
|
||||||
.not_mask
|
.not_mask
|
||||||
; return hookshot graphics oam tile pattern id
|
; return hookshot graphics oam tile pattern id
|
||||||
@@ -67,6 +65,11 @@ HookMaskCheck:
|
|||||||
RTL
|
RTL
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; End Zarby
|
||||||
|
; =========================================================
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
; =========================================================
|
; =========================================================
|
||||||
; $22D4A0 - Hooked into LinkItem_Hookshot @ _07AB5A
|
; $22D4A0 - Hooked into LinkItem_Hookshot @ _07AB5A
|
||||||
; Call this routine to start the gfx transfer of the handle
|
; Call this routine to start the gfx transfer of the handle
|
||||||
@@ -117,14 +120,11 @@ BallChain_ExtraCollisionLogic:
|
|||||||
TXA
|
TXA
|
||||||
++ ; $22D4F3
|
++ ; $22D4F3
|
||||||
CMP #$FF : BEQ +++
|
CMP #$FF : BEQ +++
|
||||||
; AncillaDraw_Hookshot - JSR Ancilla_SetOAM_XY, skips hookshot char
|
JML $08BF10 ; AncillaDraw_Hookshot - JSR Ancilla_SetOAM_XY, skips hookshot char
|
||||||
JML $08BF10
|
|
||||||
|
|
||||||
+++ ; $22D4FB
|
+++ ; $22D4FB
|
||||||
JML $08BF32 ; AncillaDraw_Hookshot_skip
|
JML $08BF32 ; AncillaDraw_Hookshot_skip
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
;; 22D520
|
;; 22D520
|
||||||
LinkItem_BallChain_GfxTransfer:
|
LinkItem_BallChain_GfxTransfer:
|
||||||
{
|
{
|
||||||
@@ -174,10 +174,11 @@ LinkItem_BallChain_GfxTransfer:
|
|||||||
}
|
}
|
||||||
|
|
||||||
; 22D5C0 ; Unreached
|
; 22D5C0 ; Unreached
|
||||||
; LDA $8580,Y
|
LDA $8580,Y
|
||||||
; CMP #$02
|
CMP #$02
|
||||||
; BEQ $22D5CA
|
BEQ $22D5CA
|
||||||
; JMP $DA80
|
JMP $DA80
|
||||||
|
|
||||||
|
|
||||||
; Graphics data for transferring the handle oam slot
|
; Graphics data for transferring the handle oam slot
|
||||||
GoldstarHandleGfx:
|
GoldstarHandleGfx:
|
||||||
@@ -239,9 +240,9 @@ pullpc
|
|||||||
; Sets Link state to 0x00 and resets the hookshot timer
|
; Sets Link state to 0x00 and resets the hookshot timer
|
||||||
BallChain_ResetTimer:
|
BallChain_ResetTimer:
|
||||||
{
|
{
|
||||||
LDA GoldstarOrHookshot : CMP #$02 : BNE .dont_clear_timer
|
LDA GoldstarOrHookshot : CMP #$02 : BNE +
|
||||||
STZ $7A ; Clear the timer
|
STZ $7A ; Clear the timer
|
||||||
.dont_clear_timer
|
+
|
||||||
STZ $5D ; Return to LinkState_Default
|
STZ $5D ; Return to LinkState_Default
|
||||||
RTL
|
RTL
|
||||||
}
|
}
|
||||||
@@ -265,7 +266,7 @@ BallChain_DrawChainOrHookshot:
|
|||||||
JSR BallChainOrHookshot_Modifier ; $D820
|
JSR BallChainOrHookshot_Modifier ; $D820
|
||||||
ORA.b #$02
|
ORA.b #$02
|
||||||
RTL
|
RTL
|
||||||
+ ; 22D812
|
+ ; 22D812
|
||||||
LDA #$0E : STA ($90),Y
|
LDA #$0E : STA ($90),Y
|
||||||
JSR BallChainOrHookshot_Modifier ; $D820
|
JSR BallChainOrHookshot_Modifier ; $D820
|
||||||
ORA.b #$04 ; 02 is gray color
|
ORA.b #$04 ; 02 is gray color
|
||||||
@@ -354,47 +355,40 @@ HookshotChain_AncillaDraw:
|
|||||||
LDA $7A : AND #$00FF : CMP #$0001 : BNE + ; $22D914
|
LDA $7A : AND #$00FF : CMP #$0001 : BNE + ; $22D914
|
||||||
LDA Hookshot_box_size_y, X
|
LDA Hookshot_box_size_y, X
|
||||||
JML $08BFB5 ; AncillaDraw_HookshotChain
|
JML $08BFB5 ; AncillaDraw_HookshotChain
|
||||||
+ ; $22D914
|
+ ; $22D914
|
||||||
CMP #$0000 : BNE ++ ; $22D921
|
CMP #$0000 : BNE ++ ; $22D921
|
||||||
LDA Hookshot_box_size_y, X
|
LDA Hookshot_box_size_y, X
|
||||||
JML $08BFB5 ; AncillaDraw_HookshotChain
|
JML $08BFB5 ; AncillaDraw_HookshotChain
|
||||||
++
|
++
|
||||||
JSR Routine_22E5A0 ; CheckAndClearAncillaId has set the timer in A
|
JSR Routine_22E5A0 ; CheckAndClearAncillaId has set the timer in A
|
||||||
|
|
||||||
SEP #$30
|
SEP #$30
|
||||||
; Compare rotation progress
|
; Compare rotation progress
|
||||||
CLC : CMP #$FB : BNE +++
|
CLC : CMP #$FB : BNE +++
|
||||||
LDA #$06 : STA $2143
|
LDA #$06 : STA $2143
|
||||||
|
+++ ; 22D930
|
||||||
+++ ; 22D930
|
|
||||||
BCC ++++
|
BCC ++++
|
||||||
JMP StartChainRotation ; $D960
|
JMP StartChainRotation ; $D960
|
||||||
|
++++ ; 22D935
|
||||||
++++ ; 22D935
|
|
||||||
; Compare rotation progress
|
; Compare rotation progress
|
||||||
CLC : CMP #$AB : BNE +++++
|
CLC : CMP #$AB : BNE +++++
|
||||||
LDA #$06 : STA $2143
|
LDA #$06 : STA $2143
|
||||||
|
+++++ ;22D93F
|
||||||
+++++ ;22D93F
|
|
||||||
; Compare rotation progress
|
; Compare rotation progress
|
||||||
CLC : CMP #$5B : BNE ++++++
|
CLC : CMP #$5B : BNE ++++++
|
||||||
LDA #$06 : STA $2143
|
LDA #$06 : STA $2143
|
||||||
|
++++++ ;22D949
|
||||||
++++++ ;22D949
|
|
||||||
CLC : CMP #$E6 : BCC +++++++
|
CLC : CMP #$E6 : BCC +++++++
|
||||||
JMP Routine_22D9A0 ; $D9A0
|
JMP Routine_22D9A0 ; $D9A0
|
||||||
|
+++++++ ; 22D951
|
||||||
+++++++ ; 22D951
|
|
||||||
CLC : CMP #$05 : BCC ++++++++
|
CLC : CMP #$05 : BCC ++++++++
|
||||||
LDA $F8 : CMP.b #$40 : BEQ +
|
LDA $F8 : CMP.b #$40 : BEQ +
|
||||||
JMP Routine_22D9A0 ; $D9A0
|
|
||||||
|
|
||||||
++++++++ ; 22D959
|
JMP Routine_22D9A0 ; $D9A0
|
||||||
|
++++++++ ; 22D959
|
||||||
JMP Routine_22DBD0 ; $DBD0
|
JMP Routine_22DBD0 ; $DBD0
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
|
|
||||||
!RotationState = $7F5803
|
!RotationState = $7F5803
|
||||||
|
|
||||||
; 22D960
|
; 22D960
|
||||||
@@ -411,8 +405,6 @@ StartChainRotation:
|
|||||||
JML $08BFD0 ; AncillaDraw_HookshotChain before Hookshot_CheckProximityToLink
|
JML $08BFD0 ; AncillaDraw_HookshotChain before Hookshot_CheckProximityToLink
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
|
|
||||||
struct Ancilla_GetRadialProjection $0FFBC2
|
struct Ancilla_GetRadialProjection $0FFBC2
|
||||||
.multiplier_x : skip 64
|
.multiplier_x : skip 64
|
||||||
.multiplier_y : skip 64
|
.multiplier_y : skip 64
|
||||||
@@ -425,7 +417,7 @@ Routine_22D9A0:
|
|||||||
{
|
{
|
||||||
LDA $7F5803 : CLC : ADC #$02 : AND #$3F : CPY #$04 : BNE +
|
LDA $7F5803 : CLC : ADC #$02 : AND #$3F : CPY #$04 : BNE +
|
||||||
STA $7F5803 : CLC : ADC #$02
|
STA $7F5803 : CLC : ADC #$02
|
||||||
+ ; 22D9B6
|
+ ; 22D9B6
|
||||||
AND #$3F : PHX : TAX
|
AND #$3F : PHX : TAX
|
||||||
|
|
||||||
LDA Ancilla_GetRadialProjection.multiplier_y, X
|
LDA Ancilla_GetRadialProjection.multiplier_y, X
|
||||||
@@ -454,23 +446,21 @@ Routine_22D9A0:
|
|||||||
JSL $08DA17 ; Sparkle_PrepOAMFromRadial
|
JSL $08DA17 ; Sparkle_PrepOAMFromRadial
|
||||||
PLY : PLX
|
PLY : PLX
|
||||||
CPY #$04 : BNE ++ ; $22DA14
|
CPY #$04 : BNE ++ ; $22DA14
|
||||||
|
|
||||||
JSR Routine_22DA70 ; $DA70
|
JSR Routine_22DA70 ; $DA70
|
||||||
NOP #7
|
NOP #7
|
||||||
JSR BallChain_SpinAncilla ; $22DB90
|
JSR BallChain_SpinAncilla ; $22DB90
|
||||||
|
++ ;22DA14
|
||||||
++ ;22DA14
|
|
||||||
NOP #3
|
NOP #3
|
||||||
LDA #$F0 : CPY #$1C : BNE +++ ; $22DA1F
|
LDA #$F0 : CPY #$1C : BNE +++ ; $22DA1F
|
||||||
STA $00
|
STA $00
|
||||||
+++ ; 22DA1F
|
+++ ; 22DA1F
|
||||||
DEC $7A ; Ball Chain Timer
|
DEC $7A ; Ball Chain Timer
|
||||||
SEP #$20
|
SEP #$20
|
||||||
JML $08BFD0 ; AncillaDraw_HookshotChain before Hookshot_CheckProximityToLink
|
JML $08BFD0 ; AncillaDraw_HookshotChain before Hookshot_CheckProximityToLink
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
;; 22DA30
|
||||||
; 22DA30
|
|
||||||
|
|
||||||
Goldstar_GetPlayerPosY:
|
Goldstar_GetPlayerPosY:
|
||||||
{
|
{
|
||||||
ADC $20 : CLC : ADC #$000C
|
ADC $20 : CLC : ADC #$000C
|
||||||
@@ -484,25 +474,21 @@ Goldstar_GetPlayerPosY:
|
|||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
; 22DA50
|
; 22DA50
|
||||||
|
|
||||||
Goldstar_GetPlayerPosX:
|
Goldstar_GetPlayerPosX:
|
||||||
{
|
{
|
||||||
LDA $22 : CLC : ADC #$0008
|
LDA $22 : CLC : ADC #$0008
|
||||||
CPX #$04 : BNE + ; $22DA5F
|
CPX #$04 : BNE + ; $22DA5F
|
||||||
SEC : SBC #$000C
|
SEC : SBC #$000C
|
||||||
RTS
|
RTS
|
||||||
+ ; $22DA5F
|
+ ; $22DA5F
|
||||||
CPX #$06 : BNE ++ ; $22DA67
|
CPX #$06 : BNE ++ ; $22DA67
|
||||||
CLC : ADC #$000C
|
CLC : ADC #$000C
|
||||||
++ ;$22DA67
|
++ ;$22DA67
|
||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
; 22DA70
|
; 22DA70
|
||||||
|
|
||||||
Routine_22DA70:
|
Routine_22DA70:
|
||||||
{
|
{
|
||||||
LDY #$00 : LDA $02 ; set sign of projected distance X
|
LDY #$00 : LDA $02 ; set sign of projected distance X
|
||||||
@@ -515,9 +501,7 @@ Routine_22DA70:
|
|||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
; 22DA80 Possibly unused
|
; 22DA80 Possibly unused
|
||||||
|
|
||||||
Routine_22DA80:
|
Routine_22DA80:
|
||||||
{
|
{
|
||||||
LDA $7EF34A : CMP #$02
|
LDA $7EF34A : CMP #$02
|
||||||
@@ -532,9 +516,7 @@ Routine_22DA80:
|
|||||||
RTL
|
RTL
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
; 22DAA0
|
; 22DAA0
|
||||||
|
|
||||||
Routine_22DAA0:
|
Routine_22DAA0:
|
||||||
{
|
{
|
||||||
CPY #$04 : BNE .alpha
|
CPY #$04 : BNE .alpha
|
||||||
@@ -564,29 +546,25 @@ Routine_22DAA0:
|
|||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
; 22DAD0
|
; 22DAD0
|
||||||
|
|
||||||
Routine_22DAD0:
|
Routine_22DAD0:
|
||||||
{
|
{
|
||||||
CPX #$00 : BNE + ; $22DAD7
|
CPX #$00 : BNE + ; $22DAD7
|
||||||
LDA #$2E
|
LDA #$2E
|
||||||
RTS
|
RTS
|
||||||
+ ; 22DAD7
|
+ ; 22DAD7
|
||||||
CPX #$02 : BNE ++ ; $22DADE
|
CPX #$02 : BNE ++ ; $22DADE
|
||||||
LDA #$13
|
LDA #$13
|
||||||
RTS
|
RTS
|
||||||
++ ; 22DADE
|
++ ; 22DADE
|
||||||
CPX #$04 : BNE +++ ; $22DAE5
|
CPX #$04 : BNE +++ ; $22DAE5
|
||||||
LDA #$2B
|
LDA #$2B
|
||||||
RTS
|
RTS
|
||||||
+++ ; 22DAE5
|
+++ ; 22DAE5
|
||||||
LDA #$09
|
LDA #$09
|
||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
|
|
||||||
pushpc
|
pushpc
|
||||||
org $08BF94
|
org $08BF94
|
||||||
JML BallChain_TryAncillaDraw
|
JML BallChain_TryAncillaDraw
|
||||||
@@ -599,16 +577,15 @@ pullpc
|
|||||||
BallChain_TryAncillaDraw:
|
BallChain_TryAncillaDraw:
|
||||||
{
|
{
|
||||||
; Ball Chain timer should be $FF here on first run
|
; Ball Chain timer should be $FF here on first run
|
||||||
LDA $7A : AND #$00FF :CMP #$0000 : BEQ +
|
LDA $7A : AND #$00FF
|
||||||
|
CMP #$0000 : BEQ +
|
||||||
CMP #$0001 : BEQ +
|
CMP #$0001 : BEQ +
|
||||||
SEP #$20
|
SEP #$20
|
||||||
JML HookshotChain_AncillaDraw ; $22D900
|
JML HookshotChain_AncillaDraw ; $22D900
|
||||||
|
+ ; $22DB15
|
||||||
+ ; $22DB15
|
|
||||||
LDA Hookshot_box_size_y,X : BNE ++
|
LDA Hookshot_box_size_y,X : BNE ++
|
||||||
JML $08BF99 ; AncillaDraw_HookshotChain
|
JML $08BF99 ; AncillaDraw_HookshotChain
|
||||||
|
++ ; $22DB1F
|
||||||
++ ; $22DB1F
|
|
||||||
JML $08BFA1 ; Resume AncillaDraw_HookshotChain
|
JML $08BFA1 ; Resume AncillaDraw_HookshotChain
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -628,13 +605,11 @@ BallChain_CheckProximityToLink:
|
|||||||
LDA $7A : AND #$00FF : CMP #$0000 : BNE + ; $22DB44
|
LDA $7A : AND #$00FF : CMP #$0000 : BNE + ; $22DB44
|
||||||
LDA.b $00
|
LDA.b $00
|
||||||
JML $08F7E0 ; Hookshot_CheckProximityToLink continue
|
JML $08F7E0 ; Hookshot_CheckProximityToLink continue
|
||||||
+ ; 22DB44
|
+ ; 22DB44
|
||||||
JML $08F820 ; Hookshot_CheckProximityToLink too_far
|
JML $08F820 ; Hookshot_CheckProximityToLink too_far
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
; 22DB50
|
; 22DB50
|
||||||
|
|
||||||
Routine_22DB50:
|
Routine_22DB50:
|
||||||
{
|
{
|
||||||
; Ball Chain Timer
|
; Ball Chain Timer
|
||||||
@@ -651,15 +626,15 @@ Routine_22DB50:
|
|||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
; $22DB90
|
|
||||||
|
|
||||||
|
; $22DB90
|
||||||
BallChain_SpinAncilla:
|
BallChain_SpinAncilla:
|
||||||
{
|
{
|
||||||
REP #$20
|
REP #$20
|
||||||
LDA $00 : CLC : ADC $E8 : CPX #$02 : BNE .alpha
|
LDA $00 : CLC : ADC $E8 : CPX #$02
|
||||||
|
BNE .alpha
|
||||||
CLC : ADC #$0010
|
CLC : ADC #$0010
|
||||||
.alpha
|
.alpha
|
||||||
STA $04
|
STA $04
|
||||||
LDA $02 : CLC : ADC $E2 : STA $06
|
LDA $02 : CLC : ADC $E2 : STA $06
|
||||||
SEP #$20
|
SEP #$20
|
||||||
@@ -670,8 +645,6 @@ BallChain_SpinAncilla:
|
|||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
|
|
||||||
struct AncillaAdd_HookshotData $099AF8
|
struct AncillaAdd_HookshotData $099AF8
|
||||||
.speed_y: skip 4
|
.speed_y: skip 4
|
||||||
.speed_x: skip 4
|
.speed_x: skip 4
|
||||||
@@ -687,16 +660,16 @@ Routine_22DBD0:
|
|||||||
; Check Link direction
|
; Check Link direction
|
||||||
LDA $2F : CMP #$00 : BNE .not_up
|
LDA $2F : CMP #$00 : BNE .not_up
|
||||||
LDA #$C0 : STA $0C26 ; Ancilla4 Y Axis Velocity
|
LDA #$C0 : STA $0C26 ; Ancilla4 Y Axis Velocity
|
||||||
.not_up
|
.not_up
|
||||||
CMP #$02 : BNE .not_down
|
CMP #$02 : BNE .not_down
|
||||||
LDA #$40 : STA $0C26 ; Ancilla4 Y Axis Velocity
|
LDA #$40 : STA $0C26 ; Ancilla4 Y Axis Velocity
|
||||||
.not_down
|
.not_down
|
||||||
CMP #$04 : BNE .not_left
|
CMP #$04 : BNE .not_left
|
||||||
LDA #$C0 : STA $0C30 ; Ancilla4 X Axis Velocity
|
LDA #$C0 : STA $0C30 ; Ancilla4 X Axis Velocity
|
||||||
.not_left
|
.not_left
|
||||||
CMP #$06 : BNE .not_right
|
CMP #$06 : BNE .not_right
|
||||||
LDA #$40 : STA $0C30 ; Ancilla4 X Axis Velocity
|
LDA #$40 : STA $0C30 ; Ancilla4 X Axis Velocity
|
||||||
.not_right
|
.not_right
|
||||||
SEP #$20
|
SEP #$20
|
||||||
STZ $0C58 ; Ancilla4 Misc
|
STZ $0C58 ; Ancilla4 Misc
|
||||||
STZ $0C62 ; Ancilla4 hookshoot extension
|
STZ $0C62 ; Ancilla4 hookshoot extension
|
||||||
@@ -738,9 +711,7 @@ HookshotOrBallChain_Extending_ignore_collision:
|
|||||||
JML $08BEDC ; AncillaDraw_Hookshot
|
JML $08BEDC ; AncillaDraw_Hookshot
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
; 22DC70
|
; 22DC70
|
||||||
|
|
||||||
ClearAncillaVariables:
|
ClearAncillaVariables:
|
||||||
{
|
{
|
||||||
REP #$30
|
REP #$30
|
||||||
@@ -769,29 +740,24 @@ BallChain_SFX_Control:
|
|||||||
LDA $7A : CMP #$00 : BNE + ; $22DC9C
|
LDA $7A : CMP #$00 : BNE + ; $22DC9C
|
||||||
LDA.b #$0A ; SFX2.0A
|
LDA.b #$0A ; SFX2.0A
|
||||||
RTL
|
RTL
|
||||||
+ ;; 22DC9C
|
+ ;; 22DC9C
|
||||||
LDA.b #$07 ; Clear SFX2
|
LDA.b #$07 ; Clear SFX2
|
||||||
RTL
|
RTL
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
; 22DCA0
|
; 22DCA0
|
||||||
; SFX Pan flags?
|
; SFX Pan flags?
|
||||||
|
|
||||||
Routine_22DCA0:
|
Routine_22DCA0:
|
||||||
{
|
{
|
||||||
LDA $7A : CMP #$00 : BNE + ;$A2DCAB
|
LDA $7A : CMP #$00 : BNE + ;$A2DCAB
|
||||||
LDA $0DBB5B,X
|
LDA $0DBB5B,X
|
||||||
RTL
|
RTL
|
||||||
+
|
+
|
||||||
LDA #$00
|
LDA #$00
|
||||||
RTL
|
RTL
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
;; 22DD90
|
||||||
; 22DD90
|
|
||||||
; TODO: Investigate the purpose of the $7A timer here
|
|
||||||
|
|
||||||
CheckAndClearAncillaId:
|
CheckAndClearAncillaId:
|
||||||
{
|
{
|
||||||
SEP #$30
|
SEP #$30
|
||||||
@@ -802,57 +768,49 @@ CheckAndClearAncillaId:
|
|||||||
LDA $0C4B : CMP #$1F : BEQ ++++ ; $22DDC1
|
LDA $0C4B : CMP #$1F : BEQ ++++ ; $22DDC1
|
||||||
LDA $7A ; Ball Chain Timer
|
LDA $7A ; Ball Chain Timer
|
||||||
RTS
|
RTS
|
||||||
++ ; 22DDB1
|
++ ; 22DDB1
|
||||||
NOP : NOP
|
NOP : NOP
|
||||||
STZ $0C4C : LDA $7A
|
STZ $0C4C : LDA $7A
|
||||||
RTS
|
RTS
|
||||||
+++ ; 22DDB9
|
+++ ; 22DDB9
|
||||||
NOP : NOP
|
NOP : NOP
|
||||||
STZ $0C4D : LDA $7A
|
STZ $0C4D : LDA $7A
|
||||||
RTS
|
RTS
|
||||||
++++ ; 22DDC1
|
++++ ; 22DDC1
|
||||||
NOP : NOP
|
NOP : NOP
|
||||||
STZ $0C4B : LDA $7A
|
STZ $0C4B : LDA $7A
|
||||||
RTS
|
RTS
|
||||||
+ ; 22DDC9
|
+ ; 22DDC9
|
||||||
STZ $0C4A : LDA $7A
|
STZ $0C4A : LDA $7A
|
||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
; 22E5A0
|
; 22E5A0
|
||||||
; Checks for the Somaria block before moving on
|
; Checks for the Somaria block before moving on
|
||||||
; TODO: Replace the JMP $E5DB with the proper code
|
|
||||||
; to handle the somaria block case.
|
|
||||||
|
|
||||||
Routine_22E5A0:
|
Routine_22E5A0:
|
||||||
{
|
{
|
||||||
SEP #$30
|
SEP #$30
|
||||||
JMP CheckForSomariaBlast ; $EE80
|
JMP CheckForSomariaBlast ; $EE80
|
||||||
.22E5A5 ; 22E5A5
|
.22E5A5 ; 22E5A5
|
||||||
LDA $0C4C : CMP #$2C : BNE + ; $22E5B2
|
LDA $0C4C : CMP #$2C : BNE + ; $22E5B2
|
||||||
INC $0C4C
|
INC $0C4C
|
||||||
;JMP $E5DB
|
;JMP $E5DB
|
||||||
|
+ ; 22E5B2
|
||||||
+ ; 22E5B2
|
|
||||||
LDA $0C4D : CMP #$2C : BNE ++ ; $22E5BF
|
LDA $0C4D : CMP #$2C : BNE ++ ; $22E5BF
|
||||||
INC $0C4D
|
INC $0C4D
|
||||||
;JMP $E5DB
|
;JMP $E5DB
|
||||||
|
++ ; 22E5BF
|
||||||
++ ; 22E5BF
|
|
||||||
LDA $0C4E : CMP #$2C : BNE +++ ; $22E5CC
|
LDA $0C4E : CMP #$2C : BNE +++ ; $22E5CC
|
||||||
INC $0C4E
|
INC $0C4E
|
||||||
;JMP $E5DB
|
;JMP $E5DB
|
||||||
|
+++ ; 22E5CC
|
||||||
+++ ; 22E5CC
|
|
||||||
LDA $0C4F : CMP #$2C : BNE ++++ ; $22E5D9
|
LDA $0C4F : CMP #$2C : BNE ++++ ; $22E5D9
|
||||||
INC $0C4F
|
INC $0C4F
|
||||||
;JMP $E5DB
|
;JMP $E5DB
|
||||||
|
++++ ; 22E5D9
|
||||||
++++ ; 22E5D9
|
|
||||||
BRA +++++ ; $22E5E0
|
BRA +++++ ; $22E5E0
|
||||||
|
|
||||||
+++++ ; 22E5E0
|
+++++ ; 22E5E0
|
||||||
JSR CheckAndClearAncillaId ; $DD90
|
JSR CheckAndClearAncillaId ; $DD90
|
||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
@@ -869,52 +827,41 @@ Routine_22E5F0:
|
|||||||
JMP $E108
|
JMP $E108
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
;22EE80
|
;22EE80
|
||||||
; TODO: Handle the somaria blast case, these JMPs are invalid.
|
; TODO: Handle the somaria blast case, these JMPs are invalid.
|
||||||
|
|
||||||
CheckForSomariaBlast:
|
CheckForSomariaBlast:
|
||||||
{
|
{
|
||||||
LDA $0300 : BEQ + ; $22EE88
|
LDA $0300 : BEQ + ; $22EE88
|
||||||
;JMP $E5DB
|
JMP $E5DB
|
||||||
|
+ ; 22EE88
|
||||||
+ ; 22EE88
|
|
||||||
LDA $0C4A : CMP #$01 : BNE ++ ; $22EE92
|
LDA $0C4A : CMP #$01 : BNE ++ ; $22EE92
|
||||||
;JMP $EEC0
|
JMP $EEC0
|
||||||
|
++ ; 22EE92
|
||||||
++ ; 22EE92
|
|
||||||
LDA $0C4B : CMP #$01 : BNE +++ ; $22EE9C
|
LDA $0C4B : CMP #$01 : BNE +++ ; $22EE9C
|
||||||
;JMP $EEC0
|
JMP $EEC0
|
||||||
|
+++ ; 22EE9C
|
||||||
+++ ; 22EE9C
|
|
||||||
LDA $0C4C : CMP #$01 : BNE ++++ ; $22EEA6
|
LDA $0C4C : CMP #$01 : BNE ++++ ; $22EEA6
|
||||||
;JMP $EEC0
|
JMP $EEC0
|
||||||
|
++++ ; 22EEA6
|
||||||
++++ ; 22EEA6
|
|
||||||
LDA $0C4D : CMP #$01 : BNE +++++ ; $22EEB0
|
LDA $0C4D : CMP #$01 : BNE +++++ ; $22EEB0
|
||||||
;JMP $EEC0
|
JMP $EEC0
|
||||||
|
+++++ ; 22EEB0
|
||||||
+++++ ; 22EEB0
|
|
||||||
LDA $0C4E : CMP #$01 : BNE ++++++ ; $22EEBA
|
LDA $0C4E : CMP #$01 : BNE ++++++ ; $22EEBA
|
||||||
;JMP $EEC0
|
JMP $EEC0
|
||||||
|
++++++ ; 22EEBA
|
||||||
++++++ ; 22EEBA
|
|
||||||
JMP Routine_22E5A0_22E5A5 ; $E5A5
|
JMP Routine_22E5A0_22E5A5 ; $E5A5
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
; 22EF00
|
|
||||||
; Hooked inside LinkItem_Hookshot @ 07AB5E
|
|
||||||
|
|
||||||
|
;; 22EF00
|
||||||
|
; Hooked inside LinkItem_Hookshot @ 07AB5E
|
||||||
BallChain_StartAnimationFlag:
|
BallChain_StartAnimationFlag:
|
||||||
{
|
{
|
||||||
; Restore vanilla code
|
LDA #$01 : STA $037B ; Restore vanilla code
|
||||||
LDA #$01 : STA $037B
|
|
||||||
; Check if we are rotating the goldstar
|
; Check if we are rotating the goldstar
|
||||||
LDA $037A : CMP #$04 : BNE +
|
LDA $037A : CMP #$04 : BNE +
|
||||||
; Animation flag, prevent menu from opening
|
LDA #$01 : STA $0112 ; Animation flag, prevent menu from opening
|
||||||
LDA #$01 : STA $0112
|
+
|
||||||
+
|
|
||||||
RTL
|
RTL
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -937,10 +884,10 @@ BallChain_Finish:
|
|||||||
RTL
|
RTL
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
; 22EF30
|
; 22EF30
|
||||||
; Hooked at $07AC98
|
; Hooked at $07AC98
|
||||||
|
|
||||||
|
|
||||||
Hookshot_Init:
|
Hookshot_Init:
|
||||||
{
|
{
|
||||||
; ResetAllAcceleration:
|
; ResetAllAcceleration:
|
||||||
@@ -965,8 +912,6 @@ Hookshot_Init:
|
|||||||
RTL
|
RTL
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
|
|
||||||
Goldstar_Begin:
|
Goldstar_Begin:
|
||||||
{
|
{
|
||||||
JSL CheckForBallChain
|
JSL CheckForBallChain
|
||||||
@@ -978,33 +923,30 @@ Goldstar_Begin:
|
|||||||
RTL
|
RTL
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
|
|
||||||
CheckForSwitchToGoldstar:
|
CheckForSwitchToGoldstar:
|
||||||
{
|
{
|
||||||
%CheckNewR_ButtonPress() : BEQ .continue
|
%CheckNewR_ButtonPress() : BEQ .continue
|
||||||
LDA GoldstarOrHookshot : CMP #$01 : BEQ .set_hookshot
|
LDA GoldstarOrHookshot : CMP #$01 : BEQ .set_hookshot
|
||||||
LDA #$01 : STA GoldstarOrHookshot
|
LDA #$01 : STA GoldstarOrHookshot
|
||||||
JMP .continue
|
JMP .continue
|
||||||
.set_hookshot:
|
.set_hookshot:
|
||||||
LDA #$02 : STA GoldstarOrHookshot
|
LDA #$02 : STA GoldstarOrHookshot
|
||||||
.continue:
|
.continue:
|
||||||
LDA.b $3A : AND.b #$40 ; Restore vanilla code
|
; Restore vanilla code
|
||||||
|
LDA.b $3A : AND.b #$40
|
||||||
RTL
|
RTL
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
|
|
||||||
BeginGoldstarOrHookshot:
|
BeginGoldstarOrHookshot:
|
||||||
{
|
{
|
||||||
LDA GoldstarOrHookshot : CMP #$02 : BEQ .begin_goldstar
|
LDA GoldstarOrHookshot : CMP #$02 : BEQ .begin_goldstar
|
||||||
JMP .return
|
JMP .return
|
||||||
|
|
||||||
.begin_goldstar:
|
.begin_goldstar:
|
||||||
JSL Goldstar_Begin
|
JSL Goldstar_Begin
|
||||||
RTL
|
RTL
|
||||||
|
|
||||||
.return
|
.return
|
||||||
JSL Hookshot_Init
|
JSL Hookshot_Init
|
||||||
LDA #$13 : STA $5D ; Set hookshot state
|
LDA #$13 : STA $5D ; Set hookshot state
|
||||||
LDA #$01 : STA.w $037B
|
LDA #$01 : STA.w $037B
|
||||||
@@ -1014,12 +956,13 @@ BeginGoldstarOrHookshot:
|
|||||||
RTL
|
RTL
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
|
|
||||||
MaybeUploadBirdGraphicsToOam:
|
MaybeUploadBirdGraphicsToOam:
|
||||||
{
|
{
|
||||||
LDY $037A : CPY #$0104 : BEQ .here
|
LDY $037A
|
||||||
LDY #$40E0 : STY $2116
|
CPY #$0104
|
||||||
|
BEQ .here
|
||||||
|
LDY #$40E0
|
||||||
|
STY $2116
|
||||||
JML $008B30
|
JML $008B30
|
||||||
.here
|
.here
|
||||||
JML $008B50
|
JML $008B50
|
||||||
@@ -1027,9 +970,6 @@ MaybeUploadBirdGraphicsToOam:
|
|||||||
|
|
||||||
pushpc
|
pushpc
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
; Main Hookshot/Goldstar hooks
|
|
||||||
|
|
||||||
org $07AB25
|
org $07AB25
|
||||||
JSL CheckForSwitchToGoldstar
|
JSL CheckForSwitchToGoldstar
|
||||||
|
|
||||||
|
|||||||
@@ -10,12 +10,10 @@ Build using [Asar](https://github.com/RPGHacker/asar) with `build.bat`
|
|||||||

|

|
||||||

|

|
||||||
|
|
||||||
## Custom Menu and HUD
|
## Custom Menu
|
||||||
|
|
||||||

|
|
||||||

|
|
||||||

|
|
||||||
|
|
||||||
|

|
||||||
|

|
||||||
|
|
||||||
## Custom Sprites
|
## Custom Sprites
|
||||||
|
|
||||||
|
|||||||
@@ -1,5 +1,5 @@
|
|||||||
; =========================================================
|
; =========================================================
|
||||||
; Sprite Properties
|
; Minecart Sprite Properties
|
||||||
; =========================================================
|
; =========================================================
|
||||||
|
|
||||||
!SPRID = $A3 ; The sprite ID you are overwriting (HEX)
|
!SPRID = $A3 ; The sprite ID you are overwriting (HEX)
|
||||||
@@ -38,25 +38,6 @@
|
|||||||
|
|
||||||
; Link is in cart
|
; Link is in cart
|
||||||
!LinkInCart = $35
|
!LinkInCart = $35
|
||||||
|
|
||||||
Sprite_Minecart_Long:
|
|
||||||
{
|
|
||||||
PHB : PHK : PLB
|
|
||||||
|
|
||||||
JSR Sprite_Minecart_DrawTop ; Draws the top half behind Link
|
|
||||||
JSR Sprite_Minecart_DrawBottom ; Draw the bottom half in front of Link
|
|
||||||
JSL Sprite_CheckActive ; Check if game is not paused
|
|
||||||
BCC .SpriteIsNotActive ; Skip Main code is sprite is innactive
|
|
||||||
|
|
||||||
JSR Sprite_Minecart_Main ; Call the main sprite code
|
|
||||||
|
|
||||||
.SpriteIsNotActive
|
|
||||||
PLB ; Get back the databank we stored previously
|
|
||||||
RTL ; Go back to original code
|
|
||||||
}
|
|
||||||
|
|
||||||
; =========================================================
|
|
||||||
|
|
||||||
!MinecartSpeed = 20
|
!MinecartSpeed = 20
|
||||||
!DoubleSpeed = 30
|
!DoubleSpeed = 30
|
||||||
|
|
||||||
@@ -81,6 +62,26 @@ Sprite_Minecart_Long:
|
|||||||
; l - lifting object
|
; l - lifting object
|
||||||
!LinkCarryOrToss = $0309
|
!LinkCarryOrToss = $0309
|
||||||
|
|
||||||
|
; =========================================================
|
||||||
|
|
||||||
|
Sprite_Minecart_Long:
|
||||||
|
{
|
||||||
|
PHB : PHK : PLB
|
||||||
|
|
||||||
|
JSR Sprite_Minecart_DrawTop ; Draws the top half behind Link
|
||||||
|
JSR Sprite_Minecart_DrawBottom ; Draw the bottom half in front of Link
|
||||||
|
JSL Sprite_CheckActive ; Check if game is not paused
|
||||||
|
BCC .SpriteIsNotActive ; Skip Main code is sprite is innactive
|
||||||
|
|
||||||
|
JSR Sprite_Minecart_Main ; Call the main sprite code
|
||||||
|
|
||||||
|
.SpriteIsNotActive
|
||||||
|
PLB ; Get back the databank we stored previously
|
||||||
|
RTL ; Go back to original code
|
||||||
|
}
|
||||||
|
|
||||||
|
; =========================================================
|
||||||
|
|
||||||
Sprite_Minecart_Prep:
|
Sprite_Minecart_Prep:
|
||||||
{
|
{
|
||||||
PHB : PHK : PLB
|
PHB : PHK : PLB
|
||||||
@@ -91,16 +92,15 @@ Sprite_Minecart_Prep:
|
|||||||
; If link is in a cart, then draw the dummy cart
|
; If link is in a cart, then draw the dummy cart
|
||||||
|
|
||||||
LDA !LinkInCart : BNE .dummy_continue
|
LDA !LinkInCart : BNE .dummy_continue
|
||||||
.clear_cart
|
; .clear_cart
|
||||||
STZ.w $0DD0, X ; Otherwise, clear the sprite
|
STZ.w $0DD0, X ; Otherwise, clear the sprite
|
||||||
PLB
|
PLB
|
||||||
RTL
|
RTL
|
||||||
|
|
||||||
.continue
|
.continue
|
||||||
|
; Unused dummy cart code
|
||||||
; LDA.w !LinkInCart : AND.b #$FF : BEQ .dummy_continue
|
; LDA.w !LinkInCart : AND.b #$FF : BEQ .dummy_continue
|
||||||
; JMP .clear_cart
|
; JMP .clear_cart
|
||||||
|
|
||||||
.dummy_continue
|
.dummy_continue
|
||||||
LDA SprY, X : SEC : SBC.b #$04 : STA SprY, X
|
LDA SprY, X : SEC : SBC.b #$04 : STA SprY, X
|
||||||
|
|
||||||
@@ -132,7 +132,6 @@ Sprite_Minecart_Prep:
|
|||||||
JMP .done
|
JMP .done
|
||||||
.south
|
.south
|
||||||
LDA #$02 : STA !MinecartDirection
|
LDA #$02 : STA !MinecartDirection
|
||||||
; LDA SprX, X : CLC : ADC.b #$01 : STA SprX, X
|
|
||||||
%GotoAction(1) ; Minecart_WaitVert
|
%GotoAction(1) ; Minecart_WaitVert
|
||||||
JMP .done
|
JMP .done
|
||||||
.west
|
.west
|
||||||
@@ -140,7 +139,6 @@ Sprite_Minecart_Prep:
|
|||||||
%GotoAction(0) ; Minecart_WaitHoriz
|
%GotoAction(0) ; Minecart_WaitHoriz
|
||||||
|
|
||||||
.done
|
.done
|
||||||
|
|
||||||
PLB
|
PLB
|
||||||
RTL
|
RTL
|
||||||
}
|
}
|
||||||
@@ -172,6 +170,14 @@ macro MoveCart()
|
|||||||
LDA #$35 : STA $012E ; Cart SFX
|
LDA #$35 : STA $012E ; Cart SFX
|
||||||
endmacro
|
endmacro
|
||||||
|
|
||||||
|
macro StopCart()
|
||||||
|
STZ $02F5
|
||||||
|
STZ.w SprYSpeed, X
|
||||||
|
STZ.w SprXSpeed, X
|
||||||
|
STZ.w !LinkInCart
|
||||||
|
endmacro
|
||||||
|
|
||||||
|
; TODO: Implement distance and gravity for cart tossing
|
||||||
macro HandleLiftAndToss()
|
macro HandleLiftAndToss()
|
||||||
LDA.w !LinkCarryOrToss : AND #$02 : BNE .not_tossing
|
LDA.w !LinkCarryOrToss : AND #$02 : BNE .not_tossing
|
||||||
; Velocities for cart tossing
|
; Velocities for cart tossing
|
||||||
@@ -179,7 +185,6 @@ macro HandleLiftAndToss()
|
|||||||
STZ.w $0F90, X : STZ.w $0F70, X
|
STZ.w $0F90, X : STZ.w $0F70, X
|
||||||
.not_tossing
|
.not_tossing
|
||||||
JSL Sprite_CheckIfLifted
|
JSL Sprite_CheckIfLifted
|
||||||
|
|
||||||
JSL Sprite_MoveXyz
|
JSL Sprite_MoveXyz
|
||||||
endmacro
|
endmacro
|
||||||
|
|
||||||
@@ -207,31 +212,28 @@ Sprite_Minecart_Main:
|
|||||||
|
|
||||||
LDA !LinkCarryOrToss : AND #$03 : BNE .lifting
|
LDA !LinkCarryOrToss : AND #$03 : BNE .lifting
|
||||||
JSR CheckIfPlayerIsOn : BCC .not_ready
|
JSR CheckIfPlayerIsOn : BCC .not_ready
|
||||||
|
LDA $F4 : AND.b #$80 : BEQ .not_ready ; Check for B button
|
||||||
|
|
||||||
JSL Player_HaltDashAttack ; Stop the player from dashing
|
JSL Player_HaltDashAttack ; Stop the player from dashing
|
||||||
LDA #$02 : STA $02F5 ; Somaria platform and moving
|
LDA #$02 : STA $02F5 ; Somaria platform and moving
|
||||||
LDA $0FDA : SEC : SBC #$0B : STA $20 ; Adjust player pos
|
LDA $0FDA : SEC : SBC #$0B : STA $20 ; Adjust player pos
|
||||||
|
LDA #$01 : STA !LinkInCart ; Set Link in cart flag
|
||||||
LDA #$01 : STA !LinkInCart
|
|
||||||
|
|
||||||
; Check if the cart is facing east or west
|
; Check if the cart is facing east or west
|
||||||
LDA SprSubtype,X : CMP.b #$03 : BNE .opposite_direction
|
LDA SprSubtype, X : CMP.b #$03 : BNE .opposite_direction
|
||||||
STA.w !MinecartDirection
|
STA.w !MinecartDirection
|
||||||
LDA #$02 : STA $0DE0, X
|
LDA #$02 : STA !SpriteDirection, X
|
||||||
%GotoAction(5) ; Minecart_MoveWest
|
%GotoAction(5) ; Minecart_MoveWest
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
.opposite_direction
|
.opposite_direction
|
||||||
STA.w !MinecartDirection
|
STA.w !MinecartDirection
|
||||||
LDA #$03 : STA $0DE0, X
|
LDA #$03 : STA !SpriteDirection, X
|
||||||
%GotoAction(3) ; Minecart_MoveEast
|
%GotoAction(3) ; Minecart_MoveEast
|
||||||
|
|
||||||
.not_ready
|
.not_ready
|
||||||
RTS
|
|
||||||
|
|
||||||
.lifting
|
.lifting
|
||||||
%HandleLiftAndToss()
|
%HandleLiftAndToss()
|
||||||
|
|
||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -244,29 +246,28 @@ Sprite_Minecart_Main:
|
|||||||
|
|
||||||
LDA !LinkCarryOrToss : AND #$03 : BNE .lifting
|
LDA !LinkCarryOrToss : AND #$03 : BNE .lifting
|
||||||
JSR CheckIfPlayerIsOn : BCC .not_ready
|
JSR CheckIfPlayerIsOn : BCC .not_ready
|
||||||
|
LDA $F4 : AND.b #$80 : BEQ .not_ready ; Check for B button
|
||||||
|
|
||||||
JSL Player_HaltDashAttack ; Stop the player from dashing
|
JSL Player_HaltDashAttack ; Stop the player from dashing
|
||||||
LDA #$02 : STA $02F5 ; Somaria platform and moving
|
LDA #$02 : STA $02F5 ; Somaria platform and moving
|
||||||
LDA $0FDA : SEC : SBC #$0B : STA $20 ; Adjust player pos
|
LDA $0FDA : SEC : SBC #$0B : STA $20 ; Adjust player pos
|
||||||
|
LDA #$01 : STA !LinkInCart ; Set Link in cart flag
|
||||||
LDA #$01 : STA !LinkInCart
|
|
||||||
|
|
||||||
; Check if the cart is facing north or south
|
; Check if the cart is facing north or south
|
||||||
LDA SprSubtype, X : BEQ .opposite_direction
|
LDA SprSubtype, X : BEQ .opposite_direction
|
||||||
STA.w !MinecartDirection
|
STA.w !MinecartDirection
|
||||||
LDA #$01 : STA $0DE0, X
|
LDA #$01 : STA !SpriteDirection, X
|
||||||
%GotoAction(4) ; Minecart_MoveSouth
|
%GotoAction(4) ; Minecart_MoveSouth
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
.opposite_direction
|
.opposite_direction
|
||||||
STA.w !MinecartDirection
|
STA.w !MinecartDirection
|
||||||
LDA #$00 : STA $0DE0, X
|
LDA #$00 : STA !SpriteDirection, X
|
||||||
%GotoAction(2) ; Minecart_MoveNorth
|
%GotoAction(2) ; Minecart_MoveNorth
|
||||||
|
|
||||||
.not_ready
|
.not_ready
|
||||||
.lifting
|
.lifting
|
||||||
%HandleLiftAndToss()
|
%HandleLiftAndToss()
|
||||||
|
|
||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -363,12 +364,6 @@ Sprite_Minecart_Main:
|
|||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
macro StopCart()
|
|
||||||
STZ $02F5
|
|
||||||
STZ.w SprYSpeed, X
|
|
||||||
STZ.w SprXSpeed, X
|
|
||||||
STZ.w !LinkInCart
|
|
||||||
endmacro
|
|
||||||
|
|
||||||
; -------------------------------------------------------
|
; -------------------------------------------------------
|
||||||
; 0x06
|
; 0x06
|
||||||
@@ -384,13 +379,24 @@ Sprite_Minecart_Main:
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
; ===========================================================================
|
; =========================================================
|
||||||
|
; The purpose of this routine is to determine the direction
|
||||||
|
; the sprite is facing and then adjust the X and Y positions
|
||||||
|
; of the tile interaction lookup based on that direction.
|
||||||
|
; If implemented correctly this would make sure the sprite
|
||||||
|
; stays centered on the tracks when it makes corner turns.
|
||||||
|
; Currently, depending on where the tile is placed the
|
||||||
|
; cart may make a turn too early and appear to be off center.
|
||||||
|
|
||||||
|
North = $00
|
||||||
|
East = $01
|
||||||
|
South = $02
|
||||||
|
West = $03
|
||||||
|
|
||||||
SetTileLookupPosBasedOnDirection:
|
SetTileLookupPosBasedOnDirection:
|
||||||
{
|
{
|
||||||
; Based on the direction of the Minecart, adjust the lookup position
|
; Based on the direction of the Minecart, adjust the
|
||||||
; to be in front of the sprite
|
; lookup position to be in front of the sprite
|
||||||
|
|
||||||
LDA.w !MinecartDirection : CMP.b #$00 : BEQ .north
|
LDA.w !MinecartDirection : CMP.b #$00 : BEQ .north
|
||||||
CMP.b #$01 : BEQ .east
|
CMP.b #$01 : BEQ .east
|
||||||
CMP.b #$02 : BEQ .south
|
CMP.b #$02 : BEQ .south
|
||||||
@@ -424,6 +430,8 @@ SetTileLookupPosBasedOnDirection:
|
|||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; =========================================================
|
||||||
|
|
||||||
print "HandleTileDirections ", pc
|
print "HandleTileDirections ", pc
|
||||||
HandleTileDirections:
|
HandleTileDirections:
|
||||||
{
|
{
|
||||||
@@ -438,13 +446,11 @@ HandleTileDirections:
|
|||||||
|
|
||||||
; Load the tile index
|
; Load the tile index
|
||||||
LDA $0FA5 : CLC : CMP.b #$01 : BNE .not_out_of_bounds
|
LDA $0FA5 : CLC : CMP.b #$01 : BNE .not_out_of_bounds
|
||||||
|
|
||||||
; If the tile is out of bounds, release the cart
|
; If the tile is out of bounds, release the cart
|
||||||
LDA #$40 : STA SprTimerD, X
|
LDA #$40 : STA SprTimerD, X
|
||||||
%GotoAction(6) ; Minecart_Release
|
%GotoAction(6) ; Minecart_Release
|
||||||
RTS
|
RTS
|
||||||
.not_out_of_bounds
|
.not_out_of_bounds
|
||||||
|
|
||||||
; Check if the tile is a stop tile
|
; Check if the tile is a stop tile
|
||||||
CLC : CMP.b #$B7 : BCS .check_stop ; If tile ID is >= $B8, check for stop tiles
|
CLC : CMP.b #$B7 : BCS .check_stop ; If tile ID is >= $B8, check for stop tiles
|
||||||
|
|
||||||
@@ -458,14 +464,15 @@ HandleTileDirections:
|
|||||||
.stop_north
|
.stop_north
|
||||||
; Set the new direction to north and flip the cart's orientation
|
; Set the new direction to north and flip the cart's orientation
|
||||||
LDA.b #South : STA SprSubtype, X : STA.w !MinecartDirection
|
LDA.b #South : STA SprSubtype, X : STA.w !MinecartDirection
|
||||||
LDA #$01 : STA $0DE0, X
|
LDA #$01 : STA !SpriteDirection, X
|
||||||
JMP .go_vert
|
JMP .go_vert
|
||||||
|
|
||||||
.stop_south
|
.stop_south
|
||||||
; Set the new direction to south and flip the cart's orientation
|
; Set the new direction to south and flip the cart's orientation
|
||||||
LDA.b #North : STA SprSubtype, X : STZ.w !MinecartDirection
|
LDA.b #North : STA SprSubtype, X : STZ.w !MinecartDirection
|
||||||
LDA #$00 : STA $0DE0, X
|
LDA #$00 : STA !SpriteDirection, X
|
||||||
|
|
||||||
|
; -----------------------------------------------
|
||||||
.go_vert
|
.go_vert
|
||||||
%SetTimerA($40)
|
%SetTimerA($40)
|
||||||
%StopCart()
|
%StopCart()
|
||||||
@@ -476,13 +483,15 @@ HandleTileDirections:
|
|||||||
.stop_east
|
.stop_east
|
||||||
; Set the new direction to east and flip the cart's orientation
|
; Set the new direction to east and flip the cart's orientation
|
||||||
LDA.b #West : STA SprSubtype, X : STA.w !MinecartDirection
|
LDA.b #West : STA SprSubtype, X : STA.w !MinecartDirection
|
||||||
LDA #$03 : STA $0DE0, X
|
LDA #$03 : STA !SpriteDirection, X
|
||||||
JMP .go_horiz
|
JMP .go_horiz
|
||||||
|
|
||||||
.stop_west
|
.stop_west
|
||||||
; Set the new direction to west and flip the cart's orientation
|
; Set the new direction to west and flip the cart's orientation
|
||||||
LDA.b #East : STA SprSubtype, X : STA.w !MinecartDirection
|
LDA.b #East : STA SprSubtype, X : STA.w !MinecartDirection
|
||||||
LDA #$02 : STA $0DE0, X
|
LDA #$02 : STA !SpriteDirection, X
|
||||||
|
|
||||||
|
; -----------------------------------------------
|
||||||
.go_horiz
|
.go_horiz
|
||||||
%SetTimerA($40)
|
%SetTimerA($40)
|
||||||
%StopCart()
|
%StopCart()
|
||||||
@@ -492,7 +501,6 @@ HandleTileDirections:
|
|||||||
|
|
||||||
; -------------------------------------------------------
|
; -------------------------------------------------------
|
||||||
.check_for_movement
|
.check_for_movement
|
||||||
; Check for movement tiles
|
|
||||||
CLC : CMP.b #$B2 : BEQ .check_direction
|
CLC : CMP.b #$B2 : BEQ .check_direction
|
||||||
CLC : CMP.b #$B3 : BEQ .check_direction
|
CLC : CMP.b #$B3 : BEQ .check_direction
|
||||||
CLC : CMP.b #$B4 : BEQ .check_direction
|
CLC : CMP.b #$B4 : BEQ .check_direction
|
||||||
@@ -509,44 +517,17 @@ HandleTileDirections:
|
|||||||
; Add the row and column offsets to index into the lookup table
|
; Add the row and column offsets to index into the lookup table
|
||||||
CLC : ADC.w .DirectionTileLookup, Y : TAY
|
CLC : ADC.w .DirectionTileLookup, Y : TAY
|
||||||
|
|
||||||
; Direction to move on tile collision
|
|
||||||
; 00 - stop or nothing
|
|
||||||
; 01 - north
|
|
||||||
; 02 - east
|
|
||||||
; 03 - south
|
|
||||||
; 04 - west
|
|
||||||
|
|
||||||
North = $00
|
|
||||||
East = $01
|
|
||||||
South = $02
|
|
||||||
West = $03
|
|
||||||
|
|
||||||
.DirectionTileLookup
|
|
||||||
{
|
|
||||||
; TL, BL, TR, BR, Stop
|
|
||||||
db $02, $00, $04, $00 ; North
|
|
||||||
db $00, $00, $03, $01 ; East
|
|
||||||
db $00, $02, $00, $04 ; South
|
|
||||||
db $03, $01, $00, $00 ; West
|
|
||||||
}
|
|
||||||
|
|
||||||
.check_direction
|
.check_direction
|
||||||
LDA SprSubtype, X
|
LDA SprSubtype, X
|
||||||
BNE .not_zero
|
|
||||||
|
|
||||||
.not_zero
|
|
||||||
ASL #2 ; Multiply by 4 (shifting left by 2 bits) to offset rows in the lookup table
|
ASL #2 ; Multiply by 4 (shifting left by 2 bits) to offset rows in the lookup table
|
||||||
STA $07 ; Store the action index in $07
|
STA $07 ; Store the action index in $07
|
||||||
|
|
||||||
LDA $0FA5 ; Load the tile type
|
LDA $0FA5 ; Load the tile type
|
||||||
SEC : SBC.b #$B2 ; Subtract $B2 to normalize the tile type to 0 to 3
|
SEC : SBC.b #$B2 ; Subtract $B2 to normalize the tile type to 0 to 3
|
||||||
CLC : ADC.w $07 ; Add the action index to the tile type offset to get the composite index
|
CLC : ADC.w $07 ; Add the action index to the tile type offset to get the composite index
|
||||||
TAY
|
TAY ; Transfer to Y to use as an offset for the rows
|
||||||
|
LDA.w .DirectionTileLookup, Y : TAY
|
||||||
|
|
||||||
LDA.w .DirectionTileLookup, Y
|
|
||||||
TAY
|
|
||||||
|
|
||||||
.execute_action
|
|
||||||
; JSR ClampSpritePositionToGrid
|
; JSR ClampSpritePositionToGrid
|
||||||
CPY #$01 : BEQ .move_north
|
CPY #$01 : BEQ .move_north
|
||||||
CPY #$02 : BEQ .move_east
|
CPY #$02 : BEQ .move_east
|
||||||
@@ -556,48 +537,64 @@ HandleTileDirections:
|
|||||||
|
|
||||||
.move_north
|
.move_north
|
||||||
LDA #$00 : STA SprSubtype, X
|
LDA #$00 : STA SprSubtype, X
|
||||||
STA $0DE0, X
|
STA !SpriteDirection, X
|
||||||
%GotoAction(2) ; Minecart_MoveNorth
|
%GotoAction(2) ; Minecart_MoveNorth
|
||||||
RTS
|
RTS
|
||||||
.move_east
|
.move_east
|
||||||
LDA #$01 : STA SprSubtype, X
|
LDA #$01 : STA SprSubtype, X
|
||||||
LDA #$03 : STA $0DE0, X
|
LDA #$03 : STA !SpriteDirection, X
|
||||||
%GotoAction(3) ; Minecart_MoveEast
|
%GotoAction(3) ; Minecart_MoveEast
|
||||||
RTS
|
RTS
|
||||||
.move_south
|
.move_south
|
||||||
LDA #$02 : STA SprSubtype, X
|
LDA #$02 : STA SprSubtype, X
|
||||||
LDA #$01 : STA $0DE0, X
|
LDA #$01 : STA !SpriteDirection, X
|
||||||
%GotoAction(4) ; Minecart_MoveSouth
|
%GotoAction(4) ; Minecart_MoveSouth
|
||||||
RTS
|
RTS
|
||||||
.move_west
|
.move_west
|
||||||
LDA #$03 : STA SprSubtype, X
|
LDA #$03 : STA SprSubtype, X
|
||||||
LDA #$02 : STA $0DE0, X
|
LDA #$02 : STA !SpriteDirection, X
|
||||||
%GotoAction(5) ; Minecart_MoveWest
|
%GotoAction(5) ; Minecart_MoveWest
|
||||||
.done
|
.done
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
.tile_ids
|
; Direction to move on tile collision
|
||||||
; db $B0 ; - Horiz
|
; 00 - stop or nothing
|
||||||
; db $B1 ; | Vert
|
; 01 - north
|
||||||
|
; 02 - east
|
||||||
|
; 03 - south
|
||||||
|
; 04 - west
|
||||||
|
.DirectionTileLookup
|
||||||
|
{
|
||||||
|
; TL, BL, TR, BR, Stop
|
||||||
|
db $02, $00, $04, $00 ; North
|
||||||
|
db $00, $00, $03, $01 ; East
|
||||||
|
db $00, $02, $00, $04 ; South
|
||||||
|
db $03, $01, $00, $00 ; West
|
||||||
|
}
|
||||||
|
.unused_tile_ids
|
||||||
|
{
|
||||||
; TL, BL, TR, BR
|
; TL, BL, TR, BR
|
||||||
db $B2, $B3, $B4, $B5
|
db $B2, $B3, $B4, $B5
|
||||||
|
; db $B0 - Horiz
|
||||||
|
; db $B1 | Vert
|
||||||
; db $B8 Stop North
|
; db $B8 Stop North
|
||||||
; db $B9 Stop South
|
; db $B9 Stop South
|
||||||
; db $BA Stop East
|
; db $BA Stop East
|
||||||
; db $BB Stop West
|
; db $BB Stop West
|
||||||
|
; db $BE + any direction
|
||||||
; db $BE ; + any direction
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; =========================================================
|
||||||
; Clamp the sprite position to a 16x16 grid
|
; Clamp the sprite position to a 16x16 grid
|
||||||
; Slows the game down if you run it too often :(
|
; Slows the game down if you run it too often :(
|
||||||
|
|
||||||
ClampSpritePositionToGrid:
|
ClampSpritePositionToGrid:
|
||||||
{
|
{
|
||||||
; Check if SprX is already a multiple of 16
|
; Check if SprX is already a multiple of 16
|
||||||
LDA.w SprX, X : AND #$0F : BEQ .x_aligned
|
LDA.w SprX, X : AND #$0F : BEQ .x_aligned
|
||||||
LDA.w SprX, X : LSR : ASL : STA.w SprX, X
|
LDA.w SprX, X : LSR : ASL : STA.w SprX, X
|
||||||
.x_aligned
|
.x_aligned
|
||||||
|
|
||||||
; Check if SprY is already a multiple of 16
|
; Check if SprY is already a multiple of 16
|
||||||
LDA.w SprY, X : AND #$0F : BEQ .y_aligned
|
LDA.w SprY, X : AND #$0F : BEQ .y_aligned
|
||||||
LDA.w SprY, X : LSR : ASL : STA.w SprY, X
|
LDA.w SprY, X : LSR : ASL : STA.w SprY, X
|
||||||
@@ -605,6 +602,10 @@ ClampSpritePositionToGrid:
|
|||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; =========================================================
|
||||||
|
; Check for the switch_track sprite and move based on the
|
||||||
|
; state of that sprite.
|
||||||
|
|
||||||
HandleDynamicSwitchTileDirections:
|
HandleDynamicSwitchTileDirections:
|
||||||
{
|
{
|
||||||
; Find out if the sprite $B0 is in the room
|
; Find out if the sprite $B0 is in the room
|
||||||
@@ -623,46 +624,43 @@ HandleDynamicSwitchTileDirections:
|
|||||||
CMP.b #$02 : BEQ .north_or_south
|
CMP.b #$02 : BEQ .north_or_south
|
||||||
|
|
||||||
.east_or_west
|
.east_or_west
|
||||||
|
|
||||||
LDA SwitchRam : BNE .go_west
|
LDA SwitchRam : BNE .go_west
|
||||||
|
|
||||||
LDA #$01 : STA SprSubtype, X
|
LDA #$01 : STA SprSubtype, X
|
||||||
LDA #$03 : STA $0DE0, X
|
LDA #$03 : STA !SpriteDirection, X
|
||||||
%GotoAction(3) ; Minecart_MoveEast
|
%GotoAction(3) ; Minecart_MoveEast
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
.go_west
|
.go_west
|
||||||
LDA #$03 : STA SprSubtype, X
|
LDA #$03 : STA SprSubtype, X
|
||||||
LDA #$02 : STA $0DE0, X
|
LDA #$02 : STA !SpriteDirection, X
|
||||||
%GotoAction(5) ; Minecart_MoveWest
|
%GotoAction(5) ; Minecart_MoveWest
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
.north_or_south
|
.north_or_south
|
||||||
LDA SwitchRam : BNE .go_south
|
LDA SwitchRam : BNE .go_south
|
||||||
LDA #$00 : STA SprSubtype, X
|
LDA #$00 : STA SprSubtype, X
|
||||||
STA $0DE0, X
|
STA !SpriteDirection, X
|
||||||
%GotoAction(2) ; Minecart_MoveNorth
|
%GotoAction(2) ; Minecart_MoveNorth
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
.go_south
|
.go_south
|
||||||
LDA #$02 : STA SprSubtype, X
|
LDA #$02 : STA SprSubtype, X
|
||||||
LDA #$01 : STA $0DE0, X
|
LDA #$01 : STA !SpriteDirection, X
|
||||||
%GotoAction(4) ; Minecart_MoveSouth
|
%GotoAction(4) ; Minecart_MoveSouth
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
.no_b0
|
.no_b0
|
||||||
|
|
||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; =========================================================
|
||||||
; $00 = flag indicating presence of sprite ID $B0
|
; $00 = flag indicating presence of sprite ID $B0
|
||||||
|
|
||||||
CheckSpritePresence:
|
CheckSpritePresence:
|
||||||
{
|
{
|
||||||
PHX
|
PHX
|
||||||
CLC ; Assume sprite ID $B0 is not present
|
CLC ; Assume sprite ID $B0 is not present
|
||||||
|
|
||||||
LDX.b #$10
|
LDX.b #$10
|
||||||
|
|
||||||
.x_loop
|
.x_loop
|
||||||
DEX
|
DEX
|
||||||
|
|
||||||
@@ -694,7 +692,7 @@ DragYH = $0B7D
|
|||||||
DragPlayer:
|
DragPlayer:
|
||||||
{
|
{
|
||||||
; Get direction of the cart (0 to 3)
|
; Get direction of the cart (0 to 3)
|
||||||
LDY.w $0DE0, X
|
LDY.w !SpriteDirection, X
|
||||||
|
|
||||||
LDA.w .drag_x_low, Y : CLC : ADC.w DragYL : STA.w DragYL
|
LDA.w .drag_x_low, Y : CLC : ADC.w DragYL : STA.w DragYL
|
||||||
LDA.w .drag_x_high, Y : ADC.w DragYH : STA DragYH
|
LDA.w .drag_x_high, Y : ADC.w DragYH : STA DragYH
|
||||||
@@ -747,6 +745,7 @@ DragPlayer:
|
|||||||
.drag_y_high
|
.drag_y_high
|
||||||
db -1, 0, 0, 0
|
db -1, 0, 0, 0
|
||||||
|
|
||||||
|
; Alternate drag values provided by Zarby
|
||||||
; .drag_x_high
|
; .drag_x_high
|
||||||
; db 0, 0, -1, 0, -1
|
; db 0, 0, -1, 0, -1
|
||||||
; .drag_x_low
|
; .drag_x_low
|
||||||
@@ -757,17 +756,18 @@ DragPlayer:
|
|||||||
; db -1, 0, 0, 0, -1, 0, -1, 0
|
; db -1, 0, 0, 0, -1, 0, -1, 0
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; =========================================================
|
||||||
|
|
||||||
CheckForPlayerInput:
|
CheckForPlayerInput:
|
||||||
{
|
{
|
||||||
LDA $5D : CMP #$02 : BEQ .release
|
LDA $5D : CMP #$02 : BEQ .release
|
||||||
CMP #$06 : BNE .continue
|
CMP #$06 : BNE .continue
|
||||||
.release
|
.release
|
||||||
; Release player in recoil
|
; Release player in recoil
|
||||||
%GotoAction(6) ; Minecart_Release
|
%GotoAction(6) ; Minecart_Release
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
.continue
|
.continue
|
||||||
|
|
||||||
; Setup Minecart position to look for tile IDs
|
; Setup Minecart position to look for tile IDs
|
||||||
LDA.w SprY, X : AND #$F8 : STA.b $00 : LDA.w SprYH, X : STA.b $01
|
LDA.w SprY, X : AND #$F8 : STA.b $00 : LDA.w SprYH, X : STA.b $01
|
||||||
@@ -780,87 +780,75 @@ CheckForPlayerInput:
|
|||||||
LDA $0FA5 : CLC : CMP.b #$B6 : BNE .cant_input
|
LDA $0FA5 : CLC : CMP.b #$B6 : BNE .cant_input
|
||||||
|
|
||||||
; Check for input from the user (u,d,l,r)
|
; Check for input from the user (u,d,l,r)
|
||||||
|
LDY !SpriteDirection, X
|
||||||
LDY $0DE0, X
|
|
||||||
|
|
||||||
LDA $F0 : AND .d_pad_press, Y : STA $00 : AND.b #$08 : BEQ .not_pressing_up
|
LDA $F0 : AND .d_pad_press, Y : STA $00 : AND.b #$08 : BEQ .not_pressing_up
|
||||||
|
LDA.b #$00 : STA !SpriteDirection, X ; Moving Up
|
||||||
LDA.b #$00 : STA $0DE0, X ; Moving Up
|
|
||||||
STA SprSubtype, X
|
STA SprSubtype, X
|
||||||
%GotoAction(2) ; Minecart_MoveNorth
|
%GotoAction(2) ; Minecart_MoveNorth
|
||||||
|
|
||||||
BRA .return
|
BRA .return
|
||||||
|
|
||||||
.not_pressing_up:
|
.not_pressing_up:
|
||||||
|
|
||||||
LDA $00 : AND.b #$04 : BEQ .not_pressing_down
|
LDA $00 : AND.b #$04 : BEQ .not_pressing_down
|
||||||
|
LDA.b #$01 : STA !SpriteDirection, X
|
||||||
LDA.b #$01 : STA $0DE0, X
|
|
||||||
LDA #$02 : STA SprSubtype, X
|
LDA #$02 : STA SprSubtype, X
|
||||||
%GotoAction(4) ; Minecart_MoveSouth
|
%GotoAction(4) ; Minecart_MoveSouth
|
||||||
|
|
||||||
|
|
||||||
BRA .return
|
BRA .return
|
||||||
|
|
||||||
.not_pressing_down
|
.not_pressing_down
|
||||||
|
|
||||||
LDA $00 : AND.b #$02 : BEQ .not_pressing_left
|
LDA $00 : AND.b #$02 : BEQ .not_pressing_left
|
||||||
|
LDA.b #$02 : STA !SpriteDirection, X
|
||||||
LDA.b #$02 : STA $0DE0, X
|
|
||||||
LDA #$03 : STA SprSubtype, X
|
LDA #$03 : STA SprSubtype, X
|
||||||
%GotoAction(5) ; Minecart_MoveWest
|
%GotoAction(5) ; Minecart_MoveWest
|
||||||
|
|
||||||
|
|
||||||
BRA .return
|
BRA .return
|
||||||
|
|
||||||
.not_pressing_left
|
.not_pressing_left
|
||||||
|
|
||||||
LDA $00 : AND.b #$01 : BEQ .always
|
LDA $00 : AND.b #$01 : BEQ .always
|
||||||
|
LDA.b #$03 : STA !SpriteDirection, X
|
||||||
LDA.b #$03 : STA $0DE0, X
|
|
||||||
STA SprSubtype, X
|
STA SprSubtype, X
|
||||||
%GotoAction(3) ; Minecart_MoveEast
|
%GotoAction(3) ; Minecart_MoveEast
|
||||||
|
|
||||||
.always
|
.always
|
||||||
|
|
||||||
; LDA $0DE0, X : CMP.b #$03 : BNE .not_going_right
|
; LDA !SpriteDirection, X : CMP.b #$03 : BNE .not_going_right
|
||||||
|
; ; Default heading in reaction to this tile is going up.
|
||||||
|
; ; LDA.b #$00 : STA !SpriteDirection, X
|
||||||
|
; .not_going_right
|
||||||
|
; ;STZ $0D80, X
|
||||||
|
|
||||||
; ; Default heading in reaction to this tile is going up.
|
.return
|
||||||
; ; LDA.b #$00 : STA $0DE0, X
|
|
||||||
|
|
||||||
; .not_going_right
|
.cant_input
|
||||||
|
|
||||||
; ;STZ $0D80, X
|
|
||||||
|
|
||||||
.return
|
|
||||||
|
|
||||||
.cant_input
|
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
.d_pad_press
|
.d_pad_press
|
||||||
db $0B, $07, $0E, $0D
|
db $0B, $07, $0E, $0D
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; =========================================================
|
||||||
|
; Sets carry if player is overlapping the sprite
|
||||||
|
; Clear carry if player is outside the bounds
|
||||||
|
|
||||||
CheckIfPlayerIsOn:
|
CheckIfPlayerIsOn:
|
||||||
{
|
{
|
||||||
REP #$20
|
REP #$20
|
||||||
LDA $22 : CLC : ADC #$0009 : CMP $0FD8 : BCC .OutsideLeft
|
LDA $22 : CLC : ADC #$0009 : CMP $0FD8 : BCC .left
|
||||||
LDA $22 : SEC : SBC #$0009 : CMP $0FD8 : BCS .OutsideRight
|
LDA $22 : SEC : SBC #$0009 : CMP $0FD8 : BCS .right
|
||||||
|
|
||||||
LDA $20 : CLC : ADC #$0012 : CMP $0FDA : BCC .OutsideUp
|
LDA $20 : CLC : ADC #$0012 : CMP $0FDA : BCC .up
|
||||||
LDA $20 : SEC : SBC #$0012 : CMP $0FDA : BCS .OutsideDown
|
LDA $20 : SEC : SBC #$0012 : CMP $0FDA : BCS .down
|
||||||
|
|
||||||
SEP #$21 : RTS ; Return with carry set
|
SEP #$21 : RTS ; Return with carry set
|
||||||
|
|
||||||
.OutsideLeft
|
.left
|
||||||
.OutsideRight
|
.right
|
||||||
.OutsideDown
|
.up
|
||||||
.OutsideUp
|
.down
|
||||||
SEP #$20
|
SEP #$20
|
||||||
CLC : RTS ; Return with carry cleared
|
CLC : RTS ; Return with carry cleared
|
||||||
}
|
}
|
||||||
|
|
||||||
; =========================================================
|
; =========================================================
|
||||||
|
; Draw the portion of the cart which is behind the player
|
||||||
|
|
||||||
Sprite_Minecart_DrawTop:
|
Sprite_Minecart_DrawTop:
|
||||||
{
|
{
|
||||||
@@ -950,6 +938,8 @@ Sprite_Minecart_DrawTop:
|
|||||||
db $02, $02
|
db $02, $02
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; =========================================================
|
||||||
|
; Draw the portion of the cart which is in front of the player
|
||||||
|
|
||||||
Sprite_Minecart_DrawBottom:
|
Sprite_Minecart_DrawBottom:
|
||||||
{
|
{
|
||||||
@@ -1006,6 +996,9 @@ Sprite_Minecart_DrawBottom:
|
|||||||
|
|
||||||
PLX
|
PLX
|
||||||
|
|
||||||
|
; Debug box which draws in the location of the hitbox from
|
||||||
|
; the code in HandleTileDirections / SetTileLookupPosBasedOnDirection
|
||||||
|
; The latter of which is an experimental function
|
||||||
; {
|
; {
|
||||||
; LDA $0FD8 : STA $00
|
; LDA $0FD8 : STA $00
|
||||||
; LDA $0FDA : STA $02
|
; LDA $0FDA : STA $02
|
||||||
@@ -1,3 +1,6 @@
|
|||||||
|
; =========================================================
|
||||||
|
; Sprite Properties
|
||||||
|
; =========================================================
|
||||||
|
|
||||||
!SPRID = $AF ; The sprite ID you are overwriting (HEX)
|
!SPRID = $AF ; The sprite ID you are overwriting (HEX)
|
||||||
!NbrTiles = 02 ; Number of tiles used in a frame
|
!NbrTiles = 02 ; Number of tiles used in a frame
|
||||||
@@ -29,6 +32,7 @@
|
|||||||
|
|
||||||
%Set_Sprite_Properties(Sprite_LeverSwitch_Prep, Sprite_LeverSwitch_Long);
|
%Set_Sprite_Properties(Sprite_LeverSwitch_Prep, Sprite_LeverSwitch_Long);
|
||||||
|
|
||||||
|
; =========================================================
|
||||||
|
|
||||||
Sprite_LeverSwitch_Long:
|
Sprite_LeverSwitch_Long:
|
||||||
{
|
{
|
||||||
@@ -45,6 +49,7 @@ Sprite_LeverSwitch_Long:
|
|||||||
RTL ; Go back to original code
|
RTL ; Go back to original code
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; =========================================================
|
||||||
|
|
||||||
Sprite_LeverSwitch_Prep:
|
Sprite_LeverSwitch_Prep:
|
||||||
{
|
{
|
||||||
@@ -57,6 +62,7 @@ Sprite_LeverSwitch_Prep:
|
|||||||
RTL
|
RTL
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; =========================================================
|
||||||
|
|
||||||
Sprite_LeverSwitch_Main:
|
Sprite_LeverSwitch_Main:
|
||||||
{
|
{
|
||||||
@@ -140,6 +146,7 @@ Sprite_LeverSwitch_Main:
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; =========================================================
|
||||||
|
|
||||||
Sprite_LeverSwitch_Draw:
|
Sprite_LeverSwitch_Draw:
|
||||||
{
|
{
|
||||||
@@ -217,5 +224,4 @@ Sprite_LeverSwitch_Draw:
|
|||||||
.sizes
|
.sizes
|
||||||
db $02
|
db $02
|
||||||
db $02
|
db $02
|
||||||
|
|
||||||
}
|
}
|
||||||
@@ -1,3 +1,7 @@
|
|||||||
|
; =========================================================
|
||||||
|
; Sprite Properties
|
||||||
|
; =========================================================
|
||||||
|
|
||||||
!SPRID = $B0 ; The sprite ID you are overwriting (HEX)
|
!SPRID = $B0 ; The sprite ID you are overwriting (HEX)
|
||||||
!NbrTiles = 04 ; Number of tiles used in a frame
|
!NbrTiles = 04 ; Number of tiles used in a frame
|
||||||
!Harmless = 00 ; 00 = Sprite is Harmful, 01 = Sprite is Harmless
|
!Harmless = 00 ; 00 = Sprite is Harmful, 01 = Sprite is Harmless
|
||||||
@@ -28,6 +32,8 @@
|
|||||||
|
|
||||||
%Set_Sprite_Properties(Sprite_RotatingTrack_Prep, Sprite_RotatingTrack_Long);
|
%Set_Sprite_Properties(Sprite_RotatingTrack_Prep, Sprite_RotatingTrack_Long);
|
||||||
|
|
||||||
|
; =========================================================
|
||||||
|
|
||||||
Sprite_RotatingTrack_Long:
|
Sprite_RotatingTrack_Long:
|
||||||
{
|
{
|
||||||
PHB : PHK : PLB
|
PHB : PHK : PLB
|
||||||
@@ -43,12 +49,7 @@ Sprite_RotatingTrack_Long:
|
|||||||
RTL ; Go back to original code
|
RTL ; Go back to original code
|
||||||
}
|
}
|
||||||
|
|
||||||
; Modes
|
; =========================================================
|
||||||
; 0 = TopLeft -> TopRight
|
|
||||||
; 1 = TopRight -> BottomRight
|
|
||||||
; 2 = BottomRight -> BottomLeft
|
|
||||||
; 3 = BottomLeft -> TopLeft
|
|
||||||
; 4 = TopRight -> TopLeft
|
|
||||||
|
|
||||||
Sprite_RotatingTrack_Prep:
|
Sprite_RotatingTrack_Prep:
|
||||||
{
|
{
|
||||||
@@ -61,18 +62,29 @@ Sprite_RotatingTrack_Prep:
|
|||||||
RTL
|
RTL
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; =========================================================
|
||||||
|
; Modes
|
||||||
|
; 0 = TopLeft -> TopRight
|
||||||
|
; 1 = TopRight -> BottomRight
|
||||||
|
; 2 = BottomRight -> BottomLeft
|
||||||
|
; 3 = BottomLeft -> TopLeft
|
||||||
|
; 4 = TopRight -> TopLeft
|
||||||
|
|
||||||
SwitchRam = $37
|
SwitchRam = $37
|
||||||
|
|
||||||
Sprite_RotatingTrack_Main:
|
Sprite_RotatingTrack_Main:
|
||||||
{
|
{
|
||||||
LDA.w SprAction, X
|
LDA.w SprAction, X
|
||||||
JSL UseImplicitRegIndexedLocalJumpTable
|
JSL UseImplicitRegIndexedLocalJumpTable
|
||||||
|
|
||||||
dw TopLeftToTopRight
|
dw TopLeftToTopRight
|
||||||
dw TopRightToBottomRight
|
dw TopRightToBottomRight
|
||||||
dw BottomRightToBottomLeft
|
dw BottomRightToBottomLeft
|
||||||
dw BottomLeftToTopLeft
|
dw BottomLeftToTopLeft
|
||||||
dw TopRightToTopLeft
|
dw TopRightToTopLeft
|
||||||
|
|
||||||
|
; -------------------------------------------------------
|
||||||
|
; 00 = TopLeft -> TopRight
|
||||||
TopLeftToTopRight:
|
TopLeftToTopRight:
|
||||||
{
|
{
|
||||||
LDA SwitchRam : BNE part2
|
LDA SwitchRam : BNE part2
|
||||||
@@ -87,6 +99,8 @@ Sprite_RotatingTrack_Main:
|
|||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; -------------------------------------------------------
|
||||||
|
; 01 = TopRight -> BottomRight
|
||||||
TopRightToBottomRight:
|
TopRightToBottomRight:
|
||||||
{
|
{
|
||||||
LDA SwitchRam : BNE part2_a
|
LDA SwitchRam : BNE part2_a
|
||||||
@@ -101,6 +115,8 @@ Sprite_RotatingTrack_Main:
|
|||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; -------------------------------------------------------
|
||||||
|
; 02 = BottomRight -> BottomLeft
|
||||||
BottomRightToBottomLeft:
|
BottomRightToBottomLeft:
|
||||||
{
|
{
|
||||||
LDA SwitchRam : BNE part2_b
|
LDA SwitchRam : BNE part2_b
|
||||||
@@ -115,6 +131,8 @@ Sprite_RotatingTrack_Main:
|
|||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; -------------------------------------------------------
|
||||||
|
; 03 = BottomLeft -> TopLeft
|
||||||
BottomLeftToTopLeft:
|
BottomLeftToTopLeft:
|
||||||
{
|
{
|
||||||
LDA SwitchRam : BNE part2_c
|
LDA SwitchRam : BNE part2_c
|
||||||
@@ -130,6 +148,8 @@ Sprite_RotatingTrack_Main:
|
|||||||
RTS
|
RTS
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; -------------------------------------------------------
|
||||||
|
; 04 = TopRight -> TopLeft
|
||||||
TopRightToTopLeft:
|
TopRightToTopLeft:
|
||||||
{
|
{
|
||||||
LDA SwitchRam : BNE part2_d
|
LDA SwitchRam : BNE part2_d
|
||||||
@@ -147,88 +167,92 @@ Sprite_RotatingTrack_Main:
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
; =========================================================
|
||||||
|
|
||||||
Sprite_RotatingTrack_Draw:
|
Sprite_RotatingTrack_Draw:
|
||||||
JSL Sprite_PrepOamCoord
|
{
|
||||||
JSL Sprite_OAM_AllocateDeferToPlayer
|
JSL Sprite_PrepOamCoord
|
||||||
|
JSL Sprite_OAM_AllocateDeferToPlayer
|
||||||
|
|
||||||
LDA $0DC0, X : CLC : ADC $0D90, X : TAY;Animation Frame
|
LDA $0DC0, X : CLC : ADC $0D90, X : TAY;Animation Frame
|
||||||
LDA .start_index, Y : STA $06
|
LDA .start_index, Y : STA $06
|
||||||
|
|
||||||
|
|
||||||
PHX
|
PHX
|
||||||
LDX .nbr_of_tiles, Y ;amount of tiles -1
|
LDX .nbr_of_tiles, Y ;amount of tiles -1
|
||||||
LDY.b #$00
|
LDY.b #$00
|
||||||
.nextTile
|
.nextTile
|
||||||
|
|
||||||
PHX ; Save current Tile Index?
|
PHX ; Save current Tile Index?
|
||||||
|
|
||||||
TXA : CLC : ADC $06 ; Add Animation Index Offset
|
TXA : CLC : ADC $06 ; Add Animation Index Offset
|
||||||
|
|
||||||
PHA ; Keep the value with animation index offset?
|
PHA ; Keep the value with animation index offset?
|
||||||
|
|
||||||
ASL A : TAX
|
ASL A : TAX
|
||||||
|
|
||||||
REP #$20
|
REP #$20
|
||||||
|
|
||||||
LDA $00 : CLC : ADC .x_offsets, X : STA ($90), Y
|
LDA $00 : CLC : ADC .x_offsets, X : STA ($90), Y
|
||||||
AND.w #$0100 : STA $0E
|
AND.w #$0100 : STA $0E
|
||||||
INY
|
INY
|
||||||
LDA $02 : CLC : ADC .y_offsets, X : STA ($90), Y
|
LDA $02 : CLC : ADC .y_offsets, X : STA ($90), Y
|
||||||
CLC : ADC #$0010 : CMP.w #$0100
|
CLC : ADC #$0010 : CMP.w #$0100
|
||||||
SEP #$20
|
SEP #$20
|
||||||
BCC .on_screen_y
|
BCC .on_screen_y
|
||||||
|
|
||||||
LDA.b #$F0 : STA ($90), Y ;Put the sprite out of the way
|
LDA.b #$F0 : STA ($90), Y ;Put the sprite out of the way
|
||||||
STA $0E
|
STA $0E
|
||||||
.on_screen_y
|
.on_screen_y
|
||||||
|
|
||||||
PLX ; Pullback Animation Index Offset (without the *2 not 16bit anymore)
|
PLX ; Pullback Animation Index Offset (without the *2 not 16bit anymore)
|
||||||
INY
|
INY
|
||||||
LDA .chr, X : STA ($90), Y
|
LDA .chr, X : STA ($90), Y
|
||||||
INY
|
INY
|
||||||
LDA .properties, X : STA ($90), Y
|
LDA .properties, X : STA ($90), Y
|
||||||
|
|
||||||
PHY
|
PHY
|
||||||
|
|
||||||
TYA : LSR #2 : TAY
|
TYA : LSR #2 : TAY
|
||||||
|
|
||||||
LDA .sizes, X : ORA $0F : STA ($92), Y ; store size in oam buffer
|
LDA .sizes, X : ORA $0F : STA ($92), Y ; store size in oam buffer
|
||||||
|
|
||||||
PLY : INY
|
PLY : INY
|
||||||
|
|
||||||
PLX : DEX : BPL .nextTile
|
PLX : DEX : BPL .nextTile
|
||||||
|
|
||||||
PLX
|
PLX
|
||||||
|
|
||||||
RTS
|
RTS
|
||||||
|
|
||||||
|
|
||||||
.start_index
|
.start_index
|
||||||
db $00, $01, $02, $03
|
db $00, $01, $02, $03
|
||||||
.nbr_of_tiles
|
.nbr_of_tiles
|
||||||
db 0, 0, 0, 0
|
db 0, 0, 0, 0
|
||||||
.x_offsets
|
.x_offsets
|
||||||
dw 0
|
dw 0
|
||||||
dw 0
|
dw 0
|
||||||
dw 0
|
dw 0
|
||||||
dw 0
|
dw 0
|
||||||
.y_offsets
|
.y_offsets
|
||||||
dw 0
|
dw 0
|
||||||
dw 0
|
dw 0
|
||||||
dw 0
|
dw 0
|
||||||
dw 0
|
dw 0
|
||||||
.chr
|
.chr
|
||||||
db $44
|
db $44
|
||||||
db $44
|
db $44
|
||||||
db $44
|
db $44
|
||||||
db $44
|
db $44
|
||||||
.properties
|
.properties
|
||||||
db $7D
|
db $7D
|
||||||
db $3D
|
db $3D
|
||||||
db $FD
|
db $FD
|
||||||
db $BD
|
db $BD
|
||||||
.sizes
|
.sizes
|
||||||
db $02
|
db $02
|
||||||
db $02
|
db $02
|
||||||
db $02
|
db $02
|
||||||
db $02
|
db $02
|
||||||
|
}
|
||||||
@@ -69,7 +69,7 @@ print "End of mineswitch.asm ", pc
|
|||||||
incsrc "Sprites/NPCs/village_dog.asm"
|
incsrc "Sprites/NPCs/village_dog.asm"
|
||||||
print "End of village_dog.asm ", pc
|
print "End of village_dog.asm ", pc
|
||||||
|
|
||||||
incsrc "Sprites/minecart.asm"
|
incsrc "Sprites/Objects/minecart.asm"
|
||||||
print "End of minecart.asm ", pc
|
print "End of minecart.asm ", pc
|
||||||
|
|
||||||
incsrc "Sprites/Bosses/twinrova.asm"
|
incsrc "Sprites/Bosses/twinrova.asm"
|
||||||
|
|||||||
Reference in New Issue
Block a user