mirror of
https://github.com/open-goal/jak-project.git
synced 2024-10-20 21:27:52 -04:00
58a5440c8a
Makes a bunch of missions mostly playable, including: - `arena-training-1` - `arena-fight-1` - `wascity-chase` - `arena-fight-2` - `arena-fight-3` - `volcano-darkeco` - `desert-hover` - `nest-eggs` - `temple-climb` - `temple-oracle` - `temple-tests` - `desert-beast-battle` - `desert-turtle-training` - `desert-course-race` - `desert-artifact-race1` - `wascity-leaper-race` - `wascity-pre-game` - `sewer-met-hum` - `forest-kill-plants` - `forest-ring-chase` - `temple-defend` - `tower-destroy` - `desert-glide` --- Files: - `ripple` - `waswide-mood` - `sig-rider` - `nst-tasks` - `nst-part` - `nst-gas` - `nst-eggs-h` - `nst-obs` - `nst-mood` - `egg-spider` - `wasdoors-init` - `wasall-tasks` - `wvehicle-race` - `wcar-marauder` - `wcar-marauder-b` - `turret-control` - `was-squad-control` - `turtle-training` - `kleever-rider` - `course-race` - `artifact-race` - `desert-hover` - `desbeast-path-h` - `des-beast` - `desertg-obs` - `desertf-obs` - `desertd-obs` - `desert-dust-storm` - `des-cactus` - `race-hud` - `race-info` - `race-manager` - `tizard` - `flyingsaw` - `hover-training` - `temple-mood` - `temple-obs` - `temple-obs2` - `temple-part` - `temple-scenes` - `templex-mood` - `templex-obs` - `templex-part` - `tomb-baby-spider` - `target-turret-shot` - `target-turret` - `beast-battle-path` - `des-beast-2` - `mh-flyer` - `scorpion-gun` - `hover-enemy-h` - `hover-enemy` - `hover-formation-h` - `hover-formation` - `hover-nav-control-h` - `hover-nav-control` - `flamer-hover` - `hover-nav-templea` - `robo-hover` - `hover-nav-sewb` - `hover-nav-sewg` - `hover-nav-sewj` - `hover-nav-sewl` - `hover-nav-sewo` - `hover-nav-towera` - `tower-mood` - `tower-obs` - `tower-scenes` - `tower-part` - `eco-green-collider` - `forest-bridges` - `forest-kill-plants` - `forest-mood` - `forest-ring-chase` - `forest-tasks` - `forest-part` - `foresta-obs` - `hover-nav-foresta` - `mh-plant` - `dp-bipedal-part` - `dp-bipedal-shot` - `dp-bipedal` - `neo-spawner` - `for-turret` - `for-turret-shot` - `neo-wasp` - `neo-wasp-part` - `volcanox-scenes` - `volcanox-mood` - `volcano-scenes` - `volcano-mood` - `volcano-obs` - `volcano-obs2` - `chain-physics` - `rigid-body-plat` - `volcano-part` - `flamer-lava` - `flitter` - `spiky-frog` - `flut-wild` - `target-indax` - `target-indax-hang` - `mantis` - `volcanox-obs` - `spyder` - `wcar-faccar` - `mhcity-obs2` - `mhcity-part` - `mhcity-obs` - `dm-mine-spider` - `rapid-gunner` - `stadium-mood` - `stadium-scenes` - `stadiuma-mood` - `stadiuma-part` - `kanga-lizard` - `marauder` - `arena-scenes` - `wasstada-mood` - `wasstada-obs` - `wasstada-part` - `wasstadb-obs` - `wasstadc-obs` - `dm-flyer` - `maker-part` - `maker-projectile` - `skeet-part` - `wascity-turret` - `wasgun-h` - `wasgun-hud` - `wasgun-manager` - `nav-graph-h` - `traffic-engine-h` - `waswide-init` - `cty-borrow-manager-h` - `cty-borrow-manager` - `desert-part` - `height-map-h` - `height-map` - `traffic-height-map` - `vehicle-control` - `hvehicle-h` - `hvehicle` - `hvehicle-effects` - `hvehicle-physics` - `hvehicle-util` - `glider-h` - `glider-hud` - `glider-manager` - `glider-ring` - `glider-ring-part` - `h-glider` - `hanga-init` - `was-pre-game` - `was-leaper-race` - `flut-racer` - `desert-scenes` - `desert-lizard-h` - `desert-lizard-task` - `desert-lizard` - `throne-scenes` - `waspal-mood` - `waspala-obs` - `waspala-part` - `deswalk-obs` - `deswalk-part` - `terraformer-drone` - `terraformer-head` - `terraformer-part` - `terraformer-setup`
111 lines
6.8 KiB
Common Lisp
111 lines
6.8 KiB
Common Lisp
;;-*-Lisp-*-
|
|
(in-package goal)
|
|
|
|
;; name: volcano-mood.gc
|
|
;; name in dgo: volcano-mood
|
|
;; dgos: VOCA
|
|
|
|
;; DECOMP BEGINS
|
|
|
|
(define *volcano-mood-color-table*
|
|
(new 'static 'mood-color-table :data (new 'static 'inline-array mood-color 8
|
|
(new 'static 'mood-color
|
|
:lgt-color (new 'static 'vector :x 1.1978 :y 1.0519 :z 0.389)
|
|
:amb-color (new 'static 'vector :x 0.2722 :y 0.3004 :z 0.4219 :w 1.0)
|
|
)
|
|
(new 'static 'mood-color
|
|
:lgt-color (new 'static 'vector :x 1.6167 :y 1.4673 :z 1.0974)
|
|
:amb-color (new 'static 'vector :x 0.4197 :y 0.5195 :z 0.5974 :w 1.0)
|
|
)
|
|
(new 'static 'mood-color
|
|
:lgt-color (new 'static 'vector :x 1.841 :y 1.6849 :z 1.3595)
|
|
:amb-color (new 'static 'vector :x 0.4197 :y 0.5195 :z 0.5974 :w 1.0)
|
|
)
|
|
(new 'static 'mood-color
|
|
:lgt-color (new 'static 'vector :x 1.6167 :y 1.4673 :z 1.0974)
|
|
:amb-color (new 'static 'vector :x 0.4976 :y 0.5195 :z 0.4419 :w 1.0)
|
|
)
|
|
(new 'static 'mood-color
|
|
:lgt-color (new 'static 'vector :x 1.5685 :y 1.1821 :z 0.3112)
|
|
:amb-color (new 'static 'vector :x 0.3439 :y 0.401 :z 0.5508 :w 1.0)
|
|
)
|
|
(new 'static 'mood-color
|
|
:lgt-color (new 'static 'vector :x 0.5774 :y 0.4298 :z 0.4757)
|
|
:amb-color (new 'static 'vector :x 0.3432 :y 0.3971 :z 0.4284 :w 1.0)
|
|
)
|
|
(new 'static 'mood-color
|
|
:lgt-color (new 'static 'vector :x 0.5192 :y 0.7075 :z 0.8291)
|
|
:amb-color (new 'static 'vector :x 0.4013 :y 0.3901 :z 0.519 :w 1.0)
|
|
)
|
|
(new 'static 'mood-color
|
|
:lgt-color (new 'static 'vector :x 0.3333 :y 0.5748 :z 0.4777)
|
|
:amb-color (new 'static 'vector :x 0.3498 :y 0.3648 :z 0.3454 :w 1.0)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
|
|
(define *volcano-mood-fog-table*
|
|
(new 'static 'mood-fog-table :data (new 'static 'inline-array mood-fog 8
|
|
(new 'static 'mood-fog
|
|
:fog-color (new 'static 'vector :x 181.0 :y 140.0 :z 140.0 :w 128.0)
|
|
:fog-dists (new 'static 'vector :x 131072.0 :y 1843200.0 :z 255.0 :w 128.0)
|
|
:erase-color (new 'static 'vector :w 128.0)
|
|
)
|
|
(new 'static 'mood-fog
|
|
:fog-color (new 'static 'vector :x 205.0 :y 169.0 :z 136.0 :w 128.0)
|
|
:fog-dists (new 'static 'vector :x 131072.0 :y 1843200.0 :z 255.0 :w 128.0)
|
|
:erase-color (new 'static 'vector :w 128.0)
|
|
)
|
|
(new 'static 'mood-fog
|
|
:fog-color (new 'static 'vector :x 198.0 :y 160.0 :z 83.0 :w 128.0)
|
|
:fog-dists (new 'static 'vector :x 131072.0 :y 1843200.0 :z 255.0 :w 128.0)
|
|
:erase-color (new 'static 'vector :w 128.0)
|
|
)
|
|
(new 'static 'mood-fog
|
|
:fog-color (new 'static 'vector :x 170.0 :y 145.0 :z 130.0 :w 128.0)
|
|
:fog-dists (new 'static 'vector :x 262144.0 :y 1843200.0 :z 255.0 :w 128.0)
|
|
:erase-color (new 'static 'vector :w 128.0)
|
|
)
|
|
(new 'static 'mood-fog
|
|
:fog-color (new 'static 'vector :x 170.0 :y 140.0 :z 150.0 :w 128.0)
|
|
:fog-dists (new 'static 'vector :x 131072.0 :y 1843200.0 :z 255.0 :w 128.0)
|
|
:erase-color (new 'static 'vector :w 128.0)
|
|
)
|
|
(new 'static 'mood-fog
|
|
:fog-color (new 'static 'vector :x 61.0 :y 58.0 :w 128.0)
|
|
:fog-dists (new 'static 'vector :x 131072.0 :y 1146880.0 :z 255.0 :w 178.5)
|
|
:erase-color (new 'static 'vector :w 128.0)
|
|
)
|
|
(new 'static 'mood-fog
|
|
:fog-color (new 'static 'vector :x 50.0 :y 44.0 :z 24.0 :w 128.0)
|
|
:fog-dists (new 'static 'vector :x 131072.0 :y 942080.0 :z 255.0 :w 138.0)
|
|
:erase-color (new 'static 'vector :w 128.0)
|
|
)
|
|
(new 'static 'mood-fog
|
|
:fog-color (new 'static 'vector :x 50.0 :y 34.7999 :z 17.5998 :w 128.0)
|
|
:fog-dists (new 'static 'vector :x 131072.0 :y 1392640.0 :z 255.0 :w 133.0)
|
|
:erase-color (new 'static 'vector :w 128.0)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
|
|
(deftype volcano-states (structure)
|
|
()
|
|
)
|
|
|
|
|
|
(defbehavior update-mood-volcano time-of-day-proc ((arg0 mood-context) (arg1 float) (arg2 int))
|
|
(copy-mood-exterior arg0)
|
|
(when (not (-> *time-of-day-context* overide-enable))
|
|
(overide-mood-color arg0 arg1 (the-as int *volcano-mood-color-table*) 0.0)
|
|
(overide-mood-fog arg0 arg1 (the-as int *volcano-mood-fog-table*) 0.0)
|
|
)
|
|
(-> arg0 state)
|
|
(set! (-> arg0 times 5 w) 1.0)
|
|
(set! (-> arg0 times 7 w) 1.0)
|
|
0
|
|
(none)
|
|
)
|