decomp: credits (#533)

* decomp: `credits` but there are still issues

* issues over creating a `new` `font-context`

* decomp: finalized `credits`

decompiler/config/all-types.gc

@@ -4915,7 +4915,7 @@
   :size-assert         #x10
   :flag-assert         #xa00000010
   (:methods
-    (dummy-9 () none 9)
+    (dummy-9 (_type_ uint symbol) string 9)
     )
   )
 
@@ -4924,7 +4924,7 @@
 (define-extern *text-group-names* (array string))
 (define-extern kheap type)
 (define-extern *common-text-heap* kheap)
-(define-extern *common-text* symbol)
+(define-extern *common-text* game-text-info) ; TODO guess, but its definitely not just a symbol!
 
 
 ;; ----------------------
@@ -16229,12 +16229,12 @@
 
 (define-extern progress-allowed? (function symbol))
 (define-extern lookup-level-info (function symbol level-load-info))
+(define-extern print-game-text (function string font-context symbol int int float)) ; TODO decomp error, this seems correct though
 
 ;; - Symbols
 
 (define-extern auto-save-command function)
 (define-extern auto-save-init-by-other function)
-(define-extern print-game-text function)
 (define-extern get-aspect-ratio function)
 (define-extern get-task-status function)
 (define-extern calculate-completion function)
@@ -19253,6 +19253,7 @@
 (define-extern set-letterbox-frames (function uint none))
 (define-extern letterbox (function none))
 (define-extern blackout (function none))
+(define-extern scf-get-territory (function int))
 
 ;; - Symbols
 
@@ -19271,7 +19272,6 @@
 
 ;; - Unknowns
 
-;;(define-extern scf-get-territory object) ;; unknown type
 ;;(define-extern scf-get-timeout object) ;; unknown type
 ;;(define-extern scf-get-inactive-timeout object) ;; unknown type
 ;;(define-extern kernel-shutdown object) ;; unknown type
@@ -20443,14 +20443,15 @@
 
 ;; - Symbols
 
-(define-extern set-credits-font-color function)
-(define-extern draw-title-credits function)
-(define-extern draw-end-credits function)
+(define-extern draw-title-credits (function float none))
+(define-extern set-credits-font-color (function float none))
+(define-extern draw-end-credits (function int symbol))
+
 
 ;; - Unknowns
 
-;;(define-extern *title-credits-scale* object) ;; unknown type
-;;(define-extern *title-credits-spacing* object) ;; unknown type
+(define-extern *title-credits-spacing* (array int32))
+(define-extern *title-credits-scale* (array float))
 
 
 ;; ----------------------

decompiler/config/jak1_ntsc_black_label/label_types.jsonc

@@ -494,5 +494,11 @@
 
   "effect-control-h": [
     ["L6", "float", true]
+  ],
+
+  "credits": [
+    ["L32", "(array int32)", true],
+    ["L33", "(array float)", true],
+    ["L49", "float", true]
   ]
 }

decompiler/config/jak1_ntsc_black_label/stack_structures.jsonc

@@ -292,5 +292,13 @@
     [16, "vector"],
     [32, "vector"],
     [48, "vector"]
+  ],
+
+  "draw-end-credits": [
+    [16, "font-context"]
+  ],
+
+  "draw-title-credits": [
+    [16, "font-context"]
   ]
 }