1 files changed, 119 insertions, 0 deletions
diff --git a/berry_fix/asm/loader.s b/berry_fix/asm/loader.s
new file mode 100644
index 000000000..39e0b768a
--- /dev/null
+++ b/berry_fix/asm/loader.s
@@ -0,0 +1,119 @@
+	.include "../asm/macros/asm.inc"
+	.include "../asm/macros/function.inc"
+	.include "../constants/gba_constants.inc"
+
+	.set SIO_ERROR,      0x0040
+	.set SIO_MULTI_BUSY, 0x0080
+
+	.set EWRAM_ORIG, 0x02000000
+	.set gCode,  0x02010000
+	.set PROG_ORIG,  0x00008000
+
+	.syntax unified
+
+	.text
+
+	arm_func_start _start
+_start: @ 0
+	b _entry
+	arm_func_end _start
+
+	.include "asm/berry_fix_header.inc"
+
+@ C0
+	.word 0
+
+	.global _GPIOPortData
+_GPIOPortData: @ C4
+	.2byte 0
+
+	.global _GPIOPortDirection
+_GPIOPortDirection: @ C6
+	.2byte 0
+
+	.global _GPIOPortReadEnable
+_GPIOPortReadEnable: @ C8
+	.2byte 0
+
+@ CA
+	.2byte 0
+
+@ CC
+	.space 0x34
+
+	arm_func_start _entry
+_entry: @ 100
+	b _send
+	arm_func_end _entry
+
+	.space 0x1C
+
+	arm_func_start _recv
+_recv:
+	@ Waits until link cable is no longer busy.
+	@ Returns nz if an error has occurred
+	@ Otherwise, returns the received short in r1.
+	@ Preserves r0
+_120:
+	ldrh r1, [r0, 0x8] @ SIOCNT
+	tst r1, SIO_MULTI_BUSY
+	beq _120
+_12c:
+	ldrh r1, [r0, 0x8] @ SIOCNT
+	tst r1, SIO_MULTI_BUSY
+	bne _12c
+	ldrh r1, [r0, 0x8] @ SIOCNT
+	tst r1, SIO_ERROR
+	bxne lr
+	ldrh r1, [r0] @ SIOMULTI0
+	bx lr
+	arm_func_end _recv
+
+	arm_func_start _send
+_send: @ 14c
+	ldr r0, =REG_SIOMULTI0
+_150:
+	bl _recv
+	bne _150
+	mov r2, 0
+	strh r2, [r0, 0xa] @ SIOMLT_SEND
+	cmp r1, 0
+	bne _150
+	mov r2, 0x8000
+_16c:
+	mov r1, 0
+_170:
+	strh r1, [r0, 0xa] @ SIOMLT_SEND
+	bl _recv
+	bne _150
+	cmp r1, r2
+	bne _16c
+	lsr r2, 5
+	cmp r1, 0
+	bne _170
+	ldr r3, =BerryFixMBHeaderGameCode
+	ldrh r2, [r3]
+	strh r2, [r0, 0xa] @ SIOMLT_SEND
+	bl _recv
+_1a0:
+	bne _1a0
+	cmp r1, r2
+	bne _1a0
+	ldrh r2, [r3, 0x2]
+	strh r2, [r0, 0xa] @ SIOMLT_SEND
+	bl _recv
+	bne _1a0
+	cmp r1, r2
+	bne _1a0
+	mov r1, 0
+	strh r1, [r0, 0xa] @ SIOMLT_SEND
+	ldr r0, =_data_2f0
+	ldr r1, =gCode
+	swi 0x11 << 16
+	ldr lr, =gCode
+	bx lr
+	.pool
+	arm_func_end _send
+	@ 1f0
+
+	.align 2, 0 @ don't pad with nop