255 lines
4.9 KiB
NASM
255 lines
4.9 KiB
NASM
; =============================================================================
|
|
; Bottle Net Code
|
|
; =============================================================================
|
|
|
|
org $1EFE33
|
|
PlayerItem_SpawnFaerie:
|
|
|
|
org $1EDCCF
|
|
PlayerItem_ReleaseBee:
|
|
|
|
; =============================================================================
|
|
; LinkItem_Bottle
|
|
|
|
org $07A15B
|
|
JSL LinkItem_NewBottle
|
|
RTS
|
|
; *$3A15B-$3A249 FREE SPACE STILL AVAILABLE
|
|
|
|
; =============================================================================
|
|
|
|
org $2C8000
|
|
LinkItem_NewBottle:
|
|
{
|
|
; Check if we have a bottle or not
|
|
LDA $7EF34F : DEC A : TAX
|
|
LDA $7EF35C, X : BEQ .exit
|
|
|
|
; Check if the bottle is empty
|
|
CMP.b #$03 : BCC .empty_bottle
|
|
|
|
; If no, prepare and call the LinkItem_Bottles routine
|
|
JSL LinkItem_Bottles_Long
|
|
BRA .exit
|
|
|
|
.empty_bottle
|
|
; Otherwise, prepare and call the LinkItem_BugCatchingNet routine
|
|
JSL LinkItem_BugCatchingNet_Long
|
|
|
|
.exit
|
|
RTL
|
|
}
|
|
|
|
; =============================================================================
|
|
|
|
org $07FA9F
|
|
LinkItem_BugCatchingNet_Long:
|
|
{
|
|
PHB : PHK : PLB
|
|
JSR LinkItem_NewBugCatchingNet
|
|
PLB
|
|
RTL
|
|
}
|
|
pose_id:
|
|
db $0B, $06, $07, $08, $01, $02, $03, $04, $05, $06 ; up
|
|
db $01, $02, $03, $04, $05, $06, $07, $08, $01, $02 ; down
|
|
db $09, $04, $05, $06, $07, $08, $01, $02, $03, $04 ; left
|
|
db $0A, $08, $01, $02, $03, $04, $05, $06, $07, $08 ; right
|
|
|
|
pose_offset:
|
|
db $00 ; up
|
|
db $0A ; down
|
|
db $14 ; left
|
|
db $1E ; right
|
|
|
|
; *$3AFF8-$3B072 LOCAL
|
|
|
|
LinkItem_NewBugCatchingNet:
|
|
{
|
|
BIT $3A : BVS .y_press
|
|
|
|
LDA $6C : BNE .bottle_exit ; (RTS)
|
|
|
|
JSR Link_CheckNewY_ButtonPress : BCC .bottle_exit ; (RTS)
|
|
|
|
LDA $2F : LSR A : TAY
|
|
LDX pose_offset, Y
|
|
LDA pose_id, X : STA $0300
|
|
LDA.b #$03 : STA $3D
|
|
|
|
STZ $030D, X
|
|
|
|
LDA.b #$10 : STA $037A
|
|
LDA.b #$01 : TSB $50
|
|
|
|
STZ $2E
|
|
|
|
LDA.b #$32 : JSR Player_DoSfx2
|
|
|
|
.y_press:
|
|
|
|
JSR Unknown ; $3AE65 IN ROM
|
|
|
|
LDA $67 : AND.b #$F0 : STA $67
|
|
DEC $3D : BPL .bottle_exit
|
|
LDX $030D : INX : STX $030D
|
|
LDA.b #$03 : STA $3D
|
|
LDA $2F : LSR A : TAY
|
|
LDA pose_offset, Y : CLC : ADC $030D : TAY
|
|
LDA pose_id, Y : STA $0300
|
|
CPX.b #$0A : BNE .bottle_exit
|
|
|
|
STZ $030D
|
|
STZ $0300
|
|
|
|
LDA $3A : AND.b #$80 : STA $3A
|
|
STZ $037A
|
|
|
|
LDA $50 : AND.b #$FE : STA $50
|
|
LDA.b #$80 : STA $44 : STA $45
|
|
|
|
.bottle_exit:
|
|
|
|
RTS
|
|
}
|
|
|
|
; *$3AE65-$3AE87 LOCAL
|
|
Unknown:
|
|
{
|
|
LDA $AD : CMP.b #$02 : BNE .BRANCH_ALPHA
|
|
|
|
LDA $0322 : AND.b #$03 : CMP.b #$03 : BNE .BRANCH_ALPHA
|
|
|
|
STZ $30
|
|
STZ $31
|
|
STZ $67
|
|
STZ $2A
|
|
STZ $2B
|
|
STZ $6B
|
|
|
|
.BRANCH_ALPHA:
|
|
|
|
; Cane of Somaria transit lines?
|
|
LDA $02F5 : BEQ .BRANCH_BETA
|
|
|
|
STZ $67
|
|
|
|
.BRANCH_BETA:
|
|
NetExit:
|
|
RTS
|
|
}
|
|
|
|
print "Next address for jump in bank07: ", pc
|
|
|
|
; =============================================================================
|
|
|
|
org $07FB71
|
|
LinkItem_Bottles_Long:
|
|
{
|
|
PHB : PHK : PLB
|
|
JSR LinkItem_Bottles
|
|
PLB
|
|
RTL
|
|
}
|
|
|
|
LinkItem_Bottles:
|
|
{
|
|
JSR Link_CheckNewY_ButtonPress : BCC NetExit ; (RTS)
|
|
|
|
LDA.b $3A : AND.b #$BF : STA.b $3A
|
|
|
|
; Check if we have a bottle or not
|
|
LDA.l $7EF34F : DEC A : TAX
|
|
|
|
LDA.l $7EF35C, X : BEQ NetExit ; (RTS)
|
|
CMP.b #$03 : BCC .LinkItem_UselessBottle
|
|
CMP.b #$03 : BEQ .LinkItem_RedPotion
|
|
CMP.b #$04 : BEQ .LinkItem_GreenPotion
|
|
CMP.b #$05 : BEQ .LinkItem_BluePotion
|
|
CMP.b #$06 : BEQ .fairy
|
|
|
|
BRL .LinkItem_BeeBottle
|
|
|
|
.fairy:
|
|
BRL .LinkItem_FairyBottle
|
|
|
|
.LinkItem_RedPotion:
|
|
LDA.l $7EF36C : CMP.l $7EF36D : BNE .can_drink_red
|
|
|
|
.LinkItem_UselessBottle:
|
|
BRL $07A955 ; LinkGoBeep TODO(scawful): Investigate
|
|
|
|
.can_drink_red:
|
|
LDA.b #$02 : STA.l $7EF35C, X : STZ.w $0301
|
|
|
|
LDA.b #$04 : STA.b $11
|
|
LDA.b $10 : STA.w $010C
|
|
LDA.b #$0E : STA.b $10
|
|
LDA.b #$07 : STA.w $0208
|
|
|
|
JSL $0DFA58
|
|
|
|
RTS
|
|
|
|
.LinkItem_GreenPotion:
|
|
JSR $A1A9
|
|
LDA $7EF36E : CMP.b #$80 : BNE .can_drink
|
|
BRL $07A955 ; LinkGoBeep TODO(scawful): Investigate
|
|
|
|
.can_drink:
|
|
LDA $02 : STA $7EF35C, X : STZ $0301
|
|
|
|
; submodule ????
|
|
LDA.b #$08 : STA $11
|
|
LDA $10 : STA $010C
|
|
|
|
; Go to text mode
|
|
LDA.b #$0E : STA $10
|
|
LDA.b #$07 : STA $0208
|
|
|
|
JSL $0DFA58 ; RebuildHUD_long TODO(scawful)
|
|
RTS
|
|
|
|
.LinkItem_BluePotion:
|
|
LDA $7EF36C : CMP $7EF36D : BNE .useBluePotion
|
|
LDA $7EF36E : CMP.b #$80 : BNE .useBluePotion
|
|
BRL $07A955
|
|
|
|
.useBluePotion
|
|
LDA.b #$02 : STA $7EF35C, X : STZ $0301
|
|
|
|
; more submodule code
|
|
LDA.b #$09 : STA.b $11
|
|
LDA.b $10 : STA.w $010C
|
|
|
|
; Go to text mode (?)
|
|
LDA.b #$0E : STA.b $10
|
|
LDA.b #$07 : STA.w $0208
|
|
|
|
JSL $0DFA58 ; RebuildHUD_Long TODO(scawful)
|
|
RTS
|
|
|
|
.LinkItem_FairyBottle:
|
|
STZ.w $0301
|
|
JSL PlayerItem_SpawnFaerie : BPL .BRANCH_NU
|
|
BRL $07A955
|
|
|
|
.BRANCH_NU:
|
|
LDA.b #$02 : STA.l $7EF35C, X
|
|
JSL $0DFA58 ; RebuildHUD_Long TODO(scawful)
|
|
BRA .bottle_exit
|
|
|
|
.LinkItem_BeeBottle:
|
|
STZ.w $0301
|
|
JSL PlayerItem_ReleaseBee : BPL .bee_spawn_success
|
|
BRL $07A955 ; LinkGoBeep
|
|
|
|
.bee_spawn_success
|
|
LDA.b #$02 : STA.l $7EF35C, X
|
|
JSL $0DFA58 ; RebuildHUD_Long TODO(scawful)
|
|
|
|
.bottle_exit:
|
|
RTS
|
|
}
|
|
|
|
; ============================================================================= |