pokefirered/asm/scrcmd.s
2018-11-02 14:16:03 -04:00

5613 lines
94 KiB
ArmAsm

.include "asm/macros.inc"
.include "constants/constants.inc"
.syntax unified
.text
thumb_func_start sub_8069ED0
sub_8069ED0: @ 8069ED0
movs r0, 0
bx lr
thumb_func_end sub_8069ED0
thumb_func_start sub_8069ED4
sub_8069ED4: @ 8069ED4
movs r0, 0
bx lr
thumb_func_end sub_8069ED4
thumb_func_start ScrCmd_end
ScrCmd_end: @ 8069ED8
push {lr}
bl StopScript
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_end
thumb_func_start ScrCmd_gotonative
ScrCmd_gotonative: @ 8069EE4
push {r4,lr}
adds r4, r0, 0
bl ScriptReadWord
adds r1, r0, 0
adds r0, r4, 0
bl SetupNativeScript
movs r0, 0x1
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_gotonative
thumb_func_start sub_8069EFC
sub_8069EFC: @ 8069EFC
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 14
ldr r1, _08069F18 @ =gUnknown_815FD60
adds r1, r0, r1
ldr r0, _08069F1C @ =gUnknown_8160450
cmp r1, r0
bcs _08069F20
ldr r0, [r1]
bl _call_via_r0
b _08069F2C
.align 2, 0
_08069F18: .4byte gUnknown_815FD60
_08069F1C: .4byte gUnknown_8160450
_08069F20:
ldr r0, _08069F34 @ =gUnknown_83A725C "C:/WORK/POKeFRLG/src/pm_lgfr_ose/source/scrcmd.c"
ldr r2, _08069F38 @ =gUnknown_83A7290 "0"
movs r1, 0xF1
movs r3, 0x1
bl AGBAssert
_08069F2C:
movs r0, 0
pop {r1}
bx r1
.align 2, 0
_08069F34: .4byte gUnknown_83A725C
_08069F38: .4byte gUnknown_83A7290
thumb_func_end sub_8069EFC
thumb_func_start sub_8069F3C
sub_8069F3C: @ 8069F3C
push {r4,r5,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl GetVarPointer
adds r5, r0, 0
adds r0, r4, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 14
ldr r1, _08069F6C @ =gUnknown_815FD60
adds r1, r0, r1
ldr r0, _08069F70 @ =gUnknown_8160450
cmp r1, r0
bcs _08069F74
ldr r0, [r1]
bl _call_via_r0
strh r0, [r5]
b _08069F80
.align 2, 0
_08069F6C: .4byte gUnknown_815FD60
_08069F70: .4byte gUnknown_8160450
_08069F74:
ldr r0, _08069F88 @ =gUnknown_83A725C "C:/WORK/POKeFRLG/src/pm_lgfr_ose/source/scrcmd.c"
ldr r1, _08069F8C @ =0x00000107
ldr r2, _08069F90 @ =gUnknown_83A7290 "0"
movs r3, 0x1
bl AGBAssert
_08069F80:
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_08069F88: .4byte gUnknown_83A725C
_08069F8C: .4byte 0x00000107
_08069F90: .4byte gUnknown_83A7290
thumb_func_end sub_8069F3C
thumb_func_start ScrCmd_callnative
ScrCmd_callnative: @ 8069F94
push {lr}
bl ScriptReadWord
bl _call_via_r0
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_callnative
thumb_func_start sub_8069FA4
sub_8069FA4: @ 8069FA4
push {lr}
bl ScriptContext1_Stop
movs r0, 0x1
pop {r1}
bx r1
thumb_func_end sub_8069FA4
thumb_func_start ScrCmd_goto
ScrCmd_goto: @ 8069FB0
push {r4,lr}
adds r4, r0, 0
bl ScriptReadWord
adds r1, r0, 0
adds r0, r4, 0
bl ScriptJump
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_goto
thumb_func_start ScrCmd_return
ScrCmd_return: @ 8069FC8
push {lr}
bl ScriptReturn
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_return
thumb_func_start ScrCmd_call
ScrCmd_call: @ 8069FD4
push {r4,lr}
adds r4, r0, 0
bl ScriptReadWord
adds r1, r0, 0
adds r0, r4, 0
bl ScriptCall
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_call
thumb_func_start ScrCmd_goto_if
ScrCmd_goto_if: @ 8069FEC
push {r4,r5,lr}
adds r5, r0, 0
ldr r0, [r5, 0x8]
ldrb r4, [r0]
adds r0, 0x1
str r0, [r5, 0x8]
adds r0, r5, 0
bl ScriptReadWord
adds r2, r0, 0
ldr r1, _0806A024 @ =gUnknown_83A7248
lsls r0, r4, 1
adds r0, r4
ldrb r3, [r5, 0x2]
adds r0, r3
adds r0, r1
ldrb r0, [r0]
cmp r0, 0x1
bne _0806A01A
adds r0, r5, 0
adds r1, r2, 0
bl ScriptJump
_0806A01A:
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806A024: .4byte gUnknown_83A7248
thumb_func_end ScrCmd_goto_if
thumb_func_start ScrCmd_call_if
ScrCmd_call_if: @ 806A028
push {r4,r5,lr}
adds r5, r0, 0
ldr r0, [r5, 0x8]
ldrb r4, [r0]
adds r0, 0x1
str r0, [r5, 0x8]
adds r0, r5, 0
bl ScriptReadWord
adds r2, r0, 0
ldr r1, _0806A060 @ =gUnknown_83A7248
lsls r0, r4, 1
adds r0, r4
ldrb r3, [r5, 0x2]
adds r0, r3
adds r0, r1
ldrb r0, [r0]
cmp r0, 0x1
bne _0806A056
adds r0, r5, 0
adds r1, r2, 0
bl ScriptCall
_0806A056:
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806A060: .4byte gUnknown_83A7248
thumb_func_end ScrCmd_call_if
thumb_func_start ScrCmd_setvaddress
ScrCmd_setvaddress: @ 806A064
push {r4,lr}
ldr r4, [r0, 0x8]
subs r4, 0x1
bl ScriptReadWord
ldr r1, _0806A07C @ =gUnknown_20370A8
subs r0, r4
str r0, [r1]
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806A07C: .4byte gUnknown_20370A8
thumb_func_end ScrCmd_setvaddress
thumb_func_start ScrCmd_vgoto
ScrCmd_vgoto: @ 806A080
push {r4,lr}
adds r4, r0, 0
bl ScriptReadWord
adds r1, r0, 0
ldr r0, _0806A0A0 @ =gUnknown_20370A8
ldr r0, [r0]
subs r1, r0
adds r0, r4, 0
bl ScriptJump
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806A0A0: .4byte gUnknown_20370A8
thumb_func_end ScrCmd_vgoto
thumb_func_start ScrCmd_vcall
ScrCmd_vcall: @ 806A0A4
push {r4,lr}
adds r4, r0, 0
bl ScriptReadWord
adds r1, r0, 0
ldr r0, _0806A0C4 @ =gUnknown_20370A8
ldr r0, [r0]
subs r1, r0
adds r0, r4, 0
bl ScriptCall
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806A0C4: .4byte gUnknown_20370A8
thumb_func_end ScrCmd_vcall
thumb_func_start ScrCmd_vgoto_if
ScrCmd_vgoto_if: @ 806A0C8
push {r4,r5,lr}
adds r5, r0, 0
ldr r0, [r5, 0x8]
ldrb r4, [r0]
adds r0, 0x1
str r0, [r5, 0x8]
adds r0, r5, 0
bl ScriptReadWord
ldr r1, _0806A104 @ =gUnknown_20370A8
ldr r1, [r1]
subs r2, r0, r1
ldr r1, _0806A108 @ =gUnknown_83A7248
lsls r0, r4, 1
adds r0, r4
ldrb r3, [r5, 0x2]
adds r0, r3
adds r0, r1
ldrb r0, [r0]
cmp r0, 0x1
bne _0806A0FA
adds r0, r5, 0
adds r1, r2, 0
bl ScriptJump
_0806A0FA:
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806A104: .4byte gUnknown_20370A8
_0806A108: .4byte gUnknown_83A7248
thumb_func_end ScrCmd_vgoto_if
thumb_func_start ScrCmd_vcall_if
ScrCmd_vcall_if: @ 806A10C
push {r4,r5,lr}
adds r5, r0, 0
ldr r0, [r5, 0x8]
ldrb r4, [r0]
adds r0, 0x1
str r0, [r5, 0x8]
adds r0, r5, 0
bl ScriptReadWord
ldr r1, _0806A148 @ =gUnknown_20370A8
ldr r1, [r1]
subs r2, r0, r1
ldr r1, _0806A14C @ =gUnknown_83A7248
lsls r0, r4, 1
adds r0, r4
ldrb r3, [r5, 0x2]
adds r0, r3
adds r0, r1
ldrb r0, [r0]
cmp r0, 0x1
bne _0806A13E
adds r0, r5, 0
adds r1, r2, 0
bl ScriptCall
_0806A13E:
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806A148: .4byte gUnknown_20370A8
_0806A14C: .4byte gUnknown_83A7248
thumb_func_end ScrCmd_vcall_if
thumb_func_start ScrCmd_gotostd
ScrCmd_gotostd: @ 806A150
push {lr}
adds r2, r0, 0
ldr r0, [r2, 0x8]
ldrb r1, [r0]
adds r0, 0x1
str r0, [r2, 0x8]
lsls r1, 2
ldr r0, _0806A178 @ =gUnknown_8160450
adds r1, r0
ldr r0, _0806A17C @ =gUnknown_8160478
cmp r1, r0
bcs _0806A170
ldr r1, [r1]
adds r0, r2, 0
bl ScriptJump
_0806A170:
movs r0, 0
pop {r1}
bx r1
.align 2, 0
_0806A178: .4byte gUnknown_8160450
_0806A17C: .4byte gUnknown_8160478
thumb_func_end ScrCmd_gotostd
thumb_func_start ScrCmd_callstd
ScrCmd_callstd: @ 806A180
push {lr}
adds r2, r0, 0
ldr r0, [r2, 0x8]
ldrb r1, [r0]
adds r0, 0x1
str r0, [r2, 0x8]
lsls r1, 2
ldr r0, _0806A1A8 @ =gUnknown_8160450
adds r1, r0
ldr r0, _0806A1AC @ =gUnknown_8160478
cmp r1, r0
bcs _0806A1A0
ldr r1, [r1]
adds r0, r2, 0
bl ScriptCall
_0806A1A0:
movs r0, 0
pop {r1}
bx r1
.align 2, 0
_0806A1A8: .4byte gUnknown_8160450
_0806A1AC: .4byte gUnknown_8160478
thumb_func_end ScrCmd_callstd
thumb_func_start ScrCmd_gotostd_if
ScrCmd_gotostd_if: @ 806A1B0
push {r4,lr}
adds r3, r0, 0
ldr r0, [r3, 0x8]
ldrb r2, [r0]
adds r0, 0x1
str r0, [r3, 0x8]
ldrb r4, [r0]
adds r0, 0x1
str r0, [r3, 0x8]
ldr r1, _0806A1F0 @ =gUnknown_83A7248
lsls r0, r2, 1
adds r0, r2
ldrb r2, [r3, 0x2]
adds r0, r2
adds r0, r1
ldrb r0, [r0]
cmp r0, 0x1
bne _0806A1E8
lsls r0, r4, 2
ldr r1, _0806A1F4 @ =gUnknown_8160450
adds r1, r0, r1
ldr r0, _0806A1F8 @ =gUnknown_8160478
cmp r1, r0
bcs _0806A1E8
ldr r1, [r1]
adds r0, r3, 0
bl ScriptJump
_0806A1E8:
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806A1F0: .4byte gUnknown_83A7248
_0806A1F4: .4byte gUnknown_8160450
_0806A1F8: .4byte gUnknown_8160478
thumb_func_end ScrCmd_gotostd_if
thumb_func_start ScrCmd_callstd_if
ScrCmd_callstd_if: @ 806A1FC
push {r4,lr}
adds r3, r0, 0
ldr r0, [r3, 0x8]
ldrb r2, [r0]
adds r0, 0x1
str r0, [r3, 0x8]
ldrb r4, [r0]
adds r0, 0x1
str r0, [r3, 0x8]
ldr r1, _0806A23C @ =gUnknown_83A7248
lsls r0, r2, 1
adds r0, r2
ldrb r2, [r3, 0x2]
adds r0, r2
adds r0, r1
ldrb r0, [r0]
cmp r0, 0x1
bne _0806A234
lsls r0, r4, 2
ldr r1, _0806A240 @ =gUnknown_8160450
adds r1, r0, r1
ldr r0, _0806A244 @ =gUnknown_8160478
cmp r1, r0
bcs _0806A234
ldr r1, [r1]
adds r0, r3, 0
bl ScriptCall
_0806A234:
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806A23C: .4byte gUnknown_83A7248
_0806A240: .4byte gUnknown_8160450
_0806A244: .4byte gUnknown_8160478
thumb_func_end ScrCmd_callstd_if
thumb_func_start ScrCmd_gotoram
ScrCmd_gotoram: @ 806A248
push {lr}
ldr r1, _0806A258 @ =gUnknown_20370A4
ldr r1, [r1]
bl ScriptJump
movs r0, 0
pop {r1}
bx r1
.align 2, 0
_0806A258: .4byte gUnknown_20370A4
thumb_func_end ScrCmd_gotoram
thumb_func_start ScrCmd_killscript
ScrCmd_killscript: @ 806A25C
push {r4,lr}
adds r4, r0, 0
bl ClearRamScript
adds r0, r4, 0
bl StopScript
movs r0, 0x1
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_killscript
thumb_func_start ScrCmd_setmysteryeventstatus
ScrCmd_setmysteryeventstatus: @ 806A274
push {lr}
ldr r1, [r0, 0x8]
ldrb r2, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
adds r0, r2, 0
bl sub_80DA8E8
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_setmysteryeventstatus
thumb_func_start sub_806A28C
sub_806A28C: @ 806A28C
push {r4,lr}
adds r4, r0, 0
bl sub_8069E48
adds r2, r0, 0
cmp r2, 0
beq _0806A2A8
ldr r1, _0806A2B0 @ =gUnknown_20370A4
ldr r0, [r4, 0x8]
str r0, [r1]
adds r0, r4, 0
adds r1, r2, 0
bl ScriptJump
_0806A2A8:
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806A2B0: .4byte gUnknown_20370A4
thumb_func_end sub_806A28C
thumb_func_start ScrCmd_loadword
ScrCmd_loadword: @ 806A2B4
push {r4,r5,lr}
adds r4, r0, 0
ldr r0, [r4, 0x8]
ldrb r5, [r0]
adds r0, 0x1
str r0, [r4, 0x8]
adds r0, r4, 0
bl ScriptReadWord
lsls r5, 2
adds r4, 0x64
adds r4, r5
str r0, [r4]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_loadword
thumb_func_start ScrCmd_loadbytefromaddr
ScrCmd_loadbytefromaddr: @ 806A2D8
push {r4,r5,lr}
adds r4, r0, 0
ldr r0, [r4, 0x8]
ldrb r5, [r0]
adds r0, 0x1
str r0, [r4, 0x8]
adds r0, r4, 0
bl ScriptReadWord
lsls r5, 2
adds r4, 0x64
adds r4, r5
ldrb r0, [r0]
str r0, [r4]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_loadbytefromaddr
thumb_func_start ScrCmd_writebytetoaddr
ScrCmd_writebytetoaddr: @ 806A2FC
push {r4,lr}
ldr r1, [r0, 0x8]
ldrb r4, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
bl ScriptReadWord
strb r4, [r0]
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_writebytetoaddr
thumb_func_start ScrCmd_loadbyte
ScrCmd_loadbyte: @ 806A314
ldr r1, [r0, 0x8]
ldrb r3, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
lsls r3, 2
adds r2, r0, 0
adds r2, 0x64
adds r2, r3
ldrb r3, [r1]
str r3, [r2]
adds r1, 0x1
str r1, [r0, 0x8]
movs r0, 0
bx lr
thumb_func_end ScrCmd_loadbyte
thumb_func_start ScrCmd_setptrbyte
ScrCmd_setptrbyte: @ 806A330
push {r4,r5,lr}
adds r4, r0, 0
ldr r0, [r4, 0x8]
ldrb r5, [r0]
adds r0, 0x1
str r0, [r4, 0x8]
adds r0, r4, 0
bl ScriptReadWord
lsls r5, 2
adds r4, 0x64
adds r4, r5
ldr r1, [r4]
strb r1, [r0]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_setptrbyte
thumb_func_start ScrCmd_copylocal
ScrCmd_copylocal: @ 806A354
ldr r1, [r0, 0x8]
ldrb r3, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
ldrb r2, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
lsls r3, 2
adds r0, 0x64
adds r3, r0, r3
lsls r2, 2
adds r0, r2
ldr r0, [r0]
str r0, [r3]
movs r0, 0
bx lr
thumb_func_end ScrCmd_copylocal
thumb_func_start ScrCmd_copybyte
ScrCmd_copybyte: @ 806A374
push {r4,r5,lr}
adds r4, r0, 0
bl ScriptReadWord
adds r5, r0, 0
adds r0, r4, 0
bl ScriptReadWord
ldrb r0, [r0]
strb r0, [r5]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_copybyte
thumb_func_start ScrCmd_setvar
ScrCmd_setvar: @ 806A390
push {r4,r5,lr}
adds r5, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl GetVarPointer
adds r4, r0, 0
adds r0, r5, 0
bl ScriptReadHalfword
strh r0, [r4]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_setvar
thumb_func_start ScrCmd_copyvar
ScrCmd_copyvar: @ 806A3B4
push {r4,r5,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl GetVarPointer
adds r5, r0, 0
adds r0, r4, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl GetVarPointer
ldrh r0, [r0]
strh r0, [r5]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_copyvar
thumb_func_start ScrCmd_setorcopyvar
ScrCmd_setorcopyvar: @ 806A3E0
push {r4,r5,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl GetVarPointer
adds r5, r0, 0
adds r0, r4, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
strh r0, [r5]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_setorcopyvar
thumb_func_start compare_012
compare_012: @ 806A40C
push {lr}
lsls r0, 16
lsrs r0, 16
lsls r1, 16
lsrs r1, 16
cmp r0, r1
bcs _0806A41E
movs r0, 0
b _0806A428
_0806A41E:
cmp r0, r1
beq _0806A426
movs r0, 0x2
b _0806A428
_0806A426:
movs r0, 0x1
_0806A428:
pop {r1}
bx r1
thumb_func_end compare_012
thumb_func_start ScrCmd_compare_local_to_local
ScrCmd_compare_local_to_local: @ 806A42C
push {r4,lr}
adds r4, r0, 0
ldr r2, [r4, 0x8]
ldrb r0, [r2]
lsls r0, 2
adds r3, r4, 0
adds r3, 0x64
adds r0, r3, r0
ldrb r0, [r0]
adds r2, 0x1
str r2, [r4, 0x8]
ldrb r1, [r2]
lsls r1, 2
adds r3, r1
ldrb r1, [r3]
adds r2, 0x1
str r2, [r4, 0x8]
bl compare_012
strb r0, [r4, 0x2]
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_compare_local_to_local
thumb_func_start ScrCmd_compare_local_to_value
ScrCmd_compare_local_to_value: @ 806A45C
push {r4,lr}
adds r4, r0, 0
ldr r2, [r4, 0x8]
ldrb r1, [r2]
lsls r1, 2
adds r0, 0x64
adds r0, r1
ldrb r0, [r0]
adds r2, 0x1
str r2, [r4, 0x8]
ldrb r1, [r2]
adds r2, 0x1
str r2, [r4, 0x8]
bl compare_012
strb r0, [r4, 0x2]
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_compare_local_to_value
thumb_func_start ScrCmd_compare_local_to_addr
ScrCmd_compare_local_to_addr: @ 806A484
push {r4,r5,lr}
adds r4, r0, 0
ldr r2, [r4, 0x8]
ldrb r1, [r2]
lsls r1, 2
adds r0, 0x64
adds r0, r1
ldrb r5, [r0]
adds r2, 0x1
str r2, [r4, 0x8]
adds r0, r4, 0
bl ScriptReadWord
ldrb r1, [r0]
adds r0, r5, 0
bl compare_012
strb r0, [r4, 0x2]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_compare_local_to_addr
thumb_func_start ScrCmd_compare_addr_to_local
ScrCmd_compare_addr_to_local: @ 806A4B0
push {r4,lr}
adds r4, r0, 0
bl ScriptReadWord
ldrb r0, [r0]
ldr r3, [r4, 0x8]
ldrb r2, [r3]
lsls r2, 2
adds r1, r4, 0
adds r1, 0x64
adds r1, r2
ldrb r1, [r1]
adds r3, 0x1
str r3, [r4, 0x8]
bl compare_012
strb r0, [r4, 0x2]
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_compare_addr_to_local
thumb_func_start ScrCmd_compare_addr_to_value
ScrCmd_compare_addr_to_value: @ 806A4DC
push {r4,lr}
adds r4, r0, 0
bl ScriptReadWord
ldrb r0, [r0]
ldr r2, [r4, 0x8]
ldrb r1, [r2]
adds r2, 0x1
str r2, [r4, 0x8]
bl compare_012
strb r0, [r4, 0x2]
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_compare_addr_to_value
thumb_func_start ScrCmd_compare_addr_to_addr
ScrCmd_compare_addr_to_addr: @ 806A4FC
push {r4,r5,lr}
adds r4, r0, 0
bl ScriptReadWord
ldrb r5, [r0]
adds r0, r4, 0
bl ScriptReadWord
ldrb r1, [r0]
adds r0, r5, 0
bl compare_012
strb r0, [r4, 0x2]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_compare_addr_to_addr
thumb_func_start ScrCmd_compare_var_to_value
ScrCmd_compare_var_to_value: @ 806A520
push {r4,r5,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl GetVarPointer
ldrh r5, [r0]
adds r0, r4, 0
bl ScriptReadHalfword
adds r1, r0, 0
lsls r1, 16
lsrs r1, 16
adds r0, r5, 0
bl compare_012
strb r0, [r4, 0x2]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_compare_var_to_value
thumb_func_start ScrCmd_compare_var_to_var
ScrCmd_compare_var_to_var: @ 806A550
push {r4,r5,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl GetVarPointer
adds r5, r0, 0
adds r0, r4, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl GetVarPointer
ldrh r2, [r5]
ldrh r1, [r0]
adds r0, r2, 0
bl compare_012
strb r0, [r4, 0x2]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_compare_var_to_var
thumb_func_start ScrCmd_addvar
ScrCmd_addvar: @ 806A584
push {r4,r5,lr}
adds r5, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl GetVarPointer
adds r4, r0, 0
adds r0, r5, 0
bl ScriptReadHalfword
ldrh r1, [r4]
adds r0, r1
strh r0, [r4]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_addvar
thumb_func_start ScrCmd_subvar
ScrCmd_subvar: @ 806A5AC
push {r4,r5,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl GetVarPointer
adds r5, r0, 0
adds r0, r4, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
ldrh r1, [r5]
subs r1, r0
strh r1, [r5]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_subvar
thumb_func_start ScrCmd_random
ScrCmd_random: @ 806A5DC
push {r4,r5,lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
ldr r5, _0806A60C @ =gUnknown_20370D0
bl Random
lsls r0, 16
lsrs r0, 16
adds r1, r4, 0
bl __umodsi3
strh r0, [r5]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806A60C: .4byte gUnknown_20370D0
thumb_func_end ScrCmd_random
thumb_func_start sub_806A610
sub_806A610: @ 806A610
push {r4,r5,lr}
adds r5, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r1, r0, 0
ldr r5, _0806A658 @ =gUnknown_20370D0
lsls r1, 24
lsrs r1, 24
adds r0, r4, 0
bl sub_809A084
lsls r0, 24
lsrs r0, 24
strh r0, [r5]
adds r0, r4, 0
bl sub_809A824
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806A658: .4byte gUnknown_20370D0
thumb_func_end sub_806A610
thumb_func_start ScrCmd_takeitem
ScrCmd_takeitem: @ 806A65C
push {r4,r5,lr}
adds r5, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r1, r0, 0
ldr r5, _0806A69C @ =gUnknown_20370D0
lsls r1, 24
lsrs r1, 24
adds r0, r4, 0
bl sub_809A1D8
lsls r0, 24
lsrs r0, 24
strh r0, [r5]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806A69C: .4byte gUnknown_20370D0
thumb_func_end ScrCmd_takeitem
thumb_func_start sub_806A6A0
sub_806A6A0: @ 806A6A0
push {r4,r5,lr}
adds r5, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r1, r0, 0
ldr r5, _0806A6E0 @ =gUnknown_20370D0
lsls r1, 24
lsrs r1, 24
adds r0, r4, 0
bl sub_809A000
lsls r0, 24
lsrs r0, 24
strh r0, [r5]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806A6E0: .4byte gUnknown_20370D0
thumb_func_end sub_806A6A0
thumb_func_start sub_806A6E4
sub_806A6E4: @ 806A6E4
push {r4,r5,lr}
adds r5, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r1, r0, 0
ldr r5, _0806A724 @ =gUnknown_20370D0
lsls r1, 24
lsrs r1, 24
adds r0, r4, 0
bl sub_8099F40
lsls r0, 24
lsrs r0, 24
strh r0, [r5]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806A724: .4byte gUnknown_20370D0
thumb_func_end sub_806A6E4
thumb_func_start ScrCmd_checkitemtype
ScrCmd_checkitemtype: @ 806A728
push {r4,lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
ldr r4, _0806A750 @ =gUnknown_20370D0
bl GetPocketByItemId
lsls r0, 24
lsrs r0, 24
strh r0, [r4]
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806A750: .4byte gUnknown_20370D0
thumb_func_end ScrCmd_checkitemtype
thumb_func_start ScrCmd_givepcitem
ScrCmd_givepcitem: @ 806A754
push {r4,r5,lr}
adds r5, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r1, r0, 0
lsls r1, 16
lsrs r1, 16
ldr r5, _0806A794 @ =gUnknown_20370D0
adds r0, r4, 0
bl sub_809A3C8
lsls r0, 24
lsrs r0, 24
strh r0, [r5]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806A794: .4byte gUnknown_20370D0
thumb_func_end ScrCmd_givepcitem
thumb_func_start ScrCmd_checkpcitem
ScrCmd_checkpcitem: @ 806A798
push {r4,r5,lr}
adds r5, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r1, r0, 0
lsls r1, 16
lsrs r1, 16
ldr r5, _0806A7D8 @ =gUnknown_20370D0
adds r0, r4, 0
bl sub_809A374
lsls r0, 24
lsrs r0, 24
strh r0, [r5]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806A7D8: .4byte gUnknown_20370D0
thumb_func_end ScrCmd_checkpcitem
thumb_func_start sub_806A7DC
sub_806A7DC: @ 806A7DC
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
movs r0, 0
pop {r1}
bx r1
thumb_func_end sub_806A7DC
thumb_func_start sub_806A7F0
sub_806A7F0: @ 806A7F0
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
movs r0, 0
pop {r1}
bx r1
thumb_func_end sub_806A7F0
thumb_func_start sub_806A804
sub_806A804: @ 806A804
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
movs r0, 0
pop {r1}
bx r1
thumb_func_end sub_806A804
thumb_func_start sub_806A818
sub_806A818: @ 806A818
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
movs r0, 0
pop {r1}
bx r1
thumb_func_end sub_806A818
thumb_func_start ScrCmd_setflag
ScrCmd_setflag: @ 806A82C
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl FlagSet
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_setflag
thumb_func_start ScrCmd_clearflag
ScrCmd_clearflag: @ 806A840
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl FlagClear
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_clearflag
thumb_func_start ScrCmd_checkflag
ScrCmd_checkflag: @ 806A854
push {r4,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl FlagGet
strb r0, [r4, 0x2]
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_checkflag
thumb_func_start ScrCmd_incrementgamestat
ScrCmd_incrementgamestat: @ 806A870
push {lr}
ldr r1, [r0, 0x8]
ldrb r2, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
adds r0, r2, 0
bl IncrementGameStat
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_incrementgamestat
thumb_func_start sub_806A888
sub_806A888: @ 806A888
push {r4-r6,lr}
adds r5, r0, 0
ldr r0, [r5, 0x8]
ldrb r4, [r0]
adds r0, 0x1
str r0, [r5, 0x8]
adds r0, r5, 0
bl ScriptReadWord
adds r6, r0, 0
adds r0, r4, 0
bl GetGameStat
cmp r0, r6
bcs _0806A8AA
movs r0, 0
b _0806A8B4
_0806A8AA:
cmp r0, r6
bne _0806A8B2
movs r0, 0x1
b _0806A8B4
_0806A8B2:
movs r0, 0x2
_0806A8B4:
strb r0, [r5, 0x2]
movs r0, 0
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end sub_806A888
thumb_func_start sub_806A8C0
sub_806A8C0: @ 806A8C0
push {r4,lr}
bl ScriptReadHalfword
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r4, 0
bl sub_8115748
adds r0, r4, 0
bl sub_80F85BC
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end sub_806A8C0
thumb_func_start ScrCmd_animateflash
ScrCmd_animateflash: @ 806A8E0
push {lr}
ldr r1, [r0, 0x8]
ldrb r2, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
adds r0, r2, 0
bl sub_807F028
bl ScriptContext1_Stop
movs r0, 0x1
pop {r1}
bx r1
thumb_func_end ScrCmd_animateflash
thumb_func_start ScrCmd_setflashradius
ScrCmd_setflashradius: @ 806A8FC
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
bl Overworld_SetFlashLevel
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_setflashradius
thumb_func_start sub_806A918
sub_806A918: @ 806A918
push {lr}
ldr r0, _0806A92C @ =gPaletteFade
ldrb r1, [r0, 0x7]
movs r0, 0x80
ands r0, r1
cmp r0, 0
beq _0806A930
movs r0, 0
b _0806A932
.align 2, 0
_0806A92C: .4byte gPaletteFade
_0806A930:
movs r0, 0x1
_0806A932:
pop {r1}
bx r1
thumb_func_end sub_806A918
thumb_func_start ScrCmd_fadescreen
ScrCmd_fadescreen: @ 806A938
push {r4,lr}
adds r4, r0, 0
ldr r1, [r4, 0x8]
ldrb r0, [r1]
adds r1, 0x1
str r1, [r4, 0x8]
movs r1, 0
bl fade_screen
ldr r1, _0806A95C @ =sub_806A918
adds r0, r4, 0
bl SetupNativeScript
movs r0, 0x1
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806A95C: .4byte sub_806A918
thumb_func_end ScrCmd_fadescreen
thumb_func_start ScrCmd_fadescreenspeed
ScrCmd_fadescreenspeed: @ 806A960
push {r4,lr}
adds r4, r0, 0
ldr r2, [r4, 0x8]
ldrb r0, [r2]
adds r2, 0x1
str r2, [r4, 0x8]
ldrb r1, [r2]
adds r2, 0x1
str r2, [r4, 0x8]
lsls r1, 24
asrs r1, 24
bl fade_screen
ldr r1, _0806A98C @ =sub_806A918
adds r0, r4, 0
bl SetupNativeScript
movs r0, 0x1
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806A98C: .4byte sub_806A918
thumb_func_end ScrCmd_fadescreenspeed
thumb_func_start RunPauseTimer
RunPauseTimer: @ 806A990
push {lr}
ldr r1, _0806A9A4 @ =gUnknown_20370AE
ldrh r0, [r1]
subs r0, 0x1
strh r0, [r1]
lsls r0, 16
cmp r0, 0
beq _0806A9A8
movs r0, 0
b _0806A9AA
.align 2, 0
_0806A9A4: .4byte gUnknown_20370AE
_0806A9A8:
movs r0, 0x1
_0806A9AA:
pop {r1}
bx r1
thumb_func_end RunPauseTimer
thumb_func_start ScrCmd_delay
ScrCmd_delay: @ 806A9B0
push {r4,lr}
adds r4, r0, 0
bl ScriptReadHalfword
ldr r1, _0806A9CC @ =gUnknown_20370AE
strh r0, [r1]
ldr r1, _0806A9D0 @ =RunPauseTimer
adds r0, r4, 0
bl SetupNativeScript
movs r0, 0x1
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806A9CC: .4byte gUnknown_20370AE
_0806A9D0: .4byte RunPauseTimer
thumb_func_end ScrCmd_delay
thumb_func_start sub_806A9D4
sub_806A9D4: @ 806A9D4
movs r0, 0
bx lr
thumb_func_end sub_806A9D4
thumb_func_start sub_806A9D8
sub_806A9D8: @ 806A9D8
movs r0, 0
bx lr
thumb_func_end sub_806A9D8
thumb_func_start sub_806A9DC
sub_806A9DC: @ 806A9DC
ldr r0, _0806A9F0 @ =gUnknown_20370B8
movs r1, 0
strh r1, [r0]
ldr r0, _0806A9F4 @ =gUnknown_20370BA
strh r1, [r0]
ldr r0, _0806A9F8 @ =gUnknown_20370BC
strh r1, [r0]
movs r0, 0
bx lr
.align 2, 0
_0806A9F0: .4byte gUnknown_20370B8
_0806A9F4: .4byte gUnknown_20370BA
_0806A9F8: .4byte gUnknown_20370BC
thumb_func_end sub_806A9DC
thumb_func_start ScrCmd_setweather
ScrCmd_setweather: @ 806A9FC
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
bl SetSav1Weather
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_setweather
thumb_func_start ScrCmd_resetweather
ScrCmd_resetweather: @ 806AA18
push {lr}
bl sub_807B140
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_resetweather
thumb_func_start ScrCmd_doweather
ScrCmd_doweather: @ 806AA24
push {lr}
bl DoCurrentWeather
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_doweather
thumb_func_start ScrCmd_setstepcallback
ScrCmd_setstepcallback: @ 806AA30
push {lr}
ldr r1, [r0, 0x8]
ldrb r2, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
adds r0, r2, 0
bl ActivatePerStepCallback
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_setstepcallback
thumb_func_start ScrCmd_setmaplayoutindex
ScrCmd_setmaplayoutindex: @ 806AA48
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
bl sub_8055D40
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_setmaplayoutindex
thumb_func_start ScrCmd_warp
ScrCmd_warp: @ 806AA64
push {r4-r6,lr}
mov r6, r9
mov r5, r8
push {r5,r6}
sub sp, 0x4
adds r5, r0, 0
ldr r0, [r5, 0x8]
ldrb r1, [r0]
mov r9, r1
adds r0, 0x1
str r0, [r5, 0x8]
ldrb r1, [r0]
mov r8, r1
adds r1, r0, 0x1
str r1, [r5, 0x8]
ldrb r6, [r0, 0x1]
adds r1, 0x1
str r1, [r5, 0x8]
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
mov r1, r9
lsls r1, 24
asrs r1, 24
mov r9, r1
mov r1, r8
lsls r1, 24
asrs r1, 24
mov r8, r1
lsls r6, 24
asrs r6, 24
lsls r4, 24
asrs r4, 24
lsls r0, 24
asrs r0, 24
str r0, [sp]
mov r0, r9
adds r2, r6, 0
adds r3, r4, 0
bl Overworld_SetWarpDestination
bl sub_807E438
bl sub_80559E4
movs r0, 0x1
add sp, 0x4
pop {r3,r4}
mov r8, r3
mov r9, r4
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end ScrCmd_warp
thumb_func_start ScrCmd_warpsilent
ScrCmd_warpsilent: @ 806AAEC
push {r4-r6,lr}
mov r6, r9
mov r5, r8
push {r5,r6}
sub sp, 0x4
adds r5, r0, 0
ldr r0, [r5, 0x8]
ldrb r1, [r0]
mov r9, r1
adds r0, 0x1
str r0, [r5, 0x8]
ldrb r1, [r0]
mov r8, r1
adds r1, r0, 0x1
str r1, [r5, 0x8]
ldrb r6, [r0, 0x1]
adds r1, 0x1
str r1, [r5, 0x8]
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
mov r1, r9
lsls r1, 24
asrs r1, 24
mov r9, r1
mov r1, r8
lsls r1, 24
asrs r1, 24
mov r8, r1
lsls r6, 24
asrs r6, 24
lsls r4, 24
asrs r4, 24
lsls r0, 24
asrs r0, 24
str r0, [sp]
mov r0, r9
adds r2, r6, 0
adds r3, r4, 0
bl Overworld_SetWarpDestination
bl sp13E_warp_to_last_warp
bl sub_80559E4
movs r0, 0x1
add sp, 0x4
pop {r3,r4}
mov r8, r3
mov r9, r4
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end ScrCmd_warpsilent
thumb_func_start ScrCmd_warpdoor
ScrCmd_warpdoor: @ 806AB74
push {r4-r6,lr}
mov r6, r9
mov r5, r8
push {r5,r6}
sub sp, 0x4
adds r5, r0, 0
ldr r0, [r5, 0x8]
ldrb r1, [r0]
mov r9, r1
adds r0, 0x1
str r0, [r5, 0x8]
ldrb r1, [r0]
mov r8, r1
adds r1, r0, 0x1
str r1, [r5, 0x8]
ldrb r6, [r0, 0x1]
adds r1, 0x1
str r1, [r5, 0x8]
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
mov r1, r9
lsls r1, 24
asrs r1, 24
mov r9, r1
mov r1, r8
lsls r1, 24
asrs r1, 24
mov r8, r1
lsls r6, 24
asrs r6, 24
lsls r4, 24
asrs r4, 24
lsls r0, 24
asrs r0, 24
str r0, [sp]
mov r0, r9
adds r2, r6, 0
adds r3, r4, 0
bl Overworld_SetWarpDestination
bl sub_807E4DC
bl sub_80559E4
movs r0, 0x1
add sp, 0x4
pop {r3,r4}
mov r8, r3
mov r9, r4
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end ScrCmd_warpdoor
thumb_func_start ScrCmd_warphole
ScrCmd_warphole: @ 806ABFC
push {r4-r6,lr}
sub sp, 0x8
ldr r1, [r0, 0x8]
ldrb r6, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
ldrb r5, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
mov r4, sp
adds r4, 0x6
add r0, sp, 0x4
adds r1, r4, 0
bl PlayerGetDestCoords
cmp r6, 0xFF
bne _0806AC3A
cmp r5, 0xFF
bne _0806AC3A
add r0, sp, 0x4
ldrh r0, [r0]
subs r0, 0x7
lsls r0, 16
asrs r0, 16
ldrh r1, [r4]
subs r1, 0x7
lsls r1, 16
asrs r1, 16
bl sub_8055688
b _0806AC5E
_0806AC3A:
lsls r0, r6, 24
asrs r0, 24
lsls r1, r5, 24
asrs r1, 24
movs r2, 0x1
negs r2, r2
add r3, sp, 0x4
ldrb r3, [r3]
subs r3, 0x7
lsls r3, 24
asrs r3, 24
ldrb r4, [r4]
subs r4, 0x7
lsls r4, 24
asrs r4, 24
str r4, [sp]
bl Overworld_SetWarpDestination
_0806AC5E:
bl sp13F_fall_to_last_warp
bl sub_80559E4
movs r0, 0x1
add sp, 0x8
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end ScrCmd_warphole
thumb_func_start sub_806AC70
sub_806AC70: @ 806AC70
push {r4-r6,lr}
mov r6, r9
mov r5, r8
push {r5,r6}
sub sp, 0x4
adds r5, r0, 0
ldr r0, [r5, 0x8]
ldrb r1, [r0]
mov r9, r1
adds r0, 0x1
str r0, [r5, 0x8]
ldrb r1, [r0]
mov r8, r1
adds r1, r0, 0x1
str r1, [r5, 0x8]
ldrb r6, [r0, 0x1]
adds r1, 0x1
str r1, [r5, 0x8]
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
mov r1, r9
lsls r1, 24
asrs r1, 24
mov r9, r1
mov r1, r8
lsls r1, 24
asrs r1, 24
mov r8, r1
lsls r6, 24
asrs r6, 24
lsls r4, 24
asrs r4, 24
lsls r0, 24
asrs r0, 24
str r0, [sp]
mov r0, r9
adds r2, r6, 0
adds r3, r4, 0
bl Overworld_SetWarpDestination
bl sub_807E59C
bl sub_80559E4
movs r0, 0x1
add sp, 0x4
pop {r3,r4}
mov r8, r3
mov r9, r4
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end sub_806AC70
thumb_func_start sub_806ACF8
sub_806ACF8: @ 806ACF8
push {r4-r6,lr}
mov r6, r9
mov r5, r8
push {r5,r6}
sub sp, 0x4
adds r5, r0, 0
ldr r0, [r5, 0x8]
ldrb r1, [r0]
mov r9, r1
adds r0, 0x1
str r0, [r5, 0x8]
ldrb r1, [r0]
mov r8, r1
adds r1, r0, 0x1
str r1, [r5, 0x8]
ldrb r6, [r0, 0x1]
adds r1, 0x1
str r1, [r5, 0x8]
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
mov r1, r9
lsls r1, 24
asrs r1, 24
mov r9, r1
mov r1, r8
lsls r1, 24
asrs r1, 24
mov r8, r1
lsls r6, 24
asrs r6, 24
lsls r4, 24
asrs r4, 24
lsls r0, 24
asrs r0, 24
str r0, [sp]
mov r0, r9
adds r2, r6, 0
adds r3, r4, 0
bl Overworld_SetWarpDestination
bl player_get_direction_lower_nybble
lsls r0, 24
lsrs r0, 24
bl sub_805DAE4
bl sub_807E500
bl sub_80559E4
movs r0, 0x1
add sp, 0x4
pop {r3,r4}
mov r8, r3
mov r9, r4
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end sub_806ACF8
thumb_func_start ScrCmd_setwarp
ScrCmd_setwarp: @ 806AD8C
push {r4-r6,lr}
mov r6, r9
mov r5, r8
push {r5,r6}
sub sp, 0x4
adds r5, r0, 0
ldr r0, [r5, 0x8]
ldrb r1, [r0]
mov r9, r1
adds r0, 0x1
str r0, [r5, 0x8]
ldrb r1, [r0]
mov r8, r1
adds r1, r0, 0x1
str r1, [r5, 0x8]
ldrb r6, [r0, 0x1]
adds r1, 0x1
str r1, [r5, 0x8]
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
mov r1, r9
lsls r1, 24
asrs r1, 24
mov r9, r1
mov r1, r8
lsls r1, 24
asrs r1, 24
mov r8, r1
lsls r6, 24
asrs r6, 24
lsls r4, 24
asrs r4, 24
lsls r0, 24
asrs r0, 24
str r0, [sp]
mov r0, r9
adds r2, r6, 0
adds r3, r4, 0
bl Overworld_SetWarpDestination
movs r0, 0
add sp, 0x4
pop {r3,r4}
mov r8, r3
mov r9, r4
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end ScrCmd_setwarp
thumb_func_start ScrCmd_setdynamicwarp
ScrCmd_setdynamicwarp: @ 806AE0C
push {r4-r6,lr}
mov r6, r9
mov r5, r8
push {r5,r6}
sub sp, 0x8
adds r5, r0, 0
ldr r0, [r5, 0x8]
ldrb r1, [r0]
mov r9, r1
adds r0, 0x1
str r0, [r5, 0x8]
ldrb r1, [r0]
mov r8, r1
adds r1, r0, 0x1
str r1, [r5, 0x8]
ldrb r6, [r0, 0x1]
adds r1, 0x1
str r1, [r5, 0x8]
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
mov r1, r9
lsls r1, 24
asrs r1, 24
mov r9, r1
mov r1, r8
lsls r1, 24
asrs r1, 24
mov r8, r1
lsls r6, 24
asrs r6, 24
lsls r4, 24
asrs r4, 24
str r4, [sp]
lsls r0, 24
asrs r0, 24
str r0, [sp, 0x4]
movs r0, 0
mov r1, r9
mov r2, r8
adds r3, r6, 0
bl saved_warp2_set_2
movs r0, 0
add sp, 0x8
pop {r3,r4}
mov r8, r3
mov r9, r4
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end ScrCmd_setdynamicwarp
thumb_func_start sub_806AE90
sub_806AE90: @ 806AE90
push {r4-r6,lr}
mov r6, r9
mov r5, r8
push {r5,r6}
sub sp, 0x4
adds r5, r0, 0
ldr r0, [r5, 0x8]
ldrb r1, [r0]
mov r9, r1
adds r0, 0x1
str r0, [r5, 0x8]
ldrb r1, [r0]
mov r8, r1
adds r1, r0, 0x1
str r1, [r5, 0x8]
ldrb r6, [r0, 0x1]
adds r1, 0x1
str r1, [r5, 0x8]
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
mov r1, r9
lsls r1, 24
asrs r1, 24
mov r9, r1
mov r1, r8
lsls r1, 24
asrs r1, 24
mov r8, r1
lsls r6, 24
asrs r6, 24
lsls r4, 24
asrs r4, 24
lsls r0, 24
asrs r0, 24
str r0, [sp]
mov r0, r9
adds r2, r6, 0
adds r3, r4, 0
bl sub_80555F8
movs r0, 0
add sp, 0x4
pop {r3,r4}
mov r8, r3
mov r9, r4
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end sub_806AE90
thumb_func_start sub_806AF10
sub_806AF10: @ 806AF10
push {r4-r6,lr}
mov r6, r9
mov r5, r8
push {r5,r6}
sub sp, 0x4
adds r5, r0, 0
ldr r0, [r5, 0x8]
ldrb r1, [r0]
mov r9, r1
adds r0, 0x1
str r0, [r5, 0x8]
ldrb r1, [r0]
mov r8, r1
adds r1, r0, 0x1
str r1, [r5, 0x8]
ldrb r6, [r0, 0x1]
adds r1, 0x1
str r1, [r5, 0x8]
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
mov r1, r9
lsls r1, 24
asrs r1, 24
mov r9, r1
mov r1, r8
lsls r1, 24
asrs r1, 24
mov r8, r1
lsls r6, 24
asrs r6, 24
lsls r4, 24
asrs r4, 24
lsls r0, 24
asrs r0, 24
str r0, [sp]
mov r0, r9
adds r2, r6, 0
adds r3, r4, 0
bl sub_805564C
movs r0, 0
add sp, 0x4
pop {r3,r4}
mov r8, r3
mov r9, r4
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end sub_806AF10
thumb_func_start ScrCmd_setescapewarp
ScrCmd_setescapewarp: @ 806AF90
push {r4-r6,lr}
mov r6, r9
mov r5, r8
push {r5,r6}
sub sp, 0x4
adds r5, r0, 0
ldr r0, [r5, 0x8]
ldrb r1, [r0]
mov r9, r1
adds r0, 0x1
str r0, [r5, 0x8]
ldrb r1, [r0]
mov r8, r1
adds r1, r0, 0x1
str r1, [r5, 0x8]
ldrb r6, [r0, 0x1]
adds r1, 0x1
str r1, [r5, 0x8]
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
mov r1, r9
lsls r1, 24
asrs r1, 24
mov r9, r1
mov r1, r8
lsls r1, 24
asrs r1, 24
mov r8, r1
lsls r6, 24
asrs r6, 24
lsls r4, 24
asrs r4, 24
lsls r0, 24
asrs r0, 24
str r0, [sp]
mov r0, r9
adds r2, r6, 0
adds r3, r4, 0
bl sub_80555A0
movs r0, 0
add sp, 0x4
pop {r3,r4}
mov r8, r3
mov r9, r4
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end ScrCmd_setescapewarp
thumb_func_start ScrCmd_getplayerxy
ScrCmd_getplayerxy: @ 806B010
push {r4,r5,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl GetVarPointer
adds r5, r0, 0
adds r0, r4, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl GetVarPointer
ldr r2, _0806B048 @ =gSaveBlock1Ptr
ldr r1, [r2]
ldrh r1, [r1]
strh r1, [r5]
ldr r1, [r2]
ldrh r1, [r1, 0x2]
strh r1, [r0]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806B048: .4byte gSaveBlock1Ptr
thumb_func_end ScrCmd_getplayerxy
thumb_func_start ScrCmd_getpartysize
ScrCmd_getpartysize: @ 806B04C
push {r4,lr}
ldr r4, _0806B064 @ =gUnknown_20370D0
bl CalculatePlayerPartyCount
lsls r0, 24
lsrs r0, 24
strh r0, [r4]
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806B064: .4byte gUnknown_20370D0
thumb_func_end ScrCmd_getpartysize
thumb_func_start ScrCmd_playse
ScrCmd_playse: @ 806B068
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl PlaySE
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_playse
thumb_func_start WaitForSoundEffectFinish
WaitForSoundEffectFinish: @ 806B07C
push {lr}
bl IsSEPlaying
lsls r0, 24
cmp r0, 0
beq _0806B08C
movs r0, 0
b _0806B08E
_0806B08C:
movs r0, 0x1
_0806B08E:
pop {r1}
bx r1
thumb_func_end WaitForSoundEffectFinish
thumb_func_start sub_806B094
sub_806B094: @ 806B094
push {lr}
ldr r1, _0806B0A4 @ =WaitForSoundEffectFinish
bl SetupNativeScript
movs r0, 0x1
pop {r1}
bx r1
.align 2, 0
_0806B0A4: .4byte WaitForSoundEffectFinish
thumb_func_end sub_806B094
thumb_func_start ScrCmd_playfanfare
ScrCmd_playfanfare: @ 806B0A8
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl PlayFanfare
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_playfanfare
thumb_func_start WaitForFanfareFinish
WaitForFanfareFinish: @ 806B0BC
push {lr}
bl IsFanfareTaskInactive
lsls r0, 24
lsrs r0, 24
pop {r1}
bx r1
thumb_func_end WaitForFanfareFinish
thumb_func_start sub_806B0CC
sub_806B0CC: @ 806B0CC
push {lr}
ldr r1, _0806B0DC @ =WaitForFanfareFinish
bl SetupNativeScript
movs r0, 0x1
pop {r1}
bx r1
.align 2, 0
_0806B0DC: .4byte WaitForFanfareFinish
thumb_func_end sub_806B0CC
thumb_func_start sub_806B0E0
sub_806B0E0: @ 806B0E0
push {r4,r5,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r1, r0, 16
adds r5, r1, 0
ldr r0, [r4, 0x8]
ldrb r2, [r0]
adds r0, 0x1
str r0, [r4, 0x8]
ldr r0, _0806B11C @ =gUnknown_203ADFA
ldrb r0, [r0]
subs r0, 0x2
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
bls _0806B114
cmp r2, 0x1
bne _0806B10E
adds r0, r1, 0
bl sub_8055E78
_0806B10E:
adds r0, r5, 0
bl PlayNewMapMusic
_0806B114:
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806B11C: .4byte gUnknown_203ADFA
thumb_func_end sub_806B0E0
thumb_func_start sub_806B120
sub_806B120: @ 806B120
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl sub_8055E78
movs r0, 0
pop {r1}
bx r1
thumb_func_end sub_806B120
thumb_func_start sub_806B134
sub_806B134: @ 806B134
push {lr}
ldr r0, _0806B150 @ =gUnknown_203ADFA
ldrb r0, [r0]
subs r0, 0x2
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
bls _0806B148
bl Overworld_ChangeMusicToDefault
_0806B148:
movs r0, 0
pop {r1}
bx r1
.align 2, 0
_0806B150: .4byte gUnknown_203ADFA
thumb_func_end sub_806B134
thumb_func_start sub_806B154
sub_806B154: @ 806B154
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r1, r0, 16
ldr r0, _0806B178 @ =gUnknown_203ADFA
ldrb r0, [r0]
subs r0, 0x2
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
bls _0806B172
adds r0, r1, 0
bl sub_8055F48
_0806B172:
movs r0, 0
pop {r1}
bx r1
.align 2, 0
_0806B178: .4byte gUnknown_203ADFA
thumb_func_end sub_806B154
thumb_func_start sub_806B17C
sub_806B17C: @ 806B17C
push {r4,lr}
adds r4, r0, 0
ldr r0, [r4, 0x8]
ldrb r1, [r0]
adds r0, 0x1
str r0, [r4, 0x8]
ldr r0, _0806B19C @ =gUnknown_203ADFA
ldrb r0, [r0]
subs r0, 0x2
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
bhi _0806B1A0
movs r0, 0
b _0806B1BE
.align 2, 0
_0806B19C: .4byte gUnknown_203ADFA
_0806B1A0:
cmp r1, 0
beq _0806B1AE
lsls r0, r1, 26
lsrs r0, 24
bl FadeOutBGMTemporarily
b _0806B1B4
_0806B1AE:
movs r0, 0x4
bl FadeOutBGMTemporarily
_0806B1B4:
ldr r1, _0806B1C4 @ =IsBGMPausedOrStopped
adds r0, r4, 0
bl SetupNativeScript
movs r0, 0x1
_0806B1BE:
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806B1C4: .4byte IsBGMPausedOrStopped
thumb_func_end sub_806B17C
thumb_func_start sub_806B1C8
sub_806B1C8: @ 806B1C8
push {lr}
ldr r1, [r0, 0x8]
ldrb r2, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
ldr r0, _0806B1F0 @ =gUnknown_203ADFA
ldrb r0, [r0]
subs r0, 0x2
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
bls _0806B1FA
cmp r2, 0
beq _0806B1F4
lsls r0, r2, 26
lsrs r0, 24
bl FadeInBGM
b _0806B1FA
.align 2, 0
_0806B1F0: .4byte gUnknown_203ADFA
_0806B1F4:
movs r0, 0x4
bl FadeInBGM
_0806B1FA:
movs r0, 0
pop {r1}
bx r1
thumb_func_end sub_806B1C8
thumb_func_start ScrCmd_applymovement
ScrCmd_applymovement: @ 806B200
push {r4,r5,lr}
adds r5, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadWord
adds r3, r0, 0
lsls r0, r4, 24
lsrs r0, 24
ldr r1, _0806B23C @ =gSaveBlock1Ptr
ldr r2, [r1]
ldrb r1, [r2, 0x5]
ldrb r2, [r2, 0x4]
bl ScriptMovement_StartObjectMovementScript
ldr r0, _0806B240 @ =gUnknown_20370B0
strh r4, [r0]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806B23C: .4byte gSaveBlock1Ptr
_0806B240: .4byte gUnknown_20370B0
thumb_func_end ScrCmd_applymovement
thumb_func_start ScrCmd_applymovement_at
ScrCmd_applymovement_at: @ 806B244
push {r4,r5,lr}
adds r5, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadWord
adds r3, r0, 0
ldr r0, [r5, 0x8]
ldrb r2, [r0]
adds r0, 0x1
str r0, [r5, 0x8]
ldrb r1, [r0]
adds r0, 0x1
str r0, [r5, 0x8]
lsls r0, r4, 24
lsrs r0, 24
bl ScriptMovement_StartObjectMovementScript
ldr r0, _0806B284 @ =gUnknown_20370B0
strh r4, [r0]
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806B284: .4byte gUnknown_20370B0
thumb_func_end ScrCmd_applymovement_at
thumb_func_start WaitForMovementFinish
WaitForMovementFinish: @ 806B288
push {lr}
ldr r0, _0806B2A4 @ =gUnknown_20370B0
ldrb r0, [r0]
ldr r1, _0806B2A8 @ =gUnknown_20370B4
ldrb r1, [r1]
ldr r2, _0806B2AC @ =gUnknown_20370B2
ldrb r2, [r2]
bl ScriptMovement_IsObjectMovementFinished
lsls r0, 24
lsrs r0, 24
pop {r1}
bx r1
.align 2, 0
_0806B2A4: .4byte gUnknown_20370B0
_0806B2A8: .4byte gUnknown_20370B4
_0806B2AC: .4byte gUnknown_20370B2
thumb_func_end WaitForMovementFinish
thumb_func_start ScrCmd_waitmovement
ScrCmd_waitmovement: @ 806B2B0
push {r4,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r1, r0, 16
cmp r1, 0
beq _0806B2CC
ldr r0, _0806B2F0 @ =gUnknown_20370B0
strh r1, [r0]
_0806B2CC:
ldr r1, _0806B2F4 @ =gUnknown_20370B2
ldr r0, _0806B2F8 @ =gSaveBlock1Ptr
ldr r2, [r0]
movs r0, 0x4
ldrsb r0, [r2, r0]
strh r0, [r1]
ldr r1, _0806B2FC @ =gUnknown_20370B4
movs r0, 0x5
ldrsb r0, [r2, r0]
strh r0, [r1]
ldr r1, _0806B300 @ =WaitForMovementFinish
adds r0, r4, 0
bl SetupNativeScript
movs r0, 0x1
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806B2F0: .4byte gUnknown_20370B0
_0806B2F4: .4byte gUnknown_20370B2
_0806B2F8: .4byte gSaveBlock1Ptr
_0806B2FC: .4byte gUnknown_20370B4
_0806B300: .4byte WaitForMovementFinish
thumb_func_end ScrCmd_waitmovement
thumb_func_start ScrCmd_waitmovement_at
ScrCmd_waitmovement_at: @ 806B304
push {r4,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r1, r0, 16
cmp r1, 0
beq _0806B320
ldr r0, _0806B348 @ =gUnknown_20370B0
strh r1, [r0]
_0806B320:
ldr r0, [r4, 0x8]
ldrb r2, [r0]
adds r0, 0x1
str r0, [r4, 0x8]
ldrb r1, [r0]
adds r0, 0x1
str r0, [r4, 0x8]
ldr r0, _0806B34C @ =gUnknown_20370B2
strh r2, [r0]
ldr r0, _0806B350 @ =gUnknown_20370B4
strh r1, [r0]
ldr r1, _0806B354 @ =WaitForMovementFinish
adds r0, r4, 0
bl SetupNativeScript
movs r0, 0x1
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806B348: .4byte gUnknown_20370B0
_0806B34C: .4byte gUnknown_20370B2
_0806B350: .4byte gUnknown_20370B4
_0806B354: .4byte WaitForMovementFinish
thumb_func_end ScrCmd_waitmovement_at
thumb_func_start ScrCmd_removeobject
ScrCmd_removeobject: @ 806B358
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 24
lsrs r0, 24
ldr r1, _0806B37C @ =gSaveBlock1Ptr
ldr r2, [r1]
ldrb r1, [r2, 0x5]
ldrb r2, [r2, 0x4]
bl RemoveFieldObjectByLocalIdAndMap
movs r0, 0
pop {r1}
bx r1
.align 2, 0
_0806B37C: .4byte gSaveBlock1Ptr
thumb_func_end ScrCmd_removeobject
thumb_func_start ScrCmd_removeobject_at
ScrCmd_removeobject_at: @ 806B380
push {r4,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
ldr r3, [r4, 0x8]
ldrb r2, [r3]
adds r3, 0x1
str r3, [r4, 0x8]
ldrb r1, [r3]
adds r3, 0x1
str r3, [r4, 0x8]
lsls r0, 24
lsrs r0, 24
bl RemoveFieldObjectByLocalIdAndMap
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_removeobject_at
thumb_func_start ScrCmd_addobject
ScrCmd_addobject: @ 806B3B0
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 24
lsrs r0, 24
ldr r1, _0806B3D4 @ =gSaveBlock1Ptr
ldr r2, [r1]
ldrb r1, [r2, 0x5]
ldrb r2, [r2, 0x4]
bl show_sprite
movs r0, 0
pop {r1}
bx r1
.align 2, 0
_0806B3D4: .4byte gSaveBlock1Ptr
thumb_func_end ScrCmd_addobject
thumb_func_start ScrCmd_addobject_at
ScrCmd_addobject_at: @ 806B3D8
push {r4,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
ldr r3, [r4, 0x8]
ldrb r2, [r3]
adds r3, 0x1
str r3, [r4, 0x8]
ldrb r1, [r3]
adds r3, 0x1
str r3, [r4, 0x8]
lsls r0, 24
lsrs r0, 24
bl show_sprite
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_addobject_at
thumb_func_start ScrCmd_setobjectxy
ScrCmd_setobjectxy: @ 806B408
push {r4-r6,lr}
sub sp, 0x4
adds r6, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r5, r0, 0
lsls r5, 16
lsrs r5, 16
adds r0, r6, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r6, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r5, 24
lsrs r5, 24
ldr r1, _0806B46C @ =gSaveBlock1Ptr
ldr r2, [r1]
ldrb r1, [r2, 0x5]
ldrb r2, [r2, 0x4]
lsls r4, 16
asrs r4, 16
lsls r0, 16
asrs r0, 16
str r0, [sp]
adds r0, r5, 0
adds r3, r4, 0
bl sub_805F7C4
movs r0, 0
add sp, 0x4
pop {r4-r6}
pop {r1}
bx r1
.align 2, 0
_0806B46C: .4byte gSaveBlock1Ptr
thumb_func_end ScrCmd_setobjectxy
thumb_func_start ScrCmd_setobjectxyperm
ScrCmd_setobjectxyperm: @ 806B470
push {r4-r6,lr}
adds r6, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r5, r0, 0
lsls r5, 16
lsrs r5, 16
adds r0, r6, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r6, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r2, r0, 0
lsls r5, 24
lsrs r5, 24
lsls r4, 16
asrs r4, 16
lsls r2, 16
asrs r2, 16
adds r0, r5, 0
adds r1, r4, 0
bl Overworld_SetMapObjTemplateCoords
movs r0, 0
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end ScrCmd_setobjectxyperm
thumb_func_start ScrCmd_moveobjectoffscreen
ScrCmd_moveobjectoffscreen: @ 806B4C8
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 24
lsrs r0, 24
ldr r1, _0806B4EC @ =gSaveBlock1Ptr
ldr r2, [r1]
ldrb r1, [r2, 0x5]
ldrb r2, [r2, 0x4]
bl sub_805FE94
movs r0, 0
pop {r1}
bx r1
.align 2, 0
_0806B4EC: .4byte gSaveBlock1Ptr
thumb_func_end ScrCmd_moveobjectoffscreen
thumb_func_start ScrCmd_showobject_at
ScrCmd_showobject_at: @ 806B4F0
push {r4,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
ldr r3, [r4, 0x8]
ldrb r2, [r3]
adds r3, 0x1
str r3, [r4, 0x8]
ldrb r1, [r3]
adds r3, 0x1
str r3, [r4, 0x8]
lsls r0, 24
lsrs r0, 24
movs r3, 0
bl npc_by_local_id_and_map_set_field_1_bit_x20
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_showobject_at
thumb_func_start ScrCmd_hideobject_at
ScrCmd_hideobject_at: @ 806B520
push {r4,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
ldr r3, [r4, 0x8]
ldrb r2, [r3]
adds r3, 0x1
str r3, [r4, 0x8]
ldrb r1, [r3]
adds r3, 0x1
str r3, [r4, 0x8]
lsls r0, 24
lsrs r0, 24
movs r3, 0x1
bl npc_by_local_id_and_map_set_field_1_bit_x20
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_hideobject_at
thumb_func_start ScrCmd_setobjectpriority
ScrCmd_setobjectpriority: @ 806B550
push {r4,r5,lr}
adds r5, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
ldr r3, [r5, 0x8]
ldrb r2, [r3]
adds r3, 0x1
str r3, [r5, 0x8]
ldrb r1, [r3]
adds r4, r3, 0x1
str r4, [r5, 0x8]
ldrb r3, [r3, 0x1]
adds r4, 0x1
str r4, [r5, 0x8]
lsls r0, 24
lsrs r0, 24
adds r3, 0x53
lsls r3, 24
lsrs r3, 24
bl sub_805F3A8
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_setobjectpriority
thumb_func_start ScrCmd_resetobjectpriority
ScrCmd_resetobjectpriority: @ 806B58C
push {r4,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
ldr r3, [r4, 0x8]
ldrb r2, [r3]
adds r3, 0x1
str r3, [r4, 0x8]
ldrb r1, [r3]
adds r3, 0x1
str r3, [r4, 0x8]
lsls r0, 24
lsrs r0, 24
bl sub_805F400
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_resetobjectpriority
thumb_func_start ScrCmd_faceplayer
ScrCmd_faceplayer: @ 806B5BC
push {r4,lr}
ldr r2, _0806B5EC @ =gMapObjects
ldr r0, _0806B5F0 @ =gUnknown_3005074
ldrb r1, [r0]
lsls r0, r1, 3
adds r0, r1
lsls r0, 2
adds r4, r0, r2
ldrb r0, [r4]
lsls r0, 31
cmp r0, 0
beq _0806B5E4
bl player_get_direction_lower_nybble
adds r1, r0, 0
lsls r1, 24
lsrs r1, 24
adds r0, r4, 0
bl FieldObjectFaceOppositeDirection
_0806B5E4:
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806B5EC: .4byte gMapObjects
_0806B5F0: .4byte gUnknown_3005074
thumb_func_end ScrCmd_faceplayer
thumb_func_start ScrCmd_turnobject
ScrCmd_turnobject: @ 806B5F4
push {r4,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
ldr r1, [r4, 0x8]
ldrb r3, [r1]
adds r1, 0x1
str r1, [r4, 0x8]
lsls r0, 24
lsrs r0, 24
ldr r1, _0806B624 @ =gSaveBlock1Ptr
ldr r2, [r1]
ldrb r1, [r2, 0x5]
ldrb r2, [r2, 0x4]
bl FieldObjectTurnByLocalIdAndMap
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806B624: .4byte gSaveBlock1Ptr
thumb_func_end ScrCmd_turnobject
thumb_func_start ScrCmd_setobjectmovementtype
ScrCmd_setobjectmovementtype: @ 806B628
push {r4,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
ldr r2, [r4, 0x8]
ldrb r1, [r2]
adds r2, 0x1
str r2, [r4, 0x8]
lsls r0, 24
lsrs r0, 24
bl Overworld_SetMapObjTemplateMovementType
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_setobjectmovementtype
thumb_func_start ScrCmd_createvobject
ScrCmd_createvobject: @ 806B650
push {r4-r6,lr}
mov r6, r8
push {r6}
sub sp, 0x8
adds r5, r0, 0
ldr r0, [r5, 0x8]
ldrb r1, [r0]
mov r8, r1
adds r0, 0x1
str r0, [r5, 0x8]
ldrb r6, [r0]
adds r0, 0x1
str r0, [r5, 0x8]
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r3, r0, 0
ldr r0, [r5, 0x8]
ldrb r2, [r0]
adds r0, 0x1
str r0, [r5, 0x8]
ldrb r1, [r0]
adds r0, 0x1
str r0, [r5, 0x8]
lsls r4, 16
asrs r4, 16
lsls r3, 16
asrs r3, 16
str r2, [sp]
str r1, [sp, 0x4]
mov r0, r8
adds r1, r6, 0
adds r2, r4, 0
bl sub_805E9F8
movs r0, 0
add sp, 0x8
pop {r3}
mov r8, r3
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end ScrCmd_createvobject
thumb_func_start ScrCmd_turnvobject
ScrCmd_turnvobject: @ 806B6C0
push {lr}
ldr r2, [r0, 0x8]
ldrb r3, [r2]
adds r2, 0x1
str r2, [r0, 0x8]
ldrb r1, [r2]
adds r2, 0x1
str r2, [r0, 0x8]
adds r0, r3, 0
bl sub_8069058
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_turnvobject
thumb_func_start ScrCmd_lockall
ScrCmd_lockall: @ 806B6DC
push {r4,lr}
adds r4, r0, 0
bl sub_805642C
cmp r0, 0
bne _0806B6FC
bl ScriptFreezeMapObjects
ldr r1, _0806B6F8 @ =sub_8069590
adds r0, r4, 0
bl SetupNativeScript
movs r0, 0x1
b _0806B6FE
.align 2, 0
_0806B6F8: .4byte sub_8069590
_0806B6FC:
movs r0, 0
_0806B6FE:
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_lockall
thumb_func_start ScrCmd_lock
ScrCmd_lock: @ 806B704
push {r4,lr}
adds r4, r0, 0
bl sub_805642C
cmp r0, 0
beq _0806B714
movs r0, 0
b _0806B752
_0806B714:
ldr r2, _0806B738 @ =gMapObjects
ldr r0, _0806B73C @ =gUnknown_3005074
ldrb r1, [r0]
lsls r0, r1, 3
adds r0, r1
lsls r0, 2
adds r0, r2
ldrb r0, [r0]
lsls r0, 31
cmp r0, 0
beq _0806B744
bl LockSelectedMapObject
ldr r1, _0806B740 @ =sub_8069648
adds r0, r4, 0
bl SetupNativeScript
b _0806B750
.align 2, 0
_0806B738: .4byte gMapObjects
_0806B73C: .4byte gUnknown_3005074
_0806B740: .4byte sub_8069648
_0806B744:
bl ScriptFreezeMapObjects
ldr r1, _0806B758 @ =sub_8069590
adds r0, r4, 0
bl SetupNativeScript
_0806B750:
movs r0, 0x1
_0806B752:
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806B758: .4byte sub_8069590
thumb_func_end ScrCmd_lock
thumb_func_start ScrCmd_releaseall
ScrCmd_releaseall: @ 806B75C
push {lr}
bl HideFieldMessageBox
movs r0, 0xFF
movs r1, 0
movs r2, 0
bl GetFieldObjectIdByLocalIdAndMap
adds r1, r0, 0
lsls r1, 24
lsrs r1, 24
lsls r0, r1, 3
adds r0, r1
lsls r0, 2
ldr r1, _0806B790 @ =gMapObjects
adds r0, r1
bl FieldObjectClearAnimIfSpecialAnimFinished
bl sub_80974D8
bl UnfreezeMapObjects
movs r0, 0
pop {r1}
bx r1
.align 2, 0
_0806B790: .4byte gMapObjects
thumb_func_end ScrCmd_releaseall
thumb_func_start ScrCmd_release
ScrCmd_release: @ 806B794
push {r4,lr}
bl HideFieldMessageBox
ldr r4, _0806B7E4 @ =gMapObjects
ldr r0, _0806B7E8 @ =gUnknown_3005074
ldrb r1, [r0]
lsls r0, r1, 3
adds r0, r1
lsls r0, 2
adds r1, r0, r4
ldrb r0, [r1]
lsls r0, 31
cmp r0, 0
beq _0806B7B6
adds r0, r1, 0
bl FieldObjectClearAnimIfSpecialAnimFinished
_0806B7B6:
movs r0, 0xFF
movs r1, 0
movs r2, 0
bl GetFieldObjectIdByLocalIdAndMap
adds r1, r0, 0
lsls r1, 24
lsrs r1, 24
lsls r0, r1, 3
adds r0, r1
lsls r0, 2
adds r0, r4
bl FieldObjectClearAnimIfSpecialAnimFinished
bl sub_80974D8
bl UnfreezeMapObjects
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806B7E4: .4byte gMapObjects
_0806B7E8: .4byte gUnknown_3005074
thumb_func_end ScrCmd_release
thumb_func_start sub_806B7EC
sub_806B7EC: @ 806B7EC
ldr r2, _0806B804 @ =gUnknown_20370DC
ldr r3, _0806B808 @ =gUnknown_20370DA
ldrh r1, [r3]
strh r1, [r2]
ldr r1, [r0, 0x8]
ldrb r2, [r1]
strh r2, [r3]
adds r1, 0x1
str r1, [r0, 0x8]
movs r0, 0
bx lr
.align 2, 0
_0806B804: .4byte gUnknown_20370DC
_0806B808: .4byte gUnknown_20370DA
thumb_func_end sub_806B7EC
thumb_func_start sub_806B80C
sub_806B80C: @ 806B80C
push {r4,lr}
adds r4, r0, 0
bl ScriptReadWord
cmp r0, 0
bne _0806B81A
ldr r0, [r4, 0x64]
_0806B81A:
bl ShowFieldMessage
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end sub_806B80C
thumb_func_start sub_806B828
sub_806B828: @ 806B828
push {r4,lr}
adds r4, r0, 0
bl ScriptReadWord
cmp r0, 0
bne _0806B836
ldr r0, [r4, 0x64]
_0806B836:
bl sub_80F7974
bl GetStartMenuWindowId
lsls r0, 24
lsrs r0, 24
movs r1, 0x1
bl CopyWindowToVram
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end sub_806B828
thumb_func_start sub_806B850
sub_806B850: @ 806B850
push {lr}
bl sub_80F7998
movs r0, 0
pop {r1}
bx r1
thumb_func_end sub_806B850
thumb_func_start sub_806B85C
sub_806B85C: @ 806B85C
push {r4,lr}
adds r4, r0, 0
bl ScriptReadWord
cmp r0, 0
bne _0806B86A
ldr r0, [r4, 0x64]
_0806B86A:
bl ShowFieldAutoScrollMessage
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end sub_806B85C
thumb_func_start sub_806B878
sub_806B878: @ 806B878
push {lr}
ldr r1, _0806B888 @ =IsFieldMessageBoxHidden
bl SetupNativeScript
movs r0, 0x1
pop {r1}
bx r1
.align 2, 0
_0806B888: .4byte IsFieldMessageBoxHidden
thumb_func_end sub_806B878
thumb_func_start sub_806B88C
sub_806B88C: @ 806B88C
push {lr}
bl HideFieldMessageBox
movs r0, 0
pop {r1}
bx r1
thumb_func_end sub_806B88C
thumb_func_start sub_806B898
sub_806B898: @ 806B898
push {r4,lr}
ldr r0, _0806B8F0 @ =gMain
ldrh r1, [r0, 0x2E]
movs r0, 0x1
ands r0, r1
cmp r0, 0
bne _0806B922
movs r0, 0x2
ands r0, r1
cmp r0, 0
bne _0806B922
ldr r4, _0806B8F4 @ =gUnknown_3005070
ldr r0, [r4]
bl sub_806B93C
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
bne _0806B906
ldr r0, [r4]
bl sub_806B96C
lsls r0, 24
lsrs r4, r0, 24
adds r0, r4, 0
bl sub_8069998
cmp r4, 0
beq _0806B906
ldr r0, _0806B8F8 @ =gUnknown_203ADFA
ldrb r0, [r0]
cmp r0, 0x2
beq _0806B906
bl sub_80699F8
adds r0, r4, 0
subs r0, 0x9
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
bls _0806B8FC
bl sub_8069964
b _0806B922
.align 2, 0
_0806B8F0: .4byte gMain
_0806B8F4: .4byte gUnknown_3005070
_0806B8F8: .4byte gUnknown_203ADFA
_0806B8FC:
bl sub_80699A4
bl sub_8069970
b _0806B922
_0806B906:
bl sub_8112CAC
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
beq _0806B91A
ldr r0, _0806B928 @ =gUnknown_203ADFA
ldrb r0, [r0]
cmp r0, 0x2
bne _0806B934
_0806B91A:
ldr r1, _0806B92C @ =gUnknown_20370AC
ldrb r0, [r1]
cmp r0, 0x78
bne _0806B930
_0806B922:
movs r0, 0x1
b _0806B936
.align 2, 0
_0806B928: .4byte gUnknown_203ADFA
_0806B92C: .4byte gUnknown_20370AC
_0806B930:
adds r0, 0x1
strb r0, [r1]
_0806B934:
movs r0, 0
_0806B936:
pop {r4}
pop {r1}
bx r1
thumb_func_end sub_806B898
thumb_func_start sub_806B93C
sub_806B93C: @ 806B93C
push {lr}
adds r2, r0, 0
ldr r0, [r2, 0x8]
ldrb r0, [r0]
cmp r0, 0x3
bne _0806B958
ldrb r1, [r2]
subs r1, 0x1
lsls r1, 2
adds r0, r2, 0
adds r0, 0xC
adds r0, r1
ldr r0, [r0]
ldrb r0, [r0]
_0806B958:
subs r0, 0x6B
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
bhi _0806B966
movs r0, 0x1
b _0806B968
_0806B966:
movs r0, 0
_0806B968:
pop {r1}
bx r1
thumb_func_end sub_806B93C
thumb_func_start sub_806B96C
sub_806B96C: @ 806B96C
push {lr}
ldr r2, _0806B988 @ =gMain
ldrh r1, [r2, 0x2C]
movs r0, 0x40
ands r0, r1
cmp r0, 0
beq _0806B990
ldr r0, _0806B98C @ =gUnknown_20370D4
ldrh r0, [r0]
cmp r0, 0x2
beq _0806B990
movs r0, 0x1
b _0806BA36
.align 2, 0
_0806B988: .4byte gMain
_0806B98C: .4byte gUnknown_20370D4
_0806B990:
ldrh r1, [r2, 0x2C]
movs r0, 0x80
ands r0, r1
cmp r0, 0
beq _0806B9AC
ldr r0, _0806B9A8 @ =gUnknown_20370D4
ldrh r0, [r0]
cmp r0, 0x1
beq _0806B9AC
movs r0, 0x2
b _0806BA36
.align 2, 0
_0806B9A8: .4byte gUnknown_20370D4
_0806B9AC:
ldrh r1, [r2, 0x2C]
movs r0, 0x20
ands r0, r1
cmp r0, 0
beq _0806B9C8
ldr r0, _0806B9C4 @ =gUnknown_20370D4
ldrh r0, [r0]
cmp r0, 0x3
beq _0806B9C8
movs r0, 0x3
b _0806BA36
.align 2, 0
_0806B9C4: .4byte gUnknown_20370D4
_0806B9C8:
ldrh r1, [r2, 0x2C]
movs r0, 0x10
ands r0, r1
cmp r0, 0
beq _0806B9E4
ldr r0, _0806B9E0 @ =gUnknown_20370D4
ldrh r0, [r0]
cmp r0, 0x4
beq _0806B9E4
movs r0, 0x4
b _0806BA36
.align 2, 0
_0806B9E0: .4byte gUnknown_20370D4
_0806B9E4:
ldrh r1, [r2, 0x2E]
movs r0, 0x80
lsls r0, 2
ands r0, r1
cmp r0, 0
beq _0806B9F4
movs r0, 0x5
b _0806BA36
_0806B9F4:
ldrh r2, [r2, 0x2C]
movs r0, 0x80
lsls r0, 1
ands r0, r2
cmp r0, 0
beq _0806BA04
movs r0, 0x6
b _0806BA36
_0806BA04:
movs r0, 0x8
ands r0, r2
cmp r0, 0
beq _0806BA10
movs r0, 0x7
b _0806BA36
_0806BA10:
movs r0, 0x4
ands r0, r2
cmp r0, 0
beq _0806BA1C
movs r0, 0x8
b _0806BA36
_0806BA1C:
movs r0, 0x1
ands r0, r1
cmp r0, 0
beq _0806BA28
movs r0, 0x9
b _0806BA36
_0806BA28:
movs r0, 0x2
ands r0, r1
cmp r0, 0
bne _0806BA34
movs r0, 0
b _0806BA36
_0806BA34:
movs r0, 0xA
_0806BA36:
pop {r1}
bx r1
thumb_func_end sub_806B96C
thumb_func_start sub_806BA3C
sub_806BA3C: @ 806BA3C
push {r4,lr}
adds r4, r0, 0
ldr r0, _0806BA70 @ =gUnknown_3005070
str r4, [r0]
bl sub_8112CAC
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
beq _0806BA58
ldr r0, _0806BA74 @ =gUnknown_203ADFA
ldrb r0, [r0]
cmp r0, 0x2
bne _0806BA5E
_0806BA58:
ldr r1, _0806BA78 @ =gUnknown_20370AC
movs r0, 0
strb r0, [r1]
_0806BA5E:
ldr r1, _0806BA7C @ =sub_806B898
adds r0, r4, 0
bl SetupNativeScript
movs r0, 0x1
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806BA70: .4byte gUnknown_3005070
_0806BA74: .4byte gUnknown_203ADFA
_0806BA78: .4byte gUnknown_20370AC
_0806BA7C: .4byte sub_806B898
thumb_func_end sub_806BA3C
thumb_func_start ScrCmd_yesnobox
ScrCmd_yesnobox: @ 806BA80
push {lr}
ldr r2, [r0, 0x8]
ldrb r3, [r2]
adds r2, 0x1
str r2, [r0, 0x8]
ldrb r1, [r2]
adds r2, 0x1
str r2, [r0, 0x8]
adds r0, r3, 0
bl sub_809CDEC
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
beq _0806BAA2
movs r0, 0
b _0806BAA8
_0806BAA2:
bl ScriptContext1_Stop
movs r0, 0x1
_0806BAA8:
pop {r1}
bx r1
thumb_func_end ScrCmd_yesnobox
thumb_func_start ScrCmd_multichoice
ScrCmd_multichoice: @ 806BAAC
push {r4,r5,lr}
ldr r2, [r0, 0x8]
ldrb r5, [r2]
adds r2, 0x1
str r2, [r0, 0x8]
ldrb r1, [r2]
adds r3, r2, 0x1
str r3, [r0, 0x8]
ldrb r2, [r2, 0x1]
adds r4, r3, 0x1
str r4, [r0, 0x8]
ldrb r3, [r3, 0x1]
adds r4, 0x1
str r4, [r0, 0x8]
adds r0, r5, 0
bl ScriptMenu_Multichoice
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
beq _0806BADA
movs r0, 0
b _0806BAE0
_0806BADA:
bl ScriptContext1_Stop
movs r0, 0x1
_0806BAE0:
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_multichoice
thumb_func_start ScrCmd_multichoicedefault
ScrCmd_multichoicedefault: @ 806BAE8
push {r4-r6,lr}
mov r6, r8
push {r6}
sub sp, 0x4
ldr r2, [r0, 0x8]
ldrb r1, [r2]
mov r8, r1
adds r2, 0x1
str r2, [r0, 0x8]
ldrb r1, [r2]
adds r3, r2, 0x1
str r3, [r0, 0x8]
ldrb r2, [r2, 0x1]
adds r5, r3, 0x1
str r5, [r0, 0x8]
ldrb r6, [r3, 0x1]
adds r4, r5, 0x1
str r4, [r0, 0x8]
ldrb r3, [r5, 0x1]
adds r4, 0x1
str r4, [r0, 0x8]
str r6, [sp]
mov r0, r8
bl ScriptMenu_MultichoiceWithDefault
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
beq _0806BB26
movs r0, 0
b _0806BB2C
_0806BB26:
bl ScriptContext1_Stop
movs r0, 0x1
_0806BB2C:
add sp, 0x4
pop {r3}
mov r8, r3
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end ScrCmd_multichoicedefault
thumb_func_start sub_806BB38
sub_806BB38: @ 806BB38
movs r0, 0
bx lr
thumb_func_end sub_806BB38
thumb_func_start ScrCmd_multichoicegrid
ScrCmd_multichoicegrid: @ 806BB3C
push {r4-r6,lr}
mov r6, r8
push {r6}
sub sp, 0x4
ldr r2, [r0, 0x8]
ldrb r1, [r2]
mov r8, r1
adds r2, 0x1
str r2, [r0, 0x8]
ldrb r1, [r2]
adds r3, r2, 0x1
str r3, [r0, 0x8]
ldrb r2, [r2, 0x1]
adds r5, r3, 0x1
str r5, [r0, 0x8]
ldrb r6, [r3, 0x1]
adds r4, r5, 0x1
str r4, [r0, 0x8]
ldrb r3, [r5, 0x1]
adds r4, 0x1
str r4, [r0, 0x8]
str r6, [sp]
mov r0, r8
bl sub_809CEC8
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
beq _0806BB7A
movs r0, 0
b _0806BB80
_0806BB7A:
bl ScriptContext1_Stop
movs r0, 0x1
_0806BB80:
add sp, 0x4
pop {r3}
mov r8, r3
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end ScrCmd_multichoicegrid
thumb_func_start sub_806BB8C
sub_806BB8C: @ 806BB8C
ldr r1, [r0, 0x8]
adds r1, 0x4
str r1, [r0, 0x8]
movs r0, 0
bx lr
thumb_func_end sub_806BB8C
thumb_func_start sub_806BB98
sub_806BB98: @ 806BB98
movs r0, 0
bx lr
thumb_func_end sub_806BB98
thumb_func_start sub_806BB9C
sub_806BB9C: @ 806BB9C
push {r4,r5,lr}
adds r5, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
ldr r0, [r5, 0x8]
ldrb r1, [r0]
adds r0, 0x1
str r0, [r5, 0x8]
ldrb r2, [r0]
adds r0, 0x1
str r0, [r5, 0x8]
adds r0, r4, 0
bl sub_809D2F0
adds r0, r4, 0
movs r1, 0
bl PlayCry7
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end sub_806BB9C
thumb_func_start sub_806BBD8
sub_806BBD8: @ 806BBD8
push {r4,lr}
adds r4, r0, 0
bl sub_809D3CC
adds r1, r0, 0
cmp r1, 0
beq _0806BBF0
adds r0, r4, 0
bl SetupNativeScript
movs r0, 0x1
b _0806BBF2
_0806BBF0:
movs r0, 0
_0806BBF2:
pop {r4}
pop {r1}
bx r1
thumb_func_end sub_806BBD8
thumb_func_start sub_806BBF8
sub_806BBF8: @ 806BBF8
ldr r1, [r0, 0x8]
adds r1, 0x1
str r1, [r0, 0x8]
movs r0, 0
bx lr
thumb_func_end sub_806BBF8
thumb_func_start sub_806BC04
sub_806BC04: @ 806BC04
push {r4,r5,lr}
sub sp, 0xC
adds r5, r0, 0
bl ScriptReadWord
adds r4, r0, 0
cmp r4, 0
bne _0806BC16
ldr r4, [r5, 0x64]
_0806BC16:
bl sub_80F6E9C
movs r0, 0
movs r1, 0x1
bl sub_80F6EE4
movs r0, 0x1
str r0, [sp]
movs r0, 0
str r0, [sp, 0x4]
str r0, [sp, 0x8]
movs r1, 0x6
adds r2, r4, 0
movs r3, 0
bl AddTextPrinterParameterized
movs r0, 0
add sp, 0xC
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end sub_806BC04
thumb_func_start sub_806BC40
sub_806BC40: @ 806BC40
push {r4,lr}
adds r4, r0, 0
bl ScriptReadWord
adds r1, r0, 0
cmp r1, 0
bne _0806BC50
ldr r1, [r4, 0x64]
_0806BC50:
ldr r4, _0806BC68 @ =gUnknown_20370C0
movs r2, 0x1
negs r2, r2
movs r0, 0x6
bl GetStringWidth
strh r0, [r4]
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806BC68: .4byte gUnknown_20370C0
thumb_func_end sub_806BC40
thumb_func_start ScrCmd_vmessage
ScrCmd_vmessage: @ 806BC6C
push {lr}
bl ScriptReadWord
ldr r1, _0806BC84 @ =gUnknown_20370A8
ldr r1, [r1]
subs r0, r1
bl ShowFieldMessage
movs r0, 0
pop {r1}
bx r1
.align 2, 0
_0806BC84: .4byte gUnknown_20370A8
thumb_func_end ScrCmd_vmessage
thumb_func_start ScrCmd_bufferspeciesname
ScrCmd_bufferspeciesname: @ 806BC88
push {r4,lr}
ldr r1, [r0, 0x8]
ldrb r4, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
ldr r1, _0806BCC0 @ =gUnknown_83A7294
lsls r4, 2
adds r4, r1
ldr r2, [r4]
movs r1, 0xB
muls r1, r0
ldr r0, _0806BCC4 @ =gSpeciesNames
adds r1, r0
adds r0, r2, 0
bl StringCopy
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806BCC0: .4byte gUnknown_83A7294
_0806BCC4: .4byte gSpeciesNames
thumb_func_end ScrCmd_bufferspeciesname
thumb_func_start ScrCmd_bufferleadmonspeciesname
ScrCmd_bufferleadmonspeciesname: @ 806BCC8
push {r4,lr}
ldr r1, [r0, 0x8]
ldrb r2, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
ldr r0, _0806BD08 @ =gUnknown_83A7294
lsls r2, 2
adds r2, r0
ldr r4, [r2]
bl GetLeadMonIndex
lsls r0, 24
lsrs r0, 24
movs r1, 0x64
muls r0, r1
ldr r1, _0806BD0C @ =gPlayerParty
adds r0, r1
movs r1, 0xB
movs r2, 0
bl GetMonData
movs r1, 0xB
muls r1, r0
ldr r0, _0806BD10 @ =gSpeciesNames
adds r1, r0
adds r0, r4, 0
bl StringCopy
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806BD08: .4byte gUnknown_83A7294
_0806BD0C: .4byte gPlayerParty
_0806BD10: .4byte gSpeciesNames
thumb_func_end ScrCmd_bufferleadmonspeciesname
thumb_func_start ScrCmd_bufferpartymonnick
ScrCmd_bufferpartymonnick: @ 806BD14
push {r4,lr}
ldr r1, [r0, 0x8]
ldrb r4, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
movs r1, 0x64
muls r0, r1
ldr r1, _0806BD54 @ =gPlayerParty
adds r0, r1
ldr r1, _0806BD58 @ =gUnknown_83A7294
lsls r4, 2
adds r4, r1
ldr r4, [r4]
movs r1, 0x2
adds r2, r4, 0
bl GetMonData
adds r0, r4, 0
bl StringGetEnd10
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806BD54: .4byte gPlayerParty
_0806BD58: .4byte gUnknown_83A7294
thumb_func_end ScrCmd_bufferpartymonnick
thumb_func_start ScrCmd_bufferitemname
ScrCmd_bufferitemname: @ 806BD5C
push {r4,lr}
ldr r1, [r0, 0x8]
ldrb r4, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
ldr r1, _0806BD8C @ =gUnknown_83A7294
lsls r4, 2
adds r4, r1
ldr r1, [r4]
bl sub_8099E90
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806BD8C: .4byte gUnknown_83A7294
thumb_func_end ScrCmd_bufferitemname
thumb_func_start sub_806BD90
sub_806BD90: @ 806BD90
push {r4-r7,lr}
adds r4, r0, 0
ldr r0, [r4, 0x8]
ldrb r7, [r0]
adds r0, 0x1
str r0, [r4, 0x8]
adds r0, r4, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r5, r0, 16
adds r0, r4, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r6, r0, 16
ldr r1, _0806BDE4 @ =gUnknown_83A7294
lsls r0, r7, 2
adds r0, r1
ldr r4, [r0]
adds r0, r5, 0
adds r1, r4, 0
bl sub_8099E90
cmp r5, 0x4
bne _0806BDEC
cmp r6, 0x1
bls _0806BDEC
ldr r1, _0806BDE8 @ =gUnknown_83A72A0
adds r0, r4, 0
bl StringAppend
b _0806BE22
.align 2, 0
_0806BDE4: .4byte gUnknown_83A7294
_0806BDE8: .4byte gUnknown_83A72A0
_0806BDEC:
adds r0, r5, 0
subs r0, 0x85
lsls r0, 16
lsrs r0, 16
cmp r0, 0x29
bhi _0806BE22
cmp r6, 0x1
bls _0806BE22
ldr r0, _0806BE2C @ =gUnknown_83A7294
lsls r1, r7, 2
adds r1, r0
ldr r4, [r1]
adds r0, r4, 0
bl StringLength
lsls r0, 16
lsrs r0, 16
cmp r0, 0
beq _0806BE22
adds r0, r4, r0
subs r0, 0x1
movs r1, 0xFF
strb r1, [r0]
ldr r1, _0806BE30 @ =gUnknown_83A72A2
adds r0, r4, 0
bl StringAppend
_0806BE22:
movs r0, 0
pop {r4-r7}
pop {r1}
bx r1
.align 2, 0
_0806BE2C: .4byte gUnknown_83A7294
_0806BE30: .4byte gUnknown_83A72A2
thumb_func_end sub_806BD90
thumb_func_start sub_806BE34
sub_806BE34: @ 806BE34
push {lr}
ldr r1, [r0, 0x8]
adds r1, 0x1
str r1, [r0, 0x8]
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
movs r0, 0
pop {r1}
bx r1
thumb_func_end sub_806BE34
thumb_func_start ScrCmd_buffermovename
ScrCmd_buffermovename: @ 806BE50
push {r4,lr}
ldr r1, [r0, 0x8]
ldrb r4, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
ldr r1, _0806BE88 @ =gUnknown_83A7294
lsls r4, 2
adds r4, r1
ldr r2, [r4]
movs r1, 0xD
muls r1, r0
ldr r0, _0806BE8C @ =gUnknown_8247094
adds r1, r0
adds r0, r2, 0
bl StringCopy
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806BE88: .4byte gUnknown_83A7294
_0806BE8C: .4byte gUnknown_8247094
thumb_func_end ScrCmd_buffermovename
thumb_func_start ScrCmd_buffernumberstring
ScrCmd_buffernumberstring: @ 806BE90
push {r4,r5,lr}
ldr r1, [r0, 0x8]
ldrb r5, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r4, 0
bl sub_80CBF04
adds r3, r0, 0
lsls r3, 24
lsrs r3, 24
ldr r0, _0806BED0 @ =gUnknown_83A7294
lsls r5, 2
adds r5, r0
ldr r0, [r5]
adds r1, r4, 0
movs r2, 0
bl ConvertIntToDecimalStringN
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806BED0: .4byte gUnknown_83A7294
thumb_func_end ScrCmd_buffernumberstring
thumb_func_start ScrCmd_bufferstdstring
ScrCmd_bufferstdstring: @ 806BED4
push {r4,lr}
ldr r1, [r0, 0x8]
ldrb r4, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
ldr r1, _0806BF0C @ =gUnknown_83A7294
lsls r4, 2
adds r4, r1
ldr r2, [r4]
ldr r1, _0806BF10 @ =gUnknown_83E06B8
lsrs r0, 14
adds r0, r1
ldr r1, [r0]
adds r0, r2, 0
bl StringCopy
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806BF0C: .4byte gUnknown_83A7294
_0806BF10: .4byte gUnknown_83E06B8
thumb_func_end ScrCmd_bufferstdstring
thumb_func_start ScrCmd_bufferstring
ScrCmd_bufferstring: @ 806BF14
push {r4,lr}
ldr r1, [r0, 0x8]
ldrb r4, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
bl ScriptReadWord
adds r1, r0, 0
ldr r0, _0806BF38 @ =gUnknown_83A7294
lsls r4, 2
adds r4, r0
ldr r0, [r4]
bl StringCopy
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806BF38: .4byte gUnknown_83A7294
thumb_func_end ScrCmd_bufferstring
thumb_func_start ScrCmd_vloadword
ScrCmd_vloadword: @ 806BF3C
push {lr}
bl ScriptReadWord
adds r1, r0, 0
ldr r0, _0806BF58 @ =gUnknown_20370A8
ldr r0, [r0]
subs r1, r0
ldr r0, _0806BF5C @ =gStringVar4
bl StringExpandPlaceholders
movs r0, 0
pop {r1}
bx r1
.align 2, 0
_0806BF58: .4byte gUnknown_20370A8
_0806BF5C: .4byte gStringVar4
thumb_func_end ScrCmd_vloadword
thumb_func_start ScrCmd_vbufferstring
ScrCmd_vbufferstring: @ 806BF60
push {r4,lr}
ldr r1, [r0, 0x8]
ldrb r4, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
bl ScriptReadWord
adds r1, r0, 0
ldr r0, _0806BF8C @ =gUnknown_20370A8
ldr r0, [r0]
subs r1, r0
ldr r0, _0806BF90 @ =gUnknown_83A7294
lsls r4, 2
adds r4, r0
ldr r0, [r4]
bl StringCopy
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806BF8C: .4byte gUnknown_20370A8
_0806BF90: .4byte gUnknown_83A7294
thumb_func_end ScrCmd_vbufferstring
thumb_func_start ScrCmd_bufferboxname
ScrCmd_bufferboxname: @ 806BF94
push {r4,lr}
ldr r1, [r0, 0x8]
ldrb r4, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
ldr r1, _0806BFCC @ =gUnknown_83A7294
lsls r4, 2
adds r4, r1
ldr r4, [r4]
lsls r0, 24
lsrs r0, 24
bl GetBoxNamePtr
adds r1, r0, 0
adds r0, r4, 0
bl StringCopy
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806BFCC: .4byte gUnknown_83A7294
thumb_func_end ScrCmd_bufferboxname
thumb_func_start ScrCmd_givemon
ScrCmd_givemon: @ 806BFD0
push {r4-r6,lr}
mov r6, r9
mov r5, r8
push {r5,r6}
sub sp, 0x8
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r6, r0, 0
lsls r6, 16
lsrs r6, 16
ldr r0, [r4, 0x8]
ldrb r1, [r0]
mov r9, r1
adds r0, 0x1
str r0, [r4, 0x8]
adds r0, r4, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r5, r0, 0
lsls r5, 16
lsrs r5, 16
adds r0, r4, 0
bl ScriptReadWord
mov r8, r0
adds r0, r4, 0
bl ScriptReadWord
ldr r1, [r4, 0x8]
ldrb r2, [r1]
adds r1, 0x1
str r1, [r4, 0x8]
ldr r4, _0806C04C @ =gUnknown_20370D0
str r0, [sp]
str r2, [sp, 0x4]
adds r0, r6, 0
mov r1, r9
adds r2, r5, 0
mov r3, r8
bl ScriptGiveMon
lsls r0, 24
lsrs r0, 24
strh r0, [r4]
movs r0, 0
add sp, 0x8
pop {r3,r4}
mov r8, r3
mov r9, r4
pop {r4-r6}
pop {r1}
bx r1
.align 2, 0
_0806C04C: .4byte gUnknown_20370D0
thumb_func_end ScrCmd_givemon
thumb_func_start ScrCmd_giveegg
ScrCmd_giveegg: @ 806C050
push {r4,lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
ldr r4, _0806C078 @ =gUnknown_20370D0
bl sub_80A01AC
lsls r0, 24
lsrs r0, 24
strh r0, [r4]
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806C078: .4byte gUnknown_20370D0
thumb_func_end ScrCmd_giveegg
thumb_func_start ScrCmd_setmonmove
ScrCmd_setmonmove: @ 806C07C
push {r4,r5,lr}
ldr r1, [r0, 0x8]
ldrb r5, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
ldrb r4, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
bl ScriptReadHalfword
adds r1, r0, 0
lsls r1, 16
lsrs r1, 16
adds r0, r5, 0
adds r2, r4, 0
bl ScriptSetMonMoveSlot
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_setmonmove
thumb_func_start ScrCmd_checkpartymove
ScrCmd_checkpartymove: @ 806C0A8
push {r4-r7,lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r7, r0, 16
ldr r1, _0806C0BC @ =gUnknown_20370D0
movs r0, 0x6
strh r0, [r1]
movs r6, 0
b _0806C0F6
.align 2, 0
_0806C0BC: .4byte gUnknown_20370D0
_0806C0C0:
adds r0, r4, 0
movs r1, 0x2D
bl GetMonData
cmp r0, 0
bne _0806C0F0
adds r0, r4, 0
adds r1, r7, 0
bl pokemon_has_move
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
bne _0806C0F0
ldr r0, _0806C0E8 @ =gUnknown_20370D0
strh r6, [r0]
ldr r0, _0806C0EC @ =gUnknown_20370C0
strh r5, [r0]
b _0806C116
.align 2, 0
_0806C0E8: .4byte gUnknown_20370D0
_0806C0EC: .4byte gUnknown_20370C0
_0806C0F0:
adds r0, r6, 0x1
lsls r0, 24
lsrs r6, r0, 24
_0806C0F6:
cmp r6, 0x5
bhi _0806C116
movs r0, 0x64
adds r1, r6, 0
muls r1, r0
ldr r0, _0806C120 @ =gPlayerParty
adds r4, r1, r0
adds r0, r4, 0
movs r1, 0xB
movs r2, 0
bl GetMonData
lsls r0, 16
lsrs r5, r0, 16
cmp r5, 0
bne _0806C0C0
_0806C116:
movs r0, 0
pop {r4-r7}
pop {r1}
bx r1
.align 2, 0
_0806C120: .4byte gPlayerParty
thumb_func_end ScrCmd_checkpartymove
thumb_func_start ScrCmd_givemoney
ScrCmd_givemoney: @ 806C124
push {r4,lr}
adds r4, r0, 0
bl ScriptReadWord
adds r2, r0, 0
ldr r0, [r4, 0x8]
ldrb r1, [r0]
adds r0, 0x1
str r0, [r4, 0x8]
cmp r1, 0
bne _0806C14A
ldr r0, _0806C154 @ =gSaveBlock1Ptr
ldr r0, [r0]
movs r1, 0xA4
lsls r1, 2
adds r0, r1
adds r1, r2, 0
bl AddMoney
_0806C14A:
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806C154: .4byte gSaveBlock1Ptr
thumb_func_end ScrCmd_givemoney
thumb_func_start ScrCmd_takemoney
ScrCmd_takemoney: @ 806C158
push {r4,lr}
adds r4, r0, 0
bl ScriptReadWord
adds r2, r0, 0
ldr r0, [r4, 0x8]
ldrb r1, [r0]
adds r0, 0x1
str r0, [r4, 0x8]
cmp r1, 0
bne _0806C17E
ldr r0, _0806C188 @ =gSaveBlock1Ptr
ldr r0, [r0]
movs r1, 0xA4
lsls r1, 2
adds r0, r1
adds r1, r2, 0
bl RemoveMoney
_0806C17E:
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806C188: .4byte gSaveBlock1Ptr
thumb_func_end ScrCmd_takemoney
thumb_func_start ScrCmd_checkmoney
ScrCmd_checkmoney: @ 806C18C
push {r4,lr}
adds r4, r0, 0
bl ScriptReadWord
adds r2, r0, 0
ldr r0, [r4, 0x8]
ldrb r1, [r0]
adds r0, 0x1
str r0, [r4, 0x8]
cmp r1, 0
bne _0806C1BA
ldr r4, _0806C1C4 @ =gUnknown_20370D0
ldr r0, _0806C1C8 @ =gSaveBlock1Ptr
ldr r0, [r0]
movs r1, 0xA4
lsls r1, 2
adds r0, r1
adds r1, r2, 0
bl IsEnoughMoney
lsls r0, 24
lsrs r0, 24
strh r0, [r4]
_0806C1BA:
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806C1C4: .4byte gUnknown_20370D0
_0806C1C8: .4byte gSaveBlock1Ptr
thumb_func_end ScrCmd_checkmoney
thumb_func_start sub_806C1CC
sub_806C1CC: @ 806C1CC
push {r4,r5,lr}
ldr r1, [r0, 0x8]
ldrb r5, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
ldrb r4, [r1]
adds r2, r1, 0x1
str r2, [r0, 0x8]
ldrb r1, [r1, 0x1]
adds r2, 0x1
str r2, [r0, 0x8]
cmp r1, 0
bne _0806C20A
ldr r0, _0806C214 @ =sub_809D6D4
bl sub_81119D4
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
beq _0806C20A
ldr r0, _0806C218 @ =gSaveBlock1Ptr
ldr r0, [r0]
movs r1, 0xA4
lsls r1, 2
adds r0, r1
bl GetMoney
adds r1, r5, 0
adds r2, r4, 0
bl DrawMoneyBox
_0806C20A:
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806C214: .4byte sub_809D6D4
_0806C218: .4byte gSaveBlock1Ptr
thumb_func_end sub_806C1CC
thumb_func_start sub_806C21C
sub_806C21C: @ 806C21C
push {lr}
bl HideMoneyBox
movs r0, 0
pop {r1}
bx r1
thumb_func_end sub_806C21C
thumb_func_start sub_806C228
sub_806C228: @ 806C228
push {lr}
ldr r1, [r0, 0x8]
adds r1, 0x1
adds r2, r1, 0x1
str r2, [r0, 0x8]
ldrb r1, [r1, 0x1]
adds r2, 0x1
str r2, [r0, 0x8]
cmp r1, 0
bne _0806C24E
ldr r0, _0806C254 @ =gSaveBlock1Ptr
ldr r0, [r0]
movs r1, 0xA4
lsls r1, 2
adds r0, r1
bl GetMoney
bl ChangeAmountInMoneyBox
_0806C24E:
movs r0, 0
pop {r1}
bx r1
.align 2, 0
_0806C254: .4byte gSaveBlock1Ptr
thumb_func_end sub_806C228
thumb_func_start sub_806C258
sub_806C258: @ 806C258
push {r4,r5,lr}
ldr r1, [r0, 0x8]
ldrb r5, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
ldrb r4, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
ldr r0, _0806C290 @ =sub_809D6D4
bl sub_81119D4
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
beq _0806C286
bl GetCoins
lsls r0, 16
lsrs r0, 16
adds r1, r5, 0
adds r2, r4, 0
bl ShowCoinsWindow
_0806C286:
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
.align 2, 0
_0806C290: .4byte sub_809D6D4
thumb_func_end sub_806C258
thumb_func_start ScrCmd_hidecoinsbox
ScrCmd_hidecoinsbox: @ 806C294
push {lr}
ldr r1, [r0, 0x8]
adds r1, 0x2
str r1, [r0, 0x8]
bl HideCoinsWindow
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_hidecoinsbox
thumb_func_start ScrCmd_updatecoinsbox
ScrCmd_updatecoinsbox: @ 806C2A8
push {lr}
ldr r1, [r0, 0x8]
adds r1, 0x2
str r1, [r0, 0x8]
bl GetCoins
lsls r0, 16
lsrs r0, 16
bl PrintCoinsString
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_updatecoinsbox
thumb_func_start ScrCmd_trainerbattle
ScrCmd_trainerbattle: @ 806C2C4
push {r4,lr}
adds r4, r0, 0
ldr r0, [r4, 0x8]
bl sub_8080228
str r0, [r4, 0x8]
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_trainerbattle
thumb_func_start sub_806C2D8
sub_806C2D8: @ 806C2D8
push {lr}
bl sub_8080464
movs r0, 0x1
pop {r1}
bx r1
thumb_func_end sub_806C2D8
thumb_func_start ScrCmd_ontrainerbattleend
ScrCmd_ontrainerbattleend: @ 806C2E4
push {r4,lr}
adds r4, r0, 0
bl sub_80805E8
str r0, [r4, 0x8]
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_ontrainerbattleend
thumb_func_start ScrCmd_ontrainerbattleendgoto
ScrCmd_ontrainerbattleendgoto: @ 806C2F8
push {r4,lr}
adds r4, r0, 0
bl sub_8080600
str r0, [r4, 0x8]
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_ontrainerbattleendgoto
thumb_func_start ScrCmd_checktrainerflag
ScrCmd_checktrainerflag: @ 806C30C
push {r4,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
bl HasTrainerAlreadyBeenFought
strb r0, [r4, 0x2]
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_checktrainerflag
thumb_func_start ScrCmd_settrainerflag
ScrCmd_settrainerflag: @ 806C330
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
bl trainer_flag_set
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_settrainerflag
thumb_func_start ScrCmd_cleartrainerflag
ScrCmd_cleartrainerflag: @ 806C34C
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
bl trainer_flag_clear
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_cleartrainerflag
thumb_func_start ScrCmd_setwildbattle
ScrCmd_setwildbattle: @ 806C368
push {r4-r6,lr}
adds r4, r0, 0
bl ScriptReadHalfword
adds r5, r0, 0
lsls r5, 16
lsrs r5, 16
ldr r0, [r4, 0x8]
ldrb r6, [r0]
adds r0, 0x1
str r0, [r4, 0x8]
adds r0, r4, 0
bl ScriptReadHalfword
adds r2, r0, 0
lsls r2, 16
lsrs r2, 16
adds r0, r5, 0
adds r1, r6, 0
bl CreateScriptedWildMon
movs r0, 0
pop {r4-r6}
pop {r1}
bx r1
thumb_func_end ScrCmd_setwildbattle
thumb_func_start sub_806C39C
sub_806C39C: @ 806C39C
push {lr}
bl sub_807F8C4
bl ScriptContext1_Stop
movs r0, 0x1
pop {r1}
bx r1
thumb_func_end sub_806C39C
thumb_func_start sub_806C3AC
sub_806C3AC: @ 806C3AC
push {lr}
bl ScriptReadWord
bl sub_809C164
bl ScriptContext1_Stop
movs r0, 0x1
pop {r1}
bx r1
thumb_func_end sub_806C3AC
thumb_func_start sub_806C3C0
sub_806C3C0: @ 806C3C0
push {lr}
bl ScriptReadWord
bl sub_809C1A0
bl ScriptContext1_Stop
movs r0, 0x1
pop {r1}
bx r1
thumb_func_end sub_806C3C0
thumb_func_start sub_806C3D4
sub_806C3D4: @ 806C3D4
push {lr}
bl ScriptReadWord
bl sub_809C1BC
bl ScriptContext1_Stop
movs r0, 0x1
pop {r1}
bx r1
thumb_func_end sub_806C3D4
thumb_func_start ScrCmd_playslotmachine
ScrCmd_playslotmachine: @ 806C3E8
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 24
lsrs r0, 24
ldr r1, _0806C40C @ =c2_exit_to_overworld_1_continue_scripts_restart_music
bl sub_813F804
bl ScriptContext1_Stop
movs r0, 0x1
pop {r1}
bx r1
.align 2, 0
_0806C40C: .4byte c2_exit_to_overworld_1_continue_scripts_restart_music
thumb_func_end ScrCmd_playslotmachine
thumb_func_start sub_806C410
sub_806C410: @ 806C410
movs r0, 0
bx lr
thumb_func_end sub_806C410
thumb_func_start sub_806C414
sub_806C414: @ 806C414
movs r0, 0
bx lr
thumb_func_end sub_806C414
thumb_func_start sub_806C418
sub_806C418: @ 806C418
push {lr}
bl ScriptContext1_Stop
movs r0, 0x1
pop {r1}
bx r1
thumb_func_end sub_806C418
thumb_func_start sub_806C424
sub_806C424: @ 806C424
movs r0, 0
bx lr
thumb_func_end sub_806C424
thumb_func_start sub_806C428
sub_806C428: @ 806C428
movs r0, 0
bx lr
thumb_func_end sub_806C428
thumb_func_start sub_806C42C
sub_806C42C: @ 806C42C
movs r0, 0
bx lr
thumb_func_end sub_806C42C
thumb_func_start ScrCmd_dofieldeffect
ScrCmd_dofieldeffect: @ 806C430
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
ldr r1, _0806C454 @ =gUnknown_20370B6
strh r0, [r1]
lsls r0, 24
lsrs r0, 24
bl FieldEffectStart
movs r0, 0
pop {r1}
bx r1
.align 2, 0
_0806C454: .4byte gUnknown_20370B6
thumb_func_end ScrCmd_dofieldeffect
thumb_func_start ScrCmd_setfieldeffectarg
ScrCmd_setfieldeffectarg: @ 806C458
push {r4,lr}
ldr r1, [r0, 0x8]
ldrb r4, [r1]
adds r1, 0x1
str r1, [r0, 0x8]
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
ldr r1, _0806C484 @ =gUnknown_20386E0
lsls r4, 2
adds r4, r1
lsls r0, 16
asrs r0, 16
str r0, [r4]
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806C484: .4byte gUnknown_20386E0
thumb_func_end ScrCmd_setfieldeffectarg
thumb_func_start WaitForFieldEffectFinish
WaitForFieldEffectFinish: @ 806C488
push {lr}
ldr r0, _0806C49C @ =gUnknown_20370B6
ldrb r0, [r0]
bl FieldEffectActiveListContains
lsls r0, 24
cmp r0, 0
beq _0806C4A0
movs r0, 0
b _0806C4A2
.align 2, 0
_0806C49C: .4byte gUnknown_20370B6
_0806C4A0:
movs r0, 0x1
_0806C4A2:
pop {r1}
bx r1
thumb_func_end WaitForFieldEffectFinish
thumb_func_start ScrCmd_waitfieldeffect
ScrCmd_waitfieldeffect: @ 806C4A8
push {r4,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
ldr r1, _0806C4CC @ =gUnknown_20370B6
strh r0, [r1]
ldr r1, _0806C4D0 @ =WaitForFieldEffectFinish
adds r0, r4, 0
bl SetupNativeScript
movs r0, 0x1
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806C4CC: .4byte gUnknown_20370B6
_0806C4D0: .4byte WaitForFieldEffectFinish
thumb_func_end ScrCmd_waitfieldeffect
thumb_func_start ScrCmd_setrespawn
ScrCmd_setrespawn: @ 806C4D4
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 24
lsrs r0, 24
bl sub_80554CC
movs r0, 0
pop {r1}
bx r1
thumb_func_end ScrCmd_setrespawn
thumb_func_start ScrCmd_checkplayergender
ScrCmd_checkplayergender: @ 806C4F0
ldr r1, _0806C500 @ =gUnknown_20370D0
ldr r0, _0806C504 @ =gSaveBlock2Ptr
ldr r0, [r0]
ldrb r0, [r0, 0x8]
strh r0, [r1]
movs r0, 0
bx lr
.align 2, 0
_0806C500: .4byte gUnknown_20370D0
_0806C504: .4byte gSaveBlock2Ptr
thumb_func_end ScrCmd_checkplayergender
thumb_func_start ScrCmd_playmoncry
ScrCmd_playmoncry: @ 806C508
push {r4,r5,lr}
adds r5, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r1, r0, 0
lsls r1, 24
lsrs r1, 24
adds r0, r4, 0
bl PlayCry7
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_playmoncry
thumb_func_start sub_806C540
sub_806C540: @ 806C540
push {lr}
ldr r1, _0806C550 @ =IsCryFinished
bl SetupNativeScript
movs r0, 0x1
pop {r1}
bx r1
.align 2, 0
_0806C550: .4byte IsCryFinished
thumb_func_end sub_806C540
thumb_func_start ScrCmd_setmetatile
ScrCmd_setmetatile: @ 806C554
push {r4-r7,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r6, r0, 16
adds r0, r4, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r5, r0, 16
adds r0, r4, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r7, r0, 16
adds r0, r4, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
adds r1, r6, 0x7
lsls r1, 16
lsrs r6, r1, 16
adds r1, r5, 0x7
lsls r1, 16
lsrs r5, r1, 16
cmp r0, 0
bne _0806C5B8
adds r0, r6, 0
adds r1, r5, 0
adds r2, r7, 0
bl MapGridSetMetatileIdAt
b _0806C5CA
_0806C5B8:
movs r1, 0xC0
lsls r1, 4
adds r0, r1, 0
adds r2, r7, 0
orrs r2, r0
adds r0, r6, 0
adds r1, r5, 0
bl MapGridSetMetatileIdAt
_0806C5CA:
movs r0, 0
pop {r4-r7}
pop {r1}
bx r1
thumb_func_end ScrCmd_setmetatile
thumb_func_start ScrCmd_opendoor
ScrCmd_opendoor: @ 806C5D4
push {r4,r5,lr}
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r5, r0, 0
lsls r5, 16
lsrs r5, 16
adds r0, r4, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
adds r5, 0x7
lsls r5, 16
lsrs r5, 16
movs r0, 0xE0
lsls r0, 11
adds r4, r0
lsrs r4, 16
adds r0, r5, 0
adds r1, r4, 0
bl sub_805B364
lsls r0, 16
lsrs r0, 16
bl PlaySE
adds r0, r5, 0
adds r1, r4, 0
bl sub_805B310
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_opendoor
thumb_func_start ScrCmd_closedoor
ScrCmd_closedoor: @ 806C62C
push {r4,r5,lr}
adds r5, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r1, r0, 0
lsls r1, 16
adds r4, 0x7
lsls r4, 16
lsrs r4, 16
movs r0, 0xE0
lsls r0, 11
adds r1, r0
lsrs r1, 16
adds r0, r4, 0
bl sub_805B2D0
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_closedoor
thumb_func_start sub_806C670
sub_806C670: @ 806C670
push {lr}
bl sub_805B350
lsls r0, 24
cmp r0, 0
beq _0806C680
movs r0, 0
b _0806C682
_0806C680:
movs r0, 0x1
_0806C682:
pop {r1}
bx r1
thumb_func_end sub_806C670
thumb_func_start sub_806C688
sub_806C688: @ 806C688
push {lr}
ldr r1, _0806C698 @ =sub_806C670
bl SetupNativeScript
movs r0, 0x1
pop {r1}
bx r1
.align 2, 0
_0806C698: .4byte sub_806C670
thumb_func_end sub_806C688
thumb_func_start ScrCmd_setdooropen
ScrCmd_setdooropen: @ 806C69C
push {r4,r5,lr}
adds r5, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r1, r0, 0
lsls r1, 16
adds r4, 0x7
lsls r4, 16
lsrs r4, 16
movs r0, 0xE0
lsls r0, 11
adds r1, r0
lsrs r1, 16
adds r0, r4, 0
bl sub_805B268
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_setdooropen
thumb_func_start ScrCmd_setdoorclosed
ScrCmd_setdoorclosed: @ 806C6E0
push {r4,r5,lr}
adds r5, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r4, r0, 0
lsls r4, 16
lsrs r4, 16
adds r0, r5, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
adds r1, r0, 0
lsls r1, 16
adds r4, 0x7
lsls r4, 16
lsrs r4, 16
movs r0, 0xE0
lsls r0, 11
adds r1, r0
lsrs r1, 16
adds r0, r4, 0
bl sub_805B29C
movs r0, 0
pop {r4,r5}
pop {r1}
bx r1
thumb_func_end ScrCmd_setdoorclosed
thumb_func_start sub_806C724
sub_806C724: @ 806C724
movs r0, 0
bx lr
thumb_func_end sub_806C724
thumb_func_start sub_806C728
sub_806C728: @ 806C728
movs r0, 0
bx lr
thumb_func_end sub_806C728
thumb_func_start ScrCmd_checkcoins
ScrCmd_checkcoins: @ 806C72C
push {r4,lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl GetVarPointer
adds r4, r0, 0
bl GetCoins
strh r0, [r4]
movs r0, 0
pop {r4}
pop {r1}
bx r1
thumb_func_end ScrCmd_checkcoins
thumb_func_start ScrCmd_givecoins
ScrCmd_givecoins: @ 806C74C
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
bl GiveCoins
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
bne _0806C774
ldr r1, _0806C770 @ =gUnknown_20370D0
movs r0, 0
b _0806C778
.align 2, 0
_0806C770: .4byte gUnknown_20370D0
_0806C774:
ldr r1, _0806C780 @ =gUnknown_20370D0
movs r0, 0x1
_0806C778:
strh r0, [r1]
movs r0, 0
pop {r1}
bx r1
.align 2, 0
_0806C780: .4byte gUnknown_20370D0
thumb_func_end ScrCmd_givecoins
thumb_func_start ScrCmd_takecoins
ScrCmd_takecoins: @ 806C784
push {lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
bl TakeCoins
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
bne _0806C7AC
ldr r1, _0806C7A8 @ =gUnknown_20370D0
movs r0, 0
b _0806C7B0
.align 2, 0
_0806C7A8: .4byte gUnknown_20370D0
_0806C7AC:
ldr r1, _0806C7B8 @ =gUnknown_20370D0
movs r0, 0x1
_0806C7B0:
strh r0, [r1]
movs r0, 0
pop {r1}
bx r1
.align 2, 0
_0806C7B8: .4byte gUnknown_20370D0
thumb_func_end ScrCmd_takecoins
thumb_func_start sub_806C7BC
sub_806C7BC: @ 806C7BC
push {lr}
bl sub_8069A20
movs r0, 0
pop {r1}
bx r1
thumb_func_end sub_806C7BC
thumb_func_start sub_806C7C8
sub_806C7C8: @ 806C7C8
push {lr}
bl sub_8069A2C
movs r0, 0
pop {r1}
bx r1
thumb_func_end sub_806C7C8
thumb_func_start ScrCmd_setmonobedient
ScrCmd_setmonobedient: @ 806C7D4
push {lr}
sub sp, 0x4
movs r2, 0x1
mov r1, sp
strb r2, [r1]
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
movs r1, 0x64
muls r0, r1
ldr r1, _0806C808 @ =gPlayerParty
adds r0, r1
movs r1, 0x50
mov r2, sp
bl SetMonData
movs r0, 0
add sp, 0x4
pop {r1}
bx r1
.align 2, 0
_0806C808: .4byte gPlayerParty
thumb_func_end ScrCmd_setmonobedient
thumb_func_start ScrCmd_checkmonobedience
ScrCmd_checkmonobedience: @ 806C80C
push {r4,lr}
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r0, 16
ldr r4, _0806C83C @ =gUnknown_20370D0
movs r1, 0x64
muls r0, r1
ldr r1, _0806C840 @ =gPlayerParty
adds r0, r1
movs r1, 0x50
movs r2, 0
bl GetMonData
strh r0, [r4]
movs r0, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806C83C: .4byte gUnknown_20370D0
_0806C840: .4byte gPlayerParty
thumb_func_end ScrCmd_checkmonobedience
thumb_func_start sub_806C844
sub_806C844: @ 806C844
push {r4,lr}
sub sp, 0x4
adds r4, r0, 0
bl ScriptReadHalfword
lsls r0, 16
lsrs r0, 16
bl VarGet
lsls r0, 16
lsrs r3, r0, 16
ldr r0, [r4, 0x8]
ldrb r2, [r0]
mov r1, sp
strb r2, [r1]
adds r0, 0x1
str r0, [r4, 0x8]
cmp r3, 0x5
bhi _0806C87A
movs r0, 0x64
muls r0, r3
ldr r1, _0806C884 @ =gPlayerParty
adds r0, r1
movs r1, 0x23
mov r2, sp
bl SetMonData
_0806C87A:
movs r0, 0
add sp, 0x4
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0806C884: .4byte gPlayerParty
thumb_func_end sub_806C844
.align 2, 0 @ Don't pad with nop.