;Temporary addition: Armpump fix
;$8EADE-$8EB73
org $91EADE
print "Start of armpump fix: ",pc
	LDA $0DCE
	BEQ BRANCH_ALPHA
	LDA $0A1F
	AND #$00FF
	CMP #$0001
	BEQ BRANCH_BETA
BRANCH_ALPHA:
	LDA $0A28
	CMP #$FFFF
	BEQ BRANCH_GAMMA
	ASL A
	ASL A
	ASL A
	TAX
	LDA $B62A, X
	AND #$00FF
	DEC
	BNE BRANCH_GAMMA
	LDA $0A23
	AND #$00FF
	DEC
	BEQ BRANCH_GAMMA
	STZ $14
	LDA $0A1E
	AND #$00FF
	CMP #$0004
	BEQ BRANCH_DELTA
	LDA #$0001
	STA $12
	STA $0B02
	JSL $A0A8F0
	TAX
	BNE BRANCH_EPSILON
	LDA #$0001
	STA $0B02
	BRA BRANCH_ZETA
BRANCH_DELTA:
	LDA #$0001
	STA $12
	STZ $0B02
	JSL $A0A8F0
	TAX
	BNE BRANCH_EPSILON
	STZ $0B02
	LDA #$FFFF
BRANCH_ZETA:
	STA $12
	STZ $14
	JSL $94971E
	BCC BRANCH_GAMMA
BRANCH_EPSILON:
	LDA $0A28
	BRA BRANCH_THETA
BRANCH_BETA:
	LDA $0A1C
BRANCH_THETA:
	ASL A
	ASL A
	ASL A
	TAX
	LDA $B62C, X
	AND #$00FF
	ASL A
	TAX
	LDA $EB74, X
	STA $0A28
	STZ $0DCE
	SEC
	RTS
BRANCH_GAMMA:
	STZ $0DCE
	CLC
	RTS
print "End of armpump fix + 1: ", pc