mirror of
https://github.com/pret/pokefirered.git
synced 2026-05-06 13:47:12 -05:00
423 lines
7.4 KiB
ArmAsm
423 lines
7.4 KiB
ArmAsm
.include "asm/macros.inc"
|
|
.include "constants/constants.inc"
|
|
|
|
.syntax unified
|
|
|
|
.text
|
|
|
|
thumb_func_start sub_80BF8FC
|
|
sub_80BF8FC: @ 80BF8FC
|
|
push {lr}
|
|
sub sp, 0x4
|
|
bl ScriptContext2_Enable
|
|
ldr r0, _080BF934 @ =sub_80BF97C
|
|
movs r1, 0xA
|
|
bl CreateTask
|
|
lsls r0, 24
|
|
lsrs r0, 24
|
|
ldr r2, _080BF938 @ =gTasks
|
|
lsls r1, r0, 2
|
|
adds r1, r0
|
|
lsls r1, 3
|
|
adds r1, r2
|
|
movs r2, 0
|
|
movs r0, 0x3
|
|
strh r0, [r1, 0x8]
|
|
subs r0, 0x4
|
|
str r2, [sp]
|
|
movs r1, 0
|
|
movs r3, 0x10
|
|
bl BeginNormalPaletteFade
|
|
add sp, 0x4
|
|
pop {r0}
|
|
bx r0
|
|
.align 2, 0
|
|
_080BF934: .4byte sub_80BF97C
|
|
_080BF938: .4byte gTasks
|
|
thumb_func_end sub_80BF8FC
|
|
|
|
thumb_func_start sub_80BF93C
|
|
sub_80BF93C: @ 80BF93C
|
|
push {lr}
|
|
sub sp, 0x4
|
|
bl ScriptContext2_Enable
|
|
ldr r0, _080BF974 @ =sub_80BF97C
|
|
movs r1, 0xA
|
|
bl CreateTask
|
|
lsls r0, 24
|
|
lsrs r0, 24
|
|
ldr r2, _080BF978 @ =gTasks
|
|
lsls r1, r0, 2
|
|
adds r1, r0
|
|
lsls r1, 3
|
|
adds r1, r2
|
|
movs r2, 0
|
|
movs r0, 0x7
|
|
strh r0, [r1, 0x8]
|
|
subs r0, 0x8
|
|
str r2, [sp]
|
|
movs r1, 0
|
|
movs r3, 0x10
|
|
bl BeginNormalPaletteFade
|
|
add sp, 0x4
|
|
pop {r0}
|
|
bx r0
|
|
.align 2, 0
|
|
_080BF974: .4byte sub_80BF97C
|
|
_080BF978: .4byte gTasks
|
|
thumb_func_end sub_80BF93C
|
|
|
|
thumb_func_start sub_80BF97C
|
|
sub_80BF97C: @ 80BF97C
|
|
push {r4,lr}
|
|
lsls r0, 24
|
|
lsrs r4, r0, 24
|
|
ldr r2, _080BF9B4 @ =gPaletteFade
|
|
ldrb r1, [r2, 0x7]
|
|
movs r0, 0x80
|
|
ands r0, r1
|
|
cmp r0, 0
|
|
bne _080BF9AC
|
|
ldrb r0, [r2, 0x8]
|
|
movs r1, 0x80
|
|
orrs r0, r1
|
|
strb r0, [r2, 0x8]
|
|
ldr r1, _080BF9B8 @ =gTasks
|
|
lsls r0, r4, 2
|
|
adds r0, r4
|
|
lsls r0, 3
|
|
adds r0, r1
|
|
ldrb r0, [r0, 0x8]
|
|
bl sub_81283A8
|
|
adds r0, r4, 0
|
|
bl DestroyTask
|
|
_080BF9AC:
|
|
pop {r4}
|
|
pop {r0}
|
|
bx r0
|
|
.align 2, 0
|
|
_080BF9B4: .4byte gPaletteFade
|
|
_080BF9B8: .4byte gTasks
|
|
thumb_func_end sub_80BF97C
|
|
|
|
thumb_func_start sub_80BF9BC
|
|
sub_80BF9BC: @ 80BF9BC
|
|
push {r4,lr}
|
|
sub sp, 0x4
|
|
ldr r0, _080BF9F0 @ =gPlayerParty
|
|
ldr r1, _080BF9F4 @ =gSpecialVar_0x8004
|
|
ldrb r1, [r1]
|
|
ldr r2, _080BF9F8 @ =gPlayerPartyCount
|
|
ldrb r2, [r2]
|
|
subs r2, 0x1
|
|
lsls r2, 24
|
|
lsrs r2, 24
|
|
ldr r3, _080BF9FC @ =CB2_ReturnToField
|
|
movs r4, 0
|
|
str r4, [sp]
|
|
bl sub_8134738
|
|
movs r0, 0x3
|
|
bl sub_8138B38
|
|
ldr r1, _080BFA00 @ =gFieldCallback
|
|
ldr r0, _080BFA04 @ =FieldCallback_ReturnToEventScript2
|
|
str r0, [r1]
|
|
add sp, 0x4
|
|
pop {r4}
|
|
pop {r0}
|
|
bx r0
|
|
.align 2, 0
|
|
_080BF9F0: .4byte gPlayerParty
|
|
_080BF9F4: .4byte gSpecialVar_0x8004
|
|
_080BF9F8: .4byte gPlayerPartyCount
|
|
_080BF9FC: .4byte CB2_ReturnToField
|
|
_080BFA00: .4byte gFieldCallback
|
|
_080BFA04: .4byte FieldCallback_ReturnToEventScript2
|
|
thumb_func_end sub_80BF9BC
|
|
|
|
thumb_func_start ScrSpecial_CountPokemonMoves
|
|
ScrSpecial_CountPokemonMoves: @ 80BFA08
|
|
push {r4,r5,lr}
|
|
ldr r1, _080BFA44 @ =gSpecialVar_Result
|
|
movs r0, 0
|
|
strh r0, [r1]
|
|
movs r4, 0
|
|
adds r5, r1, 0
|
|
_080BFA14:
|
|
ldr r0, _080BFA48 @ =gSpecialVar_0x8004
|
|
ldrh r1, [r0]
|
|
movs r0, 0x64
|
|
muls r0, r1
|
|
ldr r1, _080BFA4C @ =gPlayerParty
|
|
adds r0, r1
|
|
adds r1, r4, 0
|
|
adds r1, 0xD
|
|
bl GetMonData
|
|
cmp r0, 0
|
|
beq _080BFA32
|
|
ldrh r0, [r5]
|
|
adds r0, 0x1
|
|
strh r0, [r5]
|
|
_080BFA32:
|
|
adds r0, r4, 0x1
|
|
lsls r0, 24
|
|
lsrs r4, r0, 24
|
|
cmp r4, 0x3
|
|
bls _080BFA14
|
|
pop {r4,r5}
|
|
pop {r0}
|
|
bx r0
|
|
.align 2, 0
|
|
_080BFA44: .4byte gSpecialVar_Result
|
|
_080BFA48: .4byte gSpecialVar_0x8004
|
|
_080BFA4C: .4byte gPlayerParty
|
|
thumb_func_end ScrSpecial_CountPokemonMoves
|
|
|
|
thumb_func_start ScrSpecial_GetPokemonNicknameAndMoveName
|
|
ScrSpecial_GetPokemonNicknameAndMoveName: @ 80BFA50
|
|
push {r4,r5,lr}
|
|
ldr r0, _080BFA90 @ =gSpecialVar_0x8004
|
|
ldrh r1, [r0]
|
|
movs r0, 0x64
|
|
adds r5, r1, 0
|
|
muls r5, r0
|
|
ldr r0, _080BFA94 @ =gPlayerParty
|
|
adds r5, r0
|
|
ldr r0, _080BFA98 @ =gSpecialVar_0x8005
|
|
ldrh r1, [r0]
|
|
adds r1, 0xD
|
|
adds r0, r5, 0
|
|
bl GetMonData
|
|
adds r4, r0, 0
|
|
lsls r4, 16
|
|
lsrs r4, 16
|
|
ldr r1, _080BFA9C @ =gStringVar1
|
|
adds r0, r5, 0
|
|
bl GetMonNickname
|
|
ldr r0, _080BFAA0 @ =gStringVar2
|
|
movs r1, 0xD
|
|
muls r1, r4
|
|
ldr r2, _080BFAA4 @ =gMoveNames
|
|
adds r1, r2
|
|
bl StringCopy
|
|
pop {r4,r5}
|
|
pop {r0}
|
|
bx r0
|
|
.align 2, 0
|
|
_080BFA90: .4byte gSpecialVar_0x8004
|
|
_080BFA94: .4byte gPlayerParty
|
|
_080BFA98: .4byte gSpecialVar_0x8005
|
|
_080BFA9C: .4byte gStringVar1
|
|
_080BFAA0: .4byte gStringVar2
|
|
_080BFAA4: .4byte gMoveNames
|
|
thumb_func_end ScrSpecial_GetPokemonNicknameAndMoveName
|
|
|
|
thumb_func_start sub_80BFAA8
|
|
sub_80BFAA8: @ 80BFAA8
|
|
push {r4-r7,lr}
|
|
mov r7, r10
|
|
mov r6, r9
|
|
mov r5, r8
|
|
push {r5-r7}
|
|
sub sp, 0x20
|
|
mov r8, r0
|
|
adds r5, r1, 0
|
|
adds r4, r2, 0
|
|
lsls r5, 24
|
|
lsrs r5, 24
|
|
lsls r4, 24
|
|
lsrs r4, 24
|
|
adds r0, r5, 0
|
|
adds r0, 0xD
|
|
str r0, [sp, 0x8]
|
|
mov r0, r8
|
|
ldr r1, [sp, 0x8]
|
|
bl GetMonData
|
|
mov r1, sp
|
|
adds r1, 0x2
|
|
str r1, [sp, 0x14]
|
|
strh r0, [r1]
|
|
adds r3, r4, 0
|
|
adds r3, 0xD
|
|
str r3, [sp, 0xC]
|
|
mov r0, r8
|
|
adds r1, r3, 0
|
|
bl GetMonData
|
|
mov r1, sp
|
|
strh r0, [r1]
|
|
adds r7, r5, 0
|
|
adds r7, 0x11
|
|
str r7, [sp, 0x10]
|
|
mov r0, r8
|
|
adds r1, r7, 0
|
|
bl GetMonData
|
|
mov r1, sp
|
|
adds r1, 0x5
|
|
str r1, [sp, 0x18]
|
|
strb r0, [r1]
|
|
adds r3, r4, 0
|
|
adds r3, 0x11
|
|
str r3, [sp, 0x1C]
|
|
mov r0, r8
|
|
adds r1, r3, 0
|
|
bl GetMonData
|
|
add r7, sp, 0x4
|
|
mov r10, r7
|
|
strb r0, [r7]
|
|
mov r0, r8
|
|
movs r1, 0x15
|
|
bl GetMonData
|
|
mov r6, sp
|
|
adds r6, 0x6
|
|
strb r0, [r6]
|
|
ldr r1, _080BFBA4 @ =gPPUpGetMask
|
|
adds r0, r5, r1
|
|
ldrb r0, [r0]
|
|
mov r9, r0
|
|
ldrb r0, [r6]
|
|
adds r2, r0, 0
|
|
mov r3, r9
|
|
ands r2, r3
|
|
lsls r5, 1
|
|
asrs r2, r5
|
|
lsls r2, 24
|
|
lsrs r2, 24
|
|
adds r1, r4, r1
|
|
ldrb r3, [r1]
|
|
adds r1, r0, 0
|
|
ands r1, r3
|
|
lsls r4, 1
|
|
asrs r1, r4
|
|
lsls r1, 24
|
|
lsrs r1, 24
|
|
mov r7, r9
|
|
bics r0, r7
|
|
strb r0, [r6]
|
|
ldrb r0, [r6]
|
|
bics r0, r3
|
|
strb r0, [r6]
|
|
lsls r2, r4
|
|
lsls r1, r5
|
|
adds r2, r1
|
|
ldrb r0, [r6]
|
|
orrs r0, r2
|
|
strb r0, [r6]
|
|
mov r0, r8
|
|
ldr r1, [sp, 0x8]
|
|
mov r2, sp
|
|
bl SetMonData
|
|
mov r0, r8
|
|
ldr r1, [sp, 0xC]
|
|
ldr r2, [sp, 0x14]
|
|
bl SetMonData
|
|
mov r0, r8
|
|
ldr r1, [sp, 0x10]
|
|
mov r2, r10
|
|
bl SetMonData
|
|
mov r0, r8
|
|
ldr r1, [sp, 0x1C]
|
|
ldr r2, [sp, 0x18]
|
|
bl SetMonData
|
|
mov r0, r8
|
|
movs r1, 0x15
|
|
adds r2, r6, 0
|
|
bl SetMonData
|
|
add sp, 0x20
|
|
pop {r3-r5}
|
|
mov r8, r3
|
|
mov r9, r4
|
|
mov r10, r5
|
|
pop {r4-r7}
|
|
pop {r0}
|
|
bx r0
|
|
.align 2, 0
|
|
_080BFBA4: .4byte gPPUpGetMask
|
|
thumb_func_end sub_80BFAA8
|
|
|
|
thumb_func_start sub_80BFBA8
|
|
sub_80BFBA8: @ 80BFBA8
|
|
push {r4-r6,lr}
|
|
mov r6, r8
|
|
push {r6}
|
|
ldr r0, _080BFC08 @ =gSpecialVar_0x8004
|
|
mov r8, r0
|
|
ldrh r0, [r0]
|
|
movs r6, 0x64
|
|
muls r0, r6
|
|
ldr r5, _080BFC0C @ =gPlayerParty
|
|
adds r0, r5
|
|
ldr r4, _080BFC10 @ =gSpecialVar_0x8005
|
|
ldrb r2, [r4]
|
|
movs r1, 0
|
|
bl SetMonMoveSlot
|
|
mov r1, r8
|
|
ldrh r0, [r1]
|
|
muls r0, r6
|
|
adds r0, r5
|
|
ldrb r1, [r4]
|
|
bl RemoveMonPPBonus
|
|
ldrh r4, [r4]
|
|
cmp r4, 0x2
|
|
bhi _080BFBFC
|
|
_080BFBDA:
|
|
ldr r0, _080BFC08 @ =gSpecialVar_0x8004
|
|
ldrh r1, [r0]
|
|
movs r0, 0x64
|
|
muls r0, r1
|
|
ldr r1, _080BFC0C @ =gPlayerParty
|
|
adds r0, r1
|
|
lsls r1, r4, 24
|
|
lsrs r1, 24
|
|
adds r4, 0x1
|
|
lsls r2, r4, 24
|
|
lsrs r2, 24
|
|
bl sub_80BFAA8
|
|
lsls r4, 16
|
|
lsrs r4, 16
|
|
cmp r4, 0x2
|
|
bls _080BFBDA
|
|
_080BFBFC:
|
|
pop {r3}
|
|
mov r8, r3
|
|
pop {r4-r6}
|
|
pop {r0}
|
|
bx r0
|
|
.align 2, 0
|
|
_080BFC08: .4byte gSpecialVar_0x8004
|
|
_080BFC0C: .4byte gPlayerParty
|
|
_080BFC10: .4byte gSpecialVar_0x8005
|
|
thumb_func_end sub_80BFBA8
|
|
|
|
thumb_func_start sub_80BFC14
|
|
sub_80BFC14: @ 80BFC14
|
|
push {lr}
|
|
ldr r0, _080BFC38 @ =gSpecialVar_0x8004
|
|
ldrh r1, [r0]
|
|
movs r0, 0x64
|
|
muls r0, r1
|
|
ldr r1, _080BFC3C @ =gPlayerParty
|
|
adds r0, r1
|
|
movs r1, 0x2D
|
|
bl GetMonData
|
|
adds r1, r0, 0
|
|
cmp r1, 0
|
|
beq _080BFC44
|
|
ldr r1, _080BFC40 @ =gSpecialVar_Result
|
|
movs r0, 0x1
|
|
strh r0, [r1]
|
|
b _080BFC48
|
|
.align 2, 0
|
|
_080BFC38: .4byte gSpecialVar_0x8004
|
|
_080BFC3C: .4byte gPlayerParty
|
|
_080BFC40: .4byte gSpecialVar_Result
|
|
_080BFC44:
|
|
ldr r0, _080BFC4C @ =gSpecialVar_Result
|
|
strh r1, [r0]
|
|
_080BFC48:
|
|
pop {r0}
|
|
bx r0
|
|
.align 2, 0
|
|
_080BFC4C: .4byte gSpecialVar_Result
|
|
thumb_func_end sub_80BFC14
|
|
|
|
.align 2, 0 @ Don't pad with nop.
|