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

glabel func_8004AFD8
/* 263D8 8004AFD8 27BDFFE8 */  addiu     $sp, $sp, -0x18
/* 263DC 8004AFDC 00042400 */  sll       $a0, $a0, 0x10
/* 263E0 8004AFE0 00042403 */  sra       $a0, $a0, 0x10
/* 263E4 8004AFE4 24020001 */  addiu     $v0, $zero, 1
/* 263E8 8004AFE8 AFBF0014 */  sw        $ra, 0x14($sp)
/* 263EC 8004AFEC 1082000B */  beq       $a0, $v0, .L8004B01C
/* 263F0 8004AFF0 AFB00010 */   sw       $s0, 0x10($sp)
/* 263F4 8004AFF4 24020002 */  addiu     $v0, $zero, 2
/* 263F8 8004AFF8 14820024 */  bne       $a0, $v0, .L8004B08C
/* 263FC 8004AFFC 00000000 */   nop
/* 26400 8004B000 0C015A80 */  jal       func_80056A00
/* 26404 8004B004 00000000 */   nop
/* 26408 8004B008 3C01800A */  lui       $at, %hi(D_8009ED60)
/* 2640C 8004B00C 0C015A79 */  jal       func_800569E4
/* 26410 8004B010 A422ED60 */   sh       $v0, %lo(D_8009ED60)($at)
/* 26414 8004B014 08012C23 */  j         .L8004B08C
/* 26418 8004B018 00000000 */   nop
.L8004B01C:
/* 2641C 8004B01C 3C026666 */  lui       $v0, 0x6666
/* 26420 8004B020 3C03800A */  lui       $v1, %hi(D_8009ED60)
/* 26424 8004B024 9463ED60 */  lhu       $v1, %lo(D_8009ED60)($v1)
/* 26428 8004B028 34426667 */  ori       $v0, $v0, 0x6667
/* 2642C 8004B02C 00031C00 */  sll       $v1, $v1, 0x10
/* 26430 8004B030 00032403 */  sra       $a0, $v1, 0x10
/* 26434 8004B034 00820018 */  mult      $a0, $v0
/* 26438 8004B038 00031FC3 */  sra       $v1, $v1, 0x1f
/* 2643C 8004B03C 00003810 */  mfhi      $a3
/* 26440 8004B040 000710C3 */  sra       $v0, $a3, 3
/* 26444 8004B044 00431023 */  subu      $v0, $v0, $v1
/* 26448 8004B048 00021400 */  sll       $v0, $v0, 0x10
/* 2644C 8004B04C 00021403 */  sra       $v0, $v0, 0x10
/* 26450 8004B050 00450018 */  mult      $v0, $a1
/* 26454 8004B054 00001812 */  mflo      $v1
/* 26458 8004B058 00838023 */  subu      $s0, $a0, $v1
/* 2645C 8004B05C 06020001 */  bltzl     $s0, .L8004B064
/* 26460 8004B060 0000802D */   daddu    $s0, $zero, $zero
.L8004B064:
/* 26464 8004B064 02100018 */  mult      $s0, $s0
/* 26468 8004B068 00003012 */  mflo      $a2
/* 2646C 8004B06C 000683C3 */  sra       $s0, $a2, 0xf
/* 26470 8004B070 00102400 */  sll       $a0, $s0, 0x10
/* 26474 8004B074 0C015A7D */  jal       func_800569F4
/* 26478 8004B078 00042403 */   sra      $a0, $a0, 0x10
/* 2647C 8004B07C 16000003 */  bnez      $s0, .L8004B08C
/* 26480 8004B080 00000000 */   nop
/* 26484 8004B084 3C018008 */  lui       $at, %hi(D_80078150)
/* 26488 8004B088 A0208150 */  sb        $zero, %lo(D_80078150)($at)
.L8004B08C:
/* 2648C 8004B08C 8FBF0014 */  lw        $ra, 0x14($sp)
/* 26490 8004B090 8FB00010 */  lw        $s0, 0x10($sp)
/* 26494 8004B094 03E00008 */  jr        $ra
/* 26498 8004B098 27BD0018 */   addiu    $sp, $sp, 0x18