c048589c02
Move compass count ram init to compasses.asm Rename WRAMEquipment and SRAMEquipment to EquipmentWRAM/SRAM
90 lines
2.0 KiB
NASM
90 lines
2.0 KiB
NASM
!INFINITE_BOMBS = "$7F50C9"
|
|
IsItemAvailable:
|
|
LDA !INFINITE_BOMBS : BEQ .finite
|
|
.infinite
|
|
CPX.b #$04 : BNE .finite
|
|
LDA.b #$01 : RTL
|
|
.finite
|
|
LDA EquipmentWRAM-1, X
|
|
RTL
|
|
LoadBombCount:
|
|
LDA !INFINITE_BOMBS : BNE .infinite
|
|
.finite
|
|
LDA BombsEquipment
|
|
.infinite
|
|
RTL
|
|
LoadBombCount16:
|
|
LDA !INFINITE_BOMBS : AND.w #$00FF : BNE .infinite
|
|
.finite
|
|
LDA BombsEquipment
|
|
.infinite
|
|
RTL
|
|
StoreBombCount:
|
|
PHA : LDA !INFINITE_BOMBS : BEQ .finite
|
|
.infinite
|
|
PLA : LDA.b #$01 : RTL
|
|
.finite
|
|
PLA : STA BombsEquipment
|
|
RTL
|
|
SearchForEquippedItem:
|
|
LDA !INFINITE_BOMBS : BEQ +
|
|
LDA.b #$01 : LDX.b #$00 : RTL
|
|
+
|
|
LDA BowEquipment ; thing we wrote over
|
|
RTL
|
|
|
|
!INFINITE_ARROWS = "$7F50C8"
|
|
DecrementArrows:
|
|
LDA !INFINITE_ARROWS : BNE .infinite
|
|
LDA.l ArrowMode : BNE .rupees : BRA .normal
|
|
.infinite
|
|
LDA.b #$01 : RTL
|
|
.normal
|
|
LDA CurrentArrows : BEQ .done
|
|
DEC : STA CurrentArrows : INC
|
|
BRA .done
|
|
.rupees
|
|
REP #$20
|
|
LDA.b $A0 : CMP #$0111 : SEP #$20 : BNE .not_archery_game
|
|
LDA.b $1B : BEQ .not_archery_game ; in overworld
|
|
LDA.w $0B9A : BEQ .shoot_arrow ; arrow game active
|
|
LDA.b #$00 : BRA .done
|
|
|
|
.not_archery_game
|
|
LDA.l CurrentArrows : BNE .shoot_arrow ; check if we have arrows
|
|
BRA .done
|
|
|
|
.shoot_arrow
|
|
PHX
|
|
REP #$20
|
|
LDA CurrentRupees : BEQ +
|
|
PHA : LDA BowEquipment : DEC : AND #$0002 : TAX : PLA
|
|
!SUB.l ArrowModeWoodArrowCost, X ; CMP.w #$0000
|
|
BMI .not_enough_money
|
|
STA CurrentRupees : LDA.w #$0001 : BRA +
|
|
.not_enough_money
|
|
LDA.w #$0000
|
|
+
|
|
SEP #$20 ; set 8-bit accumulator
|
|
PLX
|
|
.done
|
|
CMP.b #$00
|
|
RTL
|
|
|
|
ArrowGame:
|
|
LDA $0B99 : BEQ +
|
|
DEC $0B99 ; reduce minigame arrow count
|
|
LDA.l ArrowMode : BNE .rupees
|
|
.normal
|
|
LDA CurrentArrows : INC #2 : STA CurrentArrows ; increment arrow count (by 2 for some reason)
|
|
RTL
|
|
.rupees
|
|
PHX
|
|
REP #$20 ; set 16-bit accumulator
|
|
LDA BowEquipment : DEC : AND #$0002 : TAX
|
|
LDA CurrentRupees : !ADD.l ArrowModeWoodArrowCost, X : STA CurrentRupees
|
|
SEP #$20 ; set 8-bit accumulator
|
|
PLX
|
|
+
|
|
RTL
|