mirror of
https://github.com/open-goal/jak-project
synced 2026-08-17 05:31:46 -04:00
jak2 ref
This commit is contained in:
+4
-4
@@ -1109,7 +1109,7 @@
|
||||
(meters 0.25)
|
||||
)
|
||||
)
|
||||
(let ((f30-0 (* 0.5 (-> *camera-combiner* fov))))
|
||||
(let ((f30-0 (/ (-> *camera-combiner* fov) 2)))
|
||||
(camera-fov-frame
|
||||
(-> *camera-combiner* inv-camera-rot)
|
||||
(camera-pos)
|
||||
@@ -1121,7 +1121,7 @@
|
||||
)
|
||||
(cond
|
||||
((= (-> arg0 blend-to-type) (camera-blend-to-type unknown-2))
|
||||
(let ((f0-2 (* 0.5 (-> arg0 fov))))
|
||||
(let ((f0-2 (/ (-> arg0 fov) 2)))
|
||||
(camera-fov-frame
|
||||
(the-as matrix (-> *camera-combiner* tracking))
|
||||
(-> arg0 trans)
|
||||
@@ -1133,7 +1133,7 @@
|
||||
)
|
||||
)
|
||||
(else
|
||||
(let ((f0-4 (* 0.5 (-> arg0 fov))))
|
||||
(let ((f0-4 (/ (-> arg0 fov) 2)))
|
||||
(camera-fov-frame
|
||||
(the-as matrix (-> arg0 tracking))
|
||||
(-> arg0 trans)
|
||||
@@ -1676,7 +1676,7 @@
|
||||
;; WARN: Return type mismatch int vs none.
|
||||
(defun camera-master-debug ((arg0 camera-master))
|
||||
(when *display-cam-other*
|
||||
(let ((f0-1 (* 0.5 (-> *camera-other-fov* data))))
|
||||
(let ((f0-1 (/ (-> *camera-other-fov* data) 2)))
|
||||
(camera-fov-frame
|
||||
*camera-other-matrix*
|
||||
*camera-other-trans*
|
||||
|
||||
+1
-1
@@ -1260,7 +1260,7 @@
|
||||
(defun fov->maya ((arg0 float))
|
||||
(if (= arg0 0.0)
|
||||
0.0
|
||||
(/ 12.700255 (tan (* 0.5 arg0)))
|
||||
(/ 12.700255 (tan (/ arg0 2)))
|
||||
)
|
||||
)
|
||||
|
||||
|
||||
+2
-2
@@ -214,10 +214,10 @@
|
||||
(let ((f30-0 (vector-dot s5-7 (-> self local-down))))
|
||||
(vector--float*! s5-7 s5-7 (-> self local-down) f30-0)
|
||||
(if (< 0.0 f30-0)
|
||||
(set! (-> self upspeed) (* 0.5 (-> self upspeed)))
|
||||
(set! (-> self upspeed) (/ (-> self upspeed) 2))
|
||||
)
|
||||
(vector+! (-> self tpos-tgt) (-> self tpos-tgt) s5-7)
|
||||
(let ((f0-26 (* 0.05 f30-0)))
|
||||
(let ((f0-26 (/ f30-0 20)))
|
||||
(vector+float*! (-> self tpos-tgt) (-> self tpos-tgt) (-> self local-down) f0-26)
|
||||
)
|
||||
)
|
||||
|
||||
+24
-24
@@ -56,10 +56,10 @@
|
||||
)
|
||||
(cond
|
||||
((cpad-hold? (-> *CAMERA-bank* joypad) r2)
|
||||
(set! (-> s5-0 y) (- (-> s5-0 y) (* 0.2 (-> *CAM_POINT_WATCH-bank* rot-speed) (- f26-0))))
|
||||
(set! (-> s5-0 x) (- (-> s5-0 x) (* 0.2 (-> *CAM_POINT_WATCH-bank* rot-speed) (- f0-0))))
|
||||
(+! (-> gp-0 x) (* 0.2 (-> *CAM_POINT_WATCH-bank* speed) f28-0))
|
||||
(+! (-> gp-0 z) (* 0.2 (-> *CAM_POINT_WATCH-bank* speed) f30-0))
|
||||
(set! (-> s5-0 y) (- (-> s5-0 y) (* (/ (-> *CAM_POINT_WATCH-bank* rot-speed) 5) (- f26-0))))
|
||||
(set! (-> s5-0 x) (- (-> s5-0 x) (* (/ (-> *CAM_POINT_WATCH-bank* rot-speed) 5) (- f0-0))))
|
||||
(+! (-> gp-0 x) (* (/ (-> *CAM_POINT_WATCH-bank* speed) 5) f28-0))
|
||||
(+! (-> gp-0 z) (* (/ (-> *CAM_POINT_WATCH-bank* speed) 5) f30-0))
|
||||
)
|
||||
(else
|
||||
(set! (-> s5-0 y) (- (-> s5-0 y) (* 2.0 (-> *CAM_POINT_WATCH-bank* rot-speed) (- f26-0))))
|
||||
@@ -128,8 +128,8 @@
|
||||
(let ((f30-0 (vector-length a0-7)))
|
||||
(cond
|
||||
(#f
|
||||
(let* ((f28-0 (* 0.01 f30-0 (-> v1-0 x)))
|
||||
(f26-0 (* 0.01 f30-0 (-> v1-0 y)))
|
||||
(let* ((f28-0 (* (/ f30-0 100) (-> v1-0 x)))
|
||||
(f26-0 (* (/ f30-0 100) (-> v1-0 y)))
|
||||
(f0-5 f28-0)
|
||||
(f0-7 (* f0-5 f0-5))
|
||||
(f1-2 f26-0)
|
||||
@@ -312,13 +312,13 @@
|
||||
((cpad-hold? arg3 r2)
|
||||
(when (logtest? (-> *camera* settings master-options) (cam-master-options READ_BUTTONS))
|
||||
(if (cpad-hold? arg3 r1)
|
||||
(+! (-> arg1 y) (+ (* 0.2 (-> *CAM_FREE-bank* speed)) (analog-input
|
||||
(the-as int (-> *cpad-list* cpads arg3 abutton 9))
|
||||
0.0
|
||||
32.0
|
||||
230.0
|
||||
(* 0.2 (-> *CAM_FREE-bank* speed))
|
||||
)
|
||||
(+! (-> arg1 y) (+ (/ (-> *CAM_FREE-bank* speed) 5) (analog-input
|
||||
(the-as int (-> *cpad-list* cpads arg3 abutton 9))
|
||||
0.0
|
||||
32.0
|
||||
230.0
|
||||
(/ (-> *CAM_FREE-bank* speed) 5)
|
||||
)
|
||||
)
|
||||
)
|
||||
)
|
||||
@@ -326,13 +326,13 @@
|
||||
(when (logtest? (-> *camera* settings master-options) (cam-master-options READ_BUTTONS))
|
||||
(if (cpad-hold? arg3 l1)
|
||||
(set! (-> arg1 y)
|
||||
(- (-> arg1 y) (+ (* 0.2 (-> *CAM_FREE-bank* speed)) (analog-input
|
||||
(the-as int (-> *cpad-list* cpads arg3 abutton 8))
|
||||
0.0
|
||||
32.0
|
||||
230.0
|
||||
(* 0.2 (-> *CAM_FREE-bank* speed))
|
||||
)
|
||||
(- (-> arg1 y) (+ (/ (-> *CAM_FREE-bank* speed) 5) (analog-input
|
||||
(the-as int (-> *cpad-list* cpads arg3 abutton 8))
|
||||
0.0
|
||||
32.0
|
||||
230.0
|
||||
(/ (-> *CAM_FREE-bank* speed) 5)
|
||||
)
|
||||
)
|
||||
)
|
||||
)
|
||||
@@ -372,16 +372,16 @@
|
||||
((and (not s3-0) (cpad-hold? arg3 r2))
|
||||
(cond
|
||||
((cpad-hold? arg3 l2)
|
||||
(set! (-> arg0 y) (- (-> arg0 y) (* 0.5 (-> *CAM_FREE-bank* rot-speed) (- f26-0))))
|
||||
(set! (-> arg0 x) (- (-> arg0 x) (* 0.5 (-> *CAM_FREE-bank* rot-speed) (- f0-60))))
|
||||
(set! (-> arg0 y) (- (-> arg0 y) (* (/ (-> *CAM_FREE-bank* rot-speed) 2) (- f26-0))))
|
||||
(set! (-> arg0 x) (- (-> arg0 x) (* (/ (-> *CAM_FREE-bank* rot-speed) 2) (- f0-60))))
|
||||
)
|
||||
(else
|
||||
(set! (-> arg0 y) (- (-> arg0 y) (* (- f26-0) (-> *CAM_FREE-bank* rot-speed))))
|
||||
(set! (-> arg0 x) (- (-> arg0 x) (* (- f0-60) (-> *CAM_FREE-bank* rot-speed))))
|
||||
)
|
||||
)
|
||||
(+! (-> arg1 x) (* 0.2 (-> *CAM_FREE-bank* speed) f28-14))
|
||||
(+! (-> arg1 z) (* 0.2 (-> *CAM_FREE-bank* speed) f30-14))
|
||||
(+! (-> arg1 x) (* (/ (-> *CAM_FREE-bank* speed) 5) f28-14))
|
||||
(+! (-> arg1 z) (* (/ (-> *CAM_FREE-bank* speed) 5) f30-14))
|
||||
)
|
||||
((and (not s3-0) (cpad-hold? arg3 l2))
|
||||
(+! (-> arg1 x) (* f28-14 (-> *CAM_FREE-bank* speed)))
|
||||
|
||||
+2
-2
@@ -2398,7 +2398,7 @@
|
||||
(set! f28-0 0.0)
|
||||
)
|
||||
(if (-> self have-phony-joystick)
|
||||
(set! f28-0 (* 0.05 (-> self phony-joystick-y)))
|
||||
(set! f28-0 (/ (-> self phony-joystick-y) 20))
|
||||
)
|
||||
(if (and (-> *camera* being-attacked) (not (time-elapsed? (-> *camera* attack-start) (seconds 0.25))))
|
||||
(set! f28-0 0.05)
|
||||
@@ -2421,7 +2421,7 @@
|
||||
(let ((f0-23 f26-0))
|
||||
(when (< f26-0 0.0)
|
||||
(let ((f0-26
|
||||
(/ (- (-> self string-min-val z) (vector-length (-> self view-flat))) (* 0.5 (-> self string-min-val z)))
|
||||
(/ (- (-> self string-min-val z) (vector-length (-> self view-flat))) (/ (-> self string-min-val z) 2))
|
||||
)
|
||||
)
|
||||
(set! f0-23 (fmin 0.75 f0-26))
|
||||
|
||||
+9
-9
@@ -272,7 +272,7 @@
|
||||
0.0
|
||||
)
|
||||
((>= 0.25 arg0)
|
||||
(* 0.5 arg0)
|
||||
(/ arg0 2)
|
||||
)
|
||||
((>= arg0 0.75)
|
||||
(- 1.0 (* 0.5 (- 1.0 arg0)))
|
||||
@@ -768,7 +768,7 @@
|
||||
(the-as vector (-> this point (-> this end-point)))
|
||||
)
|
||||
(let* ((f0-0 (vector-length s3-0))
|
||||
(f1-1 (* 0.33333334 (- 1.5 (* 0.00024414062 f0-0))))
|
||||
(f1-1 (* 0.33333334 (- 1.5 (/ f0-0 METER_LENGTH))))
|
||||
)
|
||||
0.0
|
||||
(let* ((f1-2 (fmax 0.0 f1-1))
|
||||
@@ -798,7 +798,7 @@
|
||||
(the-as vector (+ (the-as uint (-> this point 0 direction)) (* 48 v1-18)))
|
||||
)
|
||||
(let* ((f0-5 (vector-normalize-ret-len! s2-0 1.0))
|
||||
(f0-6 (* 0.5 f0-5))
|
||||
(f0-6 (/ f0-5 2))
|
||||
(f26-0 (* (fmin 1.0 f0-6) f30-0 (vector-dot arg0 s2-0)))
|
||||
)
|
||||
(let ((f1-14 (vector-dot s2-0 s3-0)))
|
||||
@@ -873,7 +873,7 @@
|
||||
(tracking-spline-method-19 this (* (-> this max-move) (-> pp clock time-adjust-ratio)) arg0 s4-0)
|
||||
(tracking-spline-method-14 this s4-0)
|
||||
(dotimes (s3-0 63)
|
||||
(tracking-spline-method-18 this (* 0.015625 (-> this sample-len)) arg0 s4-0)
|
||||
(tracking-spline-method-18 this (/ (-> this sample-len) 64) arg0 s4-0)
|
||||
)
|
||||
(vector-float*! arg0 arg0 0.015625)
|
||||
(let ((a2-3 (-> s4-0 cur-pt)))
|
||||
@@ -1265,7 +1265,7 @@
|
||||
(vector-! s2-0 s2-0 (-> arg0 follow-off))
|
||||
(vector-float*! s2-0 s2-0 f0-23)
|
||||
)
|
||||
(+! (-> arg0 follow-blend) (* 0.016666668 (-> pp clock time-adjust-ratio)))
|
||||
(+! (-> arg0 follow-blend) (/ (-> pp clock time-adjust-ratio) 60))
|
||||
(vector+! (-> arg0 follow-off) (-> arg0 follow-off) s2-0)
|
||||
)
|
||||
(else
|
||||
@@ -1497,7 +1497,7 @@
|
||||
(let ((f28-0 (vector-dot s3-0 (the-as vector (-> arg0 vector)))))
|
||||
(set! sv-128 s2-0)
|
||||
(set! sv-112 (-> arg0 vector))
|
||||
(let ((f0-7 (* 0.8 (tan (* 0.5 arg2)))))
|
||||
(let ((f0-7 (* 0.8 (tan (/ arg2 2)))))
|
||||
(.lvf vf1 (&-> sv-112 0 quad))
|
||||
(let ((v1-11 f0-7))
|
||||
(.mov vf2 v1-11)
|
||||
@@ -1530,7 +1530,7 @@
|
||||
(let ((f28-1 (vector-dot s3-0 (-> arg0 vector 1))))
|
||||
(set! sv-160 s2-0)
|
||||
(set! sv-144 (-> arg0 vector 1))
|
||||
(let ((f0-16 (* 0.525 (tan (* 0.5 arg2)))))
|
||||
(let ((f0-16 (* 0.525 (tan (/ arg2 2)))))
|
||||
(.lvf vf1 (&-> sv-144 quad))
|
||||
(let ((v1-32 f0-16))
|
||||
(.mov vf2 v1-32)
|
||||
@@ -1556,7 +1556,7 @@
|
||||
(let ((f28-2 (vector-dot s3-0 (-> arg0 vector 1))))
|
||||
(let ((s0-1 s2-0))
|
||||
(set! sv-176 (-> arg0 vector 1))
|
||||
(let ((f0-26 (* 0.525 (tan (* 0.5 arg2)))))
|
||||
(let ((f0-26 (* 0.525 (tan (/ arg2 2)))))
|
||||
(vector-float*! s0-1 sv-176 f0-26)
|
||||
)
|
||||
)
|
||||
@@ -1716,7 +1716,7 @@
|
||||
(set! sv-256 vector-into-frustum-nosmooth!)
|
||||
(set! sv-272 s1-0)
|
||||
(set! sv-288 arg1)
|
||||
(let ((a2-5 (lerp-clamp arg3 (* 0.25 arg3) (-> arg0 underwater-blend value))))
|
||||
(let ((a2-5 (lerp-clamp arg3 (/ arg3 4) (-> arg0 underwater-blend value))))
|
||||
(sv-256 sv-272 sv-288 a2-5)
|
||||
)
|
||||
(cond
|
||||
|
||||
Reference in New Issue
Block a user