.set noat # allow manual use of $at
.set noreorder # don't insert nops after branches


glabel func_8013A704
/* 0D0E04 8013A704 3C028015 */  lui   $v0, 0x8015
/* 0D0E08 8013A708 8C426954 */  lw    $v0, 0x6954($v0)
/* 0D0E0C 8013A70C 27BDFFD0 */  addiu $sp, $sp, -0x30
/* 0D0E10 8013A710 AFB60028 */  sw    $s6, 0x28($sp)
/* 0D0E14 8013A714 0080B02D */  daddu $s6, $a0, $zero
/* 0D0E18 8013A718 AFB20018 */  sw    $s2, 0x18($sp)
/* 0D0E1C 8013A71C 0000902D */  daddu $s2, $zero, $zero
/* 0D0E20 8013A720 AFB00010 */  sw    $s0, 0x10($sp)
/* 0D0E24 8013A724 24100001 */  addiu $s0, $zero, 1
/* 0D0E28 8013A728 AFBF002C */  sw    $ra, 0x2c($sp)
/* 0D0E2C 8013A72C AFB50024 */  sw    $s5, 0x24($sp)
/* 0D0E30 8013A730 AFB40020 */  sw    $s4, 0x20($sp)
/* 0D0E34 8013A734 AFB3001C */  sw    $s3, 0x1c($sp)
/* 0D0E38 8013A738 AFB10014 */  sw    $s1, 0x14($sp)
/* 0D0E3C 8013A73C 2443007C */  addiu $v1, $v0, 0x7c
.L8013A740:
/* 0D0E40 8013A740 8C620014 */  lw    $v0, 0x14($v1)
/* 0D0E44 8013A744 30420001 */  andi  $v0, $v0, 1
/* 0D0E48 8013A748 50400001 */  beql  $v0, $zero, .L8013A750
/* 0D0E4C 8013A74C 26520001 */   addiu $s2, $s2, 1
.L8013A750:
/* 0D0E50 8013A750 26100001 */  addiu $s0, $s0, 1
/* 0D0E54 8013A754 2A02005A */  slti  $v0, $s0, 0x5a
/* 0D0E58 8013A758 1440FFF9 */  bnez  $v0, .L8013A740
/* 0D0E5C 8013A75C 2463007C */   addiu $v1, $v1, 0x7c
/* 0D0E60 8013A760 0256102A */  slt   $v0, $s2, $s6
/* 0D0E64 8013A764 10400006 */  beqz  $v0, .L8013A780
/* 0D0E68 8013A768 2402FFFF */   addiu $v0, $zero, -1
/* 0D0E6C 8013A76C 0804EA0B */  j     .L8013A82C
/* 0D0E70 8013A770 00000000 */   nop   

.L8013A774:
/* 0D0E74 8013A774 2402FFFF */  addiu $v0, $zero, -1
/* 0D0E78 8013A778 0804EA0A */  j     .L8013A828
/* 0D0E7C 8013A77C A4620010 */   sh    $v0, 0x10($v1)

.L8013A780:
/* 0D0E80 8013A780 0000A82D */  daddu $s5, $zero, $zero
/* 0D0E84 8013A784 02A0982D */  daddu $s3, $s5, $zero
/* 0D0E88 8013A788 02A0902D */  daddu $s2, $s5, $zero
/* 0D0E8C 8013A78C 2404FFFF */  addiu $a0, $zero, -1
/* 0D0E90 8013A790 24100001 */  addiu $s0, $zero, 1
/* 0D0E94 8013A794 3C148015 */  lui   $s4, 0x8015
/* 0D0E98 8013A798 26946954 */  addiu $s4, $s4, 0x6954
/* 0D0E9C 8013A79C 2411007C */  addiu $s1, $zero, 0x7c
.L8013A7A0:
/* 0D0EA0 8013A7A0 3C038015 */  lui   $v1, 0x8015
/* 0D0EA4 8013A7A4 8C636954 */  lw    $v1, 0x6954($v1)
/* 0D0EA8 8013A7A8 02231021 */  addu  $v0, $s1, $v1
/* 0D0EAC 8013A7AC 8C420014 */  lw    $v0, 0x14($v0)
/* 0D0EB0 8013A7B0 30420001 */  andi  $v0, $v0, 1
/* 0D0EB4 8013A7B4 54400019 */  bnel  $v0, $zero, .L8013A81C
/* 0D0EB8 8013A7B8 26100001 */   addiu $s0, $s0, 1
/* 0D0EBC 8013A7BC 16600004 */  bnez  $s3, .L8013A7D0
/* 0D0EC0 8013A7C0 00041140 */   sll   $v0, $a0, 5
/* 0D0EC4 8013A7C4 0200A82D */  daddu $s5, $s0, $zero
/* 0D0EC8 8013A7C8 0804E9F8 */  j     .L8013A7E0
/* 0D0ECC 8013A7CC 24130001 */   addiu $s3, $zero, 1

