mirror of
https://github.com/open-goal/jak-project
synced 2026-05-30 00:47:20 -04:00
ManDude
24578b64b9
* hardcode `time-frame`things * Update cam-states_REF.gc * Update level-info_REF.gc * update refs 1 * update refs 2 * update refs 3 * update refs 4 * update refs 5 * update detection and casting * Update FormExpressionAnalysis.cpp * update refs 6 * update mood decomp * update refs 7 * update refs 8 * remove temp entity birth code * update time-frame casts * fix compiler * hardcode stuff and fix some types * fix some bitfield detection being wrong * bug fixes * detect seconds on adds with immediate * update refs 9 * fix casts and rand-vu-int-range bugs (update refs 10) * update refs 11 * update 12 * update 13 * update 14 * Update game-info_REF.gc * improve cpad macros detection * remove unused code * update refs * clang * update source code * Update cam-states.gc * `lavatube-energy` finish * update refs * fix actor bank stuff * Update navigate.gc * reduce entity default stack size * Update transformq-h.gc * oops forgot these * fix code and tests * fix mood sound stuff * Update load-dgo.gc * Update README.md
330 lines
10 KiB
Common Lisp
Vendored
Generated
330 lines
10 KiB
Common Lisp
Vendored
Generated
;;-*-Lisp-*-
|
|
(in-package goal)
|
|
|
|
;; definition for symbol *stats-poly*, type symbol
|
|
(define *stats-poly* #f)
|
|
|
|
;; definition for symbol *stats-memory*, type symbol
|
|
(define *stats-memory* #f)
|
|
|
|
;; definition for symbol *stats-memory-short*, type symbol
|
|
(define *stats-memory-short* #f)
|
|
|
|
;; definition for symbol *stats-collide*, type symbol
|
|
(define *stats-collide* #f)
|
|
|
|
;; definition for symbol *stats-bsp*, type symbol
|
|
(define *stats-bsp* #f)
|
|
|
|
;; definition for symbol *stats-buffer*, type symbol
|
|
(define *stats-buffer* #f)
|
|
|
|
;; definition for symbol *stats-target*, type symbol
|
|
(define *stats-target* #f)
|
|
|
|
;; definition for symbol *stats-dma-test*, type symbol
|
|
(define *stats-dma-test* #f)
|
|
|
|
;; definition for symbol *artist-all-visible*, type symbol
|
|
(define *artist-all-visible* #f)
|
|
|
|
;; definition for symbol *artist-flip-visible*, type symbol
|
|
(define *artist-flip-visible* #f)
|
|
|
|
;; definition for symbol *artist-fix-visible*, type symbol
|
|
(define *artist-fix-visible* #f)
|
|
|
|
;; definition for symbol *artist-fix-frustum*, type symbol
|
|
(define *artist-fix-frustum* #f)
|
|
|
|
;; definition for symbol *artist-error-spheres*, type symbol
|
|
(define *artist-error-spheres* #f)
|
|
|
|
;; definition for symbol *artist-use-menu-subdiv*, type symbol
|
|
(define *artist-use-menu-subdiv* #f)
|
|
|
|
;; definition for symbol *display-profile*, type symbol
|
|
(define *display-profile* #t)
|
|
|
|
;; definition for symbol *display-sidekick-stats*, type symbol
|
|
(define *display-sidekick-stats* #f)
|
|
|
|
;; definition for symbol *display-quad-stats*, type symbol
|
|
(define *display-quad-stats* #f)
|
|
|
|
;; definition for symbol *display-tri-stats*, type symbol
|
|
(define *display-tri-stats* #f)
|
|
|
|
;; definition for symbol *display-perf-stats*, type symbol
|
|
(define *display-perf-stats* #f)
|
|
|
|
;; definition for symbol *display-ground-stats*, type symbol
|
|
(define *display-ground-stats* #f)
|
|
|
|
;; definition for symbol *display-collision-marks*, type symbol
|
|
(define *display-collision-marks* #f)
|
|
|
|
;; definition for symbol *display-collide-cache*, type symbol
|
|
(define *display-collide-cache* #f)
|
|
|
|
;; definition for symbol *display-render-collision*, type symbol
|
|
(define *display-render-collision* #f)
|
|
|
|
;; definition for symbol *display-hipri-collision-marks*, type symbol
|
|
(define *display-hipri-collision-marks* #f)
|
|
|
|
;; definition for symbol *display-edge-collision-marks*, type symbol
|
|
(define *display-edge-collision-marks* #f)
|
|
|
|
;; definition for symbol *display-geo-marks*, type symbol
|
|
(define *display-geo-marks* #f)
|
|
|
|
;; definition for symbol *display-target-marks*, type symbol
|
|
(define *display-target-marks* #f)
|
|
|
|
;; definition for symbol *display-collide-history*, type int
|
|
(define *display-collide-history* 0)
|
|
|
|
;; definition for symbol *display-xyz-axes*, type symbol
|
|
(define *display-xyz-axes* #f)
|
|
|
|
;; definition for symbol *display-cam-collide-history*, type symbol
|
|
(define *display-cam-collide-history* #f)
|
|
|
|
;; definition for symbol *record-cam-collide-history*, type symbol
|
|
(define *record-cam-collide-history* #f)
|
|
|
|
;; definition for symbol *display-cam-master-marks*, type symbol
|
|
(define *display-cam-master-marks* #f)
|
|
|
|
;; definition for symbol *display-cam-other*, type symbol
|
|
(define *display-cam-other* #f)
|
|
|
|
;; definition for symbol *display-camera-marks*, type symbol
|
|
(define *display-camera-marks* #f)
|
|
|
|
;; definition for symbol *camera-no-mip-correction*, type symbol
|
|
(define *camera-no-mip-correction* #f)
|
|
|
|
;; definition for symbol *display-cam-los-info*, type symbol
|
|
(define *display-cam-los-info* #f)
|
|
|
|
;; definition for symbol *display-cam-los-debug*, type symbol
|
|
(define *display-cam-los-debug* #f)
|
|
|
|
;; definition for symbol *display-cam-los-marks*, type symbol
|
|
(define *display-cam-los-marks* #f)
|
|
|
|
;; definition for symbol *display-cam-coll-marks*, type symbol
|
|
(define *display-cam-coll-marks* #f)
|
|
|
|
;; definition for symbol *display-camera-info*, type symbol
|
|
(define *display-camera-info* #f)
|
|
|
|
;; definition for symbol *display-camera-old-stats*, type symbol
|
|
(define *display-camera-old-stats* #f)
|
|
|
|
;; definition for symbol *display-camera-last-attacker*, type symbol
|
|
(define *display-camera-last-attacker* #f)
|
|
|
|
;; definition for symbol *display-file-info*, type symbol
|
|
(define *display-file-info* #f)
|
|
|
|
;; definition for symbol *display-actor-marks*, type symbol
|
|
(define *display-actor-marks* #f)
|
|
|
|
;; definition for symbol *display-ambient-hint-marks*, type symbol
|
|
(define *display-ambient-hint-marks* #f)
|
|
|
|
;; definition for symbol *display-ambient-sound-marks*, type symbol
|
|
(define *display-ambient-sound-marks* #f)
|
|
|
|
;; definition for symbol *display-ambient-poi-marks*, type symbol
|
|
(define *display-ambient-poi-marks* #f)
|
|
|
|
;; definition for symbol *display-ambient-light-marks*, type symbol
|
|
(define *display-ambient-light-marks* #f)
|
|
|
|
;; definition for symbol *display-ambient-dark-marks*, type symbol
|
|
(define *display-ambient-dark-marks* #f)
|
|
|
|
;; definition for symbol *display-ambient-weather-off-marks*, type symbol
|
|
(define *display-ambient-weather-off-marks* #f)
|
|
|
|
;; definition for symbol *display-ambient-ocean-off-marks*, type symbol
|
|
(define *display-ambient-ocean-off-marks* #f)
|
|
|
|
;; definition for symbol *display-ambient-ocean-near-off-marks*, type symbol
|
|
(define *display-ambient-ocean-near-off-marks* #f)
|
|
|
|
;; definition for symbol *display-ambient-music-marks*, type symbol
|
|
(define *display-ambient-music-marks* #f)
|
|
|
|
;; definition for symbol *display-sprite-info*, type symbol
|
|
(define *display-sprite-info* #f)
|
|
|
|
;; definition for symbol *display-entity-errors*, type symbol
|
|
(define *display-entity-errors* #t)
|
|
|
|
;; definition for symbol *display-lights*, type symbol
|
|
(define *display-lights* #f)
|
|
|
|
;; definition for symbol *display-instance-info*, type symbol
|
|
(define *display-instance-info* #f)
|
|
|
|
;; definition for symbol *display-deci-count*, type symbol
|
|
(define *display-deci-count* #f)
|
|
|
|
;; definition for symbol *sync-dma*, type symbol
|
|
(define *sync-dma* #f)
|
|
|
|
;; definition for symbol *display-strip-lines*, type int
|
|
(define *display-strip-lines* 0)
|
|
|
|
;; definition for symbol *display-nav-marks*, type symbol
|
|
(define *display-nav-marks* #f)
|
|
|
|
;; definition for symbol *display-path-marks*, type symbol
|
|
(define *display-path-marks* #f)
|
|
|
|
;; definition for symbol *display-vol-marks*, type symbol
|
|
(define *display-vol-marks* #f)
|
|
|
|
;; definition for symbol *display-water-marks*, type symbol
|
|
(define *display-water-marks* #f)
|
|
|
|
;; definition for symbol *display-actor-anim*, type string
|
|
(define *display-actor-anim* (the-as string #f))
|
|
|
|
;; definition for symbol *display-process-anim*, type (pointer process)
|
|
(define *display-process-anim* (the-as (pointer process) #f))
|
|
|
|
;; definition for symbol *display-actor-vis*, type symbol
|
|
(define *display-actor-vis* #f)
|
|
|
|
;; definition for symbol *display-actor-graph*, type symbol
|
|
(define *display-actor-graph* #f)
|
|
|
|
;; definition for symbol *display-level-border*, type symbol
|
|
(define *display-level-border* #f)
|
|
|
|
;; definition for symbol *display-load-boundaries*, type symbol
|
|
(define *display-load-boundaries* #f)
|
|
|
|
;; definition for symbol *display-memcard-info*, type symbol
|
|
(define *display-memcard-info* #f)
|
|
|
|
;; definition for symbol *display-split-boxes*, type symbol
|
|
(define *display-split-boxes* #f)
|
|
|
|
;; definition for symbol *display-split-box-info*, type symbol
|
|
(define *display-split-box-info* #f)
|
|
|
|
;; definition for symbol *display-texture-download*, type symbol
|
|
(define *display-texture-download* #f)
|
|
|
|
;; definition for symbol *display-art-control*, type symbol
|
|
(define *display-art-control* #f)
|
|
|
|
;; definition for symbol *display-level-spheres*, type symbol
|
|
(define *display-level-spheres* #f)
|
|
|
|
;; definition for symbol *time-of-day-effects*, type symbol
|
|
(define *time-of-day-effects* #t)
|
|
|
|
;; definition for symbol *time-of-day-fast*, type symbol
|
|
(define *time-of-day-fast* #t)
|
|
|
|
;; definition for symbol *display-iop-info*, type symbol
|
|
(define *display-iop-info* #f)
|
|
|
|
;; definition for symbol *ambient-sound-class*, type symbol
|
|
(define *ambient-sound-class* #t)
|
|
|
|
;; definition for symbol *slow-frame-rate*, type symbol
|
|
(define *slow-frame-rate* #f)
|
|
|
|
;; definition for symbol *weather-off*, type symbol
|
|
(define *weather-off* #f)
|
|
|
|
;; definition for symbol *debug-pause*, type symbol
|
|
(define *debug-pause* #f)
|
|
|
|
;; definition for symbol *subdivide-draw-mode*, type int
|
|
(define *subdivide-draw-mode* 0)
|
|
|
|
;; definition for symbol *ocean-subdivide-draw-mode*, type int
|
|
(define *ocean-subdivide-draw-mode* 0)
|
|
|
|
;; definition (perm) for symbol *dproc*, type process
|
|
(define-perm *dproc* process #f)
|
|
|
|
;; definition for symbol *run*, type symbol
|
|
(define *run* #f)
|
|
|
|
;; definition for symbol *teleport*, type symbol
|
|
(define *teleport* #f)
|
|
|
|
;; definition for symbol *teleport-count*, type int
|
|
(define *teleport-count* 0)
|
|
|
|
;; definition for symbol *draw-hook*, type (function none)
|
|
(define *draw-hook* nothing)
|
|
|
|
;; definition for symbol *debug-hook*, type (function none)
|
|
(define *debug-hook* nothing)
|
|
|
|
;; definition for symbol *menu-hook*, type (function debug-menu-context)
|
|
(define *menu-hook* (the-as (function debug-menu-context) nothing))
|
|
|
|
;; definition for symbol *progress-hook*, type (function none)
|
|
(define *progress-hook* nothing)
|
|
|
|
;; definition for symbol *dma-timeout-hook*, type (function none)
|
|
(define *dma-timeout-hook* nothing)
|
|
|
|
;; definition of type frame-stats
|
|
(deftype frame-stats (structure)
|
|
((field-time time-frame 2 :offset-assert 0)
|
|
(field int32 :offset-assert 16)
|
|
)
|
|
:method-count-assert 9
|
|
:size-assert #x14
|
|
:flag-assert #x900000014
|
|
)
|
|
|
|
;; definition for method 3 of type frame-stats
|
|
(defmethod inspect frame-stats ((obj frame-stats))
|
|
(format #t "[~8x] ~A~%" obj 'frame-stats)
|
|
(format #t "~Tfield-time[2] @ #x~X~%" (-> obj field-time))
|
|
(format #t "~Tfield: ~D~%" (-> obj field))
|
|
obj
|
|
)
|
|
|
|
;; definition for symbol *frame-stats*, type frame-stats
|
|
(define *frame-stats* (new 'static 'frame-stats))
|
|
|
|
;; definition of type screen-filter
|
|
(deftype screen-filter (basic)
|
|
((draw? basic :offset-assert 4)
|
|
(color rgba :offset-assert 8)
|
|
)
|
|
:method-count-assert 10
|
|
:size-assert #xc
|
|
:flag-assert #xa0000000c
|
|
(:methods
|
|
(draw (_type_) none 9)
|
|
)
|
|
)
|
|
|
|
;; definition for method 3 of type screen-filter
|
|
(defmethod inspect screen-filter ((obj screen-filter))
|
|
(format #t "[~8x] ~A~%" obj (-> obj type))
|
|
(format #t "~Tdraw?: ~A~%" (-> obj draw?))
|
|
(format #t "~Tcolor: ~D~%" (-> obj color))
|
|
obj
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
0
|