Files
jak-project/test/decompiler/reference/jakx/engine/ui/gui-h_REF.gc
T
2026-05-08 18:54:05 -04:00

303 lines
13 KiB
Common Lisp
Vendored
Generated

;;-*-Lisp-*-
(in-package goal)
;; definition of type gui-connection
(deftype gui-connection (connection)
((priority float :overlay-at param0)
(action gui-action :overlay-at param1)
(channel gui-channel :offset 21)
(anim-part uint8 :offset 22)
(flags gui-connection-flags :offset 23)
(name string :overlay-at param2)
(id sound-id :overlay-at param3)
(handle handle :overlay-at next0)
(time-stamp time-frame :overlay-at next1)
(hold-time time-frame)
(fo-min float)
(fo-max float)
(fo-power float)
(fade uint8)
(volume float)
(qw-pad int8 4)
)
)
;; definition for method 3 of type gui-connection
(defmethod inspect ((this gui-connection))
(when (not this)
(set! this this)
(goto cfg-146)
)
(format #t "[~8x] ~A~%" this 'gui-connection)
(format #t "~1Tnext0: ~`connectable`P~%" (-> this next0))
(format #t "~1Tprev0: ~`connectable`P~%" (-> this prev0))
(format #t "~1Tnext1: ~`connectable`P~%" (-> this next1))
(format #t "~1Tprev1: ~`connectable`P~%" (-> this prev1))
(format #t "~1Tparam0: ~A~%" (-> this priority))
(format #t "~1Tparam1: ~A~%" (-> this param1))
(format #t "~1Tparam2: ~A~%" (-> this param2))
(format #t "~1Tparam3: ~A~%" (-> this param3))
(format #t "~1Tquad[2] @ #x~X~%" (&-> this next0))
(format #t "~1Tpriority: ~f~%" (-> this priority))
(let ((t9-11 format)
(a0-12 #t)
(a1-11 "~1Taction: #x~X : ~S~%")
(a2-11 (-> this action))
(v1-2 (-> this action))
)
(t9-11 a0-12 a1-11 a2-11 (cond
((= v1-2 (gui-action queue))
"queue"
)
((= v1-2 (gui-action stop))
"stop"
)
((= v1-2 (gui-action play))
"play"
)
((= v1-2 (gui-action hide))
"hide"
)
((= v1-2 (gui-action fade))
"fade"
)
((= v1-2 (gui-action none))
"none"
)
((= v1-2 (gui-action abort))
"abort"
)
((= v1-2 (gui-action stopping))
"stopping"
)
((= v1-2 (gui-action hidden))
"hidden"
)
((= v1-2 (gui-action playing))
"playing"
)
(else
"*unknown*"
)
)
)
)
(let ((t9-12 format)
(a0-13 #t)
(a1-12 "~1Tchannel: #x~X : ~S~%")
(a2-12 (-> this channel))
(v1-3 (-> this channel))
)
(t9-12 a0-13 a1-12 a2-12 (cond
((= v1-3 (gui-channel hud-mp-race-1))
"hud-mp-race-1"
)
((= v1-3 (gui-channel hud-lower-left))
"hud-lower-left"
)
((= v1-3 (gui-channel citizen))
"citizen"
)
((= v1-3 (gui-channel pecker))
"pecker"
)
((= v1-3 (gui-channel jak-effect-1))
"jak-effect-1"
)
((= v1-3 (gui-channel ashelin))
"ashelin"
)
((= v1-3 (gui-channel hud-lower-left-1))
"hud-lower-left-1"
)
((= v1-3 (gui-channel hud-mp-race-2))
"hud-mp-race-2"
)
((= v1-3 (gui-channel message))
"message"
)
((= v1-3 (gui-channel hud-middle-left))
"hud-middle-left"
)
((= v1-3 (gui-channel gun))
"gun"
)
((= v1-3 (gui-channel hud-upper-center-2))
"hud-upper-center-2"
)
((= v1-3 (gui-channel subtitle))
"subtitle"
)
((= v1-3 (gui-channel hud-middle-right))
"hud-middle-right"
)
((= v1-3 (gui-channel art-load-next))
"art-load-next"
)
((= v1-3 (gui-channel notice))
"notice"
)
((= v1-3 (gui-channel sig))
"sig"
)
((= v1-3 (gui-channel hud-mp-vehicle-main-1))
"hud-mp-vehicle-main-1"
)
((= v1-3 (gui-channel hud-center-left))
"hud-center-left"
)
((= v1-3 (gui-channel task))
"task"
)
((= v1-3 (gui-channel hud-upper-right))
"hud-upper-right"
)
((= v1-3 (gui-channel hud-center-right))
"hud-center-right"
)
((= v1-3 (gui-channel alert))
"alert"
)
((= v1-3 (gui-channel hud-mp-player-indicators-0))
"hud-mp-player-indicators-0"
)
((= v1-3 (gui-channel hud-mp-player-indicators-1))
"hud-mp-player-indicators-1"
)
((= v1-3 (gui-channel hud-mp-race-0))
"hud-mp-race-0"
)
((= v1-3 (gui-channel hud-upper-left))
"hud-upper-left"
)
((= v1-3 (gui-channel speech))
"speech"
)
((= v1-3 (gui-channel query))
"query"
)
((= v1-3 (gui-channel hud-lower-right))
"hud-lower-right"
)
((= v1-3 (gui-channel screen))
"screen"
)
((= v1-3 (gui-channel guard))
"guard"
)
((= v1-3 (gui-channel hud-mp-race-3))
"hud-mp-race-3"
)
((= v1-3 (gui-channel supertitle))
"supertitle"
)
((= v1-3 (gui-channel hal))
"hal"
)
((= v1-3 (gui-channel hud-upper-center))
"hud-upper-center"
)
((= v1-3 (gui-channel blackout))
"blackout"
)
((= v1-3 (gui-channel bbush))
"bbush"
)
((= v1-3 (gui-channel hud))
"hud"
)
((= v1-3 (gui-channel voice))
"voice"
)
((= v1-3 (gui-channel jak-mode))
"jak-mode"
)
((= v1-3 (gui-channel max))
"max"
)
((= v1-3 (gui-channel none))
"none"
)
((= v1-3 (gui-channel freeze))
"freeze"
)
((= v1-3 (gui-channel notice-low))
"notice-low"
)
((= v1-3 (gui-channel art-load))
"art-load"
)
((= v1-3 (gui-channel hud-auto-save-message))
"hud-auto-save-message"
)
((= v1-3 (gui-channel jak))
"jak"
)
((= v1-3 (gui-channel progress))
"progress"
)
((= v1-3 (gui-channel resetter))
"resetter"
)
((= v1-3 (gui-channel jak-effect-2))
"jak-effect-2"
)
((= v1-3 (gui-channel daxter))
"daxter"
)
((= v1-3 (gui-channel hud-lower-left-2))
"hud-lower-left-2"
)
((= v1-3 (gui-channel background))
"background"
)
((= v1-3 (gui-channel beast))
"beast"
)
((= v1-3 (gui-channel hud-mp-vehicle-main-0))
"hud-mp-vehicle-main-0"
)
((= v1-3 (gui-channel hud-auto-save))
"hud-auto-save"
)
((= v1-3 (gui-channel hud-lower-center))
"hud-lower-center"
)
((= v1-3 (gui-channel rider))
"rider"
)
((= v1-3 (gui-channel movie))
"movie"
)
(else
"*unknown*"
)
)
)
)
(format #t "~1Tanim-part: ~D~%" (-> this anim-part))
(format #t "~1Tflags: ~D~%" (-> this flags))
(format #t "~1Tname: ~A~%" (-> this name))
(format #t "~1Tid: ~D~%" (-> this id))
(format #t "~1Thandle: ~D~%" (-> this handle))
(format #t "~1Ttime-stamp: ~D~%" (-> this time-stamp))
(format #t "~1Thold-time: ~D~%" (-> this hold-time))
(format #t "~1Tfo-min: ~f~%" (-> this fo-min))
(format #t "~1Tfo-max: ~f~%" (-> this fo-max))
(format #t "~1Tfo-power: ~f~%" (-> this fo-power))
(format #t "~1Tfade: ~D~%" (-> this fade))
(format #t "~1Tvolume: ~f~%" (-> this volume))
(format #t "~1Tqw-pad[4] @ #x~X~%" (-> this qw-pad))
(label cfg-146)
this
)
;; type gui-control is defined here, but it is unknown to the decompiler
;; failed to figure out what this is:
0