mirror of https://github.com/zeldaret/tmc.git
				
				
				
			
		
			
				
	
	
		
			205 lines
		
	
	
		
			3.3 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
			
		
		
	
	
			205 lines
		
	
	
		
			3.3 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
	.include "asm/macros.inc"
 | 
						|
 | 
						|
	.include "constants/constants.inc"
 | 
						|
 | 
						|
	.syntax unified
 | 
						|
 | 
						|
	.text
 | 
						|
 | 
						|
	thumb_func_start sub_0801C6B0
 | 
						|
sub_0801C6B0: @ 0x0801C6B0
 | 
						|
	push {r4, r5, r6, r7, lr}
 | 
						|
	mov r7, r8
 | 
						|
	push {r7}
 | 
						|
	ldr r2, _0801C6CC @ =gUnk_0200AF00
 | 
						|
	ldrb r1, [r2, #1]
 | 
						|
	movs r0, #0x10
 | 
						|
	ands r0, r1
 | 
						|
	cmp r0, #0
 | 
						|
	beq _0801C6D0
 | 
						|
	bl sub_0801C824
 | 
						|
	bl sub_0801C66C
 | 
						|
	b _0801C802
 | 
						|
	.align 2, 0
 | 
						|
_0801C6CC: .4byte gUnk_0200AF00
 | 
						|
_0801C6D0:
 | 
						|
	ldr r5, _0801C6F8 @ =gSave
 | 
						|
	adds r0, r5, #0
 | 
						|
	adds r0, #0xab
 | 
						|
	ldrb r0, [r0]
 | 
						|
	lsrs r4, r0, #1
 | 
						|
	ldrb r0, [r2, #4]
 | 
						|
	cmp r4, r0
 | 
						|
	beq _0801C6EA
 | 
						|
	strb r4, [r2, #4]
 | 
						|
	bl sub_0801C824
 | 
						|
	bl sub_0801C66C
 | 
						|
_0801C6EA:
 | 
						|
	adds r1, r5, #0
 | 
						|
	adds r1, #0xaa
 | 
						|
	ldrb r0, [r1]
 | 
						|
	cmp r0, #1
 | 
						|
	beq _0801C6FC
 | 
						|
	lsrs r1, r0, #1
 | 
						|
	b _0801C6FE
 | 
						|
	.align 2, 0
 | 
						|
_0801C6F8: .4byte gSave
 | 
						|
_0801C6FC:
 | 
						|
	movs r1, #1
 | 
						|
_0801C6FE:
 | 
						|
	cmp r1, r4
 | 
						|
	ble _0801C704
 | 
						|
	adds r1, r4, #0
 | 
						|
_0801C704:
 | 
						|
	movs r4, #0
 | 
						|
	ldr r0, _0801C748 @ =gUnk_0200AF00
 | 
						|
	ldrb r2, [r0, #3]
 | 
						|
	adds r7, r0, #0
 | 
						|
	cmp r1, r2
 | 
						|
	beq _0801C718
 | 
						|
	movs r4, #1
 | 
						|
	cmp r1, r2
 | 
						|
	ble _0801C718
 | 
						|
	movs r4, #2
 | 
						|
_0801C718:
 | 
						|
	cmp r4, #1
 | 
						|
	beq _0801C750
 | 
						|
	cmp r4, #2
 | 
						|
	bne _0801C756
 | 
						|
	ldrb r0, [r7, #5]
 | 
						|
	adds r1, r0, #1
 | 
						|
	strb r1, [r7, #5]
 | 
						|
	lsls r0, r0, #0x18
 | 
						|
	lsrs r1, r0, #0x18
 | 
						|
	movs r0, #1
 | 
						|
	ands r0, r1
 | 
						|
	cmp r0, #0
 | 
						|
	bne _0801C74C
 | 
						|
	movs r0, #7
 | 
						|
	ands r1, r0
 | 
						|
	cmp r1, #0
 | 
						|
	bne _0801C740
 | 
						|
	movs r0, #0x71
 | 
						|
	bl PlaySFX
 | 
						|
_0801C740:
 | 
						|
	ldrb r0, [r7, #3]
 | 
						|
	adds r0, #1
 | 
						|
	strb r0, [r7, #3]
 | 
						|
	b _0801C75A
 | 
						|
	.align 2, 0
 | 
						|
_0801C748: .4byte gUnk_0200AF00
 | 
						|
_0801C74C:
 | 
						|
	movs r4, #0
 | 
						|
	b _0801C75A
 | 
						|
_0801C750:
 | 
						|
	ldrb r0, [r7, #3]
 | 
						|
	subs r0, #1
 | 
						|
	strb r0, [r7, #3]
 | 
						|
_0801C756:
 | 
						|
	movs r0, #0
 | 
						|
	strb r0, [r7, #5]
 | 
						|
_0801C75A:
 | 
						|
	ldrb r0, [r7, #2]
 | 
						|
	cmp r0, #0
 | 
						|
	beq _0801C764
 | 
						|
	cmp r4, #0
 | 
						|
	beq _0801C802
 | 
						|
_0801C764:
 | 
						|
	movs r0, #2
 | 
						|
	strb r0, [r7, #2]
 | 
						|
	ldrb r0, [r7, #3]
 | 
						|
	lsrs r3, r0, #2
 | 
						|
	cmp r3, #0xa
 | 
						|
	ble _0801C77A
 | 
						|
	movs r1, #0xa
 | 
						|
	mov r8, r1
 | 
						|
	adds r6, r3, #0
 | 
						|
	subs r6, #0xa
 | 
						|
	b _0801C77E
 | 
						|
_0801C77A:
 | 
						|
	mov r8, r3
 | 
						|
	movs r6, #0
 | 
						|
_0801C77E:
 | 
						|
	ldrb r0, [r7, #4]
 | 
						|
	lsrs r4, r0, #2
 | 
						|
	adds r1, r4, #0
 | 
						|
	cmp r4, #0xa
 | 
						|
	ble _0801C78A
 | 
						|
	movs r4, #0xa
 | 
						|
_0801C78A:
 | 
						|
	adds r2, r1, #0
 | 
						|
	subs r2, #0xa
 | 
						|
	ldr r0, _0801C808 @ =gUnk_080C8F2C
 | 
						|
	mov ip, r0
 | 
						|
	cmp r2, #0
 | 
						|
	ble _0801C7B8
 | 
						|
	ldr r5, _0801C80C @ =gUnk_02034D30
 | 
						|
	ldr r1, _0801C810 @ =0x0000F010
 | 
						|
	adds r0, r1, #0
 | 
						|
	strh r0, [r5]
 | 
						|
	ldr r1, _0801C814 @ =0x040000D4
 | 
						|
	movs r0, #0xa
 | 
						|
	subs r0, r0, r6
 | 
						|
	lsls r0, r0, #1
 | 
						|
	add r0, ip
 | 
						|
	str r0, [r1]
 | 
						|
	adds r0, r5, #2
 | 
						|
	str r0, [r1, #4]
 | 
						|
	movs r0, #0x80
 | 
						|
	lsls r0, r0, #0x18
 | 
						|
	orrs r2, r0
 | 
						|
	str r2, [r1, #8]
 | 
						|
	ldr r0, [r1, #8]
 | 
						|
_0801C7B8:
 | 
						|
	ldr r5, _0801C818 @ =gUnk_02034CF0
 | 
						|
	ldr r2, _0801C810 @ =0x0000F010
 | 
						|
	adds r0, r2, #0
 | 
						|
	strh r0, [r5]
 | 
						|
	ldr r1, _0801C814 @ =0x040000D4
 | 
						|
	movs r0, #0xa
 | 
						|
	mov r2, r8
 | 
						|
	subs r0, r0, r2
 | 
						|
	lsls r0, r0, #1
 | 
						|
	add r0, ip
 | 
						|
	str r0, [r1]
 | 
						|
	adds r0, r5, #2
 | 
						|
	str r0, [r1, #4]
 | 
						|
	movs r0, #0x80
 | 
						|
	lsls r0, r0, #0x18
 | 
						|
	orrs r4, r0
 | 
						|
	str r4, [r1, #8]
 | 
						|
	ldr r0, [r1, #8]
 | 
						|
	ldrb r0, [r7, #3]
 | 
						|
	movs r1, #3
 | 
						|
	ands r1, r0
 | 
						|
	cmp r1, #0
 | 
						|
	beq _0801C7FC
 | 
						|
	cmp r3, #9
 | 
						|
	ble _0801C7EE
 | 
						|
	subs r3, #0xa
 | 
						|
	adds r5, #0x40
 | 
						|
_0801C7EE:
 | 
						|
	lsls r0, r3, #1
 | 
						|
	adds r0, r0, r5
 | 
						|
	adds r1, #0x11
 | 
						|
	ldr r3, _0801C81C @ =0xFFFFF000
 | 
						|
	adds r2, r3, #0
 | 
						|
	orrs r1, r2
 | 
						|
	strh r1, [r0, #2]
 | 
						|
_0801C7FC:
 | 
						|
	ldr r1, _0801C820 @ =gScreen
 | 
						|
	movs r0, #1
 | 
						|
	strh r0, [r1, #0xe]
 | 
						|
_0801C802:
 | 
						|
	pop {r3}
 | 
						|
	mov r8, r3
 | 
						|
	pop {r4, r5, r6, r7, pc}
 | 
						|
	.align 2, 0
 | 
						|
_0801C808: .4byte gUnk_080C8F2C
 | 
						|
_0801C80C: .4byte gUnk_02034D30
 | 
						|
_0801C810: .4byte 0x0000F010
 | 
						|
_0801C814: .4byte 0x040000D4
 | 
						|
_0801C818: .4byte gUnk_02034CF0
 | 
						|
_0801C81C: .4byte 0xFFFFF000
 | 
						|
_0801C820: .4byte gScreen
 |