; =============================================================================

; no glove color 
org $0DEE24
 db $80

org $07983A
  Player_ResetSwimState:

org $0ED6C0
  LoadActualGearPalettes:

org $07E245 
  Link_HandleVelocity:

org $07915E
  LinkState_ExitingDash:

org $07E6A6
  Link_HandleMovingAnimation_FullLongEntry:

org $07E69D
  Link_HandleMovingAnimation_SetFacingDown:

org $01FF28
  Player_CacheStatePriorToHandler:

org $09912C
  AddTransformationCloud:

org $07B073
  Link_CheckNewY_ButtonPress:

org $078028
  Player_DoSfx2:

; =============================================================================

org $008827
  JSL StartupMasks

org $278000
StartupMasks:
{
  ; from vanilla:
  ; bring the screen into force blank after NMI
  LDA.b #$80 : STA $13

  ; set links sprite bank 
  LDA #$10 : STA $BC

  RTL 
}

; =============================================================================

org $1BEDF9
  JSL Palette_ArmorAndGloves ; 4bytes
  RTL ; 1byte 
  NOP #$01

org $1BEE1B
  JSL Palette_ArmorAndGloves_part_two
  RTL

org $398000
Palette_ArmorAndGloves:
{
  LDA.b #$10 
  STA $BC         ; Load Original Sprite Location
  REP #$21
  LDA $7EF35B
  JSL $1BEDFF     ; Read Original Palette Code
  RTL
.part_two
  SEP #$30
      REP #$30
      LDA $7EF354
      JSL $1BEE21 ; Read Original Palette Code
  RTL

  PHX : PHY : PHA
  ; Load armor palette
  PHB : PHK : PLB

  REP #$20
  
  ; Check what Link's armor value is.
  LDA $7EF35B : AND.w #$00FF : TAX
  
  LDA $1BEC06, X : AND.w #$00FF : ASL A : ADC.w #$F000 : STA $00
  REP #$10
  
  LDA.w #$01E2 ; Target SP-7 (sprite palette 6)
  LDX.w #$000E ; Palette has 15 colors
  
  TXY : TAX
  
  LDA.b $BC : AND #$00FF : STA $02

.loop

  LDA [$00] : STA $7EC300, X : STA $7EC500, X
  
  INC $00 : INC $00
  
  INX #2
  
  DEY : BPL .loop

  SEP #$30
  
  
  PLB
  INC $15
  PLA : PLY : PLX
  RTL
}

; =============================================================================

org $07B64F
  Link_HandleDiagonalCollision:

; start of free space in bank07 
org $07F89D
Link_HandleDiagonalCollision_Long:
{
  PHB : PHK : PLB
  JSR Link_HandleDiagonalCollision
  PLB
  RTL
}

; =============================================================================

org $07B7C7
  Link_HandleCardinalCollision:

org $07F8A6
Link_HandleCardinalCollision_Long:
{
  PHB : PHK : PLB
  JSR Link_HandleCardinalCollision
  PLB
  RTL
}

; =============================================================================

org $07E8F0
  HandleIndoorCameraAndDoors:

org $07F8AE
HandleIndoorCameraAndDoors_Long:
{
  PHB : PHK : PLB
  JSR HandleIndoorCameraAndDoors
  PLB
  RTL
}

; =============================================================================

org $07F514
  CheckIndoorStatus:

org $07F8B7
CheckIndoorStatus_Long:
{
  PHB : PHK : PLB
  JSR CheckIndoorStatus
  PLB
  RTL
}

; =============================================================================

org $079873
  Player_ResetSwimCollision:

org $07F8C0
Player_ResetSwimCollision_Long:
{
  PHB : PHK : PLB
  JSR Player_ResetSwimCollision
  PLB
  RTL
}

; =============================================================================

org $079B0E
  Link_HandleYItems:

org $07F8C9
Link_HandleYItems_Long:
{
  PHB : PHK : PLB
  JSR Link_HandleYItems
  PLB
  RTL
}

; =============================================================================

org $07FA41
LinkState_ResetMaskAnimated:
{
  LDA $02B2 : BEQ .no_mask
  CMP #$01 : BNE .transform

  ; Restore the sword, shield, and bow override
  LDA $0AA5 : STA.l $7EF359
  LDA $0AAF : STA.l $7EF35A
  LDA #$00 : STA $7E03FC

.transform
  LDY.b #$04 : LDA.b #$23
  JSL AddTransformationCloud
  LDA.b #$14 : JSR Player_DoSfx2

  JSL Palette_ArmorAndGloves
  LDA #$10 : STA $BC : STZ $02B2
.no_mask
  RTL
}

Link_CheckNewL_ButtonPress:
{
  ; Check if the L button is already down.
  BIT $3B : BVS .noNewInput
  
  ; Flag to see if Link is recoiling from damage or other stuff.
  LDA $46 : BNE .noNewInput
  
  ; Check joypad readings for new input during this frame.
  LDA $F6 : AND.b #$08 : BEQ .noNewInput  ; AND with 00001000 to isolate L
  
  TSB $3B
  
  SEC
  
  RTS

.noNewInput

  ; I'm guessing this is like a cancel indicator.
  CLC
  
  RTS
}

Link_CheckNewR_ButtonPress:
{
  ; Check if the R button is already down.
  BIT $3B : BVS .noNewInput
  
  ; Flag to see if Link is recoiling from damage or other stuff.
  LDA $46 : BNE .noNewInput
  
  ; Check joypad readings for new input during this frame.
  LDA $F6 : AND.b #$04 : BEQ .noNewInput  ; AND with 00000100 to isolate R
  
  TSB $3B
  
  SEC
  
  RTS

.noNewInput

  ; I'm guessing this is like a cancel indicator.
  CLC
  
  RTS
}

; =============================================================================