.L8013A7D0:
/* 0D0ED0 8013A7D0 00441023 */  subu  $v0, $v0, $a0
/* 0D0ED4 8013A7D4 00021080 */  sll   $v0, $v0, 2
/* 0D0ED8 8013A7D8 00431021 */  addu  $v0, $v0, $v1
/* 0D0EDC 8013A7DC A4500010 */  sh    $s0, 0x10($v0)
.L8013A7E0:
/* 0D0EE0 8013A7E0 8E820000 */  lw    $v0, ($s4)
/* 0D0EE4 8013A7E4 02221021 */  addu  $v0, $s1, $v0
/* 0D0EE8 8013A7E8 A0500000 */  sb    $s0, ($v0)
/* 0D0EEC 8013A7EC 8E840000 */  lw    $a0, ($s4)
/* 0D0EF0 8013A7F0 0C04EA7A */  jal   func_8013A9E8
/* 0D0EF4 8013A7F4 00912021 */   addu  $a0, $a0, $s1
/* 0D0EF8 8013A7F8 8E820000 */  lw    $v0, ($s4)
/* 0D0EFC 8013A7FC 26520001 */  addiu $s2, $s2, 1
/* 0D0F00 8013A800 02221821 */  addu  $v1, $s1, $v0
/* 0D0F04 8013A804 8C620014 */  lw    $v0, 0x14($v1)
/* 0D0F08 8013A808 0200202D */  daddu $a0, $s0, $zero
/* 0D0F0C 8013A80C 34420001 */  ori   $v0, $v0, 1
/* 0D0F10 8013A810 1256FFD8 */  beq   $s2, $s6, .L8013A774
/* 0D0F14 8013A814 AC620014 */   sw    $v0, 0x14($v1)
/* 0D0F18 8013A818 26100001 */  addiu $s0, $s0, 1
.L8013A81C:
/* 0D0F1C 8013A81C 2A02005A */  slti  $v0, $s0, 0x5a
/* 0D0F20 8013A820 1440FFDF */  bnez  $v0, .L8013A7A0
/* 0D0F24 8013A824 2631007C */   addiu $s1, $s1, 0x7c
.L8013A828:
/* 0D0F28 8013A828 02A0102D */  daddu $v0, $s5, $zero
.L8013A82C:
/* 0D0F2C 8013A82C 8FBF002C */  lw    $ra, 0x2c($sp)
/* 0D0F30 8013A830 8FB60028 */  lw    $s6, 0x28($sp)
/* 0D0F34 8013A834 8FB50024 */  lw    $s5, 0x24($sp)
/* 0D0F38 8013A838 8FB40020 */  lw    $s4, 0x20($sp)
/* 0D0F3C 8013A83C 8FB3001C */  lw    $s3, 0x1c($sp)
/* 0D0F40 8013A840 8FB20018 */  lw    $s2, 0x18($sp)
/* 0D0F44 8013A844 8FB10014 */  lw    $s1, 0x14($sp)
/* 0D0F48 8013A848 8FB00010 */  lw    $s0, 0x10($sp)
/* 0D0F4C 8013A84C 03E00008 */  jr    $ra
/* 0D0F50 8013A850 27BD0030 */   addiu $sp, $sp, 0x30