tmc/asm/object87.s

1083 lines
18 KiB
ArmAsm

.include "asm/macros.inc"
.include "constants/constants.inc"
.syntax unified
.text
thumb_func_start Object87
Object87: @ 0x08099EFC
push {lr}
ldr r2, _08099F10 @ =gUnk_08123840
ldrb r1, [r0, #0xc]
lsls r1, r1, #2
adds r1, r1, r2
ldr r1, [r1]
bl _call_via_r1
pop {pc}
.align 2, 0
_08099F10: .4byte gUnk_08123840
thumb_func_start sub_08099F14
sub_08099F14: @ 0x08099F14
push {r4, r5, r6, r7, lr}
adds r5, r0, #0
movs r0, #1
strb r0, [r5, #0xc]
movs r0, #0x80
lsls r0, r0, #2
strh r0, [r5, #0x24]
ldrb r0, [r5, #0xa]
cmp r0, #9
bls _08099F2A
b _0809A1B6
_08099F2A:
lsls r0, r0, #2
ldr r1, _08099F34 @ =_08099F38
adds r0, r0, r1
ldr r0, [r0]
mov pc, r0
.align 2, 0
_08099F34: .4byte _08099F38
_08099F38: @ jump table
.4byte _08099F60 @ case 0
.4byte _08099F70 @ case 1
.4byte _08099F82 @ case 2
.4byte _0809A00C @ case 3
.4byte _0809A0AA @ case 4
.4byte _0809A0B0 @ case 5
.4byte _0809A058 @ case 6
.4byte _0809A11C @ case 7
.4byte _0809A132 @ case 8
.4byte _0809A1B0 @ case 9
_08099F60:
adds r2, r5, #0
adds r2, #0x79
movs r0, #0
movs r1, #0x96
strb r1, [r2]
strb r0, [r5, #0xe]
movs r0, #0x1e
strb r0, [r5, #0xf]
_08099F70:
adds r0, r5, #0
movs r1, #0
bl InitializeAnimation
movs r0, #0x92
lsls r0, r0, #1
bl EnqueueSFX
b _0809A1B6
_08099F82:
ldr r0, [r5, #0x50]
adds r0, #0x7b
ldrb r0, [r0]
adds r0, #0x80
rsbs r0, r0, #0
strb r0, [r5, #0x15]
bl Random
movs r1, #1
ands r1, r0
cmp r1, #0
beq _08099FCE
bl Random
adds r1, r0, #0
movs r0, #3
ands r1, r0
cmp r1, #1
beq _08099FBC
cmp r1, #1
blo _08099FB6
cmp r1, #2
beq _08099FC2
cmp r1, #3
beq _08099FC8
b _08099FCE
_08099FB6:
ldrb r0, [r5, #0x15]
subs r0, #0x10
b _08099FCC
_08099FBC:
ldrb r0, [r5, #0x15]
adds r0, #0x10
b _08099FCC
_08099FC2:
ldrb r0, [r5, #0x15]
subs r0, #8
b _08099FCC
_08099FC8:
ldrb r0, [r5, #0x15]
adds r0, #8
_08099FCC:
strb r0, [r5, #0x15]
_08099FCE:
bl Random
movs r1, #0x3f
ands r0, r1
movs r1, #0xf0
subs r1, r1, r0
strh r1, [r5, #0x24]
lsls r1, r1, #0x10
asrs r1, r1, #0x11
lsls r1, r1, #8
ldrb r2, [r5, #0x15]
adds r0, r5, #0
bl sub_0806F62C
ldrh r1, [r5, #0x24]
lsls r1, r1, #0x10
asrs r1, r1, #0x11
lsls r1, r1, #8
ldrb r2, [r5, #0x15]
adds r0, r5, #0
bl sub_0806F62C
adds r0, r5, #0
movs r1, #5
bl InitializeAnimation
movs r0, #0xa6
lsls r0, r0, #1
bl SoundReq
b _0809A1B6
_0809A00C:
ldr r0, [r5, #0x50]
adds r0, #0x7b
ldrb r0, [r0]
adds r0, #0x80
rsbs r0, r0, #0
strb r0, [r5, #0x15]
movs r1, #0x90
lsls r1, r1, #7
ldrb r2, [r5, #0x15]
adds r0, r5, #0
bl sub_0806F62C
bl Random
movs r1, #1
ands r1, r0
cmp r1, #0
beq _0809A040
bl Random
movs r1, #0x3f
ands r0, r1
ldrb r1, [r5, #0x15]
adds r0, r0, r1
strb r0, [r5, #0x15]
b _0809A04E
_0809A040:
bl Random
movs r1, #0x3f
ands r0, r1
ldrb r1, [r5, #0x15]
subs r1, r1, r0
strb r1, [r5, #0x15]
_0809A04E:
adds r0, r5, #0
movs r1, #6
bl InitializeAnimation
b _0809A1B6
_0809A058:
bl Random
movs r1, #0x2f
ands r1, r0
movs r4, #0x30
subs r4, r4, r1
lsls r4, r4, #8
bl Random
movs r2, #0xff
ands r2, r0
adds r0, r5, #0
adds r1, r4, #0
bl sub_0806F62C
bl Random
movs r1, #1
ands r1, r0
cmp r1, #0
beq _0809A092
bl Random
movs r1, #0x3f
ands r0, r1
ldrb r1, [r5, #0x15]
adds r0, r0, r1
strb r0, [r5, #0x15]
b _0809A0A0
_0809A092:
bl Random
movs r1, #0x3f
ands r0, r1
ldrb r1, [r5, #0x15]
subs r1, r1, r0
strb r1, [r5, #0x15]
_0809A0A0:
adds r0, r5, #0
movs r1, #5
bl InitializeAnimation
b _0809A1B6
_0809A0AA:
movs r0, #0xc3
lsls r0, r0, #2
b _0809A1B4
_0809A0B0:
adds r2, r5, #0
adds r2, #0x29
ldrb r1, [r2]
movs r0, #8
rsbs r0, r0, #0
ands r0, r1
strb r0, [r2]
movs r0, #0x18
str r0, [r5, #0x78]
adds r7, r5, #0
adds r7, #0x76
movs r1, #0
movs r0, #0x80
lsls r0, r0, #3
strh r0, [r7]
adds r4, r5, #0
adds r4, #0x74
strh r0, [r4]
adds r6, r5, #0
adds r6, #0x7a
strh r1, [r6]
ldr r0, [r5, #0x50]
adds r0, #0x7b
ldrb r1, [r0]
rsbs r1, r1, #0
lsls r1, r1, #0x18
ldr r3, _0809A118 @ =gUnk_0812388C
ldrb r2, [r5, #0xb]
lsls r0, r2, #1
adds r0, #1
lsls r0, r0, #1
adds r0, r0, r3
lsrs r1, r1, #0x18
ldrh r0, [r0]
adds r1, r1, r0
lsls r2, r2, #2
adds r2, r2, r3
ldrh r2, [r2]
adds r0, r5, #0
bl sub_0806F62C
ldrh r1, [r7]
ldrh r2, [r4]
ldrh r3, [r6]
adds r0, r5, #0
bl sub_0805EC9C
adds r0, r5, #0
movs r1, #7
bl InitializeAnimation
b _0809A1B6
.align 2, 0
_0809A118: .4byte gUnk_0812388C
_0809A11C:
movs r0, #0
strb r0, [r5, #0xe]
adds r0, r5, #0
movs r1, #8
bl InitializeAnimation
ldr r0, [r5, #0x50]
adds r1, r5, #0
bl CopyPosition
b _0809A1B6
_0809A132:
ldr r0, [r5, #0x50]
adds r0, #0x7c
ldrb r0, [r0]
movs r1, #0
strb r0, [r5, #0xb]
movs r0, #4
strb r0, [r5, #0xe]
strb r1, [r5, #0xf]
ldr r3, _0809A1A0 @ =gRoomControls
ldrh r0, [r5, #0x2e]
ldrh r1, [r3, #6]
subs r0, r0, r1
movs r1, #0xf8
lsls r1, r1, #1
adds r2, r1, #0
ands r0, r2
movs r1, #0x82
adds r1, r1, r5
mov ip, r1
strh r0, [r1]
ldrh r1, [r5, #0x32]
ldrh r0, [r3, #8]
subs r1, r1, r0
ands r1, r2
adds r3, r5, #0
adds r3, #0x80
strh r1, [r3]
adds r4, r5, #0
adds r4, #0x84
mov r0, ip
ldrh r2, [r0]
subs r2, #0x10
asrs r2, r2, #4
lsrs r1, r1, #4
lsls r0, r1, #5
subs r0, r0, r1
adds r2, r2, r0
str r2, [r4]
mov r1, ip
ldrh r0, [r1]
ldrh r1, [r3]
ldrb r3, [r5, #0xb]
bl sub_0809A6F8
ldr r0, [r5, #0x50]
adds r0, #0x7c
ldrb r1, [r0]
movs r0, #1
ands r0, r1
cmp r0, #0
beq _0809A1A8
ldr r0, _0809A1A4 @ =0x000001A3
bl SoundReq
b _0809A1B6
.align 2, 0
_0809A1A0: .4byte gRoomControls
_0809A1A4: .4byte 0x000001A3
_0809A1A8:
movs r0, #0xe8
bl SoundReq
b _0809A1B6
_0809A1B0:
movs r0, #0xf0
lsls r0, r0, #1
_0809A1B4:
str r0, [r5, #0x78]
_0809A1B6:
pop {r4, r5, r6, r7, pc}
thumb_func_start sub_0809A1B8
sub_0809A1B8: @ 0x0809A1B8
push {r4, r5, r6, r7, lr}
mov r7, sl
mov r6, sb
mov r5, r8
push {r5, r6, r7}
sub sp, #0x38
adds r7, r0, #0
bl GetNextFrame
ldrb r0, [r7, #0xa]
cmp r0, #9
bls _0809A1D2
b _0809A632
_0809A1D2:
lsls r0, r0, #2
ldr r1, _0809A1DC @ =_0809A1E0
adds r0, r0, r1
ldr r0, [r0]
mov pc, r0
.align 2, 0
_0809A1DC: .4byte _0809A1E0
_0809A1E0: @ jump table
.4byte _0809A208 @ case 0
.4byte _0809A25C @ case 1
.4byte _0809A33E @ case 2
.4byte _0809A378 @ case 3
.4byte _0809A394 @ case 4
.4byte _0809A3E0 @ case 5
.4byte _0809A378 @ case 6
.4byte _0809A46C @ case 7
.4byte _0809A47C @ case 8
.4byte _0809A616 @ case 9
_0809A208:
adds r1, r7, #0
adds r1, #0x79
ldrb r0, [r1]
cmp r0, #0
beq _0809A25C
subs r0, #1
strb r0, [r1]
ldrb r0, [r7, #0xf]
subs r0, #1
strb r0, [r7, #0xf]
lsls r0, r0, #0x18
lsrs r0, r0, #0x18
adds r1, #0xb
str r1, [sp, #0x20]
cmp r0, #0xff
bne _0809A254
movs r0, #5
strb r0, [r7, #0xf]
ldrb r3, [r7, #0xb]
adds r0, r7, #0
movs r1, #0x87
movs r2, #1
bl CreateObjectWithParent
adds r1, r0, #0
str r1, [r7, #0x54]
cmp r1, #0
beq _0809A24E
ldr r0, [r7, #0x50]
str r0, [r1, #0x50]
ldr r0, [r7, #0x54]
adds r0, #0x84
ldr r2, [sp, #0x20]
ldr r1, [r2]
str r1, [r0]
_0809A24E:
ldrb r0, [r7, #0xb]
adds r0, #1
strb r0, [r7, #0xb]
_0809A254:
ldr r1, [sp, #0x20]
ldr r0, [r1]
ldr r0, [r0, #0xc]
b _0809A474
_0809A25C:
adds r4, r7, #0
adds r4, #0x84
ldr r1, [r4]
ldrb r0, [r7, #0xe]
lsls r0, r0, #2
adds r1, #0xc
adds r1, r1, r0
ldr r2, [r1]
ldr r0, [r2, #0x2c]
ldr r1, [r7, #0x2c]
subs r0, r0, r1
ldr r1, [r2, #0x30]
ldr r2, [r7, #0x30]
subs r1, r1, r2
bl sub_080045DA
strb r0, [r7, #0x15]
movs r2, #0x24
ldrsh r1, [r7, r2]
ldrb r2, [r7, #0x15]
adds r0, r7, #0
bl sub_0806F62C
ldr r1, [r4]
ldrb r0, [r7, #0xe]
lsls r0, r0, #2
adds r1, #0xc
adds r1, r1, r0
ldr r1, [r1]
adds r0, r7, #0
movs r2, #2
movs r3, #2
bl sub_080041A0
cmp r0, #0
bne _0809A2A6
b _0809A632
_0809A2A6:
ldrb r0, [r7, #0xa]
cmp r0, #0
bne _0809A2CC
ldr r1, [r4]
ldrb r0, [r7, #0xe]
lsls r0, r0, #2
adds r1, #0xc
adds r1, r1, r0
ldr r3, [r1]
ldrb r2, [r3, #0x18]
lsls r1, r2, #0x1e
lsrs r1, r1, #0x1e
movs r0, #2
rsbs r0, r0, #0
ands r1, r0
subs r0, #2
ands r0, r2
orrs r0, r1
strb r0, [r3, #0x18]
_0809A2CC:
ldrb r1, [r7, #0xe]
ldr r0, [r4]
ldrb r0, [r0, #1]
subs r0, #1
cmp r1, r0
bne _0809A338
movs r0, #2
strb r0, [r7, #0xc]
movs r0, #0xf0
strb r0, [r7, #0xe]
bl Random
ldr r6, _0809A330 @ =gUnk_0812384C
ldrb r2, [r7, #0xb]
movs r3, #0xf
movs r4, #0xf
adds r1, r4, #0
ands r1, r2
lsls r1, r1, #2
adds r1, r1, r6
ands r0, r3
ldrb r1, [r1]
adds r0, r0, r1
strb r0, [r7, #0x15]
bl Random
ldrb r1, [r7, #0xb]
ands r4, r1
lsls r4, r4, #1
adds r4, #1
lsls r4, r4, #1
adds r4, r4, r6
ldr r2, _0809A334 @ =0x000001FF
adds r1, r2, #0
ands r0, r1
ldrh r4, [r4]
adds r0, r0, r4
strh r0, [r7, #0x24]
ldrb r0, [r7, #0xa]
cmp r0, #0
beq _0809A320
b _0809A632
_0809A320:
ldr r1, [r7, #0x50]
movs r0, #4
strb r0, [r1, #0xc]
ldr r1, [r7, #0x50]
movs r0, #0
strb r0, [r1, #0xd]
b _0809A632
.align 2, 0
_0809A330: .4byte gUnk_0812384C
_0809A334: .4byte 0x000001FF
_0809A338:
adds r0, r1, #1
strb r0, [r7, #0xe]
b _0809A632
_0809A33E:
ldr r1, [r7, #0x50]
ldrb r0, [r1, #0xb]
cmp r0, #3
bne _0809A38E
adds r0, r1, #0
adds r0, #0x84
ldr r0, [r0]
ldr r2, [r0, #8]
ldr r0, [r2, #0x2c]
ldr r1, [r7, #0x2c]
subs r0, r0, r1
ldr r1, [r2, #0x30]
ldr r2, [r7, #0x30]
subs r1, r1, r2
bl sub_080045DA
strb r0, [r7, #0x15]
movs r1, #0xa0
lsls r1, r1, #2
ldrb r2, [r7, #0x15]
adds r0, r7, #0
bl sub_0806F62C
ldr r1, [r7, #0x50]
adds r0, r7, #0
movs r2, #0x48
bl sub_0806FC80
b _0809A388
_0809A378:
ldrb r2, [r7, #0x15]
adds r0, r7, #0
movs r1, #0x80
bl sub_0806F62C
adds r0, r7, #0
adds r0, #0x5a
ldrb r0, [r0]
_0809A388:
cmp r0, #0
bne _0809A38E
b _0809A632
_0809A38E:
bl DeleteThisEntity
b _0809A632
_0809A394:
ldr r3, [r7, #0x78]
cmp r3, #0
bne _0809A3B4
ldr r0, _0809A3B0 @ =gRoomVars
movs r2, #0xc
ldrsh r1, [r0, r2]
movs r0, #0x80
lsls r0, r0, #1
cmp r1, r0
beq _0809A38E
movs r0, #8
bl sub_0805308C
b _0809A632
.align 2, 0
_0809A3B0: .4byte gRoomVars
_0809A3B4:
ldr r2, [r7, #0x50]
adds r0, r2, #0
adds r0, #0x45
ldrb r1, [r0]
cmp r1, #0
bne _0809A3C8
movs r0, #1
strb r0, [r7, #0xd]
str r1, [r7, #0x78]
b _0809A632
_0809A3C8:
ldrb r0, [r7, #0xd]
cmp r0, #0
bne _0809A3D6
ldrb r0, [r2, #0xb]
cmp r0, #0
beq _0809A3D6
b _0809A632
_0809A3D6:
movs r0, #1
strb r0, [r7, #0xd]
subs r0, r3, #1
str r0, [r7, #0x78]
b _0809A632
_0809A3E0:
ldr r0, [r7, #0x78]
cmp r0, #0
bne _0809A432
adds r0, r7, #0
adds r0, #0x76
ldrh r2, [r0]
movs r1, #0x80
lsls r1, r1, #1
adds r5, r0, #0
cmp r2, r1
bne _0809A40E
ldr r0, [r7, #0x50]
adds r0, #0x7c
ldrb r1, [r0]
movs r0, #1
ands r0, r1
adds r4, r7, #0
adds r4, #0x74
cmp r0, #0
beq _0809A420
bl DeleteThisEntity
b _0809A420
_0809A40E:
adds r0, r2, #0
subs r0, #0x20
strh r0, [r5]
adds r1, r7, #0
adds r1, #0x74
ldrh r0, [r1]
subs r0, #0x20
strh r0, [r1]
adds r4, r1, #0
_0809A420:
ldrh r1, [r5]
ldrh r2, [r4]
adds r0, r7, #0
adds r0, #0x7a
ldrh r3, [r0]
adds r0, r7, #0
bl sub_0805EC9C
b _0809A436
_0809A432:
subs r0, #1
str r0, [r7, #0x78]
_0809A436:
ldr r0, [r7, #0x50]
adds r1, r7, #0
bl CopyPosition
ldr r4, _0809A468 @ =gUnk_0812388C
ldrb r3, [r7, #0xb]
lsls r0, r3, #1
adds r0, #1
lsls r0, r0, #1
adds r0, r0, r4
ldrh r1, [r0]
ldr r0, [r7, #0x50]
adds r0, #0x7b
ldrb r2, [r0]
rsbs r2, r2, #0
lsls r2, r2, #0x18
lsls r3, r3, #2
adds r3, r3, r4
lsrs r2, r2, #0x18
ldrh r3, [r3]
adds r2, r2, r3
adds r0, r7, #0
bl sub_0806F62C
b _0809A632
.align 2, 0
_0809A468: .4byte gUnk_0812388C
_0809A46C:
ldrb r0, [r7, #0xe]
cmp r0, #0
bne _0809A38E
ldr r0, [r7, #0x50]
_0809A474:
adds r1, r7, #0
bl CopyPosition
b _0809A632
_0809A47C:
ldrb r0, [r7, #0xe]
subs r0, #1
strb r0, [r7, #0xe]
lsls r0, r0, #0x18
lsrs r0, r0, #0x18
cmp r0, #0xff
beq _0809A48C
b _0809A632
_0809A48C:
movs r0, #4
strb r0, [r7, #0xe]
ldrb r0, [r7, #0xf]
adds r0, #1
strb r0, [r7, #0xf]
adds r0, r7, #0
adds r0, #0x84
str r0, [sp, #4]
ldrb r1, [r7, #0xf]
lsls r0, r1, #5
subs r0, r0, r1
ldr r2, [sp, #4]
ldr r1, [r2]
subs r1, r1, r0
mov sl, r1
mov r0, sl
str r0, [sp]
adds r1, r7, #0
adds r1, #0x82
str r1, [sp, #8]
ldrh r0, [r1]
adds r2, r7, #0
adds r2, #0x7e
str r2, [sp, #0xc]
strh r0, [r2]
ldrh r0, [r1]
subs r1, #8
str r1, [sp, #0x10]
strh r0, [r1]
movs r2, #0x80
adds r2, r2, r7
mov sb, r2
ldrb r0, [r7, #0xf]
lsls r0, r0, #4
ldrh r1, [r2]
subs r1, r1, r0
movs r0, #0x7c
adds r0, r0, r7
mov r8, r0
strh r1, [r0]
adds r4, r7, #0
adds r4, #0x78
strh r1, [r4]
ldr r1, [sp, #0x10]
ldrh r0, [r1]
ldrh r1, [r4]
ldrb r3, [r7, #0xb]
mov r2, sl
bl sub_0809A6F8
adds r5, r0, #0
ldrb r6, [r7, #0xf]
ldr r2, [sp, #4]
str r2, [sp, #0x20]
ldr r0, [sp, #0x10]
str r0, [sp, #0x28]
ldr r1, [sp, #8]
str r1, [sp, #0x1c]
ldr r2, [sp, #0xc]
str r2, [sp, #0x30]
mov r0, sb
str r0, [sp, #0x34]
mov r1, r8
str r1, [sp, #0x2c]
str r4, [sp, #0x24]
cmp r6, #0
beq _0809A568
ldr r2, [sp, #0x28]
str r2, [sp, #0x14]
mov sb, r4
ldr r0, [sp, #0x30]
mov r8, r0
adds r4, r1, #0
_0809A51E:
ldr r1, [sp, #0x14]
ldrh r0, [r1]
subs r0, #0x10
strh r0, [r1]
mov r2, sb
ldrh r0, [r2]
adds r0, #0x10
strh r0, [r2]
ldr r0, [sp]
adds r0, #0x1e
str r0, [sp]
ldrh r0, [r1]
ldrh r1, [r2]
ldrb r3, [r7, #0xb]
ldr r2, [sp]
bl sub_0809A6F8
adds r5, r5, r0
mov r1, r8
ldrh r0, [r1]
adds r0, #0x10
strh r0, [r1]
ldrh r0, [r4]
adds r0, #0x10
strh r0, [r4]
movs r2, #0x20
add sl, r2
ldrh r0, [r1]
ldrh r1, [r4]
ldrb r3, [r7, #0xb]
mov r2, sl
bl sub_0809A6F8
adds r5, r5, r0
subs r6, #1
cmp r6, #0
bne _0809A51E
_0809A568:
ldrb r1, [r7, #0xf]
lsls r0, r1, #5
subs r0, r0, r1
ldr r2, [sp, #0x20]
ldr r1, [r2]
adds r1, r1, r0
mov sl, r1
mov r0, sl
str r0, [sp]
ldr r1, [sp, #0x1c]
ldrh r0, [r1]
ldr r2, [sp, #0x30]
strh r0, [r2]
ldrh r0, [r1]
ldr r1, [sp, #0x28]
strh r0, [r1]
ldrb r0, [r7, #0xf]
lsls r0, r0, #4
ldr r2, [sp, #0x34]
ldrh r2, [r2]
adds r0, r0, r2
ldr r1, [sp, #0x2c]
strh r0, [r1]
ldr r2, [sp, #0x24]
strh r0, [r2]
ldr r1, [sp, #0x28]
ldrh r0, [r1]
ldrh r1, [r2]
ldrb r3, [r7, #0xb]
mov r2, sl
bl sub_0809A6F8
adds r5, r5, r0
ldrb r0, [r7, #0xf]
subs r6, r0, #1
cmp r6, #0
beq _0809A610
ldr r2, [sp, #0x28]
str r2, [sp, #0x18]
ldr r0, [sp, #0x24]
mov sb, r0
ldr r1, [sp, #0x30]
mov r8, r1
ldr r4, [sp, #0x2c]
_0809A5C0:
ldr r2, [sp, #0x18]
ldrh r0, [r2]
subs r0, #0x10
strh r0, [r2]
mov r1, sb
ldrh r0, [r1]
subs r0, #0x10
strh r0, [r1]
ldr r2, [sp]
subs r2, #0x20
str r2, [sp]
ldr r1, [sp, #0x18]
ldrh r0, [r1]
mov r2, sb
ldrh r1, [r2]
ldrb r3, [r7, #0xb]
ldr r2, [sp]
bl sub_0809A6F8
adds r5, r5, r0
mov r1, r8
ldrh r0, [r1]
adds r0, #0x10
strh r0, [r1]
ldrh r0, [r4]
subs r0, #0x10
strh r0, [r4]
movs r2, #0x1e
rsbs r2, r2, #0
add sl, r2
ldrh r0, [r1]
ldrh r1, [r4]
ldrb r3, [r7, #0xb]
mov r2, sl
bl sub_0809A6F8
adds r5, r5, r0
subs r6, #1
cmp r6, #0
bne _0809A5C0
_0809A610:
cmp r5, #0
bne _0809A632
b _0809A38E
_0809A616:
bl sub_08078B48
ldr r0, [r7, #0x78]
subs r0, #1
str r0, [r7, #0x78]
movs r1, #1
rsbs r1, r1, #0
cmp r0, r1
bne _0809A632
ldr r1, _0809A640 @ =gRoomControls
ldr r0, _0809A644 @ =gPlayerEntity
str r0, [r1, #0x30]
bl DeleteThisEntity
_0809A632:
add sp, #0x38
pop {r3, r4, r5}
mov r8, r3
mov sb, r4
mov sl, r5
pop {r4, r5, r6, r7, pc}
.align 2, 0
_0809A640: .4byte gRoomControls
_0809A644: .4byte gPlayerEntity
thumb_func_start sub_0809A648
sub_0809A648: @ 0x0809A648
push {r4, r5, r6, r7, lr}
mov r7, r8
push {r7}
adds r7, r0, #0
bl GetNextFrame
ldrb r0, [r7, #0xe]
subs r0, #1
strb r0, [r7, #0xe]
lsls r0, r0, #0x18
lsrs r0, r0, #0x18
cmp r0, #0xff
beq _0809A6EC
ldr r4, [r7, #0x50]
adds r0, r4, #0
adds r0, #0x74
ldrh r1, [r0]
movs r0, #0x80
lsls r0, r0, #9
bl __divsi3
movs r2, #0x24
ldrsh r1, [r7, r2]
adds r5, r1, #0
muls r5, r0, r5
adds r4, #0x7b
ldrb r1, [r4]
ldrb r0, [r7, #0x15]
subs r0, r0, r1
movs r1, #0x7b
adds r1, r1, r7
mov r8, r1
strb r0, [r1]
ldr r6, _0809A6E8 @ =gSineTable
ldrb r0, [r1]
lsls r0, r0, #1
adds r0, r0, r6
movs r2, #0
ldrsh r0, [r0, r2]
lsls r5, r5, #8
asrs r5, r5, #0x10
adds r1, r5, #0
bl FixedMul
lsls r0, r0, #0x10
asrs r0, r0, #0x10
movs r4, #0x80
lsls r4, r4, #1
adds r1, r4, #0
bl FixedDiv
ldr r1, [r7, #0x50]
lsls r0, r0, #0x10
asrs r0, r0, #8
ldr r1, [r1, #0x2c]
adds r1, r1, r0
str r1, [r7, #0x2c]
mov r1, r8
ldrb r0, [r1]
adds r0, #0x40
lsls r0, r0, #1
adds r0, r0, r6
movs r2, #0
ldrsh r0, [r0, r2]
adds r1, r5, #0
bl FixedMul
lsls r0, r0, #0x10
asrs r0, r0, #0x10
adds r1, r4, #0
bl FixedDiv
ldr r1, [r7, #0x50]
lsls r0, r0, #0x10
asrs r0, r0, #8
ldr r1, [r1, #0x30]
subs r1, r1, r0
str r1, [r7, #0x30]
b _0809A6F0
.align 2, 0
_0809A6E8: .4byte gSineTable
_0809A6EC:
bl DeleteThisEntity
_0809A6F0:
pop {r3}
mov r8, r3
pop {r4, r5, r6, r7, pc}
.align 2, 0
thumb_func_start sub_0809A6F8
sub_0809A6F8: @ 0x0809A6F8
push {r4, r5, r6, r7, lr}
adds r4, r0, #0
adds r5, r1, #0
adds r6, r2, #0
adds r7, r3, #0
bl sub_0809A758
cmp r0, #0
beq _0809A754
ldr r0, _0809A738 @ =gUnk_081238A0
lsls r1, r6, #1
adds r1, r1, r0
ldrh r0, [r1]
cmp r0, #0
beq _0809A750
movs r0, #1
ands r0, r7
cmp r0, #0
beq _0809A73C
ldrh r0, [r1]
lsrs r1, r4, #4
movs r3, #0x3f
ands r1, r3
lsrs r2, r5, #4
ands r2, r3
lsls r2, r2, #6
orrs r1, r2
movs r2, #1
bl sub_0807B9B8
b _0809A750
.align 2, 0
_0809A738: .4byte gUnk_081238A0
_0809A73C:
lsrs r0, r4, #4
movs r2, #0x3f
ands r0, r2
lsrs r1, r5, #4
ands r1, r2
lsls r1, r1, #6
orrs r0, r1
movs r1, #1
bl sub_0807BA8C
_0809A750:
movs r0, #1
b _0809A756
_0809A754:
movs r0, #0
_0809A756:
pop {r4, r5, r6, r7, pc}
thumb_func_start sub_0809A758
sub_0809A758: @ 0x0809A758
push {lr}
adds r2, r0, #0
cmp r2, #0xf
bls _0809A770
movs r0, #0xf8
lsls r0, r0, #1
cmp r2, r0
bhi _0809A770
cmp r1, #0xf0
bhi _0809A770
movs r0, #1
b _0809A772
_0809A770:
movs r0, #0
_0809A772:
pop {pc}