mirror of
https://github.com/pret/pmd-sky.git
synced 2026-03-21 17:25:15 -05:00
393 lines
7.3 KiB
ArmAsm
393 lines
7.3 KiB
ArmAsm
.include "asm/macros.inc"
|
|
.include "main_02003328.inc"
|
|
|
|
.text
|
|
|
|
arm_func_start TaskProcBoot
|
|
TaskProcBoot: ; 0x02003328
|
|
stmdb sp!, {r4, r5, r6, r7, r8, sb, sl, fp, lr}
|
|
sub sp, sp, #0xc
|
|
ldr r0, _020035CC ; =_020AF000
|
|
bl sub_02002950
|
|
ldr r0, _020035D0 ; =_020AF028
|
|
bl sub_02002950
|
|
ldr r0, _020035D4 ; =_020AF050
|
|
bl sub_02002950
|
|
ldr r0, _020035D8 ; =_020AEFDC
|
|
bl sub_02002C40
|
|
bl sub_02006D4C
|
|
bl sub_02017D20
|
|
ldr r2, _020035DC ; =_0229B248
|
|
ldr r1, _020035E0 ; =_020AEF7C
|
|
ldr r0, _020035E4 ; =_020AF078
|
|
str r2, [r1, #0x3c]
|
|
ldr r1, _020035E8 ; =_020AEFB4
|
|
mov r2, #0
|
|
bl sub_02002778
|
|
ldr r0, _020035E4 ; =_020AF078
|
|
bl sub_020027E8
|
|
bl OS_InitVAlarm
|
|
ldr r0, _020035EC ; =_0229B220
|
|
bl sub_0207B4A4
|
|
mov r1, #0
|
|
str r1, [sp]
|
|
ldr r0, _020035EC ; =_0229B220
|
|
mov r2, #0x64
|
|
ldr r3, _020035F0 ; =sub_02003754
|
|
bl sub_0207B4B8
|
|
mov r0, #1
|
|
ldr r1, _020035F4 ; =sub_02003704
|
|
bl OS_SetIrqFunction
|
|
mov r0, #1
|
|
bl OS_EnableIrqMask
|
|
bl EnableAllInterrupts
|
|
mov r0, #1
|
|
bl GX_VBlankIntr
|
|
ldr r0, _020035F8 ; =_020AF154
|
|
ldr r1, _020035E0 ; =_020AEF7C
|
|
ldr r2, _020035FC ; =_0229F248
|
|
str r0, [r1, #0x24]
|
|
str r2, [r1, #0x50]
|
|
ldr r1, _02003600 ; =_020AEFC8
|
|
mov r2, #0
|
|
bl sub_02002778
|
|
ldr r0, _020035F8 ; =_020AF154
|
|
bl sub_020027E8
|
|
bl sub_02002580
|
|
ldr r2, _020035E0 ; =_020AEF7C
|
|
mov r1, #0xf
|
|
str r0, [r2, #0x34]
|
|
bl sub_020027F8
|
|
ldr r0, _020035E0 ; =_020AEF7C
|
|
mov r1, #2
|
|
ldr r0, [r0, #0x34]
|
|
bl sub_02002858
|
|
mov sl, #0
|
|
ldr r1, _020035E0 ; =_020AEF7C
|
|
ldr r0, _02003604 ; =_020924D8
|
|
strb sl, [r1, #5]
|
|
bl Debug_Print0
|
|
mov r8, #1
|
|
ldr r4, _020035E0 ; =_020AEF7C
|
|
mov r6, sl
|
|
mov sb, sl
|
|
mov r7, r8
|
|
mov r5, sl
|
|
mov fp, r8
|
|
_0200343C:
|
|
add r0, sp, #4
|
|
mov r1, #0xb
|
|
bl sub_02002628
|
|
ldrb r0, [r4, #7]
|
|
cmp r0, #0
|
|
strneb sb, [r4, #7]
|
|
bne _02003460
|
|
ldr r0, _020035D4 ; =_020AF050
|
|
bl sub_02002A44
|
|
_02003460:
|
|
cmp sl, #0
|
|
beq _020034A8
|
|
ldrb r0, [r4, #6]
|
|
cmp r0, #0
|
|
ldrneb r0, [r4]
|
|
cmpne r0, #0
|
|
beq _020034C8
|
|
ldr r0, _020035CC ; =_020AF000
|
|
strb r8, [r4, #3]
|
|
bl sub_020029A0
|
|
ldr r0, _020035D0 ; =_020AF028
|
|
bl sub_02002A44
|
|
bl sub_02002670
|
|
ldr r0, [r4, #0x10]
|
|
cmp r0, #0
|
|
moveq sl, #0
|
|
bl sub_020026B8
|
|
b _020034C8
|
|
_020034A8:
|
|
bl sub_02002670
|
|
ldr sl, [r4, #0x10]
|
|
bl sub_020026B8
|
|
cmp sl, #0
|
|
beq _020034C8
|
|
ldr r0, _020035D0 ; =_020AF028
|
|
strb r7, [r4, #3]
|
|
bl sub_02002A44
|
|
_020034C8:
|
|
add r0, sp, #4
|
|
bl sub_0200265C
|
|
bl sub_02002670
|
|
ldr r0, [r4, #0x10]
|
|
cmp r0, #0
|
|
movne sl, r0
|
|
cmp sl, #0
|
|
beq _02003518
|
|
ldrb r0, [r4, #3]
|
|
cmp r0, #0
|
|
strneb r6, [r4]
|
|
str sl, [r4, #0x18]
|
|
bl sub_020026B8
|
|
ldr r0, [r4, #0x30]
|
|
add r0, r0, #1
|
|
str r0, [r4, #0x30]
|
|
bl sub_02006098
|
|
blx sl
|
|
strb r0, [r4, #6]
|
|
b _02003530
|
|
_02003518:
|
|
bl sub_020026B8
|
|
bl sub_02003A40
|
|
bl sub_02002670
|
|
str r5, [r4, #0x18]
|
|
strb fp, [r4, #6]
|
|
bl sub_020026B8
|
|
_02003530:
|
|
ldrb r0, [r4, #0xd]
|
|
cmp r0, #0
|
|
beq _02003544
|
|
mov r0, #0
|
|
bl sub_020025F8
|
|
_02003544:
|
|
ldrb r0, [r4, #2]
|
|
cmp r0, #0
|
|
beq _0200343C
|
|
bl sub_02003B5C
|
|
cmp r0, #0
|
|
beq _020035A8
|
|
ldrb r0, [r4, #1]
|
|
cmp r0, #0
|
|
beq _02003584
|
|
mov r0, #0
|
|
mov r1, #0
|
|
strb r0, [r4, #0xb]
|
|
mov r0, #0xc
|
|
mov r2, r1
|
|
bl sub_020820E8
|
|
b _0200343C
|
|
_02003584:
|
|
ldr r0, [r4, #0x14]
|
|
cmp r0, #0
|
|
bne _0200343C
|
|
mov r0, #0
|
|
bl sub_02082420
|
|
cmp r0, #0
|
|
movne r0, #1
|
|
strne r0, [r4, #0x14]
|
|
b _0200343C
|
|
_020035A8:
|
|
ldr r0, [r4, #0x14]
|
|
cmp r0, #0
|
|
beq _0200343C
|
|
mov r0, #1
|
|
bl sub_02082420
|
|
cmp r0, #0
|
|
movne r0, #0
|
|
strne r0, [r4, #0x14]
|
|
b _0200343C
|
|
.align 2, 0
|
|
_020035CC: .word _020AF000
|
|
_020035D0: .word _020AF028
|
|
_020035D4: .word _020AF050
|
|
_020035D8: .word _020AEFDC
|
|
_020035DC: .word _0229B248
|
|
_020035E0: .word _020AEF7C
|
|
_020035E4: .word _020AF078
|
|
_020035E8: .word _020AEFB4
|
|
_020035EC: .word _0229B220
|
|
_020035F0: .word sub_02003754
|
|
_020035F4: .word sub_02003704
|
|
_020035F8: .word _020AF154
|
|
_020035FC: .word _0229F248
|
|
_02003600: .word _020AEFC8
|
|
_02003604: .word _020924D8
|
|
arm_func_end TaskProcBoot
|
|
|
|
arm_func_start EnableAllInterrupts
|
|
EnableAllInterrupts: ; 0x02003608
|
|
ldr r2, _0200361C ; =0x04000208
|
|
mov r1, #1
|
|
ldrh r0, [r2]
|
|
strh r1, [r2]
|
|
bx lr
|
|
.align 2, 0
|
|
_0200361C: .word 0x04000208
|
|
arm_func_end EnableAllInterrupts
|
|
|
|
arm_func_start sub_02003620
|
|
sub_02003620: ; 0x02003620
|
|
stmdb sp!, {r3, r4, r5, r6, r7, r8, sb, sl, fp, lr}
|
|
sub sp, sp, #0x28
|
|
mov r7, #0
|
|
ldr fp, _020036FC ; =_020AF050
|
|
ldr r4, _02003700 ; =_020AEF7C
|
|
add r6, sp, #0
|
|
add r5, sp, #4
|
|
mov r8, #1
|
|
mov sb, r7
|
|
mov sl, r7
|
|
_02003648:
|
|
mov r0, sl
|
|
bl OS_SleepThread
|
|
ldr r0, [r4, #0x28]
|
|
add r0, r0, #1
|
|
str r0, [r4, #0x28]
|
|
ldrb r0, [r4, #0xd]
|
|
cmp r0, #0
|
|
beq _02003674
|
|
mov r0, sb
|
|
bl HaltProcessDisp
|
|
b _02003688
|
|
_02003674:
|
|
ldrb r0, [r4, #0xc]
|
|
cmp r0, #0
|
|
beq _02003688
|
|
mov r0, r8
|
|
bl HaltProcessDisp
|
|
_02003688:
|
|
ldrb r0, [r4, #1]
|
|
cmp r0, #0
|
|
bne _020036AC
|
|
bl sub_02003B5C
|
|
cmp r0, #0
|
|
beq _020036AC
|
|
ldrb r0, [r4, #8]
|
|
cmp r0, #0
|
|
beq _020036E8
|
|
_020036AC:
|
|
bl sub_02006DEC
|
|
bl Rand16Bit
|
|
mov r0, r7
|
|
mov r1, r6
|
|
bl GetHeldButtons
|
|
mov r0, r5
|
|
bl GetReleasedStylus
|
|
ldrh r0, [sp]
|
|
cmp r0, #0
|
|
bne _020036E0
|
|
ldrh r0, [sp, #4]
|
|
tst r0, #1
|
|
beq _020036EC
|
|
_020036E0:
|
|
bl Rand16Bit
|
|
b _020036EC
|
|
_020036E8:
|
|
bl KeyWaitInit
|
|
_020036EC:
|
|
mov r0, fp
|
|
bl sub_020029B8
|
|
bl sub_0201849C
|
|
b _02003648
|
|
.align 2, 0
|
|
_020036FC: .word _020AF050
|
|
_02003700: .word _020AEF7C
|
|
arm_func_end sub_02003620
|
|
|
|
arm_func_start sub_02003704
|
|
sub_02003704: ; 0x02003704
|
|
stmdb sp!, {r3, lr}
|
|
ldr r0, _0200374C ; =OS_IRQTable
|
|
ldr r1, _02003750 ; =_020AEF7C
|
|
add r0, r0, #0x3000
|
|
ldr r2, [r0, #0xff8]
|
|
orr r2, r2, #1
|
|
str r2, [r0, #0xff8]
|
|
ldr r0, [r1, #0x20]
|
|
add r0, r0, #1
|
|
str r0, [r1, #0x20]
|
|
ldrb r0, [r1, #9]
|
|
cmp r0, #0
|
|
beq _02003744
|
|
ldr r0, [r1, #0x34]
|
|
ldr r0, [r0]
|
|
bl OS_WakeupThreadDirect
|
|
_02003744:
|
|
bl sub_020082E0
|
|
ldmia sp!, {r3, pc}
|
|
.align 2, 0
|
|
_0200374C: .word OS_IRQTable
|
|
_02003750: .word _020AEF7C
|
|
arm_func_end sub_02003704
|
|
|
|
arm_func_start sub_02003754
|
|
sub_02003754: ; 0x02003754
|
|
ldr r1, _02003774 ; =_020AEF7C
|
|
ldr r0, _02003778 ; =_020AF078
|
|
ldr r2, [r1, #0x1c]
|
|
ldr ip, _0200377C ; =OS_WakeupThreadDirect
|
|
add r2, r2, #1
|
|
ldr r0, [r0]
|
|
str r2, [r1, #0x1c]
|
|
bx ip
|
|
.align 2, 0
|
|
_02003774: .word _020AEF7C
|
|
_02003778: .word _020AF078
|
|
_0200377C: .word OS_WakeupThreadDirect
|
|
arm_func_end sub_02003754
|
|
|
|
arm_func_start sub_02003780
|
|
sub_02003780: ; 0x02003780
|
|
stmdb sp!, {r3, lr}
|
|
bl sub_02005EAC
|
|
ldr r0, _020037A0 ; =_020AEF7C
|
|
mov r1, #1
|
|
strb r1, [r0]
|
|
bl MainLoop
|
|
bl WaitForever
|
|
ldmia sp!, {r3, pc}
|
|
.align 2, 0
|
|
_020037A0: .word _020AEF7C
|
|
arm_func_end sub_02003780
|
|
|
|
arm_func_start sub_020037A4
|
|
sub_020037A4: ; 0x020037A4
|
|
ldr r0, _020037B0 ; =_020AEF7C
|
|
ldr r0, [r0, #0x28]
|
|
bx lr
|
|
.align 2, 0
|
|
_020037B0: .word _020AEF7C
|
|
arm_func_end sub_020037A4
|
|
|
|
arm_func_start GetTime
|
|
GetTime: ; 0x020037B4
|
|
stmdb sp!, {r3, r4, r5, lr}
|
|
bl DisableAllInterrupts
|
|
ldr r0, _02003818 ; =_020AEF7C
|
|
ldr r1, [r0, #0x1c]
|
|
cmp r1, #0
|
|
bne _020037D8
|
|
bl EnableAllInterrupts
|
|
mov r0, #0
|
|
ldmia sp!, {r3, r4, r5, pc}
|
|
_020037D8:
|
|
ldr r1, _0200381C ; =0x04000006
|
|
ldr r4, [r0, #0x1c]
|
|
ldrh r5, [r1]
|
|
bl EnableAllInterrupts
|
|
mov r0, r4
|
|
bl _fflt
|
|
mov r4, r0
|
|
mov r0, r5
|
|
bl _fflt
|
|
mov r1, r0
|
|
ldr r0, _02003820 ; =0x3B792FB2
|
|
bl _fmul
|
|
mov r1, r0
|
|
mov r0, r4
|
|
bl _fadd
|
|
ldmia sp!, {r3, r4, r5, pc}
|
|
.align 2, 0
|
|
_02003818: .word _020AEF7C
|
|
_0200381C: .word 0x04000006
|
|
_02003820: .word 0x3B792FB2
|
|
arm_func_end GetTime
|
|
|
|
arm_func_start DisableAllInterrupts
|
|
DisableAllInterrupts: ; 0x02003824
|
|
ldr r2, _02003838 ; =0x04000208
|
|
mov r1, #0
|
|
ldrh r0, [r2]
|
|
strh r1, [r2]
|
|
bx lr
|
|
.align 2, 0
|
|
_02003838: .word 0x04000208
|
|
arm_func_end DisableAllInterrupts
|