mirror/jak-project
1
0
Fork 0
mirror of https://github.com/open-goal/jak-project synced 2026-09-03 18:23:39 -04:00
Code Issues Packages Projects Releases Wiki Activity

recognize +! and set-vector (#706)

Browse Source 
"
This commit is contained in:
water111
2021-07-17 15:00:10 -04:00
committed by GitHub
parent 1e90da8e7c
commit 4989470828
48 changed files with 557 additions and 1038 deletions
Download Patch File Download Diff File Expand all files Collapse all files
test/decompiler/reference/engine/camera/camera-h_REF.gc
+2 -2
View File
@@ -276,7 +276,7 @@
(f0-5 (* (-> obj max-partial) (fabs f1-2)))
)
(let ((f1-3 (* f1-2 (* (-> obj accel) (-> *display* time-adjust-ratio)))))
(set! (-> obj vel) (+ (-> obj vel) f1-3))
(+! (-> obj vel) f1-3)
)
(let ((f1-6 (fabs (-> obj vel)))
(f0-6 (fmin f0-5 (-> obj max-vel)))
@@ -287,7 +287,7 @@
)
)
(let ((f0-10 (* (-> obj vel) (-> *display* time-adjust-ratio))))
(set! (-> obj value) (+ (-> obj value) f0-10))
(+! (-> obj value) f0-10)
)
0
(none)
test/decompiler/reference/engine/camera/math-camera_REF.gc
+14 -22
View File
@@ -241,23 +241,20 @@
(set! (-> sprite-row-0 vector 0 z) 0.0)
(set! (-> sprite-row-0 vector 0 w) 0.0)
)
(let ((sprite-row-1 (-> math-cam sprite-2d vector 1)))
(set! (-> sprite-row-1 x) 0.0)
(set! (-> sprite-row-1 y) (- (* (/ persp-yy persp-xx) persp-x)))
(set! (-> sprite-row-1 z) 0.0)
(set! (-> sprite-row-1 w) 0.0)
(set-vector!
(-> math-cam sprite-2d vector 1)
0.0
(- (* (/ persp-yy persp-xx) persp-x))
0.0
0.0
)
(let ((sprite-row-2 (-> math-cam sprite-2d vector 2)))
(set! (-> sprite-row-2 x) 0.0)
(set! (-> sprite-row-2 y) 0.0)
(set! (-> sprite-row-2 z) (- persp-x))
(set! (-> sprite-row-2 w) 0.0)
)
(let ((sprite-row-3 (-> math-cam sprite-2d vector 3)))
(set! (-> sprite-row-3 x) 0.0)
(set! (-> sprite-row-3 y) 0.0)
(set! (-> sprite-row-3 z) (* 500000000.0 persp-x))
(set! (-> sprite-row-3 w) (* (* 60.0 persp-x) (-> math-cam pfog0)))
(set-vector! (-> math-cam sprite-2d vector 2) 0.0 0.0 (- persp-x) 0.0)
(set-vector!
(-> math-cam sprite-2d vector 3)
0.0
0.0
(* 500000000.0 persp-x)
(* (* 60.0 persp-x) (-> math-cam pfog0))
)
)
(set! (-> math-cam sprite-2d-hvdf quad) (-> math-cam hvdf-off quad))
@@ -624,12 +621,7 @@
(let ((s2-0 (new 'stack 'vector4s-3)))
(matrix*! s5-0 arg0 (-> *math-camera* camera-temp))
(matrix-3x3-inverse-transpose! gp-0 arg0)
(let ((v1-3 s3-0))
(set! (-> v1-3 x) 0.4)
(set! (-> v1-3 y) 0.4)
(set! (-> v1-3 z) 0.4)
(set! (-> v1-3 w) 1.0)
)
(set-vector! s3-0 0.4 0.4 0.4 1.0)
(let ((v1-4 (-> s4-0 data)))
(set! (-> v1-4 0) 1.0)
(set! (-> v1-4 1) 1.0)