mirror of
https://github.com/open-goal/jak-project
synced 2026-06-22 09:05:44 -04:00
water111
1b45aab3cc
- decompile `subdivide`, `wind-work`, `tie-work`, `bsp`, `focus` - support `ppacb` in compiler - don't assert when bitfield stuff fails due to constant propgataion weirdness - finish up history - div/mod unsigned assert fix in decompiler - empty assert fix in decompiler for failed `add` type prop - make jak 1 performance counters "work" (just measure time) - fix cast/typos on pcgtb/vftoi15
18 lines
475 B
Common Lisp
18 lines
475 B
Common Lisp
;;-*-Lisp-*-
|
|
(in-package goal)
|
|
|
|
;; name: wind-work.gc
|
|
;; name in dgo: wind-work
|
|
;; dgos: ENGINE, GAME
|
|
|
|
;; DECOMP BEGINS
|
|
|
|
(define *wind-work*
|
|
(new 'static 'wind-work :wind-const (new 'static 'vector :x 0.5 :y 100.0 :z 0.0166 :w -1.0))
|
|
)
|
|
|
|
(set! (-> *wind-work* to-ptrs 0) (the-as uint (&+ *fake-scratchpad-data* 8192)))
|
|
(set! (-> *wind-work* to-ptrs 1) (the-as uint (&+ *fake-scratchpad-data* 4096)))
|
|
(set! (-> *wind-work* to-ptrs 2) (the-as uint *fake-scratchpad-data*))
|
|
|