mirror of
https://github.com/open-goal/jak-project
synced 2026-08-18 05:48:28 -04:00
water111
dbc266c00b
* begin work on improved pretty printer * update ref * finish pretty printer * force line break for defstate
165 lines
8.7 KiB
Common Lisp
Vendored
Generated
165 lines
8.7 KiB
Common Lisp
Vendored
Generated
;;-*-Lisp-*-
|
|
(in-package goal)
|
|
|
|
;; failed to figure out what this is:
|
|
(set! (-> *part-group-id-table* 120)
|
|
(new 'static 'sparticle-launch-group
|
|
:length 3
|
|
:duration #xbb8
|
|
:linger-duration #x5dc
|
|
:name "group-flut-trans-pad"
|
|
:launcher
|
|
(new 'static 'inline-array sparticle-group-item 3
|
|
(sp-item 746 :fade-after (meters 160.0))
|
|
(sp-item 747 :fade-after (meters 160.0))
|
|
(sp-item 748 :fade-after (meters 60.0) :falloff-to (meters 60.0) :flags (is-3d))
|
|
)
|
|
:bounds (new 'static 'sphere :w 32768.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(set! (-> *part-id-table* 746) (new 'static 'sparticle-launcher
|
|
:init-specs
|
|
(new 'static 'inline-array sp-field-init-spec 12
|
|
(sp-tex spt-texture (new 'static 'texture-id :index #x29 :page #x2))
|
|
(sp-flt spt-num 0.5)
|
|
(sp-flt spt-y (meters 7.0))
|
|
(sp-rnd-flt spt-scale-x (meters 14.0) (meters 1.0) 1.0)
|
|
(sp-flt spt-scale-y (meters 14.0))
|
|
(sp-flt spt-r 40.0)
|
|
(sp-rnd-flt spt-g 60.0 60.0 1.0)
|
|
(sp-flt spt-b 128.0)
|
|
(sp-rnd-flt spt-a 32.0 32.0 1.0)
|
|
(sp-int spt-timer 10)
|
|
(sp-cpuinfo-flags bit2 bit3)
|
|
(sp-end)
|
|
)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(set! (-> *part-id-table* 747) (new 'static 'sparticle-launcher
|
|
:init-specs
|
|
(new 'static 'inline-array sp-field-init-spec 13
|
|
(sp-tex spt-texture (new 'static 'texture-id :index #x29 :page #x2))
|
|
(sp-flt spt-num 0.5)
|
|
(sp-flt spt-y (meters 4.0))
|
|
(sp-rnd-flt spt-scale-x (meters 7.0) (meters 1.0) 1.0)
|
|
(sp-flt spt-scale-y (meters 14.0))
|
|
(sp-flt spt-r 40.0)
|
|
(sp-rnd-flt spt-g 60.0 60.0 1.0)
|
|
(sp-flt spt-b 128.0)
|
|
(sp-rnd-flt spt-a 64.0 64.0 1.0)
|
|
(sp-flt spt-fade-a -8.533334)
|
|
(sp-int spt-timer 10)
|
|
(sp-cpuinfo-flags bit2 bit3)
|
|
(sp-end)
|
|
)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(set! (-> *part-id-table* 748) (new 'static 'sparticle-launcher
|
|
:init-specs
|
|
(new 'static 'inline-array sp-field-init-spec 20
|
|
(sp-tex spt-texture (new 'static 'texture-id :index #x1e :page #x2))
|
|
(sp-flt spt-num 1.0)
|
|
(sp-rnd-flt spt-y (meters 0.75) (meters 0.1) 1.0)
|
|
(sp-flt spt-scale-x (meters 0.0))
|
|
(sp-rnd-flt spt-rot-x 0.0 2730.6667 1.0)
|
|
(sp-rnd-flt spt-rot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-flt spt-r 16.0)
|
|
(sp-rnd-flt spt-g 0.0 127.0 1.0)
|
|
(sp-flt spt-b 127.0)
|
|
(sp-flt spt-a 127.0)
|
|
(sp-flt spt-vel-y (meters 0.0))
|
|
(sp-flt spt-scalevel-x (meters 0.02))
|
|
(sp-rnd-flt spt-rotvel-y (degrees -0.6) (degrees 1.2) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.21333334)
|
|
(sp-flt spt-accel-y -0.6144)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags bit2 bit3)
|
|
(sp-end)
|
|
)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(set! (-> *part-group-id-table* 121)
|
|
(new 'static 'sparticle-launch-group
|
|
:length 2
|
|
:duration #xa
|
|
:linger-duration #x1c2
|
|
:name "group-flut-attack-strike-ground"
|
|
:launcher
|
|
(new 'static 'inline-array sparticle-group-item 2 (sp-item 749) (sp-item 750))
|
|
:bounds (new 'static 'sphere :w 8192.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(set! (-> *part-id-table* 749) (new 'static 'sparticle-launcher
|
|
:init-specs
|
|
(new 'static 'inline-array sp-field-init-spec 25
|
|
(sp-tex spt-texture (new 'static 'texture-id :page #x2))
|
|
(sp-flt spt-num 24.0)
|
|
(sp-flt spt-y (meters 1.0))
|
|
(sp-rnd-flt spt-scale-x (meters 1.0) (meters 1.0) 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 128.0)
|
|
(sp-flt spt-b 128.0)
|
|
(sp-rnd-flt spt-a 8.0 56.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.13333334) (meters 0.16666667) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.013333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.4) (degrees 0.8) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-g -1.4222223)
|
|
(sp-flt spt-fade-a -0.35555556)
|
|
(sp-flt spt-accel-y 0.34133333)
|
|
(sp-flt spt-friction 0.7)
|
|
(sp-int spt-timer 180)
|
|
(sp-cpuinfo-flags bit2 bit3)
|
|
(sp-int spt-next-time 90)
|
|
(sp-launcher-by-id spt-next-launcher 751)
|
|
(sp-flt spt-conerot-x (degrees 90.0))
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-end)
|
|
)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(set! (-> *part-id-table* 750) (new 'static 'sparticle-launcher
|
|
:init-specs
|
|
(new 'static 'inline-array sp-field-init-spec 22
|
|
(sp-tex spt-texture (new 'static 'texture-id :index #xf :page #x2))
|
|
(sp-flt spt-num 32.0)
|
|
(sp-flt spt-y (meters 1.0))
|
|
(sp-rnd-flt spt-scale-x (meters 1.0) (meters 0.5) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-flt spt-r 128.0)
|
|
(sp-flt spt-g 128.0)
|
|
(sp-flt spt-b 128.0)
|
|
(sp-rnd-flt spt-a 64.0 8.0 1.0)
|
|
(sp-flt spt-vel-y (meters 0.3))
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-g -2.8444445)
|
|
(sp-flt spt-fade-a -0.82222223)
|
|
(sp-flt spt-friction 0.7)
|
|
(sp-int spt-timer 90)
|
|
(sp-cpuinfo-flags bit2 bit3)
|
|
(sp-int spt-next-time 45)
|
|
(sp-launcher-by-id spt-next-launcher 751)
|
|
(sp-flt spt-conerot-x (degrees 90.0))
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-end)
|
|
)
|
|
)
|
|
)
|