Files
pokeruby/asm/player_pc.s
T
2017-05-09 00:24:51 -07:00

1299 lines
23 KiB
ArmAsm

.include "constants/gba_constants.inc"
.include "constants/species_constants.inc"
.include "asm/macros.inc"
.syntax unified
.text
thumb_func_start sub_813AD58
sub_813AD58: @ 813AD58
push {lr}
sub sp, 0x8
lsls r0, 16
lsrs r1, r0, 16
ldr r2, _0813AD74 @ =0xffff0009
adds r0, r1, r2
cmp r0, 0x8
bhi _0813ADE8
lsls r0, 2
ldr r1, _0813AD78 @ =_0813AD7C
adds r0, r1
ldr r0, [r0]
mov pc, r0
.align 2, 0
_0813AD74: .4byte 0xffff0009
_0813AD78: .4byte _0813AD7C
.align 2, 0
_0813AD7C:
.4byte _0813ADE0
.4byte _0813ADD8
.4byte _0813ADD0
.4byte _0813ADC8
.4byte _0813ADC0
.4byte _0813ADB8
.4byte _0813ADB0
.4byte _0813ADA8
.4byte _0813ADA0
_0813ADA0:
ldr r1, _0813ADA4 @ =gMenuText_GoBackToPrev
b _0813ADF0
.align 2, 0
_0813ADA4: .4byte gMenuText_GoBackToPrev
_0813ADA8:
ldr r1, _0813ADAC @ =gOtherText_HowManyToWithdraw
b _0813ADF0
.align 2, 0
_0813ADAC: .4byte gOtherText_HowManyToWithdraw
_0813ADB0:
ldr r1, _0813ADB4 @ =gOtherText_WithdrewThing
b _0813ADF0
.align 2, 0
_0813ADB4: .4byte gOtherText_WithdrewThing
_0813ADB8:
ldr r1, _0813ADBC @ =gOtherText_HowManyToToss
b _0813ADF0
.align 2, 0
_0813ADBC: .4byte gOtherText_HowManyToToss
_0813ADC0:
ldr r1, _0813ADC4 @ =gOtherText_ThrewAwayItem
b _0813ADF0
.align 2, 0
_0813ADC4: .4byte gOtherText_ThrewAwayItem
_0813ADC8:
ldr r1, _0813ADCC @ =gOtherText_NoMoreRoom
b _0813ADF0
.align 2, 0
_0813ADCC: .4byte gOtherText_NoMoreRoom
_0813ADD0:
ldr r1, _0813ADD4 @ =gOtherText_TooImportant
b _0813ADF0
.align 2, 0
_0813ADD4: .4byte gOtherText_TooImportant
_0813ADD8:
ldr r1, _0813ADDC @ =gOtherText_OkayToThrowAwayPrompt
b _0813ADF0
.align 2, 0
_0813ADDC: .4byte gOtherText_OkayToThrowAwayPrompt
_0813ADE0:
ldr r1, _0813ADE4 @ =gOtherText_SwitchWhichItem
b _0813ADF0
.align 2, 0
_0813ADE4: .4byte gOtherText_SwitchWhichItem
_0813ADE8:
adds r0, r1, 0
bl ItemId_GetDescription
adds r1, r0, 0
_0813ADF0:
movs r0, 0x30
str r0, [sp]
movs r0, 0x1
str r0, [sp, 0x4]
adds r0, r1, 0
movs r1, 0x8
movs r2, 0x68
movs r3, 0x68
bl sub_8072AB0
add sp, 0x8
pop {r0}
bx r0
thumb_func_end sub_813AD58
thumb_func_start sub_813AE0C
sub_813AE0C: @ 813AE0C
push {r4,r5,lr}
lsls r0, 24
lsrs r0, 24
lsls r1, r0, 2
adds r1, r0
lsls r1, 3
ldr r2, _0813AE48 @ =gTasks + 0x8
adds r4, r1, r2
ldrh r1, [r4]
ldrh r2, [r4, 0x2]
adds r1, r2
lsls r1, 16
lsrs r5, r1, 16
bl sub_813ABE8
movs r1, 0x12
ldrsh r0, [r4, r1]
cmp r0, 0
bne _0813AE62
lsls r0, r5, 16
asrs r1, r0, 16
movs r2, 0x4
ldrsh r0, [r4, r2]
cmp r1, r0
bne _0813AE50
ldr r0, _0813AE4C @ =0x0000ffff
bl sub_813AD58
b _0813AE62
.align 2, 0
_0813AE48: .4byte gTasks + 0x8
_0813AE4C: .4byte 0x0000ffff
_0813AE50:
ldr r0, _0813AE68 @ =gSaveBlock1
lsls r1, 2
adds r1, r0
movs r0, 0x93
lsls r0, 3
adds r1, r0
ldrh r0, [r1]
bl sub_813AD58
_0813AE62:
pop {r4,r5}
pop {r0}
bx r0
.align 2, 0
_0813AE68: .4byte gSaveBlock1
thumb_func_end sub_813AE0C
thumb_func_start sub_813AE6C
sub_813AE6C: @ 813AE6C
push {r4-r6,lr}
sub sp, 0x8
adds r6, r0, 0
adds r4, r1, 0
lsls r6, 24
lsrs r6, 24
lsls r4, 24
lsrs r4, 24
lsls r5, r6, 2
adds r5, r6
lsls r5, 3
ldr r0, _0813AEF8 @ =gTasks + 0x8
adds r5, r0
bl sub_80F944C
bl LoadScrollIndicatorPalette
bl sub_813AF04
movs r0, 0xF
movs r1, 0
movs r2, 0x1D
movs r3, 0x13
bl MenuDrawTextWindow
movs r0, 0
movs r1, 0xC
movs r2, 0xE
movs r3, 0x13
bl MenuDrawTextWindow
movs r0, 0
movs r1, 0
movs r2, 0xB
movs r3, 0x3
bl MenuDrawTextWindow
ldr r0, _0813AEFC @ =gSaveBlock1
movs r1, 0x93
lsls r1, 3
adds r0, r1
ldrh r0, [r0]
bl sub_813AD58
ldr r0, _0813AF00 @ =gUnknown_084062C0
lsls r4, 3
adds r4, r0
ldr r0, [r4]
movs r1, 0x1
movs r2, 0x1
bl MenuPrint
adds r0, r6, 0
bl sub_813ABE8
ldrb r3, [r5, 0x8]
ldrb r0, [r5]
str r0, [sp]
movs r0, 0xD
str r0, [sp, 0x4]
movs r0, 0
movs r1, 0x10
movs r2, 0x2
bl InitMenu
add sp, 0x8
pop {r4-r6}
pop {r0}
bx r0
.align 2, 0
_0813AEF8: .4byte gTasks + 0x8
_0813AEFC: .4byte gSaveBlock1
_0813AF00: .4byte gUnknown_084062C0
thumb_func_end sub_813AE6C
thumb_func_start sub_813AF04
sub_813AF04: @ 813AF04
push {lr}
sub sp, 0x8
ldr r1, _0813AF38 @ =gUnknown_08406334
mov r0, sp
movs r2, 0x6
bl memcpy
add r0, sp, 0x4
movs r1, 0xDF
movs r2, 0x2
bl LoadPalette
mov r0, sp
adds r0, 0x2
movs r1, 0xD1
movs r2, 0x2
bl LoadPalette
mov r0, sp
movs r1, 0xD8
movs r2, 0x2
bl LoadPalette
add sp, 0x8
pop {r0}
bx r0
.align 2, 0
_0813AF38: .4byte gUnknown_08406334
thumb_func_end sub_813AF04
thumb_func_start sub_813AF3C
sub_813AF3C: @ 813AF3C
push {r4,lr}
movs r2, 0
movs r1, 0x6
ldr r4, _0813AF70 @ =gSaveBlock1
ldr r3, _0813AF74 @ =0x00002b6c
_0813AF46:
lsls r0, r1, 3
adds r0, r1
lsls r0, 2
adds r0, r4
adds r0, r3
ldrh r0, [r0]
cmp r0, 0
beq _0813AF5C
adds r0, r2, 0x1
lsls r0, 24
lsrs r2, r0, 24
_0813AF5C:
adds r0, r1, 0x1
lsls r0, 24
lsrs r1, r0, 24
cmp r1, 0xF
bls _0813AF46
adds r0, r2, 0
pop {r4}
pop {r1}
bx r1
.align 2, 0
_0813AF70: .4byte gSaveBlock1
_0813AF74: .4byte 0x00002b6c
thumb_func_end sub_813AF3C
thumb_func_start sub_813AF78
sub_813AF78: @ 813AF78
push {r4-r7,lr}
mov r7, r10
mov r6, r9
mov r5, r8
push {r5-r7}
sub sp, 0x24
movs r2, 0x6
_0813AF86:
adds r1, r2, 0x1
lsls r0, r1, 24
lsrs r3, r0, 24
mov r10, r1
cmp r3, 0xF
bhi _0813AFF4
ldr r0, _0813B010 @ =gSaveBlock1
mov r12, r0
lsls r0, r2, 3
adds r0, r2
lsls r0, 2
add r0, r12
ldr r1, _0813B014 @ =0x00002b6c
adds r1, r0
mov r8, r1
ldr r2, _0813B018 @ =0x00002b4c
mov r9, r2
adds r4, r0, r2
_0813AFAA:
mov r5, r8
ldrh r0, [r5]
cmp r0, 0
bne _0813AFEA
mov r1, sp
adds r0, r4, 0
ldm r0!, {r2,r6,r7}
stm r1!, {r2,r6,r7}
ldm r0!, {r5-r7}
stm r1!, {r5-r7}
ldm r0!, {r2,r5,r6}
stm r1!, {r2,r5,r6}
lsls r2, r3, 3
adds r2, r3
lsls r2, 2
add r2, r12
add r2, r9
adds r1, r4, 0
adds r0, r2, 0
ldm r0!, {r5-r7}
stm r1!, {r5-r7}
ldm r0!, {r5-r7}
stm r1!, {r5-r7}
ldm r0!, {r5-r7}
stm r1!, {r5-r7}
mov r0, sp
ldm r0!, {r1,r5,r7}
stm r2!, {r1,r5,r7}
ldm r0!, {r1,r6,r7}
stm r2!, {r1,r6,r7}
ldm r0!, {r5-r7}
stm r2!, {r5-r7}
_0813AFEA:
adds r0, r3, 0x1
lsls r0, 24
lsrs r3, r0, 24
cmp r3, 0xF
bls _0813AFAA
_0813AFF4:
mov r1, r10
lsls r0, r1, 24
lsrs r2, r0, 24
cmp r2, 0xE
bls _0813AF86
add sp, 0x24
pop {r3-r5}
mov r8, r3
mov r9, r4
mov r10, r5
pop {r4-r7}
pop {r0}
bx r0
.align 2, 0
_0813B010: .4byte gSaveBlock1
_0813B014: .4byte 0x00002b6c
_0813B018: .4byte 0x00002b4c
thumb_func_end sub_813AF78
thumb_func_start sub_813B01C
sub_813B01C: @ 813B01C
push {r4-r7,lr}
mov r7, r8
push {r7}
movs r7, 0
ldr r1, _0813B0B8 @ =0x0201fe00
ldrb r4, [r1, 0x2]
ldrb r0, [r1, 0x1]
adds r0, r4, r0
cmp r4, r0
bge _0813B08A
adds r6, r1, 0
ldr r0, _0813B0BC @ =gStringVar1
mov r8, r0
_0813B036:
ldrb r0, [r6, 0x2]
subs r0, r4, r0
lsls r0, 17
lsrs r7, r0, 16
adds r0, r7, 0x2
lsls r0, 24
lsrs r5, r0, 24
adds r3, r7, 0x3
lsls r3, 24
lsrs r3, 24
movs r0, 0x15
adds r1, r5, 0
movs r2, 0x1C
bl MenuFillWindowRectWithBlankTile
ldrb r0, [r6, 0x3]
cmp r4, r0
beq _0813B0C4
lsls r1, r4, 3
adds r1, r4
lsls r1, 2
ldr r0, _0813B0C0 @ =gSaveBlock1 + 0x2C36
adds r1, r0
mov r0, r8
bl StringCopy
mov r0, r8
bl SanitizeNameString
mov r0, r8
movs r1, 0x15
adds r2, r5, 0
bl MenuPrint
adds r0, r4, 0x1
lsls r0, 16
lsrs r4, r0, 16
ldrb r0, [r6, 0x2]
ldrb r1, [r6, 0x1]
adds r0, r1
cmp r4, r0
blt _0813B036
_0813B08A:
ldr r5, _0813B0B8 @ =0x0201fe00
ldrb r0, [r5, 0x2]
subs r0, r4, r0
cmp r0, 0x8
beq _0813B0A4
adds r1, r7, 0x4
lsls r1, 24
lsrs r1, 24
movs r0, 0x15
movs r2, 0x1C
movs r3, 0x12
bl MenuFillWindowRectWithBlankTile
_0813B0A4:
ldrb r0, [r5, 0x2]
cmp r0, 0
beq _0813B0D4
movs r0, 0
movs r1, 0xC8
movs r2, 0x8
bl CreateVerticalScrollIndicators
b _0813B0DA
.align 2, 0
_0813B0B8: .4byte 0x0201fe00
_0813B0BC: .4byte gStringVar1
_0813B0C0: .4byte gSaveBlock1 + 0x2C36
_0813B0C4:
ldr r0, _0813B0D0 @ =gOtherText_CancelNoTerminator
movs r1, 0x15
adds r2, r5, 0
bl MenuPrint
b _0813B08A
.align 2, 0
_0813B0D0: .4byte gOtherText_CancelNoTerminator
_0813B0D4:
movs r0, 0
bl DestroyVerticalScrollIndicator
_0813B0DA:
ldr r0, _0813B0F4 @ =0x0201fe00
ldrb r1, [r0, 0x2]
ldrb r2, [r0, 0x1]
adds r1, r2
ldrb r0, [r0, 0x3]
cmp r1, r0
bgt _0813B0F8
movs r0, 0x1
movs r1, 0xC8
movs r2, 0x98
bl CreateVerticalScrollIndicators
b _0813B0FE
.align 2, 0
_0813B0F4: .4byte 0x0201fe00
_0813B0F8:
movs r0, 0x1
bl DestroyVerticalScrollIndicator
_0813B0FE:
pop {r3}
mov r8, r3
pop {r4-r7}
pop {r0}
bx r0
thumb_func_end sub_813B01C
thumb_func_start sub_813B108
sub_813B108: @ 813B108
push {r4,lr}
sub sp, 0x8
adds r4, r0, 0
lsls r4, 24
lsrs r4, 24
bl sub_80F944C
bl LoadScrollIndicatorPalette
movs r0, 0
movs r1, 0
movs r2, 0x1D
movs r3, 0x13
bl MenuZeroFillWindowRect
movs r0, 0
movs r1, 0
movs r2, 0x8
movs r3, 0x3
bl MenuDrawTextWindow
ldr r0, _0813B16C @ =gPCText_Mailbox
movs r1, 0x1
movs r2, 0x1
bl MenuPrint
movs r0, 0x14
movs r1, 0
movs r2, 0x1D
movs r3, 0x13
bl MenuDrawTextWindow
adds r0, r4, 0
bl sub_813B01C
ldr r0, _0813B170 @ =0x0201fe00
ldrb r3, [r0, 0x1]
ldrb r0, [r0]
str r0, [sp]
movs r0, 0x8
str r0, [sp, 0x4]
movs r0, 0
movs r1, 0x15
movs r2, 0x2
bl InitMenu
add sp, 0x8
pop {r4}
pop {r0}
bx r0
.align 2, 0
_0813B16C: .4byte gPCText_Mailbox
_0813B170: .4byte 0x0201fe00
thumb_func_end sub_813B108
thumb_func_start sub_813B174
sub_813B174: @ 813B174
push {r4,r5,lr}
lsls r0, 24
lsrs r5, r0, 24
adds r4, r5, 0
ldr r0, _0813B1AC @ =gPaletteFade
ldrb r1, [r0, 0x7]
movs r3, 0x80
adds r0, r3, 0
ands r0, r1
cmp r0, 0
bne _0813B274
ldr r2, _0813B1B0 @ =gMain
ldrh r1, [r2, 0x30]
movs r0, 0x40
ands r0, r1
cmp r0, 0
beq _0813B1CA
ldr r4, _0813B1B4 @ =0x0201fe00
ldrb r0, [r4]
cmp r0, 0
beq _0813B1B8
movs r0, 0x5
bl PlaySE
movs r0, 0x1
negs r0, r0
b _0813B1E6
.align 2, 0
_0813B1AC: .4byte gPaletteFade
_0813B1B0: .4byte gMain
_0813B1B4: .4byte 0x0201fe00
_0813B1B8:
ldrb r0, [r4, 0x2]
cmp r0, 0
beq _0813B274
movs r0, 0x5
bl PlaySE
ldrb r0, [r4, 0x2]
subs r0, 0x1
b _0813B208
_0813B1CA:
adds r0, r3, 0
ands r0, r1
cmp r0, 0
beq _0813B212
ldr r4, _0813B1F0 @ =0x0201fe00
ldrb r1, [r4]
ldrb r0, [r4, 0x1]
subs r0, 0x1
cmp r1, r0
beq _0813B1F4
movs r0, 0x5
bl PlaySE
movs r0, 0x1
_0813B1E6:
bl MoveMenuCursor
strb r0, [r4]
b _0813B274
.align 2, 0
_0813B1F0: .4byte 0x0201fe00
_0813B1F4:
ldrb r0, [r4, 0x2]
adds r0, r1
ldrb r1, [r4, 0x3]
cmp r0, r1
beq _0813B274
movs r0, 0x5
bl PlaySE
ldrb r0, [r4, 0x2]
adds r0, 0x1
_0813B208:
strb r0, [r4, 0x2]
adds r0, r5, 0
bl sub_813B01C
b _0813B274
_0813B212:
ldrh r1, [r2, 0x2E]
movs r0, 0x1
ands r0, r1
cmp r0, 0
beq _0813B25C
bl sub_8072DEC
movs r0, 0x5
bl PlaySE
ldr r0, _0813B23C @ =0x0201fe00
ldrb r1, [r0, 0x2]
ldrb r2, [r0]
adds r1, r2
ldrb r0, [r0, 0x3]
cmp r1, r0
bne _0813B240
adds r0, r5, 0
bl sub_813B320
b _0813B274
.align 2, 0
_0813B23C: .4byte 0x0201fe00
_0813B240:
bl sub_813B27C
ldr r0, _0813B254 @ =gTasks
lsls r1, r5, 2
adds r1, r5
lsls r1, 3
adds r1, r0
ldr r0, _0813B258 @ =sub_813B294
str r0, [r1]
b _0813B274
.align 2, 0
_0813B254: .4byte gTasks
_0813B258: .4byte sub_813B294
_0813B25C:
movs r0, 0x2
ands r0, r1
cmp r0, 0
beq _0813B274
bl sub_8072DEC
movs r0, 0x5
bl PlaySE
adds r0, r4, 0
bl sub_813B320
_0813B274:
pop {r4,r5}
pop {r0}
bx r0
thumb_func_end sub_813B174
thumb_func_start sub_813B27C
sub_813B27C: @ 813B27C
push {lr}
bl BuyMenuFreeMemory
movs r0, 0
bl DestroyVerticalScrollIndicator
movs r0, 0x1
bl DestroyVerticalScrollIndicator
pop {r0}
bx r0
thumb_func_end sub_813B27C
thumb_func_start sub_813B294
sub_813B294: @ 813B294
push {r4,r5,lr}
adds r5, r0, 0
lsls r5, 24
lsrs r5, 24
movs r0, 0
movs r1, 0
movs r2, 0x1D
movs r3, 0x13
bl MenuZeroFillWindowRect
ldr r4, _0813B2E8 @ =gStringVar1
ldr r1, _0813B2EC @ =0x0201fe00
ldrb r0, [r1]
adds r0, 0x6
ldrb r1, [r1, 0x2]
adds r0, r1
lsls r1, r0, 3
adds r1, r0
lsls r1, 2
ldr r0, _0813B2F0 @ =gSaveBlock1 + 0x2B5E
adds r1, r0
adds r0, r4, 0
bl StringCopy
adds r0, r4, 0
bl SanitizeNameString
ldr r4, _0813B2F4 @ =gStringVar4
ldr r1, _0813B2F8 @ =gOtherText_WhatWillYouDoMail
adds r0, r4, 0
bl StringExpandPlaceholders
ldr r2, _0813B2FC @ =sub_813B348
adds r0, r5, 0
adds r1, r4, 0
movs r3, 0
bl DisplayItemMessageOnField
pop {r4,r5}
pop {r0}
bx r0
.align 2, 0
_0813B2E8: .4byte gStringVar1
_0813B2EC: .4byte 0x0201fe00
_0813B2F0: .4byte gSaveBlock1 + 0x2B5E
_0813B2F4: .4byte gStringVar4
_0813B2F8: .4byte gOtherText_WhatWillYouDoMail
_0813B2FC: .4byte sub_813B348
thumb_func_end sub_813B294
thumb_func_start sub_813B300
sub_813B300: @ 813B300
push {r4,lr}
adds r4, r0, 0
lsls r4, 24
lsrs r4, 24
movs r0, 0
movs r1, 0
movs r2, 0x1D
movs r3, 0x13
bl MenuZeroFillWindowRect
adds r0, r4, 0
bl ReshowPlayerPC
pop {r4}
pop {r0}
bx r0
thumb_func_end sub_813B300
thumb_func_start sub_813B320
sub_813B320: @ 813B320
push {r4,lr}
adds r4, r0, 0
lsls r4, 24
lsrs r4, 24
bl sub_813B27C
ldr r1, _0813B340 @ =gTasks
lsls r0, r4, 2
adds r0, r4
lsls r0, 3
adds r0, r1
ldr r1, _0813B344 @ =sub_813B300
str r1, [r0]
pop {r4}
pop {r0}
bx r0
.align 2, 0
_0813B340: .4byte gTasks
_0813B344: .4byte sub_813B300
thumb_func_end sub_813B320
thumb_func_start sub_813B348
sub_813B348: @ 813B348
push {r4,lr}
sub sp, 0x8
adds r4, r0, 0
lsls r4, 24
lsrs r4, 24
movs r0, 0
movs r1, 0
movs r2, 0xC
movs r3, 0x9
bl MenuDrawTextWindow
ldr r3, _0813B394 @ =gUnknown_084062F8
movs r0, 0x1
movs r1, 0x1
movs r2, 0x4
bl PrintMenuItems
movs r0, 0
str r0, [sp]
movs r0, 0xB
str r0, [sp, 0x4]
movs r0, 0
movs r1, 0x1
movs r2, 0x1
movs r3, 0x4
bl InitMenu
ldr r1, _0813B398 @ =gTasks
lsls r0, r4, 2
adds r0, r4
lsls r0, 3
adds r0, r1
ldr r1, _0813B39C @ =sub_813B3A0
str r1, [r0]
add sp, 0x8
pop {r4}
pop {r0}
bx r0
.align 2, 0
_0813B394: .4byte gUnknown_084062F8
_0813B398: .4byte gTasks
_0813B39C: .4byte sub_813B3A0
thumb_func_end sub_813B348
thumb_func_start sub_813B3A0
sub_813B3A0: @ 813B3A0
push {r4,r5,lr}
lsls r0, 24
lsrs r5, r0, 24
adds r4, r5, 0
ldr r2, _0813B3C4 @ =gMain
ldrh r1, [r2, 0x30]
movs r0, 0x40
ands r0, r1
cmp r0, 0
beq _0813B3C8
movs r0, 0x5
bl PlaySE
movs r0, 0x1
negs r0, r0
bl MoveMenuCursor
b _0813B420
.align 2, 0
_0813B3C4: .4byte gMain
_0813B3C8:
movs r0, 0x80
ands r0, r1
cmp r0, 0
beq _0813B3DE
movs r0, 0x5
bl PlaySE
movs r0, 0x1
bl MoveMenuCursor
b _0813B420
_0813B3DE:
ldrh r1, [r2, 0x2E]
movs r0, 0x1
ands r0, r1
cmp r0, 0
beq _0813B40C
movs r0, 0x5
bl PlaySE
ldr r4, _0813B408 @ =gUnknown_084062F8
bl GetMenuCursorPos
lsls r0, 24
lsrs r0, 21
adds r4, 0x4
adds r0, r4
ldr r1, [r0]
adds r0, r5, 0
bl _call_via_r1
b _0813B420
.align 2, 0
_0813B408: .4byte gUnknown_084062F8
_0813B40C:
movs r0, 0x2
ands r0, r1
cmp r0, 0
beq _0813B420
movs r0, 0x5
bl PlaySE
adds r0, r4, 0
bl Mailbox_Cancel
_0813B420:
pop {r4,r5}
pop {r0}
bx r0
thumb_func_end sub_813B3A0
thumb_func_start Mailbox_Read
Mailbox_Read: @ 813B428
push {r4,lr}
adds r4, r0, 0
lsls r4, 24
lsrs r4, 24
movs r0, 0x1
movs r1, 0
bl fade_screen
ldr r1, _0813B44C @ =gTasks
lsls r0, r4, 2
adds r0, r4
lsls r0, 3
adds r0, r1
ldr r1, _0813B450 @ =sub_813B454
str r1, [r0]
pop {r4}
pop {r0}
bx r0
.align 2, 0
_0813B44C: .4byte gTasks
_0813B450: .4byte sub_813B454
thumb_func_end Mailbox_Read
thumb_func_start sub_813B454
sub_813B454: @ 813B454
push {r4,lr}
lsls r0, 24
lsrs r4, r0, 24
ldr r0, _0813B490 @ =gPaletteFade
ldrb r1, [r0, 0x7]
movs r0, 0x80
ands r0, r1
cmp r0, 0
bne _0813B488
ldr r0, _0813B494 @ =0x0201fe00
ldrb r1, [r0]
adds r1, 0x6
ldrb r0, [r0, 0x2]
adds r1, r0
lsls r0, r1, 3
adds r0, r1
lsls r0, 2
ldr r1, _0813B498 @ =gSaveBlock1 + 0x2B4C
adds r0, r1
ldr r1, _0813B49C @ =sub_813B4F0
movs r2, 0x1
bl HandleReadMail
adds r0, r4, 0
bl DestroyTask
_0813B488:
pop {r4}
pop {r0}
bx r0
.align 2, 0
_0813B490: .4byte gPaletteFade
_0813B494: .4byte 0x0201fe00
_0813B498: .4byte gSaveBlock1 + 0x2B4C
_0813B49C: .4byte sub_813B4F0
thumb_func_end sub_813B454
thumb_func_start sub_813B4A0
sub_813B4A0: @ 813B4A0
push {r4,lr}
lsls r0, 24
lsrs r4, r0, 24
bl sub_807D770
lsls r0, 24
lsrs r0, 24
cmp r0, 0x1
bne _0813B4C0
ldr r0, _0813B4C8 @ =gTasks
lsls r1, r4, 2
adds r1, r4
lsls r1, 3
adds r1, r0
ldr r0, _0813B4CC @ =sub_813B174
str r0, [r1]
_0813B4C0:
pop {r4}
pop {r0}
bx r0
.align 2, 0
_0813B4C8: .4byte gTasks
_0813B4CC: .4byte sub_813B174
thumb_func_end sub_813B4A0
thumb_func_start sub_813B4D0
sub_813B4D0: @ 813B4D0
push {lr}
ldr r0, _0813B4EC @ =sub_813B4A0
movs r1, 0
bl CreateTask
lsls r0, 24
lsrs r0, 24
bl sub_813B108
bl pal_fill_black
pop {r0}
bx r0
.align 2, 0
_0813B4EC: .4byte sub_813B4A0
thumb_func_end sub_813B4D0
thumb_func_start sub_813B4F0
sub_813B4F0: @ 813B4F0
push {lr}
ldr r0, _0813B504 @ =gUnknown_0300485C
ldr r1, _0813B508 @ =sub_813B4D0
str r1, [r0]
ldr r0, _0813B50C @ =c2_exit_to_overworld_2_switch
bl SetMainCallback2
pop {r0}
bx r0
.align 2, 0
_0813B504: .4byte gUnknown_0300485C
_0813B508: .4byte sub_813B4D0
_0813B50C: .4byte c2_exit_to_overworld_2_switch
thumb_func_end sub_813B4F0
thumb_func_start Mailbox_MoveToBag
Mailbox_MoveToBag: @ 813B510
push {r4,lr}
adds r4, r0, 0
lsls r4, 24
lsrs r4, 24
bl sub_8072DEC
ldr r0, _0813B540 @ =gStringVar1
ldr r1, _0813B544 @ =gOtherText_MoveToBag
bl StringCopy
ldr r0, _0813B548 @ =gUnknown_0840633A
movs r1, 0x1
movs r2, 0x3
bl MenuPrint
ldr r1, _0813B54C @ =gOtherText_MessageWillBeLost
ldr r2, _0813B550 @ =sub_813B554
adds r0, r4, 0
movs r3, 0
bl DisplayItemMessageOnField
pop {r4}
pop {r0}
bx r0
.align 2, 0
_0813B540: .4byte gStringVar1
_0813B544: .4byte gOtherText_MoveToBag
_0813B548: .4byte gUnknown_0840633A
_0813B54C: .4byte gOtherText_MessageWillBeLost
_0813B550: .4byte sub_813B554
thumb_func_end Mailbox_MoveToBag
thumb_func_start sub_813B554
sub_813B554: @ 813B554
push {r4,lr}
adds r4, r0, 0
lsls r4, 24
lsrs r4, 24
movs r0, 0x14
movs r1, 0x8
movs r2, 0x1
bl DisplayYesNoMenu
ldr r1, _0813B574 @ =gUnknown_084062E8
adds r0, r4, 0
bl sub_80F914C
pop {r4}
pop {r0}
bx r0
.align 2, 0
_0813B574: .4byte gUnknown_084062E8
thumb_func_end sub_813B554
thumb_func_start sub_813B578
sub_813B578: @ 813B578
push {r4-r6,lr}
lsls r0, 24
lsrs r5, r0, 24
ldr r4, _0813B5BC @ =0x0201fe00
ldrb r0, [r4]
adds r0, 0x6
ldrb r1, [r4, 0x2]
adds r0, r1
lsls r1, r0, 3
adds r1, r0
lsls r1, 2
ldr r0, _0813B5C0 @ =gSaveBlock1 + 0x2B4C
adds r6, r1, r0
movs r0, 0x14
movs r1, 0x8
movs r2, 0x1A
movs r3, 0xD
bl MenuZeroFillWindowRect
ldrh r0, [r6, 0x20]
movs r1, 0x1
bl AddBagItem
lsls r0, 24
cmp r0, 0
bne _0813B5CC
ldr r1, _0813B5C4 @ =gOtherText_BagIsFull
ldr r2, _0813B5C8 @ =sub_813B758
adds r0, r5, 0
movs r3, 0
bl DisplayItemMessageOnField
b _0813B602
.align 2, 0
_0813B5BC: .4byte 0x0201fe00
_0813B5C0: .4byte gSaveBlock1 + 0x2B4C
_0813B5C4: .4byte gOtherText_BagIsFull
_0813B5C8: .4byte sub_813B758
_0813B5CC:
ldr r1, _0813B608 @ =gOtherText_MailWasReturned
ldr r2, _0813B60C @ =sub_813B758
adds r0, r5, 0
movs r3, 0
bl DisplayItemMessageOnField
adds r0, r6, 0
bl ClearMailStruct
bl sub_813AF78
ldrb r0, [r4, 0x3]
subs r0, 0x1
strb r0, [r4, 0x3]
ldrb r1, [r4, 0x3]
ldrb r0, [r4, 0x1]
ldrb r2, [r4, 0x2]
adds r0, r2
cmp r1, r0
bge _0813B5FC
cmp r2, 0
beq _0813B5FC
subs r0, r2, 0x1
strb r0, [r4, 0x2]
_0813B5FC:
adds r0, r5, 0
bl sub_813A240
_0813B602:
pop {r4-r6}
pop {r0}
bx r0
.align 2, 0
_0813B608: .4byte gOtherText_MailWasReturned
_0813B60C: .4byte sub_813B758
thumb_func_end sub_813B578
thumb_func_start sub_813B610
sub_813B610: @ 813B610
push {r4,lr}
adds r4, r0, 0
lsls r4, 24
lsrs r4, 24
movs r0, 0x14
movs r1, 0x8
movs r2, 0x1A
movs r3, 0xD
bl MenuZeroFillWindowRect
adds r0, r4, 0
bl sub_813B758
pop {r4}
pop {r0}
bx r0
thumb_func_end sub_813B610
thumb_func_start Mailbox_Give
Mailbox_Give: @ 813B630
push {r4,lr}
lsls r0, 24
lsrs r4, r0, 24
bl CalculatePlayerPartyCount
lsls r0, 24
cmp r0, 0
bne _0813B648
adds r0, r4, 0
bl sub_813B718
b _0813B65E
_0813B648:
movs r0, 0x1
movs r1, 0
bl fade_screen
ldr r0, _0813B664 @ =gTasks
lsls r1, r4, 2
adds r1, r4
lsls r1, 3
adds r1, r0
ldr r0, _0813B668 @ =sub_813B66C
str r0, [r1]
_0813B65E:
pop {r4}
pop {r0}
bx r0
.align 2, 0
_0813B664: .4byte gTasks
_0813B668: .4byte sub_813B66C
thumb_func_end Mailbox_Give
thumb_func_start sub_813B66C
sub_813B66C: @ 813B66C
push {r4,lr}
lsls r0, 24
lsrs r4, r0, 24
ldr r0, _0813B698 @ =gPaletteFade
ldrb r1, [r0, 0x7]
movs r0, 0x80
ands r0, r1
cmp r0, 0
bne _0813B690
ldr r0, _0813B69C @ =sub_808B020
bl SetMainCallback2
ldr r1, _0813B6A0 @ =gUnknown_02038561
movs r0, 0x3
strb r0, [r1]
adds r0, r4, 0
bl DestroyTask
_0813B690:
pop {r4}
pop {r0}
bx r0
.align 2, 0
_0813B698: .4byte gPaletteFade
_0813B69C: .4byte sub_808B020
_0813B6A0: .4byte gUnknown_02038561
thumb_func_end sub_813B66C
thumb_func_start sub_813B6A4
sub_813B6A4: @ 813B6A4
push {r4-r6,lr}
ldr r0, _0813B6F0 @ =sub_813B4A0
movs r1, 0
bl CreateTask
lsls r0, 24
lsrs r6, r0, 24
ldr r5, _0813B6F4 @ =0x0201fe00
ldrb r4, [r5, 0x3]
bl sub_813AF3C
strb r0, [r5, 0x3]
bl sub_813AF78
ldrb r0, [r5, 0x3]
cmp r4, r0
beq _0813B6DA
ldrb r1, [r5, 0x3]
ldrb r0, [r5, 0x1]
ldrb r2, [r5, 0x2]
adds r0, r2
cmp r1, r0
bge _0813B6DA
cmp r2, 0
beq _0813B6DA
subs r0, r2, 0x1
strb r0, [r5, 0x2]
_0813B6DA:
adds r0, r6, 0
bl sub_813A240
adds r0, r6, 0
bl sub_813B108
bl pal_fill_black
pop {r4-r6}
pop {r0}
bx r0
.align 2, 0
_0813B6F0: .4byte sub_813B4A0
_0813B6F4: .4byte 0x0201fe00
thumb_func_end sub_813B6A4
thumb_func_start sub_813B6F8
sub_813B6F8: @ 813B6F8
push {lr}
ldr r0, _0813B70C @ =gUnknown_0300485C
ldr r1, _0813B710 @ =sub_813B6A4
str r1, [r0]
ldr r0, _0813B714 @ =c2_exit_to_overworld_2_switch
bl SetMainCallback2
pop {r0}
bx r0
.align 2, 0
_0813B70C: .4byte gUnknown_0300485C
_0813B710: .4byte sub_813B6A4
_0813B714: .4byte c2_exit_to_overworld_2_switch
thumb_func_end sub_813B6F8
thumb_func_start sub_813B718
sub_813B718: @ 813B718
push {lr}
lsls r0, 24
lsrs r0, 24
ldr r1, _0813B72C @ =gOtherText_NoPokemon
ldr r2, _0813B730 @ =sub_813B758
movs r3, 0
bl DisplayItemMessageOnField
pop {r0}
bx r0
.align 2, 0
_0813B72C: .4byte gOtherText_NoPokemon
_0813B730: .4byte sub_813B758
thumb_func_end sub_813B718
thumb_func_start Mailbox_Cancel
Mailbox_Cancel: @ 813B734
push {r4,lr}
adds r4, r0, 0
lsls r4, 24
lsrs r4, 24
bl sub_8072DEC
movs r0, 0
movs r1, 0
movs r2, 0xC
movs r3, 0x9
bl MenuZeroFillWindowRect
adds r0, r4, 0
bl sub_813B758
pop {r4}
pop {r0}
bx r0
thumb_func_end Mailbox_Cancel
thumb_func_start sub_813B758
sub_813B758: @ 813B758
push {r4,lr}
adds r4, r0, 0
lsls r4, 24
lsrs r4, 24
adds r0, r4, 0
bl sub_813B108
ldr r1, _0813B77C @ =gTasks
lsls r0, r4, 2
adds r0, r4
lsls r0, 3
adds r0, r1
ldr r1, _0813B780 @ =sub_813B174
str r1, [r0]
pop {r4}
pop {r0}
bx r0
.align 2, 0
_0813B77C: .4byte gTasks
_0813B780: .4byte sub_813B174
thumb_func_end sub_813B758
.align 2, 0 @ Don't pad with nop.