mirror of
https://github.com/open-goal/jak-project
synced 2026-08-16 05:09:45 -04:00
fbcc1542f3
* decomp: finish `beach-part` * decomp: finish `citadel-part` * decomp: finish `robotboss-part` * decomp: finish `sage-finalboss-part` * decomp: finish `jungle-part` * decomp: finish `flut-part` * decomp: finish `firecanyon-part` * decomp: finish `village2-part2` * decomp: finish `swamp-part` * decomp: finish `maincave-part` * decomp: finish `sunken-part0-5` * decomp: finish `ogre-part` * decomp: finish `robocave-part` and `snow-part` * decomp: finish `collectables-part` * decomp: finish `village1-part` * decomp: finish `village1-part2 * decomp: finish `training-part` * decomp: finish `misty-part` * decomp: finish `village2-part` * decomp: finish `village3-part` * decomp: finish `lavatube-part` * decomp: finish `hud-h`, `target-racer-h`, `racer-part` * address feedback
241 lines
7.1 KiB
Common Lisp
241 lines
7.1 KiB
Common Lisp
;;-*-Lisp-*-
|
|
(in-package goal)
|
|
|
|
;; name: robocave-part.gc
|
|
;; name in dgo: robocave-part
|
|
;; dgos: L1, ROB
|
|
|
|
;; DECOMP BEGINS
|
|
|
|
(deftype robocave-part (part-spawner)
|
|
()
|
|
:heap-base #x60
|
|
:method-count-assert 21
|
|
:size-assert #xd0
|
|
:flag-assert #x15006000d0
|
|
)
|
|
|
|
|
|
(set!
|
|
(-> *part-group-id-table* 506)
|
|
(new 'static 'sparticle-launch-group
|
|
:length 6
|
|
:duration #xbb8
|
|
:linger-duration #x5dc
|
|
:name "group-part-robocave-torch"
|
|
:launcher
|
|
(new 'static 'inline-array sparticle-group-item 6
|
|
(sp-item 729 :fade-after (meters 150.0) :falloff-to (meters 180.0))
|
|
(sp-item 730 :fade-after (meters 100.0) :falloff-to (meters 100.0))
|
|
(sp-item 731 :fade-after (meters 40.0) :falloff-to (meters 40.0) :period 600 :length 90)
|
|
(sp-item 732 :fade-after (meters 40.0) :falloff-to (meters 40.0) :period 369 :length 69)
|
|
(sp-item 733 :fade-after (meters 40.0) :falloff-to (meters 40.0) :period 710 :length 51)
|
|
(sp-item 734 :fade-after (meters 30.0) :falloff-to (meters 30.0))
|
|
)
|
|
:bounds
|
|
(new 'static 'sphere :y 12288.0 :w 16384.0)
|
|
)
|
|
)
|
|
|
|
(set!
|
|
(-> *part-id-table* 734)
|
|
(new 'static 'sparticle-launcher
|
|
:init-specs
|
|
(new 'static 'inline-array sp-field-init-spec 15
|
|
(sp-flt spt-num 0.3)
|
|
(sp-flt spt-x (meters 0.2))
|
|
(sp-rnd-flt spt-y (meters 1.0) (meters 1.0) 1.0)
|
|
(sp-int spt-rot-x 5)
|
|
(sp-flt spt-r 4096.0)
|
|
(sp-flt spt-g 2867.2)
|
|
(sp-flt spt-b 3276.8)
|
|
(sp-rnd-flt spt-vel-x (meters 0.0) (meters 0.006666667) 1.0)
|
|
(sp-flt spt-vel-y (meters 0.026666667))
|
|
(sp-int spt-timer 180)
|
|
(sp-cpuinfo-flags aux-list)
|
|
(sp-int spt-next-time 120)
|
|
(sp-launcher-by-id spt-next-launcher 735)
|
|
(sp-rnd-flt spt-rotate-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-end)
|
|
)
|
|
)
|
|
)
|
|
|
|
(set!
|
|
(-> *part-id-table* 735)
|
|
(new 'static 'sparticle-launcher
|
|
:init-specs
|
|
(new 'static 'inline-array sp-field-init-spec 2
|
|
(sp-flt spt-fade-b -6.826667)
|
|
(sp-end)
|
|
)
|
|
)
|
|
)
|
|
|
|
(set!
|
|
(-> *part-id-table* 729)
|
|
(new 'static 'sparticle-launcher
|
|
:init-specs
|
|
(new 'static 'inline-array sp-field-init-spec 19
|
|
(sp-tex spt-texture (new 'static 'texture-id :page #x2))
|
|
(sp-rnd-int spt-num 1068708659 1 0.5)
|
|
(sp-rnd-flt spt-x (meters -0.35) (meters 0.7) 1.0)
|
|
(sp-rnd-flt spt-z -1433.6 2867.2 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.6) (meters 0.3) 1.0)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-flt spt-r 128.0 128.0 1.0)
|
|
(sp-rnd-flt spt-g 0.0 60.0 1.0)
|
|
(sp-flt spt-a 0.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.016666668) (meters 0.013333334) 1.0)
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.1) (degrees 0.2) 1.0)
|
|
(sp-flt spt-fade-a 13.066667)
|
|
(sp-flt spt-accel-y -0.8192)
|
|
(sp-int spt-timer 75)
|
|
(sp-cpuinfo-flags bit2 bit3)
|
|
(sp-int spt-next-time 15)
|
|
(sp-launcher-by-id spt-next-launcher 736)
|
|
(sp-end)
|
|
)
|
|
)
|
|
)
|
|
|
|
(set!
|
|
(-> *part-id-table* 736)
|
|
(new 'static 'sparticle-launcher
|
|
:init-specs
|
|
(new 'static 'inline-array sp-field-init-spec 2
|
|
(sp-flt spt-fade-a -1.3333334)
|
|
(sp-end)
|
|
)
|
|
)
|
|
)
|
|
|
|
(set!
|
|
(-> *part-id-table* 731)
|
|
(new 'static 'sparticle-launcher
|
|
:init-specs
|
|
(new 'static 'inline-array sp-field-init-spec 20
|
|
(sp-tex spt-texture (new 'static 'texture-id :page #x2))
|
|
(sp-flt spt-num 1.5)
|
|
(sp-rnd-flt spt-x (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-flt spt-y (meters 1.0))
|
|
(sp-rnd-flt spt-z -1638.4 3276.8 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.6) (meters 0.3) 1.0)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-flt spt-r 128.0 128.0 1.0)
|
|
(sp-rnd-flt spt-g 0.0 60.0 1.0)
|
|
(sp-flt spt-a 0.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.006666667) 1.0)
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.1) (degrees 0.2) 1.0)
|
|
(sp-flt spt-fade-a 13.066667)
|
|
(sp-flt spt-accel-y -0.8192)
|
|
(sp-int spt-timer 105)
|
|
(sp-cpuinfo-flags bit2 bit3)
|
|
(sp-int spt-next-time 15)
|
|
(sp-launcher-by-id spt-next-launcher 736)
|
|
(sp-end)
|
|
)
|
|
)
|
|
)
|
|
|
|
(set!
|
|
(-> *part-id-table* 732)
|
|
(new 'static 'sparticle-launcher
|
|
:init-specs
|
|
(new 'static 'inline-array sp-field-init-spec 20
|
|
(sp-tex spt-texture (new 'static 'texture-id :page #x2))
|
|
(sp-flt spt-num 1.5)
|
|
(sp-rnd-flt spt-x (meters -0.2) (meters 0.6) 1.0)
|
|
(sp-flt spt-y (meters 0.5))
|
|
(sp-rnd-flt spt-z 0.0 1638.4 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.6) (meters 0.3) 1.0)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-flt spt-r 128.0 128.0 1.0)
|
|
(sp-rnd-flt spt-g 0.0 60.0 1.0)
|
|
(sp-flt spt-a 0.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.018333333) (meters 0.0033333334) 1.0)
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.1) (degrees 0.2) 1.0)
|
|
(sp-flt spt-fade-a 13.066667)
|
|
(sp-flt spt-accel-y -0.8192)
|
|
(sp-int spt-timer 105)
|
|
(sp-cpuinfo-flags bit2 bit3)
|
|
(sp-int spt-next-time 15)
|
|
(sp-launcher-by-id spt-next-launcher 736)
|
|
(sp-end)
|
|
)
|
|
)
|
|
)
|
|
|
|
(set!
|
|
(-> *part-id-table* 733)
|
|
(new 'static 'sparticle-launcher
|
|
:init-specs
|
|
(new 'static 'inline-array sp-field-init-spec 20
|
|
(sp-tex spt-texture (new 'static 'texture-id :page #x2))
|
|
(sp-flt spt-num 2.0)
|
|
(sp-rnd-flt spt-x (meters 0.0) (meters 0.2) 1.0)
|
|
(sp-flt spt-y (meters 0.6))
|
|
(sp-rnd-flt spt-z -2457.6 2457.6 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.7) (meters 0.4) 1.0)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-flt spt-r 128.0 128.0 1.0)
|
|
(sp-rnd-flt spt-g 0.0 60.0 1.0)
|
|
(sp-flt spt-a 0.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.018333333) (meters 0.005) 1.0)
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.1) (degrees 0.2) 1.0)
|
|
(sp-flt spt-fade-a 13.066667)
|
|
(sp-flt spt-accel-y -0.8192)
|
|
(sp-int spt-timer 105)
|
|
(sp-cpuinfo-flags bit2 bit3)
|
|
(sp-int spt-next-time 15)
|
|
(sp-launcher-by-id spt-next-launcher 736)
|
|
(sp-end)
|
|
)
|
|
)
|
|
)
|
|
|
|
(set!
|
|
(-> *part-id-table* 730)
|
|
(new 'static 'sparticle-launcher
|
|
:init-specs
|
|
(new 'static 'inline-array sp-field-init-spec 28
|
|
(sp-tex spt-texture (new 'static 'texture-id :page #x2))
|
|
(sp-flt spt-num 0.4)
|
|
(sp-rnd-flt spt-x (meters -0.5) (meters 1.0) 1.0)
|
|
(sp-flt spt-y (meters 0.3))
|
|
(sp-rnd-flt spt-z -2048.0 4096.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 1.0) (meters 0.5) 1.0)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-flt spt-r 128.0)
|
|
(sp-flt spt-g 96.0)
|
|
(sp-flt spt-b 96.0)
|
|
(sp-rnd-flt spt-a 16.0 32.0 1.0)
|
|
(sp-flt spt-vel-y (meters 0.01))
|
|
(sp-flt spt-scalevel-x (meters 0.0005))
|
|
(sp-rnd-int-flt spt-rotvel-z (degrees -0.26666668) 1 97.09037)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-r -0.10666667)
|
|
(sp-flt spt-fade-g -0.053333335)
|
|
(sp-flt spt-fade-b -0.053333335)
|
|
(sp-flt spt-fade-a -0.08)
|
|
(sp-flt spt-accel-x 0.27306667)
|
|
(sp-flt spt-accel-y 0.13653333)
|
|
(sp-flt spt-friction 0.9975)
|
|
(sp-int spt-timer 600)
|
|
(sp-cpuinfo-flags bit2)
|
|
(sp-rnd-flt spt-conerot-x (degrees 0.0) (degrees 5.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-end)
|
|
)
|
|
)
|
|
)
|
|
|
|
|
|
|
|
|