mirror of https://github.com/pret/pokeemerald.git
324 lines
4.6 KiB
ArmAsm
324 lines
4.6 KiB
ArmAsm
.include "asm/macros.inc"
|
|
.include "constants/constants.inc"
|
|
|
|
.syntax unified
|
|
|
|
.text
|
|
|
|
thumb_func_start sub_80F9568
|
|
sub_80F9568: @ 80F9568
|
|
push {lr}
|
|
movs r1, 0x41
|
|
bl GetMonData
|
|
lsls r0, 16
|
|
lsrs r1, r0, 16
|
|
cmp r1, 0
|
|
beq _080F9580
|
|
movs r0, 0xCE
|
|
lsls r0, 1
|
|
cmp r1, r0
|
|
bne _080F9584
|
|
_080F9580:
|
|
movs r0, 0
|
|
b _080F9586
|
|
_080F9584:
|
|
movs r0, 0x1
|
|
_080F9586:
|
|
pop {r1}
|
|
bx r1
|
|
thumb_func_end sub_80F9568
|
|
|
|
thumb_func_start sub_80F958C
|
|
sub_80F958C: @ 80F958C
|
|
push {r4,r5,lr}
|
|
ldr r4, =gPlayerParty
|
|
movs r5, 0
|
|
_080F9592:
|
|
adds r0, r4, 0
|
|
bl sub_80F9568
|
|
cmp r0, 0
|
|
beq _080F95B0
|
|
adds r0, r4, 0
|
|
movs r1, 0x39
|
|
bl GetMonData
|
|
cmp r0, 0
|
|
beq _080F95B0
|
|
movs r0, 0
|
|
b _080F95BA
|
|
.pool
|
|
_080F95B0:
|
|
adds r5, 0x1
|
|
adds r4, 0x64
|
|
cmp r5, 0x5
|
|
ble _080F9592
|
|
movs r0, 0x1
|
|
_080F95BA:
|
|
pop {r4,r5}
|
|
pop {r1}
|
|
bx r1
|
|
thumb_func_end sub_80F958C
|
|
|
|
thumb_func_start sub_80F95C0
|
|
sub_80F95C0: @ 80F95C0
|
|
push {r4,r5,lr}
|
|
sub sp, 0x4
|
|
lsls r0, 24
|
|
lsrs r0, 24
|
|
movs r1, 0x64
|
|
adds r4, r0, 0
|
|
muls r4, r1
|
|
ldr r0, =gPlayerParty
|
|
adds r4, r0
|
|
movs r0, 0
|
|
str r0, [sp]
|
|
adds r0, r4, 0
|
|
movs r1, 0x7
|
|
bl AdjustFriendship
|
|
adds r0, r4, 0
|
|
movs r1, 0x37
|
|
mov r2, sp
|
|
bl SetMonData
|
|
ldr r5, =gStringVar1
|
|
adds r0, r4, 0
|
|
movs r1, 0x2
|
|
adds r2, r5, 0
|
|
bl GetMonData
|
|
adds r0, r5, 0
|
|
bl StringGetEnd10
|
|
add sp, 0x4
|
|
pop {r4,r5}
|
|
pop {r0}
|
|
bx r0
|
|
.pool
|
|
thumb_func_end sub_80F95C0
|
|
|
|
thumb_func_start sub_80F960C
|
|
sub_80F960C: @ 80F960C
|
|
push {r4,lr}
|
|
lsls r0, 24
|
|
lsrs r0, 24
|
|
movs r1, 0x64
|
|
muls r1, r0
|
|
ldr r0, =gPlayerParty
|
|
adds r4, r1, r0
|
|
adds r0, r4, 0
|
|
bl sub_80F9568
|
|
cmp r0, 0
|
|
beq _080F964C
|
|
adds r0, r4, 0
|
|
movs r1, 0x39
|
|
bl GetMonData
|
|
cmp r0, 0
|
|
bne _080F964C
|
|
adds r0, r4, 0
|
|
movs r1, 0x37
|
|
bl GetMonData
|
|
bl pokemon_ailments_get_primary
|
|
lsls r0, 24
|
|
lsrs r0, 24
|
|
cmp r0, 0x1
|
|
bne _080F964C
|
|
movs r0, 0x1
|
|
b _080F964E
|
|
.pool
|
|
_080F964C:
|
|
movs r0, 0
|
|
_080F964E:
|
|
pop {r4}
|
|
pop {r1}
|
|
bx r1
|
|
thumb_func_end sub_80F960C
|
|
|
|
thumb_func_start sub_80F9654
|
|
sub_80F9654: @ 80F9654
|
|
push {r4-r6,lr}
|
|
lsls r0, 24
|
|
lsrs r6, r0, 24
|
|
lsls r0, r6, 2
|
|
adds r0, r6
|
|
lsls r0, 3
|
|
ldr r1, =gTasks + 0x8
|
|
adds r4, r0, r1
|
|
movs r0, 0
|
|
ldrsh r5, [r4, r0]
|
|
cmp r5, 0x1
|
|
beq _080F96AE
|
|
cmp r5, 0x1
|
|
bgt _080F967C
|
|
cmp r5, 0
|
|
beq _080F9682
|
|
b _080F9722
|
|
.pool
|
|
_080F967C:
|
|
cmp r5, 0x2
|
|
beq _080F96C0
|
|
b _080F9722
|
|
_080F9682:
|
|
ldrh r1, [r4, 0x2]
|
|
movs r2, 0x2
|
|
ldrsh r0, [r4, r2]
|
|
cmp r0, 0x5
|
|
bgt _080F96A8
|
|
_080F968C:
|
|
lsls r0, r1, 24
|
|
lsrs r0, 24
|
|
bl sub_80F960C
|
|
cmp r0, 0
|
|
bne _080F96FC
|
|
ldrh r0, [r4, 0x2]
|
|
adds r0, 0x1
|
|
strh r0, [r4, 0x2]
|
|
adds r1, r0, 0
|
|
lsls r0, 16
|
|
asrs r0, 16
|
|
cmp r0, 0x5
|
|
ble _080F968C
|
|
_080F96A8:
|
|
movs r0, 0x2
|
|
strh r0, [r4]
|
|
b _080F9722
|
|
_080F96AE:
|
|
bl sub_809833C
|
|
lsls r0, 24
|
|
cmp r0, 0
|
|
beq _080F9722
|
|
ldrh r0, [r4]
|
|
subs r0, 0x1
|
|
strh r0, [r4]
|
|
b _080F9722
|
|
_080F96C0:
|
|
bl sub_80F958C
|
|
adds r1, r0, 0
|
|
cmp r1, 0
|
|
beq _080F9714
|
|
bl InBattlePyramid
|
|
adds r4, r0, 0
|
|
bl InBattlePike
|
|
orrs r4, r0
|
|
lsls r4, 24
|
|
cmp r4, 0
|
|
bne _080F96E6
|
|
bl sub_81D5C18
|
|
lsls r0, 24
|
|
cmp r0, 0
|
|
beq _080F96F0
|
|
_080F96E6:
|
|
ldr r0, =gScriptResult
|
|
strh r5, [r0]
|
|
b _080F9718
|
|
.pool
|
|
_080F96F0:
|
|
ldr r1, =gScriptResult
|
|
movs r0, 0x1
|
|
strh r0, [r1]
|
|
b _080F9718
|
|
.pool
|
|
_080F96FC:
|
|
ldrb r0, [r4, 0x2]
|
|
bl sub_80F95C0
|
|
ldr r0, =gUnknown_085ECF5D
|
|
bl box_related_two__2
|
|
ldrh r0, [r4]
|
|
adds r0, 0x1
|
|
strh r0, [r4]
|
|
b _080F9722
|
|
.pool
|
|
_080F9714:
|
|
ldr r0, =gScriptResult
|
|
strh r1, [r0]
|
|
_080F9718:
|
|
bl EnableBothScriptContexts
|
|
adds r0, r6, 0
|
|
bl DestroyTask
|
|
_080F9722:
|
|
pop {r4-r6}
|
|
pop {r0}
|
|
bx r0
|
|
.pool
|
|
thumb_func_end sub_80F9654
|
|
|
|
thumb_func_start sub_80F972C
|
|
sub_80F972C: @ 80F972C
|
|
push {lr}
|
|
ldr r0, =sub_80F9654
|
|
movs r1, 0x50
|
|
bl CreateTask
|
|
bl ScriptContext1_Stop
|
|
pop {r0}
|
|
bx r0
|
|
.pool
|
|
thumb_func_end sub_80F972C
|
|
|
|
thumb_func_start overworld_poison
|
|
overworld_poison: @ 80F9744
|
|
push {r4-r7,lr}
|
|
sub sp, 0x4
|
|
ldr r4, =gPlayerParty
|
|
movs r7, 0
|
|
movs r6, 0
|
|
movs r5, 0x5
|
|
_080F9750:
|
|
adds r0, r4, 0
|
|
movs r1, 0x5
|
|
bl GetMonData
|
|
cmp r0, 0
|
|
beq _080F9794
|
|
adds r0, r4, 0
|
|
movs r1, 0x37
|
|
bl GetMonData
|
|
bl pokemon_ailments_get_primary
|
|
lsls r0, 24
|
|
lsrs r0, 24
|
|
cmp r0, 0x1
|
|
bne _080F9794
|
|
adds r0, r4, 0
|
|
movs r1, 0x39
|
|
bl GetMonData
|
|
str r0, [sp]
|
|
cmp r0, 0
|
|
beq _080F9786
|
|
subs r0, 0x1
|
|
str r0, [sp]
|
|
cmp r0, 0
|
|
bne _080F9788
|
|
_080F9786:
|
|
adds r6, 0x1
|
|
_080F9788:
|
|
adds r0, r4, 0
|
|
movs r1, 0x39
|
|
mov r2, sp
|
|
bl SetMonData
|
|
adds r7, 0x1
|
|
_080F9794:
|
|
adds r4, 0x64
|
|
subs r5, 0x1
|
|
cmp r5, 0
|
|
bge _080F9750
|
|
cmp r6, 0
|
|
bne _080F97A4
|
|
cmp r7, 0
|
|
beq _080F97A8
|
|
_080F97A4:
|
|
bl overworld_posion_effect
|
|
_080F97A8:
|
|
cmp r6, 0
|
|
beq _080F97B4
|
|
movs r0, 0x2
|
|
b _080F97BE
|
|
.pool
|
|
_080F97B4:
|
|
cmp r7, 0
|
|
bne _080F97BC
|
|
movs r0, 0
|
|
b _080F97BE
|
|
_080F97BC:
|
|
movs r0, 0x1
|
|
_080F97BE:
|
|
add sp, 0x4
|
|
pop {r4-r7}
|
|
pop {r1}
|
|
bx r1
|
|
thumb_func_end overworld_poison
|
|
|
|
.align 2, 0 @ Don't pad with nop.
|