mirror of
https://github.com/pret/pmd-red.git
synced 2026-04-25 07:28:17 -05:00
614 lines
10 KiB
ArmAsm
614 lines
10 KiB
ArmAsm
#include "asm/constants/gba_constants.inc"
|
|
#include "asm/macros.inc"
|
|
|
|
.syntax unified
|
|
|
|
.text
|
|
|
|
|
|
thumb_func_start sub_803DF60
|
|
sub_803DF60:
|
|
push {r4-r7,lr}
|
|
ldr r0, _0803DFF8
|
|
ldr r1, _0803DFFC
|
|
bl OpenFileAndGetFileDataPtr
|
|
adds r7, r0, 0
|
|
ldr r0, [r7, 0x4]
|
|
ldr r5, [r0]
|
|
ldm r5!, {r4}
|
|
ldr r6, _0803E000
|
|
cmp r4, 0
|
|
beq _0803DF8C
|
|
_0803DF78:
|
|
adds r0, r6, 0
|
|
adds r1, r5, 0
|
|
movs r2, 0x20
|
|
bl CpuCopy
|
|
adds r6, 0x20
|
|
adds r5, 0x20
|
|
subs r4, 0x1
|
|
cmp r4, 0
|
|
bne _0803DF78
|
|
_0803DF8C:
|
|
adds r0, r7, 0
|
|
bl CloseFile
|
|
ldr r0, _0803E004
|
|
ldr r1, _0803DFFC
|
|
bl OpenFileAndGetFileDataPtr
|
|
adds r7, r0, 0
|
|
ldr r5, [r7, 0x4]
|
|
ldm r5!, {r4}
|
|
ldr r6, _0803E008
|
|
cmp r4, 0
|
|
beq _0803DFBA
|
|
_0803DFA6:
|
|
adds r0, r6, 0
|
|
adds r1, r5, 0
|
|
movs r2, 0x20
|
|
bl CpuCopy
|
|
adds r6, 0x20
|
|
adds r5, 0x20
|
|
subs r4, 0x1
|
|
cmp r4, 0
|
|
bne _0803DFA6
|
|
_0803DFBA:
|
|
adds r0, r7, 0
|
|
bl CloseFile
|
|
ldr r0, _0803E00C
|
|
ldr r4, _0803DFFC
|
|
adds r1, r4, 0
|
|
bl OpenFileAndGetFileDataPtr
|
|
ldr r1, _0803E010
|
|
str r0, [r1]
|
|
ldr r0, _0803E014
|
|
adds r1, r4, 0
|
|
bl OpenFileAndGetFileDataPtr
|
|
ldr r1, _0803E018
|
|
str r0, [r1]
|
|
ldr r0, _0803E01C
|
|
adds r1, r4, 0
|
|
bl OpenFileAndGetFileDataPtr
|
|
ldr r1, _0803E020
|
|
str r0, [r1]
|
|
ldr r0, _0803E024
|
|
adds r1, r4, 0
|
|
bl OpenFileAndGetFileDataPtr
|
|
ldr r1, _0803E028
|
|
str r0, [r1]
|
|
pop {r4-r7}
|
|
pop {r0}
|
|
bx r0
|
|
.align 2, 0
|
|
_0803DFF8: .4byte gUnknown_80F61A8
|
|
_0803DFFC: .4byte gDungeonFileArchive
|
|
_0803E000: .4byte 0x06013400
|
|
_0803E004: .4byte gUnknown_80F61B0
|
|
_0803E008: .4byte 0x06014000
|
|
_0803E00C: .4byte gUnknown_80F61B8
|
|
_0803E010: .4byte gUnknown_202EC94
|
|
_0803E014: .4byte gUnknown_80F61C4
|
|
_0803E018: .4byte gUnknown_202EC98
|
|
_0803E01C: .4byte gUnknown_80F61CC
|
|
_0803E020: .4byte gUnknown_202EC9C
|
|
_0803E024: .4byte gUnknown_80F61D4
|
|
_0803E028: .4byte gUnknown_202ECA0
|
|
thumb_func_end sub_803DF60
|
|
|
|
thumb_func_start sub_803E02C
|
|
sub_803E02C:
|
|
push {r4-r7,lr}
|
|
mov r7, r9
|
|
mov r6, r8
|
|
push {r6,r7}
|
|
sub sp, 0xC
|
|
bl sub_803E13C
|
|
mov r1, sp
|
|
ldr r0, _0803E118
|
|
ldm r0!, {r2,r3}
|
|
stm r1!, {r2,r3}
|
|
ldr r1, _0803E11C
|
|
mov r0, sp
|
|
bl OpenFileAndGetFileDataPtr
|
|
adds r7, r0, 0
|
|
ldr r0, [r7, 0x4]
|
|
ldr r5, [r0]
|
|
ldm r5!, {r4}
|
|
ldr r6, _0803E120
|
|
cmp r4, 0
|
|
beq _0803E06C
|
|
_0803E058:
|
|
adds r0, r6, 0
|
|
adds r1, r5, 0
|
|
movs r2, 0x20
|
|
bl CpuCopy
|
|
adds r6, 0x20
|
|
adds r5, 0x20
|
|
subs r4, 0x1
|
|
cmp r4, 0
|
|
bne _0803E058
|
|
_0803E06C:
|
|
ldr r0, _0803E124
|
|
ldr r1, [r7, 0x4]
|
|
ldr r1, [r1, 0x4]
|
|
movs r2, 0x80
|
|
bl CpuCopy
|
|
adds r0, r7, 0
|
|
bl CloseFile
|
|
movs r6, 0x80
|
|
lsls r6, 2
|
|
movs r4, 0
|
|
ldr r0, _0803E128
|
|
mov r9, r0
|
|
ldr r1, _0803E12C
|
|
mov r12, r1
|
|
movs r7, 0
|
|
ldr r2, _0803E130
|
|
mov r8, r2
|
|
_0803E092:
|
|
mov r3, r12
|
|
ldrh r0, [r3]
|
|
lsls r5, r0, 12
|
|
adds r2, r7, 0
|
|
movs r3, 0x8
|
|
_0803E09C:
|
|
mov r0, r9
|
|
ldr r1, [r0]
|
|
add r1, r8
|
|
adds r1, r2
|
|
adds r0, r5, 0
|
|
orrs r0, r6
|
|
strh r0, [r1]
|
|
adds r6, 0x1
|
|
adds r2, 0x2
|
|
subs r3, 0x1
|
|
cmp r3, 0
|
|
bge _0803E09C
|
|
movs r1, 0x2
|
|
add r12, r1
|
|
adds r7, 0x12
|
|
adds r4, 0x1
|
|
cmp r4, 0x1C
|
|
ble _0803E092
|
|
movs r4, 0
|
|
ldr r5, _0803E128
|
|
ldr r3, _0803E134
|
|
movs r2, 0xC0
|
|
lsls r2, 8
|
|
_0803E0CA:
|
|
ldr r0, [r5]
|
|
lsls r1, r4, 1
|
|
adds r0, r3
|
|
adds r0, r1
|
|
strh r2, [r0]
|
|
adds r4, 0x1
|
|
cmp r4, 0x8
|
|
ble _0803E0CA
|
|
movs r4, 0
|
|
ldr r2, _0803E128
|
|
movs r6, 0xBE
|
|
lsls r6, 1
|
|
ldr r5, _0803E138
|
|
movs r3, 0xBF
|
|
lsls r3, 1
|
|
_0803E0E8:
|
|
ldr r0, [r2]
|
|
lsls r1, r4, 2
|
|
adds r0, r1
|
|
adds r0, r6
|
|
strb r4, [r0]
|
|
ldr r0, [r2]
|
|
adds r0, r1
|
|
adds r0, r5
|
|
strb r4, [r0]
|
|
ldr r0, [r2]
|
|
adds r0, r1
|
|
adds r0, r3
|
|
strb r4, [r0]
|
|
adds r4, 0x1
|
|
cmp r4, 0xFF
|
|
ble _0803E0E8
|
|
add sp, 0xC
|
|
pop {r3,r4}
|
|
mov r8, r3
|
|
mov r9, r4
|
|
pop {r4-r7}
|
|
pop {r0}
|
|
bx r0
|
|
.align 2, 0
|
|
_0803E118: .4byte gUnknown_80F61DC
|
|
_0803E11C: .4byte gDungeonFileArchive
|
|
_0803E120: .4byte 0x0600c000
|
|
_0803E124: .4byte gUnknown_202ECA4
|
|
_0803E128: .4byte gDungeon
|
|
_0803E12C: .4byte gUnknown_80F5F70
|
|
_0803E130: .4byte 0x00012a18
|
|
_0803E134: .4byte 0x00013554
|
|
_0803E138: .4byte 0x0000017d
|
|
thumb_func_end sub_803E02C
|
|
|
|
thumb_func_start sub_803E13C
|
|
sub_803E13C:
|
|
push {r4,r5,lr}
|
|
bl SetWindowBGColor
|
|
ldr r0, _0803E170
|
|
ldr r0, [r0]
|
|
ldrb r0, [r0, 0xB]
|
|
ldr r5, _0803E174
|
|
cmp r0, 0
|
|
beq _0803E154
|
|
movs r0, 0x80
|
|
lsls r0, 1
|
|
adds r5, r0
|
|
_0803E154:
|
|
movs r4, 0
|
|
_0803E156:
|
|
adds r0, r4, 0
|
|
adds r0, 0xF0
|
|
adds r1, r5, 0
|
|
bl SetBGPaletteBufferColorArray
|
|
adds r5, 0x4
|
|
adds r4, 0x1
|
|
cmp r4, 0xF
|
|
ble _0803E156
|
|
pop {r4,r5}
|
|
pop {r0}
|
|
bx r0
|
|
.align 2, 0
|
|
_0803E170: .4byte gGameOptionsRef
|
|
_0803E174: .4byte gFontPalette
|
|
thumb_func_end sub_803E13C
|
|
|
|
thumb_func_start sub_803E178
|
|
sub_803E178:
|
|
push {r4,lr}
|
|
bl sub_8043D10
|
|
lsls r0, 24
|
|
lsrs r0, 24
|
|
cmp r0, 0
|
|
bne _0803E1E0
|
|
ldr r0, _0803E1AC
|
|
ldr r2, [r0]
|
|
ldr r3, _0803E1B0
|
|
adds r1, r2, r3
|
|
ldrb r1, [r1]
|
|
adds r3, r0, 0
|
|
cmp r1, 0x15
|
|
bne _0803E1BC
|
|
ldr r1, _0803E1B4
|
|
adds r0, r2, r1
|
|
ldrb r0, [r0]
|
|
cmp r0, 0
|
|
bne _0803E1BC
|
|
ldr r3, _0803E1B8
|
|
adds r1, r2, r3
|
|
movs r0, 0x1C
|
|
strh r0, [r1]
|
|
b _0803E204
|
|
.align 2, 0
|
|
_0803E1AC: .4byte gDungeon
|
|
_0803E1B0: .4byte 0x00000644
|
|
_0803E1B4: .4byte 0x000037fe
|
|
_0803E1B8: .4byte 0x00003a12
|
|
_0803E1BC:
|
|
ldr r4, [r3]
|
|
ldr r1, _0803E1D8
|
|
adds r0, r4, r1
|
|
ldrb r0, [r0]
|
|
bl IsStairDirectionUp
|
|
lsls r0, 24
|
|
movs r1, 0x16
|
|
cmp r0, 0
|
|
beq _0803E1D2
|
|
movs r1, 0x17
|
|
_0803E1D2:
|
|
ldr r2, _0803E1DC
|
|
adds r0, r4, r2
|
|
b _0803E202
|
|
.align 2, 0
|
|
_0803E1D8: .4byte 0x00000644
|
|
_0803E1DC: .4byte 0x00003a12
|
|
_0803E1E0:
|
|
cmp r0, 0x1
|
|
bne _0803E1F8
|
|
ldr r0, _0803E1F0
|
|
ldr r0, [r0]
|
|
ldr r3, _0803E1F4
|
|
adds r0, r3
|
|
movs r1, 0x6
|
|
b _0803E202
|
|
.align 2, 0
|
|
_0803E1F0: .4byte gDungeon
|
|
_0803E1F4: .4byte 0x00003a12
|
|
_0803E1F8:
|
|
ldr r0, _0803E20C
|
|
ldr r0, [r0]
|
|
ldr r1, _0803E210
|
|
adds r0, r1
|
|
movs r1, 0x18
|
|
_0803E202:
|
|
strh r1, [r0]
|
|
_0803E204:
|
|
pop {r4}
|
|
pop {r0}
|
|
bx r0
|
|
.align 2, 0
|
|
_0803E20C: .4byte gDungeon
|
|
_0803E210: .4byte 0x00003a12
|
|
thumb_func_end sub_803E178
|
|
|
|
thumb_func_start sub_803E214
|
|
sub_803E214:
|
|
push {lr}
|
|
ldr r0, _0803E23C
|
|
ldr r0, [r0]
|
|
bl CloseFile
|
|
ldr r0, _0803E240
|
|
ldr r0, [r0]
|
|
bl CloseFile
|
|
ldr r0, _0803E244
|
|
ldr r0, [r0]
|
|
bl CloseFile
|
|
ldr r0, _0803E248
|
|
ldr r0, [r0]
|
|
bl CloseFile
|
|
pop {r0}
|
|
bx r0
|
|
.align 2, 0
|
|
_0803E23C: .4byte gUnknown_202EC94
|
|
_0803E240: .4byte gUnknown_202EC98
|
|
_0803E244: .4byte gUnknown_202EC9C
|
|
_0803E248: .4byte gUnknown_202ECA0
|
|
thumb_func_end sub_803E214
|
|
|
|
thumb_func_start nullsub_56
|
|
nullsub_56:
|
|
bx lr
|
|
thumb_func_end nullsub_56
|
|
|
|
thumb_func_start sub_803E250
|
|
sub_803E250:
|
|
push {r4-r7,lr}
|
|
mov r7, r10
|
|
mov r6, r9
|
|
mov r5, r8
|
|
push {r5-r7}
|
|
sub sp, 0x8
|
|
ldr r1, _0803E3FC
|
|
ldr r0, _0803E400
|
|
str r0, [r1]
|
|
ldr r0, _0803E404
|
|
movs r1, 0
|
|
str r1, [r0]
|
|
ldr r0, _0803E408
|
|
strb r1, [r0]
|
|
ldr r0, _0803E40C
|
|
strh r1, [r0]
|
|
ldr r5, _0803E410
|
|
ldrh r0, [r5, 0x6]
|
|
movs r3, 0xF
|
|
adds r2, r3, 0
|
|
ands r2, r0
|
|
ldrh r4, [r5]
|
|
ldr r1, _0803E414
|
|
adds r0, r1, 0
|
|
ands r0, r4
|
|
ldr r4, _0803E418
|
|
ands r0, r4
|
|
ldr r6, _0803E41C
|
|
ands r0, r6
|
|
ldr r7, _0803E420
|
|
ands r0, r7
|
|
ldr r4, _0803E424
|
|
mov r12, r4
|
|
ands r0, r4
|
|
ldr r4, _0803E428
|
|
ands r0, r4
|
|
strh r0, [r5]
|
|
movs r0, 0x80
|
|
lsls r0, 7
|
|
strh r0, [r5, 0x2]
|
|
movs r0, 0
|
|
strh r0, [r5, 0x4]
|
|
ldr r0, _0803E42C
|
|
mov r10, r0
|
|
ands r2, r0
|
|
subs r0, 0x1
|
|
mov r9, r0
|
|
ands r2, r0
|
|
subs r0, 0x2
|
|
mov r8, r0
|
|
ands r2, r0
|
|
strh r2, [r5, 0x6]
|
|
ldr r2, _0803E430
|
|
ldrh r0, [r2, 0x6]
|
|
ands r3, r0
|
|
ldrh r0, [r2]
|
|
ands r1, r0
|
|
ldr r0, _0803E418
|
|
ands r1, r0
|
|
ands r1, r6
|
|
ands r1, r7
|
|
mov r7, r12
|
|
ands r1, r7
|
|
ands r1, r4
|
|
strh r1, [r2]
|
|
movs r0, 0
|
|
strh r0, [r2, 0x2]
|
|
movs r0, 0xB8
|
|
lsls r0, 7
|
|
strh r0, [r2, 0x4]
|
|
mov r0, r10
|
|
ands r3, r0
|
|
mov r1, r9
|
|
ands r3, r1
|
|
mov r7, r8
|
|
ands r3, r7
|
|
strh r3, [r2, 0x6]
|
|
movs r0, 0
|
|
mov r8, r0
|
|
_0803E2EE:
|
|
movs r1, 0
|
|
mov r9, r1
|
|
mov r2, r8
|
|
lsls r0, r2, 3
|
|
lsls r2, 1
|
|
mov r12, r2
|
|
mov r3, r8
|
|
adds r3, 0x1
|
|
str r3, [sp]
|
|
mov r10, r1
|
|
add r0, r8
|
|
lsls r5, r0, 3
|
|
ldr r4, _0803E434
|
|
adds r4, r5, r4
|
|
str r4, [sp, 0x4]
|
|
ldr r7, _0803E438
|
|
adds r6, r5, r7
|
|
ldr r0, _0803E43C
|
|
adds r3, r5, r0
|
|
ldr r1, _0803E440
|
|
adds r4, r5, r1
|
|
_0803E318:
|
|
mov r7, r10
|
|
adds r2, r5, r7
|
|
ldrh r1, [r3]
|
|
ldr r0, _0803E414
|
|
ands r0, r1
|
|
ldr r1, _0803E418
|
|
ands r0, r1
|
|
ldr r1, _0803E41C
|
|
ands r0, r1
|
|
ldr r1, _0803E420
|
|
ands r0, r1
|
|
ldr r1, _0803E424
|
|
ands r0, r1
|
|
strh r0, [r3]
|
|
ldr r1, [r4]
|
|
movs r7, 0x3
|
|
ands r1, r7
|
|
lsls r1, 14
|
|
ldr r7, _0803E428
|
|
ands r0, r7
|
|
orrs r0, r1
|
|
strh r0, [r3]
|
|
ldrh r1, [r3, 0x2]
|
|
ldr r0, _0803E444
|
|
ands r0, r1
|
|
strh r0, [r3, 0x2]
|
|
ldr r1, _0803E440
|
|
adds r1, 0x4
|
|
adds r2, r1
|
|
ldr r1, [r2]
|
|
movs r2, 0x3
|
|
ands r1, r2
|
|
lsls r1, 14
|
|
ands r0, r7
|
|
orrs r0, r1
|
|
strh r0, [r3, 0x2]
|
|
ldr r1, [r6]
|
|
ldr r0, _0803E448
|
|
ands r1, r0
|
|
ldrh r2, [r3, 0x4]
|
|
movs r0, 0xFC
|
|
lsls r0, 8
|
|
ands r0, r2
|
|
orrs r0, r1
|
|
ldr r7, _0803E41C
|
|
ands r0, r7
|
|
movs r1, 0xC0
|
|
lsls r1, 4
|
|
orrs r0, r1
|
|
movs r2, 0
|
|
orrs r0, r2
|
|
ldr r1, _0803E44C
|
|
ands r0, r1
|
|
strh r0, [r3, 0x4]
|
|
ldrh r1, [r3, 0x6]
|
|
ldr r0, _0803E42C
|
|
ands r0, r1
|
|
ldr r1, _0803E450
|
|
ands r0, r1
|
|
strh r0, [r3, 0x6]
|
|
mov r7, r9
|
|
lsls r1, r7, 2
|
|
mov r0, r12
|
|
add r0, r8
|
|
lsls r0, 3
|
|
adds r1, r0
|
|
ldr r0, _0803E454
|
|
adds r1, r0, r1
|
|
ldr r0, [r1]
|
|
ldr r1, [sp, 0x4]
|
|
str r0, [r1]
|
|
adds r1, 0xC
|
|
str r1, [sp, 0x4]
|
|
adds r6, 0xC
|
|
adds r3, 0xC
|
|
adds r4, 0xC
|
|
movs r2, 0xC
|
|
add r10, r2
|
|
movs r7, 0x1
|
|
add r9, r7
|
|
mov r0, r9
|
|
cmp r0, 0x5
|
|
ble _0803E318
|
|
ldr r1, [sp]
|
|
mov r8, r1
|
|
cmp r1, 0x1
|
|
ble _0803E2EE
|
|
movs r2, 0
|
|
ldr r3, _0803E458
|
|
ldr r0, [r3]
|
|
ldr r4, _0803E45C
|
|
adds r0, r4
|
|
movs r1, 0x1
|
|
strb r1, [r0]
|
|
ldr r0, [r3]
|
|
ldr r7, _0803E460
|
|
adds r0, r7
|
|
strb r1, [r0]
|
|
ldr r0, _0803E464
|
|
str r2, [r0]
|
|
movs r0, 0xF8
|
|
ldr r1, _0803E468
|
|
movs r3, 0
|
|
bl SetBGPaletteBufferColorRGB
|
|
add sp, 0x8
|
|
pop {r3-r5}
|
|
mov r8, r3
|
|
mov r9, r4
|
|
mov r10, r5
|
|
pop {r4-r7}
|
|
pop {r0}
|
|
bx r0
|
|
.align 2, 0
|
|
_0803E3FC: .4byte gUnknown_202EDD0
|
|
_0803E400: .4byte 0x000003e7
|
|
_0803E404: .4byte gUnknown_202EDD4
|
|
_0803E408: .4byte gUnknown_203B40D
|
|
_0803E40C: .4byte gUnknown_202EDE8
|
|
_0803E410: .4byte gUnknown_202EDC0
|
|
_0803E414: .4byte 0x0000feff
|
|
_0803E418: .4byte 0x0000fdff
|
|
_0803E41C: .4byte 0x0000f3ff
|
|
_0803E420: .4byte 0x0000efff
|
|
_0803E424: .4byte 0x0000dfff
|
|
_0803E428: .4byte 0x00003fff
|
|
_0803E42C: .4byte 0x0000fffe
|
|
_0803E430: .4byte gUnknown_202EDB8
|
|
_0803E434: .4byte gUnknown_202ED30
|
|
_0803E438: .4byte gUnknown_80F6224
|
|
_0803E43C: .4byte gUnknown_202ED28
|
|
_0803E440: .4byte gUnknown_80F621C
|
|
_0803E444: .4byte 0x0000c1ff
|
|
_0803E448: .4byte 0x000003ff
|
|
_0803E44C: .4byte 0x00000fff
|
|
_0803E450: .4byte 0x0000fffd
|
|
_0803E454: .4byte gUnknown_80F61EC
|
|
_0803E458: .4byte gDungeon
|
|
_0803E45C: .4byte 0x00018217
|
|
_0803E460: .4byte 0x00018218
|
|
_0803E464: .4byte gUnknown_202EDC8
|
|
_0803E468: .4byte gUnknown_202D058
|
|
thumb_func_end sub_803E250
|