mirror of
https://github.com/zeldaret/oot.git
synced 2024-11-29 03:34:07 +00:00
7334ffa373
* Format all handwritten asm and document some * Use c preprocessor for constants * Fix * Fix PI_STATUS_ERROR, some label improvements * Avoid hi/lo for constants * Some more comments * Properly mark functions as functions and their sizes * Fix merge * Improvements * Review suggestions, rework procedure start/end macros to be more like libreultra * Move IPL3 symbol definitions into ipl3.s * Fix undefined_syms, add include and language guards to asm.h and fix the comment in gbi.h * Consistent hex capitalization, add some MIPS builtin defines to CC_CHECK to behave properly * Add -no-pad-sections assembler option and clean up alignment in gu files and bzero * Further suggestions and improvements * Matrix conversion function clarifications * Fix passing AVOID_UB to gcc * Suggestions * Suggestions, global interrupt mask improvements * Further suggestions, interrupt mask comments * Comments fixes, rdb.h * Switch from # comments to // comments, remove unnecesary .set gp=64 directives * Further review suggestions * Missed one
61 lines
1.4 KiB
ArmAsm
61 lines
1.4 KiB
ArmAsm
#include "ultra64/asm.h"
|
|
|
|
.set noat
|
|
.set noreorder
|
|
|
|
.section .text
|
|
|
|
.balign 32
|
|
|
|
LEAF(guTranslate)
|
|
li $at, 0x47800000 // 65536.0f
|
|
mtc1 $at, $f4
|
|
mtc1 $a1, $f6
|
|
sw $zero, ($a0)
|
|
sw $zero, 0x14($a0)
|
|
mul.s $f8, $f6, $f4
|
|
mtc1 $a2, $f6
|
|
sw $zero, 8($a0)
|
|
sw $zero, 4($a0)
|
|
sw $zero, 0xC($a0)
|
|
sw $zero, 0x10($a0)
|
|
sw $zero, 0x20($a0)
|
|
trunc.w.s $f10, $f8
|
|
mul.s $f8, $f6, $f4
|
|
mtc1 $a3, $f6
|
|
sw $zero, 0x24($a0)
|
|
mfc1 $t1, $f10
|
|
sw $zero, 0x28($a0)
|
|
sw $zero, 0x2C($a0)
|
|
srl $t2, $t1, 0x10
|
|
trunc.w.s $f10, $f8
|
|
mul.s $f8, $f6, $f4
|
|
sll $t0, $t2, 0x10
|
|
sw $zero, 0x30($a0)
|
|
mfc1 $t3, $f10
|
|
sw $zero, 0x34($a0)
|
|
srl $t2, $t3, 0x10
|
|
trunc.w.s $f10, $f8
|
|
or $t0, $t0, $t2
|
|
sw $t0, 0x18($a0)
|
|
sll $t0, $t1, 0x10
|
|
sll $t2, $t3, 0x10
|
|
mfc1 $t1, $f10
|
|
srl $t2, $t2, 0x10
|
|
or $t0, $t0, $t2
|
|
sw $t0, 0x38($a0)
|
|
srl $t2, $t1, 0x10
|
|
sll $t0, $t2, 0x10
|
|
addiu $t0, $t0, 1
|
|
sw $t0, 0x1C($a0)
|
|
lui $t0, 1
|
|
ori $t0, $t0, 0
|
|
sw $t0, ($a0)
|
|
sw $t0, 0x14($a0)
|
|
lui $t0, (0x00000001 >> 16)
|
|
ori $t0, (0x00000001 & 0xFFFF)
|
|
sll $t2, $t1, 0x10
|
|
sw $t2, 0x3C($a0)
|
|
jr $ra
|
|
sw $t0, 8($a0)
|
|
END(guTranslate)
|