mirror of
https://github.com/SAT-R/sa2.git
synced 2026-10-28 09:43:38 +00:00
* name some engine globals (gSpriteTransform*) * move the whole sa1 directory to the root
453 lines
7.9 KiB
PHP
453 lines
7.9 KiB
PHP
.include "asm/macros.inc"
|
|
.include "constants/constants.inc"
|
|
|
|
.syntax unified
|
|
.text
|
|
push {r4, r5, r6, r7, lr}
|
|
mov r7, sl
|
|
mov r6, sb
|
|
mov r5, r8
|
|
push {r5, r6, r7}
|
|
sub sp, #0x2c
|
|
ldr r4, [sp, #0x4c]
|
|
ldr r5, [sp, #0x50]
|
|
mov sb, r5
|
|
ldr r5, [sp, #0x54]
|
|
ldr r6, [sp, #0x58]
|
|
ldr r7, [sp, #0x5c]
|
|
mov r8, r7
|
|
lsls r0, r0, #0x18
|
|
lsrs r0, r0, #0x18
|
|
str r0, [sp]
|
|
lsls r1, r1, #0x10
|
|
lsrs r1, r1, #0x10
|
|
mov ip, r1
|
|
lsls r2, r2, #0x10
|
|
lsrs r2, r2, #0x10
|
|
str r2, [sp, #4]
|
|
lsls r3, r3, #0x18
|
|
lsrs r3, r3, #0x18
|
|
mov sl, r3
|
|
lsls r4, r4, #0x18
|
|
lsrs r4, r4, #0x18
|
|
str r4, [sp, #8]
|
|
mov r0, sb
|
|
lsls r0, r0, #0x10
|
|
lsls r5, r5, #0x10
|
|
lsrs r5, r5, #0x10
|
|
str r5, [sp, #0xc]
|
|
lsls r6, r6, #0x18
|
|
lsrs r6, r6, #0x18
|
|
mov r1, r8
|
|
lsls r1, r1, #0x10
|
|
lsrs r1, r1, #0x10
|
|
str r1, [sp, #0x10]
|
|
movs r2, #1
|
|
str r2, [sp, #0x14]
|
|
lsrs r5, r0, #0x10
|
|
asrs r2, r0, #0x10
|
|
cmp r2, #0
|
|
beq _sa2_08005CB6
|
|
movs r0, #0x80
|
|
lsls r0, r0, #1
|
|
cmp r2, r0
|
|
bne _sa2_08005CC8
|
|
_sa2_08005CB6:
|
|
ldr r0, _sa2_08005CC4 @ =gFlags
|
|
ldr r1, [r0]
|
|
movs r2, #5
|
|
rsbs r2, r2, #0
|
|
ands r1, r2
|
|
str r1, [r0]
|
|
b _sa2_08005F9E
|
|
.align 2, 0
|
|
_sa2_08005CC4: .4byte gFlags
|
|
_sa2_08005CC8:
|
|
ldr r3, [sp, #0xc]
|
|
mov r4, ip
|
|
subs r0, r3, r4
|
|
lsls r0, r0, #0x10
|
|
lsrs r1, r0, #0x10
|
|
ldr r7, [sp, #4]
|
|
subs r0, r7, r3
|
|
lsls r0, r0, #0x10
|
|
lsrs r3, r0, #0x10
|
|
cmp r2, #0
|
|
bge _sa2_08005D08
|
|
movs r0, #0xff
|
|
str r0, [sp, #0x14]
|
|
rsbs r0, r2, #0
|
|
lsls r0, r0, #0x10
|
|
lsrs r5, r0, #0x10
|
|
ldr r2, [sp, #0xc]
|
|
adds r0, r2, r1
|
|
lsls r0, r0, #0x10
|
|
lsrs r0, r0, #0x10
|
|
str r0, [sp, #4]
|
|
subs r0, r2, r3
|
|
lsls r0, r0, #0x10
|
|
lsrs r0, r0, #0x10
|
|
mov ip, r0
|
|
eors r1, r3
|
|
lsls r1, r1, #0x10
|
|
lsrs r0, r1, #0x10
|
|
eors r3, r0
|
|
lsls r0, r3, #0x10
|
|
eors r0, r1
|
|
lsrs r1, r0, #0x10
|
|
_sa2_08005D08:
|
|
lsls r0, r1, #0x10
|
|
asrs r4, r0, #0x10
|
|
lsls r1, r5, #0x10
|
|
asrs r7, r1, #0x10
|
|
adds r0, r4, #0
|
|
muls r0, r7, r0
|
|
asrs r0, r0, #8
|
|
mov r5, sl
|
|
subs r2, r6, r5
|
|
str r1, [sp, #0x20]
|
|
lsls r3, r3, #0x10
|
|
mov r8, r3
|
|
ldr r1, [sp, #8]
|
|
subs r1, r1, r6
|
|
str r1, [sp, #0x28]
|
|
ldr r3, [sp]
|
|
lsls r3, r3, #2
|
|
str r3, [sp, #0x1c]
|
|
ldr r5, [sp, #0x14]
|
|
lsls r5, r5, #0x18
|
|
str r5, [sp, #0x24]
|
|
cmp r0, r2
|
|
bge _sa2_08005D7C
|
|
mov r3, sl
|
|
lsls r0, r7, #8
|
|
muls r0, r4, r0
|
|
lsls r0, r0, #8
|
|
asrs r0, r0, #0x18
|
|
subs r0, r6, r0
|
|
lsls r0, r0, #0x18
|
|
lsrs r0, r0, #0x18
|
|
mov sl, r0
|
|
lsls r1, r3, #2
|
|
ldr r7, _sa2_08005E28 @ =gBgOffsetsHBlankPrimary
|
|
ldr r0, [r7]
|
|
adds r4, r0, r1
|
|
mov r0, ip
|
|
subs r5, r0, r3
|
|
ldr r1, _sa2_08005E2C @ =0x000001FF
|
|
adds r0, r1, #0
|
|
ands r5, r0
|
|
cmp r3, sl
|
|
bhs _sa2_08005D7C
|
|
_sa2_08005D5E:
|
|
mov r2, sp
|
|
ldrh r2, [r2, #0x10]
|
|
strh r2, [r4]
|
|
adds r4, #2
|
|
adds r0, r5, #0
|
|
subs r1, r0, #1
|
|
lsls r1, r1, #0x10
|
|
lsrs r5, r1, #0x10
|
|
strh r0, [r4]
|
|
adds r4, #2
|
|
adds r0, r3, #1
|
|
lsls r0, r0, #0x18
|
|
lsrs r3, r0, #0x18
|
|
cmp r3, sl
|
|
blo _sa2_08005D5E
|
|
_sa2_08005D7C:
|
|
mov r3, r8
|
|
asrs r2, r3, #0x10
|
|
ldr r4, [sp, #0x20]
|
|
asrs r1, r4, #0x10
|
|
adds r0, r2, #0
|
|
muls r0, r1, r0
|
|
asrs r0, r0, #8
|
|
mov r5, sl
|
|
subs r5, r6, r5
|
|
mov r8, r5
|
|
mov r7, sl
|
|
lsls r7, r7, #2
|
|
mov sb, r7
|
|
ldr r3, [sp, #0x28]
|
|
cmp r0, r3
|
|
bge _sa2_08005DE4
|
|
ldr r7, [sp, #8]
|
|
lsls r0, r1, #8
|
|
muls r0, r2, r0
|
|
lsls r0, r0, #8
|
|
asrs r0, r0, #0x18
|
|
adds r0, r6, r0
|
|
lsls r0, r0, #0x18
|
|
lsrs r0, r0, #0x18
|
|
str r0, [sp, #8]
|
|
adds r3, r0, #0
|
|
lsls r1, r0, #2
|
|
ldr r4, _sa2_08005E28 @ =gBgOffsetsHBlankPrimary
|
|
ldr r0, [r4]
|
|
adds r4, r0, r1
|
|
ldr r0, [sp, #4]
|
|
subs r5, r0, r3
|
|
ldr r1, _sa2_08005E2C @ =0x000001FF
|
|
adds r0, r1, #0
|
|
ands r5, r0
|
|
cmp r3, r7
|
|
bhs _sa2_08005DE4
|
|
_sa2_08005DC6:
|
|
mov r2, sp
|
|
ldrh r2, [r2, #0x10]
|
|
strh r2, [r4]
|
|
adds r4, #2
|
|
adds r0, r5, #0
|
|
subs r1, r0, #1
|
|
lsls r1, r1, #0x10
|
|
lsrs r5, r1, #0x10
|
|
strh r0, [r4]
|
|
adds r4, #2
|
|
adds r0, r3, #1
|
|
lsls r0, r0, #0x18
|
|
lsrs r3, r0, #0x18
|
|
cmp r3, r7
|
|
blo _sa2_08005DC6
|
|
_sa2_08005DE4:
|
|
ldr r3, _sa2_08005E30 @ =gFlags
|
|
ldr r0, [r3]
|
|
movs r1, #4
|
|
orrs r0, r1
|
|
str r0, [r3]
|
|
ldr r4, [sp, #0x1c]
|
|
ldr r5, _sa2_08005E34 @ =0x04000010
|
|
adds r0, r4, r5
|
|
ldr r7, _sa2_08005E38 @ =gHBlankCopyTarget
|
|
str r0, [r7]
|
|
ldr r0, _sa2_08005E3C @ =gHBlankCopySize
|
|
strb r1, [r0]
|
|
ldr r1, _sa2_08005E28 @ =gBgOffsetsHBlankPrimary
|
|
ldr r0, [r1]
|
|
mov r2, sb
|
|
adds r4, r0, r2
|
|
mov r3, r8
|
|
lsls r6, r3, #8
|
|
lsls r0, r3, #0x10
|
|
ldr r5, [sp, #0x20]
|
|
asrs r1, r5, #0x10
|
|
bl __divsi3
|
|
asrs r2, r0, #8
|
|
ldr r7, [sp, #0x24]
|
|
asrs r1, r7, #0x18
|
|
movs r0, #1
|
|
rsbs r0, r0, #0
|
|
cmp r1, r0
|
|
beq _sa2_08005E40
|
|
ldr r1, [sp, #0xc]
|
|
subs r0, r1, r2
|
|
b _sa2_08005E44
|
|
.align 2, 0
|
|
_sa2_08005E28: .4byte gBgOffsetsHBlankPrimary
|
|
_sa2_08005E2C: .4byte 0x000001FF
|
|
_sa2_08005E30: .4byte gFlags
|
|
_sa2_08005E34: .4byte 0x04000010
|
|
_sa2_08005E38: .4byte gHBlankCopyTarget
|
|
_sa2_08005E3C: .4byte gHBlankCopySize
|
|
_sa2_08005E40:
|
|
ldr r1, [sp, #0xc]
|
|
adds r0, r1, r2
|
|
_sa2_08005E44:
|
|
mov r3, sl
|
|
subs r5, r0, r3
|
|
ldr r7, _sa2_08005EEC @ =0x000001FF
|
|
adds r0, r7, #0
|
|
ands r5, r0
|
|
ldr r0, [sp, #0x20]
|
|
asrs r7, r0, #0x10
|
|
adds r0, r2, #0
|
|
muls r0, r7, r0
|
|
subs r0, r6, r0
|
|
lsls r0, r0, #0x10
|
|
lsrs r6, r0, #0x10
|
|
asrs r1, r0, #0x10
|
|
cmp r1, #0
|
|
beq _sa2_08005E72
|
|
ldr r2, [sp, #0x24]
|
|
asrs r0, r2, #0x18
|
|
subs r0, r5, r0
|
|
lsls r0, r0, #0x10
|
|
lsrs r5, r0, #0x10
|
|
subs r0, r7, r1
|
|
lsls r0, r0, #0x10
|
|
lsrs r6, r0, #0x10
|
|
_sa2_08005E72:
|
|
movs r3, #0x80
|
|
lsls r3, r3, #1
|
|
mov r8, r3
|
|
cmp r7, r8
|
|
ble _sa2_08005EF0
|
|
mov r3, sl
|
|
ldr r0, [sp, #8]
|
|
cmp r3, r0
|
|
blo _sa2_08005E86
|
|
b _sa2_08005F9E
|
|
_sa2_08005E86:
|
|
ldr r1, [sp, #0x20]
|
|
mov sl, r1
|
|
mov sb, r7
|
|
ldr r2, _sa2_08005EEC @ =0x000001FF
|
|
mov ip, r2
|
|
_sa2_08005E90:
|
|
mov r7, sp
|
|
ldrh r7, [r7, #0x10]
|
|
strh r7, [r4]
|
|
adds r4, #2
|
|
strh r5, [r4]
|
|
adds r4, #2
|
|
subs r0, r5, #1
|
|
lsls r0, r0, #0x10
|
|
lsrs r5, r0, #0x10
|
|
lsls r0, r6, #0x10
|
|
asrs r0, r0, #0x10
|
|
movs r1, #0x80
|
|
lsls r1, r1, #1
|
|
adds r0, r0, r1
|
|
lsls r0, r0, #0x10
|
|
lsrs r6, r0, #0x10
|
|
lsls r2, r6, #0x10
|
|
asrs r0, r2, #0x10
|
|
mov r7, sl
|
|
adds r3, #1
|
|
mov r8, r3
|
|
cmp r0, sb
|
|
ble _sa2_08005EDA
|
|
ldr r0, [sp, #0x24]
|
|
asrs r3, r0, #0x18
|
|
_sa2_08005EC2:
|
|
adds r0, r5, r3
|
|
lsls r0, r0, #0x10
|
|
lsrs r5, r0, #0x10
|
|
asrs r0, r2, #0x10
|
|
asrs r1, r7, #0x10
|
|
subs r0, r0, r1
|
|
lsls r0, r0, #0x10
|
|
lsrs r6, r0, #0x10
|
|
lsls r2, r6, #0x10
|
|
asrs r0, r2, #0x10
|
|
cmp r0, r1
|
|
bgt _sa2_08005EC2
|
|
_sa2_08005EDA:
|
|
mov r1, ip
|
|
ands r5, r1
|
|
mov r2, r8
|
|
lsls r0, r2, #0x18
|
|
lsrs r3, r0, #0x18
|
|
ldr r7, [sp, #8]
|
|
cmp r3, r7
|
|
blo _sa2_08005E90
|
|
b _sa2_08005F9E
|
|
.align 2, 0
|
|
_sa2_08005EEC: .4byte 0x000001FF
|
|
_sa2_08005EF0:
|
|
movs r0, #0x80
|
|
lsls r0, r0, #9
|
|
adds r1, r7, #0
|
|
bl __udivsi3
|
|
lsrs r0, r0, #8
|
|
movs r1, #0xff
|
|
ands r0, r1
|
|
adds r1, r0, #0
|
|
muls r1, r7, r1
|
|
mov r2, r8
|
|
subs r1, r2, r1
|
|
lsls r1, r1, #0x10
|
|
lsrs r2, r1, #0x10
|
|
subs r0, #1
|
|
lsls r0, r0, #0x10
|
|
lsrs r0, r0, #0x10
|
|
mov sb, r0
|
|
ldr r3, [sp, #0x24]
|
|
asrs r1, r3, #0x18
|
|
movs r0, #1
|
|
rsbs r0, r0, #0
|
|
cmp r1, r0
|
|
bne _sa2_08005F30
|
|
mov r1, sb
|
|
lsls r0, r1, #0x10
|
|
movs r3, #0x80
|
|
lsls r3, r3, #0xa
|
|
adds r0, r0, r3
|
|
rsbs r0, r0, #0
|
|
lsrs r0, r0, #0x10
|
|
mov sb, r0
|
|
_sa2_08005F30:
|
|
mov r3, sl
|
|
ldr r0, [sp, #8]
|
|
cmp r3, r0
|
|
bhs _sa2_08005F9E
|
|
lsls r0, r2, #0x10
|
|
asrs r0, r0, #0x10
|
|
str r0, [sp, #0x18]
|
|
ldr r1, [sp, #0x20]
|
|
mov ip, r1
|
|
mov sl, r7
|
|
_sa2_08005F44:
|
|
mov r2, sp
|
|
ldrh r2, [r2, #0x10]
|
|
strh r2, [r4]
|
|
adds r4, #2
|
|
strh r5, [r4]
|
|
adds r4, #2
|
|
mov r7, sb
|
|
adds r0, r5, r7
|
|
lsls r0, r0, #0x10
|
|
lsrs r5, r0, #0x10
|
|
lsls r0, r6, #0x10
|
|
asrs r0, r0, #0x10
|
|
ldr r1, [sp, #0x18]
|
|
adds r0, r0, r1
|
|
lsls r0, r0, #0x10
|
|
lsrs r6, r0, #0x10
|
|
lsls r2, r6, #0x10
|
|
asrs r0, r2, #0x10
|
|
mov r7, ip
|
|
adds r3, #1
|
|
mov r8, r3
|
|
cmp r0, sl
|
|
ble _sa2_08005F8E
|
|
ldr r0, [sp, #0x24]
|
|
asrs r3, r0, #0x18
|
|
_sa2_08005F76:
|
|
adds r0, r5, r3
|
|
lsls r0, r0, #0x10
|
|
lsrs r5, r0, #0x10
|
|
asrs r0, r2, #0x10
|
|
asrs r1, r7, #0x10
|
|
subs r0, r0, r1
|
|
lsls r0, r0, #0x10
|
|
lsrs r6, r0, #0x10
|
|
lsls r2, r6, #0x10
|
|
asrs r0, r2, #0x10
|
|
cmp r0, r1
|
|
bgt _sa2_08005F76
|
|
_sa2_08005F8E:
|
|
ldr r1, _sa2_08005FB0 @ =0x000001FF
|
|
ands r5, r1
|
|
mov r2, r8
|
|
lsls r0, r2, #0x18
|
|
lsrs r3, r0, #0x18
|
|
ldr r7, [sp, #8]
|
|
cmp r3, r7
|
|
blo _sa2_08005F44
|
|
_sa2_08005F9E:
|
|
add sp, #0x2c
|
|
pop {r3, r4, r5}
|
|
mov r8, r3
|
|
mov sb, r4
|
|
mov sl, r5
|
|
pop {r4, r5, r6, r7}
|
|
pop {r0}
|
|
bx r0
|
|
.align 2, 0
|
|
_sa2_08005FB0: .4byte 0x000001FF
|
|
|
|
@ Unused
|
|
|
|
.syntax divided
|