.align 2
.thumb
push {r0-r5,lr}
ldr r0, .party
mov r2, #0x0
rutina:
mov r4, #0x64
mul r4, r2
add r4, r0, r4
mov r3, #0x0
ldr r1, [r4]
cmp r1, r3
beq exit
ldr r5, =0x56
ldrh r1, [r4,r5]
cmp r1, r3
beq next
ldr r5, =0x50
ldrh r1, [r4,r5]
cmp r1, r3
bne next
ldr r1, .var_8000
ldrh r1, [r1]
mov r5, #0x0
ldr r5, =0x50
strh r1, [r4,r5]
b exit
next:
mov r4, #0x1
add r2, r2, r4
mov r4, #0x6
cmp r2, r4
beq exit
b rutina
exit:
mov r4, #0x0
pop {r0-r5,pc}
.party: .word 0x03004360
.var_8000: .word 0x0202E8C4