mirror/jak-project
1
0
Fork 0
mirror of https://github.com/open-goal/jak-project synced 2026-07-08 14:36:52 -04:00
Code Issues Packages Projects Releases Wiki Activity

jak3: subtitle3, vag-player (#3758)

Browse Source
This commit is contained in:
Hat Kid
2024-11-12 02:45:16 +01:00
committed by GitHub
parent b55a918902
commit af5cb9b1cb
48 changed files with 12292 additions and 126 deletions
Download Patch File Download Diff File Expand all files Collapse all files
test/decompiler/reference/jak3/decompiler-macros.gc
Generated Vendored
+1 -1
View File
@@ -989,7 +989,7 @@
(with-gensyms (new-proc)
`(let ((,new-proc (the-as ,proc-type (get-process ,from ,proc-type ,stack-size ,unk))))
(when ,new-proc
((method-of-type ,proc-type activate) ,new-proc ,to ,(if name name `(symbol->string ,proc-type)) ,stack)
((method-of-type ,proc-type activate) ,new-proc ,to ,(if name name `(symbol->string ',proc-type)) ,stack)
(run-now-in-process ,new-proc ,(if init init (string->symbol (fmt #f "{}-init-by-other" proc-type))) ,@args)
(the (pointer ,proc-type) (-> ,new-proc ppointer))
)
test/decompiler/reference/jak3/engine/gfx/font-h_REF.gc
Generated Vendored
+9 -5
View File
@@ -766,13 +766,17 @@
)
;; definition for function set-font-color
(defun set-font-color ((arg0 font-color) (arg1 int) (arg2 rgba) (arg3 rgba) (arg4 rgba))
(set! (-> *font-work* color-table arg0 color 0) (the-as rgba arg1))
(set! (-> *font-work* color-table arg0 color 1) arg2)
(set! (-> *font-work* color-table arg0 color 2) arg3)
(set! (-> *font-work* color-table arg0 color 3) arg4)
(defun set-font-color ((idx font-color) (clr0 rgba) (clr1 rgba) (clr2 rgba) (clr3 rgba))
(set! (-> *font-work* color-table idx color 0) clr0)
(set! (-> *font-work* color-table idx color 1) clr1)
(set! (-> *font-work* color-table idx color 2) clr2)
(set! (-> *font-work* color-table idx color 3) clr3)
0
)
;; failed to figure out what this is:
0
test/decompiler/reference/jak3/engine/ui/progress/progress-draw_REF.gc
Generated Vendored
+6 -2
View File
@@ -158,14 +158,14 @@
(if (< (seconds 0.027) (logand (-> pp clock integral-frame-counter) 15))
(set-font-color
(the-as font-color gp-0)
(the-as int (the-as uint #x80ffffff))
(new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
(new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
(new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
(new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
)
(set-font-color
(the-as font-color gp-0)
(the-as int (the-as uint #x80606060))
(new 'static 'rgba :r #x60 :g #x60 :b #x60 :a #x80)
(new 'static 'rgba :r #x60 :g #x60 :b #x60 :a #x80)
(new 'static 'rgba :r #x60 :g #x60 :b #x60 :a #x80)
(new 'static 'rgba :r #x60 :g #x60 :b #x60 :a #x80)
@@ -5245,3 +5245,7 @@
0
(none)
)