; DEBUG = $1ACA0-1AF50
;
; CA0-Cxx = EXP level up loop


;0006dd2c : 0083102B  SLTU    000b156a (v0), 00000324 (a0), 00000064 (v1),
;0006dd30 : 14400009  BNE     00000000 (v0), 00000000 (r0), 0006dd58,
;0006dd34 : 32A2FFFF  ANDI    00000000 (v0), 00000000 (s5), ffff (65535),
;0006dd38 : 10600006  BEQ     00000064 (v1), 00000000 (r0), 0006dd54,

; minus 100 EXP, +1 level
;0006dd3c : 00851023  SUBU    00000000 (v0), 00000324 (a0), 00000064 (a1),
;0006dd40 : A4C2017E  SH      000002c0 (v0), 017e (000c0c5a (a2)) [000c0dd8]
;0006dd44 : 90E20176  LBU     000002c0 (v0), 0176 (000c0c59 (a3)) [000c0dcf]
;0006dd48 : 36940001  ORI     00000000 (s4), 00000000 (s4), 0001 (1),
;-->
;0006dd4c : 24420001  ADDIU   0000000b (v0), 0000000b (v0), 0001 (1),
;0006dd50 : A0E20176  SB      0000000c (v0), 0176 (000c0c59 (a3)) [000c0dcf]
;-->
;0006dd54 : 32A2FFFF  ANDI    0000000c (v0), 00000000 (s5), ffff (65535),
;0006dd58 : 1040004A  BEQ     00000000 (v0), 00000000 (r0), 0006de84,
;0006dd5c : 00001821  ADDU    00000064 (v1), 00000000 (r0), 00000000 (r0),


org $1aca0

; OLD code
addiu v0,v0,1
sb v0,$176(a3)

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

; Adjust EXP and save
subu a0,a0,a1
sh a0,$17e(a2)

; Check another level up
j $6dd2c
nop
