mirror of
https://github.com/open-goal/jak-project
synced 2026-09-02 18:12:50 -04:00
[decomp] hud, hud-classes, add some new basic alignment options, fix type bug (#2084)
This commit is contained in:
+20
-21
@@ -94,7 +94,7 @@
|
||||
(set! (-> s5-0 vector 1 y) 128)
|
||||
(set! (-> s5-0 vector 1 z) 128)
|
||||
(set! (-> s5-0 vector 1 w) 128)
|
||||
(set! (-> s5-0 vector 0 y) (the-as int (+ (-> s5-0 vector 0 y) 288)))
|
||||
(+! (-> s5-0 vector 0 y) 288)
|
||||
(let* ((a1-11 buf)
|
||||
(a3-4 (the-as vector4w-2 (-> a1-11 base)))
|
||||
)
|
||||
@@ -102,8 +102,8 @@
|
||||
(set! (-> a3-4 vector 1 quad) (-> s5-0 vector 0 quad))
|
||||
(set! (-> a1-11 base) (&+ (the-as pointer a3-4) 32))
|
||||
)
|
||||
(set! (-> s5-0 vector 0 x) (the-as int (+ (-> s5-0 vector 0 x) -256)))
|
||||
(set! (-> s5-0 vector 0 y) (the-as int (+ (-> s5-0 vector 0 y) -288)))
|
||||
(+! (-> s5-0 vector 0 x) -256)
|
||||
(+! (-> s5-0 vector 0 y) -288)
|
||||
(set! (-> s5-0 vector 1 x) 128)
|
||||
(set! (-> s5-0 vector 1 y) 255)
|
||||
(let* ((a1-18 buf)
|
||||
@@ -113,7 +113,7 @@
|
||||
(set! (-> a3-6 vector 1 quad) (-> s5-0 vector 0 quad))
|
||||
(set! (-> a1-18 base) (&+ (the-as pointer a3-6) 32))
|
||||
)
|
||||
(set! (-> s5-0 vector 0 x) (the-as int (+ (-> s5-0 vector 0 x) 512)))
|
||||
(+! (-> s5-0 vector 0 x) 512)
|
||||
(set! (-> s5-0 vector 1 y) 128)
|
||||
(set! (-> s5-0 vector 1 z) 255)
|
||||
(let* ((a1-23 buf)
|
||||
@@ -123,8 +123,8 @@
|
||||
(set! (-> a3-8 vector 1 quad) (-> s5-0 vector 0 quad))
|
||||
(set! (-> a1-23 base) (&+ (the-as pointer a3-8) 32))
|
||||
)
|
||||
(set! (-> s5-0 vector 0 x) (the-as int (+ (-> s5-0 vector 0 x) -256)))
|
||||
(set! (-> s5-0 vector 0 y) (the-as int (+ (-> s5-0 vector 0 y) -288)))
|
||||
(+! (-> s5-0 vector 0 x) -256)
|
||||
(+! (-> s5-0 vector 0 y) -288)
|
||||
(set! (-> s5-0 vector 1 x) 255)
|
||||
(set! (-> s5-0 vector 1 y) 128)
|
||||
(let* ((a3-10 buf)
|
||||
@@ -260,8 +260,8 @@
|
||||
(set! (-> s3-0 vector 1 w) (the-as int (-> var-end-color a)))
|
||||
)
|
||||
)
|
||||
(set! (-> s4-0 vector 0 z) (the-as int (+ (-> s4-0 vector 0 z) -8192)))
|
||||
(set! (-> s4-0 vector 1 z) (the-as int (+ (-> s4-0 vector 1 z) -8192)))
|
||||
(+! (-> s4-0 vector 0 z) -8192)
|
||||
(+! (-> s4-0 vector 1 z) -8192)
|
||||
(let* ((a3-7 buf2)
|
||||
(a1-50 (the-as (inline-array vector4w-2) (-> a3-7 base)))
|
||||
)
|
||||
@@ -305,8 +305,8 @@
|
||||
'stack
|
||||
'font-context
|
||||
*font-default-matrix*
|
||||
(the-as int (+ (-> screen-offset x) -1792 (/ (the-as int (-> screen-pos x)) 16)))
|
||||
(the-as int (+ (-> screen-offset y) -1855 (/ (the-as int (-> screen-pos y)) 16)))
|
||||
(+ (-> screen-offset x) -1792 (/ (-> screen-pos x) 16))
|
||||
(+ (-> screen-offset y) -1855 (/ (-> screen-pos y) 16))
|
||||
0.0
|
||||
color
|
||||
(font-flags shadow kerning)
|
||||
@@ -314,7 +314,7 @@
|
||||
)
|
||||
)
|
||||
(let ((v1-10 font-ctx))
|
||||
(set! (-> v1-10 origin z) (the float (/ (the-as int (-> screen-pos z)) 16)))
|
||||
(set! (-> v1-10 origin z) (the float (/ (-> screen-pos z) 16)))
|
||||
)
|
||||
(draw-string text buf font-ctx)
|
||||
)
|
||||
@@ -418,9 +418,9 @@
|
||||
(set! (-> s4-0 vector 0 y) (the-as int (-> s3-0 g)))
|
||||
(set! (-> s4-0 vector 0 z) (the-as int (-> s3-0 b)))
|
||||
(set! (-> s4-0 vector 0 w) (the-as int (-> s3-0 a)))
|
||||
(set! (-> s5-0 vector 0 z) (the-as int (+ (-> s5-0 vector 0 z) -8192)))
|
||||
(set! (-> s5-0 vector 1 z) (the-as int (+ (-> s5-0 vector 1 z) -8192)))
|
||||
(set! (-> s5-0 vector 2 z) (the-as int (+ (-> s5-0 vector 2 z) -8192)))
|
||||
(+! (-> s5-0 vector 0 z) -8192)
|
||||
(+! (-> s5-0 vector 1 z) -8192)
|
||||
(+! (-> s5-0 vector 2 z) -8192)
|
||||
(let* ((a1-21 buf)
|
||||
(a3-5 (the-as (inline-array vector) (-> a1-21 base)))
|
||||
)
|
||||
@@ -673,11 +673,11 @@
|
||||
(let ((p1 (new 'stack 'vector4w)))
|
||||
(set! (-> p0 quad) (-> start quad))
|
||||
(set! (-> p1 quad) (-> end quad))
|
||||
(set! (-> p0 x) (the-as int (* (+ (-> p0 x) 2048) 16)))
|
||||
(set! (-> p0 y) (* -16 (the-as int (- 2048 (the-as int (-> p0 y))))))
|
||||
(set! (-> p0 x) (* (+ (-> p0 x) 2048) 16))
|
||||
(set! (-> p0 y) (* -16 (- 2048 (-> p0 y))))
|
||||
(set! (-> p0 z) #x7fffff)
|
||||
(set! (-> p1 x) (the-as int (* (+ (-> p1 x) 2048) 16)))
|
||||
(set! (-> p1 y) (* -16 (the-as int (- 2048 (the-as int (-> p1 y))))))
|
||||
(set! (-> p1 x) (* (+ (-> p1 x) 2048) 16))
|
||||
(set! (-> p1 y) (* -16 (- 2048 (-> p1 y))))
|
||||
(set! (-> p1 z) #x7fffff)
|
||||
(let ((a0-18 (the-as (pointer uint64) (-> buf base))))
|
||||
(let* ((a1-7 buf)
|
||||
@@ -941,8 +941,8 @@
|
||||
(set! (-> v1-2 pos quad) (-> position quad))
|
||||
(cond
|
||||
(screen-offset
|
||||
(set! (-> v1-2 offset x) (the-as int (-> screen-offset x)))
|
||||
(set! (-> v1-2 offset y) (the-as int (-> screen-offset y)))
|
||||
(set! (-> v1-2 offset x) (-> screen-offset x))
|
||||
(set! (-> v1-2 offset y) (-> screen-offset y))
|
||||
)
|
||||
(else
|
||||
(set! (-> v1-2 offset x) 0)
|
||||
@@ -1619,7 +1619,6 @@
|
||||
)
|
||||
|
||||
;; definition for method 3 of type debug-vertex-stats
|
||||
;; INFO: this function exists in multiple non-identical object files
|
||||
(defmethod inspect debug-vertex-stats ((obj debug-vertex-stats))
|
||||
(format #t "[~8x] ~A~%" obj (-> obj type))
|
||||
(format #t "~Tlength: ~D~%" (-> obj length))
|
||||
|
||||
Reference in New Issue
Block a user