.include "asm/macros.inc"
	.include "constants/constants.inc"

	.syntax unified

	.text
	
	thumb_func_start MainLoop
MainLoop: @ 0x08055E6C
	push {r4, r5, r6, lr}
	bl sub_08055F70
	bl sub_080A3204
	bl sub_0805616C
	bl sub_0807CE90
	bl sub_080560B8
	bl sub_08056208
	ldr r1, _08055EEC @ =gUnk_02000010
	movs r0, #0xc1
	strb r0, [r1, #4]
	bl sub_0804FFE4
	ldr r1, _08055EF0 @ =0x040000D4
	movs r0, #0xa0
	lsls r0, r0, #0x13
	str r0, [r1]
	ldr r0, _08055EF4 @ =gUnk_020176A0
	str r0, [r1, #4]
	ldr r0, _08055EF8 @ =0x84000080
	str r0, [r1, #8]
	ldr r0, [r1, #8]
	movs r0, #1
	bl sub_0804FF84
	bl sub_08056418
	bl sub_080ADD30
	ldr r1, _08055EFC @ =gUnk_03001150
	ldr r0, _08055F00 @ =0x01234567
	str r0, [r1]
	ldr r4, _08055F04 @ =gUnk_03001000
	adds r0, r4, #0
	movs r1, #0x10
	bl sub_0801D630
	movs r0, #0
	bl sub_08056010
	adds r6, r4, #0
_08055EC8:
	bl ReadKeyInput
	bl sub_08055FF4
	cmp r0, #0
	beq _08055ED8
	bl sub_080560A8
_08055ED8:
	ldrb r0, [r6, #1]
	ldr r1, _08055F04 @ =gUnk_03001000
	cmp r0, #0
	beq _08055F08
	cmp r0, #1
	bne _08055F08
	bl sub_08056260
	b _08055F64
	.align 2, 0
_08055EEC: .4byte gUnk_02000010
_08055EF0: .4byte 0x040000D4
_08055EF4: .4byte gUnk_020176A0
_08055EF8: .4byte 0x84000080
_08055EFC: .4byte gUnk_03001150
_08055F00: .4byte 0x01234567
_08055F04: .4byte gUnk_03001000
_08055F08:
	ldrb r0, [r1, #8]
	cmp r0, #0
	beq _08055F22
	ldr r4, _08055F34 @ =gUnk_03001000
	movs r5, #0xff
_08055F12:
	bl VBlankIntrWait
	ldrb r0, [r4, #8]
	subs r0, #1
	strb r0, [r4, #8]
	ands r0, r5
	cmp r0, #0
	bne _08055F12
_08055F22:
	ldr r1, _08055F34 @ =gUnk_03001000
	ldrb r0, [r1, #9]
	cmp r0, #0
	beq _08055F44
	subs r0, #1
	strb r0, [r1, #9]
	ldrb r4, [r1, #0xa]
	b _08055F3C
	.align 2, 0
_08055F34: .4byte gUnk_03001000
_08055F38:
	bl VBlankIntrWait
_08055F3C:
	adds r0, r4, #0
	subs r4, #1
	cmp r0, #0
	bgt _08055F38
_08055F44:
	ldrh r0, [r6, #0xc]
	adds r0, #1
	strh r0, [r6, #0xc]
	ldr r1, _08055F6C @ =gUnk_08100CBC
	ldrb r0, [r6, #2]
	lsls r0, r0, #2
	adds r0, r0, r1
	ldr r0, [r0]
	bl _call_via_r0
	bl sub_08056458
	bl sub_08050154
	bl sub_080A3480
_08055F64:
	bl sub_08016E78
	b _08055EC8
	.align 2, 0
_08055F6C: .4byte gUnk_08100CBC

	thumb_func_start sub_08055F70
sub_08055F70: @ 0x08055F70
	push {lr}
	bl sub_08056020
	movs r0, #0xfe
	bl RegisterRamReset
	movs r1, #0xa0
	lsls r1, r1, #0x13
	ldr r2, _08055FC8 @ =0x00007FFF
	adds r0, r2, #0
	strh r0, [r1]
	ldr r1, _08055FCC @ =0x04000204
	ldr r2, _08055FD0 @ =0x00004014
	adds r0, r2, #0
	strh r0, [r1]
	ldr r2, _08055FD4 @ =0x0003FFD0
	ldr r0, _08055FD8 @ =gUnk_02000030
	adds r1, r2, #0
	bl sub_0801D630
	ldr r0, _08055FDC @ =gUnk_080B2CD8
	ldr r3, _08055FE0 @ =sub_080B197C
	subs r2, r0, r3
	cmp r2, #0
	beq _08055FAA
	ldr r1, _08055FE4 @ =gUnk_030056F0
	adds r0, r3, #0
	bl sub_0801D66C
_08055FAA:
	ldr r0, _08055FE8 @ =gUnk_080B2CD8
	ldr r3, _08055FEC @ =gUnk_080B2CD8
	subs r2, r0, r3
	cmp r2, #0
	beq _08055FBC
	ldr r1, _08055FF0 @ =gUnk_02038560
	adds r0, r3, #0
	bl sub_0801D66C
_08055FBC:
	movs r0, #0
	bl sub_0801DA90
	bl sub_08016B34
	pop {pc}
	.align 2, 0
_08055FC8: .4byte 0x00007FFF
_08055FCC: .4byte 0x04000204
_08055FD0: .4byte 0x00004014
_08055FD4: .4byte 0x0003FFD0
_08055FD8: .4byte gUnk_02000030
_08055FDC: .4byte gUnk_080B2CD8
_08055FE0: .4byte sub_080B197C
_08055FE4: .4byte gUnk_030056F0
_08055FE8: .4byte gUnk_080B2CD8
_08055FEC: .4byte gUnk_080B2CD8
_08055FF0: .4byte gUnk_02038560