mirror of
https://github.com/open-goal/jak-project.git
synced 2024-10-20 21:27:52 -04:00
029983270e
everything up to collide-reaction-target (which is mostly done, but could use a few more names) Fixes issues with gun-part and target-part
3226 lines
122 KiB
Common Lisp
3226 lines
122 KiB
Common Lisp
;;-*-Lisp-*-
|
|
(in-package goal)
|
|
|
|
;; name: target-part.gc
|
|
;; name in dgo: target-part
|
|
;; dgos: ENGINE, GAME
|
|
|
|
;; DECOMP BEGINS
|
|
|
|
(defun birth-func-copy-target-y-rot ((arg0 int) (arg1 sparticle-cpuinfo) (arg2 sparticle-launchinfo))
|
|
(let ((v1-0 *target*))
|
|
(when v1-0
|
|
(let ((s5-0 (new-stack-matrix0)))
|
|
(let ((f0-1 (+ -16384.0 (y-angle (-> v1-0 control)))))
|
|
(matrix-rotate-y! s5-0 f0-1)
|
|
)
|
|
(vector3s-rotate*! (the-as vector3s (-> arg1 vel-sxvel)) (the-as vector3s (-> arg1 vel-sxvel)) s5-0)
|
|
(vector3s-rotate*! (the-as vector3s (-> arg1 acc)) (the-as vector3s (-> arg1 acc)) s5-0)
|
|
)
|
|
)
|
|
)
|
|
0
|
|
(none)
|
|
)
|
|
|
|
(defun birth-func-ground-orient ((arg0 int) (arg1 sparticle-cpuinfo) (arg2 sparticle-launchinfo))
|
|
(local-vars (v1-10 float) (v1-11 float))
|
|
(rlet ((vf0 :class vf)
|
|
(vf1 :class vf)
|
|
(vf2 :class vf)
|
|
)
|
|
(init-vf0-vector)
|
|
(let ((s4-0 (new 'stack-no-clear 'collide-query))
|
|
(s5-0 *target*)
|
|
)
|
|
(set! (-> s4-0 start-pos quad) (-> arg2 launchrot quad))
|
|
(set-vector! (-> s4-0 move-dist) 0.0 -20480.0 0.0 1.0)
|
|
(set! (-> s4-0 start-pos y) (+ 4096.0 (-> s4-0 start-pos y)))
|
|
(let ((v1-3 s4-0))
|
|
(set! (-> v1-3 radius) 40.96)
|
|
(set! (-> v1-3 collide-with) (collide-spec
|
|
backgnd
|
|
bot
|
|
crate
|
|
civilian
|
|
enemy
|
|
obstacle
|
|
hit-by-player-list
|
|
hit-by-others-list
|
|
player-list
|
|
water
|
|
collectable
|
|
blocking-plane
|
|
tobot
|
|
pusher
|
|
vehicle-mesh
|
|
obstacle-for-jak
|
|
)
|
|
)
|
|
(set! (-> v1-3 ignore-process0) s5-0)
|
|
(set! (-> v1-3 ignore-process1) #f)
|
|
(set! (-> v1-3 ignore-pat) (new 'static 'pat-surface :noentity #x1 :nojak #x1 :probe #x1 :noendlessfall #x1))
|
|
(set! (-> v1-3 action-mask) (collide-action solid))
|
|
)
|
|
(when (>= (fill-and-probe-using-line-sphere *collide-cache* s4-0) 0.0)
|
|
(let ((s2-0 (new 'stack-no-clear 'vector))
|
|
(s3-1 (new 'stack-no-clear 'quaternion))
|
|
)
|
|
(set! (-> s2-0 x) (-> s4-0 best-other-tri normal z))
|
|
(set! (-> s2-0 y) 0.0)
|
|
(set! (-> s2-0 z) (- (-> s4-0 best-other-tri normal x)))
|
|
(vector-normalize! s2-0 1.0)
|
|
(quaternion-vector-angle! s3-1 s2-0 (acos (-> s4-0 best-other-tri normal y)))
|
|
(let ((s4-1 (new 'stack-no-clear 'quaternion)))
|
|
(quaternion-vector-angle! s4-1 *up-vector* (+ 32768.0 (y-angle (-> s5-0 control))))
|
|
(quaternion-normalize! (quaternion*! s3-1 s4-1 s3-1))
|
|
)
|
|
(cond
|
|
((< (-> s3-1 w) 0.0)
|
|
(.lvf vf1 (&-> arg2 conerot quad))
|
|
(.lvf vf2 (&-> s3-1 vec quad))
|
|
(.sub.vf vf1 vf0 vf2 :mask #b111)
|
|
(.svf (&-> arg2 conerot quad) vf1)
|
|
(.mov v1-10 vf1)
|
|
)
|
|
(else
|
|
(.lvf vf1 (&-> arg2 conerot quad))
|
|
(.lvf vf2 (&-> s3-1 vec quad))
|
|
(.add.vf vf1 vf0 vf2 :mask #b111)
|
|
(.svf (&-> arg2 conerot quad) vf1)
|
|
(.mov v1-11 vf1)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
0
|
|
(none)
|
|
)
|
|
)
|
|
|
|
(defun birth-func-target-orient ((arg0 int) (arg1 sparticle-cpuinfo) (arg2 sparticle-launchinfo))
|
|
(local-vars (v1-10 float) (v1-11 float) (sv-16 target))
|
|
(rlet ((vf0 :class vf)
|
|
(vf1 :class vf)
|
|
(vf2 :class vf)
|
|
)
|
|
(init-vf0-vector)
|
|
(set! sv-16 *target*)
|
|
(when sv-16
|
|
(let ((s3-0 (new 'stack-no-clear 'vector)))
|
|
(new 'stack-no-clear 'vector)
|
|
(let ((s5-0 (new 'stack-no-clear 'quaternion)))
|
|
(let ((s2-0 (-> sv-16 control local-normal)))
|
|
(set! (-> s3-0 x) (-> s2-0 z))
|
|
(set! (-> s3-0 y) 0.0)
|
|
(set! (-> s3-0 z) (- (-> s2-0 x)))
|
|
(vector-normalize! s3-0 1.0)
|
|
(quaternion-vector-angle! s5-0 s3-0 (acos (-> s2-0 y)))
|
|
)
|
|
(let ((s3-1 (new 'stack-no-clear 'quaternion)))
|
|
(quaternion-vector-angle! s3-1 *up-vector* (+ 32768.0 (-> arg1 user-float) (y-angle (-> sv-16 control))))
|
|
(quaternion-normalize! (quaternion*! s5-0 s5-0 s3-1))
|
|
)
|
|
(cond
|
|
((< (-> s5-0 w) 0.0)
|
|
(.lvf vf1 (&-> arg2 conerot quad))
|
|
(.lvf vf2 (&-> s5-0 vec quad))
|
|
(.sub.vf vf1 vf0 vf2 :mask #b111)
|
|
(.svf (&-> arg2 conerot quad) vf1)
|
|
(.mov v1-10 vf1)
|
|
)
|
|
(else
|
|
(.lvf vf1 (&-> arg2 conerot quad))
|
|
(.lvf vf2 (&-> s5-0 vec quad))
|
|
(.add.vf vf1 vf0 vf2 :mask #b111)
|
|
(.svf (&-> arg2 conerot quad) vf1)
|
|
(.mov v1-11 vf1)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
0
|
|
)
|
|
(none)
|
|
)
|
|
)
|
|
|
|
;; definition for function birth-func-vector-orient
|
|
;; WARN: Return type mismatch int vs none.
|
|
(defun birth-func-vector-orient ((arg0 int) (arg1 sparticle-cpuinfo) (arg2 sparticle-launchinfo))
|
|
(local-vars (v1-3 float) (v1-4 float))
|
|
(rlet ((vf0 :class vf)
|
|
(vf1 :class vf)
|
|
(vf2 :class vf)
|
|
)
|
|
(init-vf0-vector)
|
|
(when *target*
|
|
(let ((s4-0 (new 'stack-no-clear 'vector)))
|
|
(new 'stack-no-clear 'vector)
|
|
(let ((s5-0 (new 'stack-no-clear 'quaternion))
|
|
(s3-0 (the-as sprite-vec-data-2d (-> arg1 user-float)))
|
|
)
|
|
(when (nonzero? s3-0)
|
|
(set! (-> s4-0 x) (-> s3-0 x-y-z-sx z))
|
|
(set! (-> s4-0 y) 0.0)
|
|
(set! (-> s4-0 z) (- (-> s3-0 x-y-z-sx x)))
|
|
(vector-normalize! s4-0 1.0)
|
|
(quaternion-vector-angle! s5-0 s4-0 (acos (-> s3-0 x-y-z-sx y)))
|
|
(cond
|
|
((< (-> s5-0 w) 0.0)
|
|
(.lvf vf1 (&-> arg2 conerot quad))
|
|
(.lvf vf2 (&-> s5-0 vec quad))
|
|
(.sub.vf vf1 vf0 vf2 :mask #b111)
|
|
(.svf (&-> arg2 conerot quad) vf1)
|
|
(.mov v1-3 vf1)
|
|
)
|
|
(else
|
|
(.lvf vf1 (&-> arg2 conerot quad))
|
|
(.lvf vf2 (&-> s5-0 vec quad))
|
|
(.add.vf vf1 vf0 vf2 :mask #b111)
|
|
(.svf (&-> arg2 conerot quad) vf1)
|
|
(.mov v1-4 vf1)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
0
|
|
)
|
|
(none)
|
|
)
|
|
)
|
|
|
|
;; definition for function birth-func-set-alpha-from-userdata
|
|
(defun birth-func-set-alpha-from-userdata ((arg0 int) (arg1 sparticle-cpuinfo) (arg2 sparticle-launchinfo))
|
|
(let ((f0-0 (-> arg1 user-float)))
|
|
(set! (-> arg2 coneradius) (* (-> arg2 coneradius) f0-0))
|
|
)
|
|
)
|
|
|
|
;; definition for function part-tracker-track-target-joint
|
|
;; WARN: Return type mismatch int vs none.
|
|
(defun part-tracker-track-target-joint ((arg0 int) (arg1 sparticle-cpuinfo) (arg2 sparticle-launchinfo))
|
|
(let* ((v1-0 *target*)
|
|
(v1-2 (vector<-cspace! (new 'stack-no-clear 'vector) (-> v1-0 node-list data (the int (-> arg1 user-float)))))
|
|
)
|
|
(set! (-> arg2 launchrot x) (-> v1-2 x))
|
|
(set! (-> arg2 launchrot y) (-> v1-2 y))
|
|
(set! (-> arg2 launchrot z) (-> v1-2 z))
|
|
)
|
|
0
|
|
(none)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-target-hit
|
|
:id 9
|
|
:duration (seconds 0.017)
|
|
:flags (use-local-clock)
|
|
:bounds (static-bspherem 0 0 0 12)
|
|
:parts ((sp-item 88 :period 150 :length 5) (sp-item 89 :period 150 :length 5))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 89
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x85 :page #xc))
|
|
(sp-flt spt-num 16.0)
|
|
(sp-rnd-flt spt-scale-x (meters 6) (meters 1) 1.0)
|
|
(sp-int spt-rot-x 4)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-rnd-flt spt-scale-y (meters 0.005) (meters 0.005) 1.0)
|
|
(sp-rnd-flt spt-r 128.0 128.0 1.0)
|
|
(sp-rnd-flt spt-g 128.0 128.0 1.0)
|
|
(sp-rnd-flt spt-b 128.0 128.0 1.0)
|
|
(sp-rnd-flt spt-a 32.0 12.0 1.0)
|
|
(sp-rnd-flt spt-scalevel-x (meters 0.3) (meters 0.2) 1.0)
|
|
(sp-flt spt-scalevel-y (meters 0.00125))
|
|
(sp-rnd-flt spt-fade-a -0.8 -0.8 1.0)
|
|
(sp-int spt-timer 40)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)
|
|
(sp-flt spt-userdata 12288.0)
|
|
(sp-func spt-func 'sparticle-track-root)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 88
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #xbb :page #xc))
|
|
(sp-flt spt-num 1.0)
|
|
(sp-flt spt-scale-x (meters 64))
|
|
(sp-flt spt-rot-x 2048.0)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-flt spt-r 255.0)
|
|
(sp-flt spt-g 255.0)
|
|
(sp-flt spt-b 255.0)
|
|
(sp-flt spt-a 64.0)
|
|
(sp-flt spt-scalevel-x (meters 0.7))
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -6.4)
|
|
(sp-int spt-timer 40)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 sp-cpuinfo-flag-14 glow)
|
|
(sp-flt spt-userdata 16384.0)
|
|
(sp-func spt-func 'sparticle-track-root)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-spin-hit
|
|
:id 10
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 0.167)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 90 :flags (bit6)))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-punch-hit
|
|
:id 11
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 0.167)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 90 :flags (bit6)))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 90
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #xbb :page #xc))
|
|
(sp-flt spt-num 1.0)
|
|
(sp-flt spt-y (meters 1))
|
|
(sp-flt spt-scale-x (meters 5))
|
|
(sp-flt spt-rot-x 1024.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 196.0)
|
|
(sp-flt spt-g 196.0)
|
|
(sp-flt spt-b 196.0)
|
|
(sp-flt spt-a 12.0)
|
|
(sp-flt spt-scalevel-x (meters 1))
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -1.2)
|
|
(sp-int spt-timer 10)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)
|
|
(sp-flt spt-userdata 2048.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-smack-surface
|
|
:id 12
|
|
:duration (seconds 0.035)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 92)
|
|
(sp-item 93)
|
|
(sp-item 94 :binding 91)
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
(sp-item 91 :flags (start-dead launch-asap))
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 92
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-func spt-birth-func 'birth-func-copy-target-y-rot)
|
|
(sp-flt spt-num 16.0)
|
|
(sp-rnd-flt spt-scale-x (meters 1) (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 96.0)
|
|
(sp-rnd-flt spt-g 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 32.0 32.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.04) (meters 0.02) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.85333335)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-flt spt-rotate-y (degrees 0.0))
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 93
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-func spt-birth-func 'birth-func-copy-target-y-rot)
|
|
(sp-flt spt-num 8.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.25) 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 96.0)
|
|
(sp-rnd-flt spt-g 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 32.0 32.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.08) (meters 0.02) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.85333335)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-flt spt-rotate-y (degrees 0.0))
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 94
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x29 :page #xc))
|
|
(sp-rnd-flt spt-num 12.0 8.0 1.0)
|
|
(sp-flt spt-scale-x (meters 1))
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-flt spt-r 128.0)
|
|
(sp-flt spt-a 0.0)
|
|
(sp-int spt-timer 604)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-3)
|
|
(sp-flt spt-userdata 9.0)
|
|
(sp-func spt-func 'part-tracker-track-target-joint)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 91
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #xc9 :page #xc))
|
|
(sp-flt spt-num 1.0)
|
|
(sp-flt spt-x (meters 0))
|
|
(sp-rnd-flt spt-y (meters -1.3333334) (meters 2.6666667) 1.0)
|
|
(sp-rnd-flt spt-z (meters 0.5) (meters 0.5) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.1) (meters 0.05) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-flt spt-r 32.0 92.0 1.0)
|
|
(sp-rnd-flt spt-g 128.0 128.0 1.0)
|
|
(sp-flt spt-b 0.0)
|
|
(sp-rnd-flt spt-a 32.0 96.0 1.0)
|
|
(sp-rnd-flt spt-omega 0.0 65536.0 1.0)
|
|
(sp-rnd-int-flt spt-vel-x (meters -0.053333335) 1 436.90668)
|
|
(sp-flt spt-vel-y (meters 0))
|
|
(sp-flt spt-vel-z (meters 0.0033333334))
|
|
(sp-flt spt-fade-a -0.30476192)
|
|
(sp-int spt-timer 604)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 ready-to-launch)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-land-poof-san
|
|
:id 13
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 95) (sp-item 96) (sp-item 97))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 95
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 16.0)
|
|
(sp-rnd-flt spt-scale-x (meters 1) (meters 1) 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-rnd-flt spt-g 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 64.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 32.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.16)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 96
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 12.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.25) 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-rnd-flt spt-g 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 64.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 16.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.053333335) (meters 0.02) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0016666667))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.21333334)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 150)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 97
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x26 :page #xc))
|
|
(sp-flt spt-num 32.0)
|
|
(sp-rnd-flt spt-x (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-y (meters -0.1) (meters 0.4) 1.0)
|
|
(sp-rnd-flt spt-z (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.07) (meters 0.02) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-int spt-r 1124073472 2 32.0)
|
|
(sp-rnd-int spt-g 1115684864 1 64.0)
|
|
(sp-rnd-int spt-b 1107296256 1 32.0)
|
|
(sp-rnd-flt spt-a 64.0 64.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.015) (meters 0.006666667) 1.0)
|
|
(sp-flt spt-fade-a -0.42666668)
|
|
(sp-rnd-flt spt-accel-y -5.4613333 2.7306666 1.0)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 30.0) (degrees 50.000004) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-flt spt-conerot-radius (meters 0.5))
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-land-poof-drt
|
|
:id 14
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 98) (sp-item 99) (sp-item 100))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 98
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 16.0)
|
|
(sp-rnd-flt spt-scale-x (meters 1) (meters 1) 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-rnd-flt spt-g 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 64.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 32.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.16)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 99
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 12.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.25) 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-rnd-flt spt-g 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 64.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 16.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.053333335) (meters 0.02) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0016666667))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.21333334)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 150)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 100
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x26 :page #xc))
|
|
(sp-flt spt-num 32.0)
|
|
(sp-rnd-flt spt-x (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-y (meters -0.1) (meters 0.4) 1.0)
|
|
(sp-rnd-flt spt-z (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.07) (meters 0.02) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-int spt-r 1124073472 2 32.0)
|
|
(sp-rnd-int spt-g 1115684864 1 64.0)
|
|
(sp-rnd-int spt-b 1107296256 1 32.0)
|
|
(sp-rnd-flt spt-a 64.0 64.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.015) (meters 0.006666667) 1.0)
|
|
(sp-flt spt-fade-a -0.42666668)
|
|
(sp-rnd-flt spt-accel-y -5.4613333 2.7306666 1.0)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 30.0) (degrees 50.000004) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-flt spt-conerot-radius (meters 0.5))
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-land-poof-snw
|
|
:id 15
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 101) (sp-item 102) (sp-item 103))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 101
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 16.0)
|
|
(sp-rnd-flt spt-scale-x (meters 1) (meters 1) 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 196.0 64.0 1.0)
|
|
(sp-rnd-flt spt-g 196.0 64.0 1.0)
|
|
(sp-rnd-flt spt-b 196.0 64.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 32.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.16)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 102
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 12.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.25) 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 196.0 64.0 1.0)
|
|
(sp-rnd-flt spt-g 196.0 64.0 1.0)
|
|
(sp-rnd-flt spt-b 196.0 64.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 16.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.053333335) (meters 0.02) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0016666667))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.21333334)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 150)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 103
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x26 :page #xc))
|
|
(sp-flt spt-num 32.0)
|
|
(sp-rnd-flt spt-x (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-y (meters -0.1) (meters 0.4) 1.0)
|
|
(sp-rnd-flt spt-z (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.07) (meters 0.02) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-int spt-r 1128529920 1 64.0)
|
|
(sp-rnd-int spt-g 1128529920 1 64.0)
|
|
(sp-rnd-int spt-b 1128529920 1 64.0)
|
|
(sp-rnd-flt spt-a 64.0 64.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.015) (meters 0.006666667) 1.0)
|
|
(sp-flt spt-fade-a -0.42666668)
|
|
(sp-rnd-flt spt-accel-y -5.4613333 2.7306666 1.0)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 30.0) (degrees 50.000004) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-flt spt-conerot-radius (meters 0.5))
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-land-poof-ice
|
|
:id 16
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 101) (sp-item 102) (sp-item 103))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-land-poof-grs
|
|
:id 17
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 104) (sp-item 105) (sp-item 106))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 104
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 16.0)
|
|
(sp-rnd-flt spt-scale-x (meters 1) (meters 1) 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 64.0 32.0 1.0)
|
|
(sp-rnd-flt spt-g 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 0.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 32.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.16)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 105
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 12.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.25) 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 64.0 32.0 1.0)
|
|
(sp-rnd-flt spt-g 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 0.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 16.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.053333335) (meters 0.02) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0016666667))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.21333334)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 150)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 106
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x2f :page #xc))
|
|
(sp-flt spt-num 32.0)
|
|
(sp-rnd-flt spt-x (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-y (meters -0.1) (meters 0.4) 1.0)
|
|
(sp-rnd-flt spt-z (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.15) (meters 0.35) 1.0)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-flt spt-scale-y (meters 0.15))
|
|
(sp-rnd-flt spt-r 0.0 2.0 64.0)
|
|
(sp-rnd-int spt-g 1115684864 2 64.0)
|
|
(sp-rnd-flt spt-a 64.0 64.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.015) (meters 0.006666667) 1.0)
|
|
(sp-rnd-flt spt-rotvel-z (degrees -2.4) (degrees 4.8) 1.0)
|
|
(sp-flt spt-fade-a -0.42666668)
|
|
(sp-rnd-flt spt-accel-y -5.4613333 3.4133334 1.0)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 30.0) (degrees 50.000004) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-flt spt-conerot-radius (meters 0.5))
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-land-poof-wod
|
|
:id 18
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 107) (sp-item 108))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 107
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 16.0)
|
|
(sp-rnd-flt spt-scale-x (meters 1) (meters 1) 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 96.0 32.0 1.0)
|
|
(sp-flt spt-g 64.0)
|
|
(sp-rnd-flt spt-b 0.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 32.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.16)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 108
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 12.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.25) 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 96.0 32.0 1.0)
|
|
(sp-flt spt-g 64.0)
|
|
(sp-rnd-flt spt-b 0.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 16.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.053333335) (meters 0.02) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0016666667))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.21333334)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 150)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-land-poof-cwd
|
|
:id 19
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 107) (sp-item 108) (sp-item 109) (sp-item 109))
|
|
)
|
|
|
|
;; this part is debug only
|
|
(when *debug-segment*
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-land-poof-unk
|
|
:id 20
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 110) (sp-item 111))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 110
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 16.0)
|
|
(sp-rnd-flt spt-scale-x (meters 1) (meters 1) 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 255.0)
|
|
(sp-flt spt-g 96.0)
|
|
(sp-flt spt-b 96.0)
|
|
(sp-flt spt-a 255.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.16)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 111
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 12.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.25) 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 255.0)
|
|
(sp-flt spt-g 96.0)
|
|
(sp-flt spt-b 96.0)
|
|
(sp-rnd-flt spt-a 16.0 16.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.053333335) (meters 0.02) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0016666667))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.21333334)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 150)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
)
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-land-poof-stn
|
|
:id 21
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 112) (sp-item 113))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 112
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 16.0)
|
|
(sp-rnd-flt spt-scale-x (meters 1) (meters 1) 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 96.0 32.0 1.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-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.16)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 113
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 12.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.25) 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 96.0 32.0 1.0)
|
|
(sp-flt spt-g 96.0)
|
|
(sp-flt spt-b 96.0)
|
|
(sp-rnd-flt spt-a 16.0 16.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.053333335) (meters 0.02) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0016666667))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.21333334)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 150)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-land-poof-pmt
|
|
:id 22
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 114) (sp-item 115))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 114
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 16.0)
|
|
(sp-rnd-flt spt-scale-x (meters 1) (meters 1) 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 64.0 1.0)
|
|
(sp-rnd-flt spt-g 70.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 40.0 20.0 1.0)
|
|
(sp-rnd-flt spt-a 24.0 24.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-flt spt-fade-a -0.16)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 115
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 12.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.25) 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 64.0 1.0)
|
|
(sp-rnd-flt spt-g 70.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 40.0 20.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 16.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.053333335) (meters 0.02) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0016666667))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.21333334)
|
|
(sp-flt spt-accel-y -1.3653333)
|
|
(sp-flt spt-friction 0.95)
|
|
(sp-int spt-timer 150)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; this part is debug only
|
|
(when *debug-segment*
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-run-poof-unk
|
|
:id 23
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 116))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-just-poof-unk
|
|
:id 24
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 116))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 116
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-rnd-flt spt-num 8.0 16.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.5) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-flt spt-r 255.0)
|
|
(sp-flt spt-g 96.0)
|
|
(sp-flt spt-b 96.0)
|
|
(sp-flt spt-a 255.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-fade-a -0.45714286)
|
|
(sp-flt spt-friction 0.965)
|
|
(sp-int spt-timer 105)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
)
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-run-poof-stn
|
|
:id 25
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 117))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-just-poof-stn
|
|
:id 26
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 117))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 117
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-rnd-flt spt-num 8.0 16.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.5) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-flt spt-r 96.0 32.0 1.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-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-fade-a -0.45714286)
|
|
(sp-flt spt-friction 0.965)
|
|
(sp-int spt-timer 105)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-run-poof-snw
|
|
:id 27
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 118) (sp-item 119 :flags (is-3d)))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-just-poof-snw
|
|
:id 28
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 118))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-just-footprint-snw
|
|
:id 29
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 119 :flags (is-3d)))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 119
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x12 :page #xc))
|
|
(sp-func spt-birth-func 'birth-func-target-orient)
|
|
(sp-flt spt-num 1.0)
|
|
(sp-flt spt-x (meters -0.25))
|
|
(sp-flt spt-scale-x (meters 0.6))
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-flt spt-r 32.0)
|
|
(sp-flt spt-g 32.0)
|
|
(sp-flt spt-b 16.0)
|
|
(sp-flt spt-a 64.0)
|
|
(sp-flt spt-fade-a -0.07111111)
|
|
(sp-int spt-timer 1050)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 118
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-rnd-flt spt-num 8.0 16.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.5) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-flt spt-r 196.0 64.0 1.0)
|
|
(sp-rnd-flt spt-g 196.0 64.0 1.0)
|
|
(sp-rnd-flt spt-b 196.0 64.0 1.0)
|
|
(sp-rnd-flt spt-a 24.0 24.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-fade-a -0.45714286)
|
|
(sp-flt spt-friction 0.965)
|
|
(sp-int spt-timer 105)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-run-poof-ice
|
|
:id 30
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 118))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-just-poof-ice
|
|
:id 31
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 118))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-run-poof-cwd
|
|
:id 32
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 120) (sp-item 120) (sp-item 109))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-just-poof-cwd
|
|
:id 33
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 121))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 109
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-rnd-flt spt-num 8.0 16.0 1.0)
|
|
(sp-flt spt-y (meters -1))
|
|
(sp-rnd-flt spt-scale-x (meters 1) (meters 0.5) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-flt spt-r 64.0 32.0 1.0)
|
|
(sp-flt spt-g 64.0)
|
|
(sp-rnd-flt spt-b 0.0 32.0 1.0)
|
|
(sp-flt spt-a 0.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0) (meters -0.0033333334) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0016666667))
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a 0.16)
|
|
(sp-flt spt-accel-y -0.27306667)
|
|
(sp-int spt-timer 900)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-int-plain-rnd spt-next-time 75 74 1)
|
|
(sp-launcher-by-id spt-next-launcher 122)
|
|
(sp-flt spt-conerot-x (degrees 90.0))
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-radius (meters 0) (meters 3) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 122
|
|
:init-specs ((sp-flt spt-fade-a 0.0) (sp-int-plain-rnd spt-next-time 150 149 1) (sp-launcher-by-id spt-next-launcher 123))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 123
|
|
:init-specs ((sp-flt spt-fade-a -0.08))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-run-poof-wod
|
|
:id 34
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 120))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-just-poof-wod
|
|
:id 35
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 120))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 120
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-rnd-flt spt-num 8.0 16.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.5) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-flt spt-r 96.0 32.0 1.0)
|
|
(sp-flt spt-g 64.0)
|
|
(sp-rnd-flt spt-b 0.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 32.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-fade-a -0.45714286)
|
|
(sp-flt spt-friction 0.965)
|
|
(sp-int spt-timer 105)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-run-poof-pmt
|
|
:id 36
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 124))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-just-poof-pmt
|
|
:id 37
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 124))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 124
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-rnd-flt spt-num 8.0 16.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.5) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-flt spt-r 128.0 64.0 1.0)
|
|
(sp-rnd-flt spt-g 70.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 40.0 20.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 32.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-fade-a -0.45714286)
|
|
(sp-flt spt-friction 0.965)
|
|
(sp-int spt-timer 105)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-run-poof-grs
|
|
:id 38
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 125) (sp-item 126 :flags (is-3d)))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-just-poof-grs
|
|
:id 39
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 125))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-just-footprint-grs
|
|
:id 40
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 126 :flags (is-3d)))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 125
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-rnd-flt spt-num 8.0 16.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.5) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-flt spt-r 64.0 32.0 1.0)
|
|
(sp-rnd-flt spt-g 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 0.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 32.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-fade-a -0.45714286)
|
|
(sp-flt spt-friction 0.965)
|
|
(sp-int spt-timer 105)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 126
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x12 :page #xc))
|
|
(sp-func spt-birth-func 'birth-func-target-orient)
|
|
(sp-flt spt-num 1.0)
|
|
(sp-flt spt-x (meters -0.25))
|
|
(sp-flt spt-scale-x (meters 0.6))
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-flt spt-r 32.0)
|
|
(sp-flt spt-g 32.0)
|
|
(sp-flt spt-b 16.0)
|
|
(sp-flt spt-a 48.0)
|
|
(sp-flt spt-fade-a -0.053333335)
|
|
(sp-int spt-timer 1050)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-run-poof-san
|
|
:id 41
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 121) (sp-item 127 :flags (is-3d)))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-just-poof-san
|
|
:id 42
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 121))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-just-footprint-san
|
|
:id 43
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 127 :flags (is-3d)))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 121
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-rnd-flt spt-num 8.0 16.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.5) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-flt spt-r 128.0)
|
|
(sp-rnd-flt spt-g 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 64.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 32.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-fade-a -0.45714286)
|
|
(sp-flt spt-friction 0.965)
|
|
(sp-int spt-timer 105)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 127
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x12 :page #xc))
|
|
(sp-func spt-birth-func 'birth-func-target-orient)
|
|
(sp-flt spt-num 1.0)
|
|
(sp-flt spt-x (meters -0.25))
|
|
(sp-flt spt-scale-x (meters 0.6))
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-flt spt-r 32.0)
|
|
(sp-flt spt-g 32.0)
|
|
(sp-flt spt-b 16.0)
|
|
(sp-flt spt-a 32.0)
|
|
(sp-flt spt-fade-a -0.035555556)
|
|
(sp-int spt-timer 1050)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-run-poof-drt
|
|
:id 44
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 128))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-just-poof-drt
|
|
:id 45
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 128))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-just-footprint-drt
|
|
:id 46
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 129 :flags (is-3d)))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 128
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-rnd-flt spt-num 8.0 16.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.5) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-flt spt-r 128.0)
|
|
(sp-rnd-flt spt-g 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 64.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 32.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-fade-a -0.45714286)
|
|
(sp-flt spt-friction 0.965)
|
|
(sp-int spt-timer 105)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 129
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x12 :page #xc))
|
|
(sp-func spt-birth-func 'birth-func-target-orient)
|
|
(sp-flt spt-num 1.0)
|
|
(sp-flt spt-x (meters -0.25))
|
|
(sp-flt spt-scale-x (meters 0.6))
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-flt spt-r 32.0)
|
|
(sp-flt spt-g 32.0)
|
|
(sp-flt spt-b 16.0)
|
|
(sp-flt spt-a 32.0)
|
|
(sp-flt spt-fade-a -0.035555556)
|
|
(sp-int spt-timer 1050)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 130
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x26 :page #xc))
|
|
(sp-rnd-flt spt-num 0.0 6.0 1.0)
|
|
(sp-rnd-flt spt-x (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-y (meters -0.1) (meters 0.4) 1.0)
|
|
(sp-rnd-flt spt-z (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.07) (meters 0.02) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-int spt-r 1124073472 2 32.0)
|
|
(sp-rnd-int spt-g 1115684864 1 64.0)
|
|
(sp-rnd-int spt-b 1107296256 1 32.0)
|
|
(sp-rnd-flt spt-a 64.0 64.0 1.0)
|
|
(sp-rnd-flt spt-vel-x (meters -0.00083333335) (meters 0.0016666667) 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.005) (meters 0.006666667) 1.0)
|
|
(sp-rnd-flt spt-vel-z (meters -0.00083333335) (meters 0.0016666667) 1.0)
|
|
(sp-flt spt-fade-a -0.42666668)
|
|
(sp-rnd-flt spt-accel-y -2.7306666 1.3653333 1.0)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 131
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x26 :page #xc))
|
|
(sp-rnd-flt spt-num 0.0 6.0 1.0)
|
|
(sp-rnd-flt spt-x (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-y (meters -0.1) (meters 0.4) 1.0)
|
|
(sp-rnd-flt spt-z (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.07) (meters 0.02) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-int spt-r 1124073472 2 32.0)
|
|
(sp-rnd-int spt-g 1115684864 1 64.0)
|
|
(sp-rnd-int spt-b 1107296256 1 32.0)
|
|
(sp-rnd-flt spt-a 64.0 64.0 1.0)
|
|
(sp-rnd-flt spt-vel-x (meters -0.00083333335) (meters 0.0016666667) 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.005) (meters 0.006666667) 1.0)
|
|
(sp-rnd-flt spt-vel-z (meters -0.00083333335) (meters 0.0016666667) 1.0)
|
|
(sp-flt spt-fade-a -0.42666668)
|
|
(sp-rnd-flt spt-accel-y -2.7306666 1.3653333 1.0)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 132
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x2f :page #xc))
|
|
(sp-rnd-flt spt-num 0.0 2.0 1.0)
|
|
(sp-rnd-flt spt-x (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-y (meters -0.1) (meters 0.4) 1.0)
|
|
(sp-rnd-flt spt-z (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.2) (meters 0.2) 1.0)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-flt spt-scale-y (meters 0.1))
|
|
(sp-rnd-flt spt-r 0.0 2.0 64.0)
|
|
(sp-rnd-int spt-g 1115684864 2 64.0)
|
|
(sp-rnd-flt spt-a 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-vel-x (meters -0.00083333335) (meters 0.0016666667) 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.005) (meters 0.006666667) 1.0)
|
|
(sp-rnd-flt spt-vel-z (meters -0.00083333335) (meters 0.0016666667) 1.0)
|
|
(sp-rnd-flt spt-rotvel-z (degrees -2.4) (degrees 4.8) 1.0)
|
|
(sp-flt spt-fade-a -0.42666668)
|
|
(sp-rnd-flt spt-accel-y -2.7306666 1.3653333 1.0)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 133
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x26 :page #xc))
|
|
(sp-rnd-flt spt-num 0.0 6.0 1.0)
|
|
(sp-rnd-flt spt-x (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-y (meters -0.1) (meters 0.4) 1.0)
|
|
(sp-rnd-flt spt-z (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.07) (meters 0.02) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-int spt-r 1128529920 1 64.0)
|
|
(sp-rnd-int spt-g 1128529920 1 64.0)
|
|
(sp-rnd-int spt-b 1128529920 1 64.0)
|
|
(sp-rnd-flt spt-a 64.0 64.0 1.0)
|
|
(sp-rnd-flt spt-vel-x (meters -0.00083333335) (meters 0.0016666667) 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.005) (meters 0.006666667) 1.0)
|
|
(sp-rnd-flt spt-vel-z (meters -0.00083333335) (meters 0.0016666667) 1.0)
|
|
(sp-flt spt-fade-a -0.42666668)
|
|
(sp-rnd-flt spt-accel-y -2.7306666 1.3653333 1.0)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-slide-poof-san
|
|
:id 47
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 134) (sp-item 135))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 134
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-rnd-flt spt-num 6.0 6.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.6) (meters 0.6) 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-rnd-flt spt-g 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 64.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 16.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.17777778)
|
|
(sp-flt spt-accel-y -0.27306667)
|
|
(sp-flt spt-friction 0.94)
|
|
(sp-int spt-timer 180)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 135
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x26 :page #xc))
|
|
(sp-rnd-flt spt-num 0.0 8.0 1.0)
|
|
(sp-rnd-flt spt-x (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-y (meters -0.1) (meters 0.4) 1.0)
|
|
(sp-rnd-flt spt-z (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.07) (meters 0.02) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-int spt-r 1124073472 2 32.0)
|
|
(sp-rnd-int spt-g 1115684864 1 64.0)
|
|
(sp-rnd-int spt-b 1107296256 1 32.0)
|
|
(sp-rnd-flt spt-a 64.0 64.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.008333334) (meters 0.0033333334) 1.0)
|
|
(sp-flt spt-fade-a -0.42666668)
|
|
(sp-rnd-flt spt-accel-y -4.096 2.048 1.0)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 30.0) (degrees 50.000004) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-flt spt-conerot-radius (meters 0.5))
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-slide-poof-drt
|
|
:id 48
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 136) (sp-item 137))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 136
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-rnd-flt spt-num 6.0 6.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.6) (meters 0.6) 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-rnd-flt spt-g 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 64.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 16.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.17777778)
|
|
(sp-flt spt-accel-y -0.27306667)
|
|
(sp-flt spt-friction 0.94)
|
|
(sp-int spt-timer 180)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 137
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x26 :page #xc))
|
|
(sp-rnd-flt spt-num 0.0 8.0 1.0)
|
|
(sp-rnd-flt spt-x (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-y (meters -0.1) (meters 0.4) 1.0)
|
|
(sp-rnd-flt spt-z (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.07) (meters 0.02) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-int spt-r 1124073472 2 32.0)
|
|
(sp-rnd-int spt-g 1115684864 1 64.0)
|
|
(sp-rnd-int spt-b 1107296256 1 32.0)
|
|
(sp-rnd-flt spt-a 64.0 64.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.008333334) (meters 0.0033333334) 1.0)
|
|
(sp-flt spt-fade-a -0.42666668)
|
|
(sp-rnd-flt spt-accel-y -4.096 2.048 1.0)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 30.0) (degrees 50.000004) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-flt spt-conerot-radius (meters 0.5))
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-slide-poof-grs
|
|
:id 49
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 138) (sp-item 139))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 138
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-rnd-flt spt-num 6.0 6.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.6) (meters 0.6) 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 64.0 32.0 1.0)
|
|
(sp-rnd-flt spt-g 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 0.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 16.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.17777778)
|
|
(sp-flt spt-accel-y -0.27306667)
|
|
(sp-flt spt-friction 0.94)
|
|
(sp-int spt-timer 180)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 139
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x2f :page #xc))
|
|
(sp-rnd-flt spt-num 0.0 8.0 1.0)
|
|
(sp-rnd-flt spt-x (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-y (meters -0.1) (meters 0.4) 1.0)
|
|
(sp-rnd-flt spt-z (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.15) (meters 0.35) 1.0)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-flt spt-scale-y (meters 0.15))
|
|
(sp-rnd-flt spt-r 0.0 2.0 64.0)
|
|
(sp-rnd-int spt-g 1115684864 2 64.0)
|
|
(sp-rnd-flt spt-a 64.0 64.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.008333334) (meters 0.0033333334) 1.0)
|
|
(sp-rnd-flt spt-rotvel-z (degrees -2.4) (degrees 4.8) 1.0)
|
|
(sp-flt spt-fade-a -0.42666668)
|
|
(sp-rnd-flt spt-accel-y -4.096 2.048 1.0)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 30.0) (degrees 50.000004) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-flt spt-conerot-radius (meters 0.5))
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-slide-poof-stn
|
|
:id 50
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 140))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 140
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-rnd-flt spt-num 6.0 6.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.6) (meters 0.6) 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 96.0 32.0 1.0)
|
|
(sp-flt spt-g 96.0)
|
|
(sp-flt spt-b 96.0)
|
|
(sp-rnd-flt spt-a 16.0 16.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.17777778)
|
|
(sp-flt spt-accel-y -0.27306667)
|
|
(sp-flt spt-friction 0.94)
|
|
(sp-int spt-timer 180)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-slide-poof-pmt
|
|
:id 51
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 141))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 141
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-rnd-flt spt-num 6.0 6.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.6) (meters 0.6) 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 64.0 1.0)
|
|
(sp-rnd-flt spt-g 70.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 40.0 20.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 16.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.17777778)
|
|
(sp-flt spt-accel-y -0.27306667)
|
|
(sp-flt spt-friction 0.94)
|
|
(sp-int spt-timer 180)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-slide-poof-snw
|
|
:id 52
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 142))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 142
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-rnd-flt spt-num 6.0 6.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.6) (meters 0.6) 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-int spt-r 1128529920 1 64.0)
|
|
(sp-rnd-int spt-g 1128529920 1 64.0)
|
|
(sp-rnd-int spt-b 1128529920 1 64.0)
|
|
(sp-rnd-flt spt-a 16.0 16.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.17777778)
|
|
(sp-flt spt-accel-y -0.27306667)
|
|
(sp-flt spt-friction 0.94)
|
|
(sp-int spt-timer 180)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-slide-poof-ice
|
|
:id 53
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 142))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-slide-poof-wod
|
|
:id 54
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 1.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 143))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 143
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-rnd-flt spt-num 6.0 6.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.6) (meters 0.6) 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 96.0 32.0 1.0)
|
|
(sp-flt spt-g 64.0)
|
|
(sp-rnd-flt spt-b 0.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 16.0 16.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.02) (meters 0.01) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.0033333334))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.17777778)
|
|
(sp-flt spt-accel-y -0.27306667)
|
|
(sp-flt spt-friction 0.94)
|
|
(sp-int spt-timer 180)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 60.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-slide-poof-cwd
|
|
:id 55
|
|
:duration (seconds 0.017)
|
|
:linger-duration (seconds 2.5)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 143))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 144
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x26 :page #xc))
|
|
(sp-rnd-flt spt-num 0.0 8.0 1.0)
|
|
(sp-rnd-flt spt-x (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-y (meters -0.1) (meters 0.4) 1.0)
|
|
(sp-rnd-flt spt-z (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.07) (meters 0.02) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-int spt-r 1124073472 2 32.0)
|
|
(sp-rnd-int spt-g 1115684864 1 64.0)
|
|
(sp-rnd-int spt-b 1107296256 1 32.0)
|
|
(sp-rnd-flt spt-a 64.0 64.0 1.0)
|
|
(sp-flt spt-fade-a -0.42666668)
|
|
(sp-rnd-flt spt-accel-y -5.4613333 3.4133334 1.0)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 145
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x26 :page #xc))
|
|
(sp-rnd-flt spt-num 0.0 8.0 1.0)
|
|
(sp-rnd-flt spt-x (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-y (meters -0.1) (meters 0.4) 1.0)
|
|
(sp-rnd-flt spt-z (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.07) (meters 0.02) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-int spt-r 1124073472 2 32.0)
|
|
(sp-rnd-int spt-g 1115684864 1 64.0)
|
|
(sp-rnd-int spt-b 1107296256 1 32.0)
|
|
(sp-rnd-flt spt-a 64.0 64.0 1.0)
|
|
(sp-flt spt-fade-a -0.42666668)
|
|
(sp-rnd-flt spt-accel-y -5.4613333 3.4133334 1.0)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 146
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x26 :page #xc))
|
|
(sp-rnd-flt spt-num 0.0 8.0 1.0)
|
|
(sp-rnd-flt spt-x (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-y (meters -0.1) (meters 0.4) 1.0)
|
|
(sp-rnd-flt spt-z (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.07) (meters 0.02) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-int spt-r 1128529920 1 64.0)
|
|
(sp-rnd-int spt-g 1128529920 1 64.0)
|
|
(sp-rnd-int spt-b 1128529920 1 64.0)
|
|
(sp-rnd-flt spt-a 64.0 64.0 1.0)
|
|
(sp-flt spt-fade-a -0.42666668)
|
|
(sp-rnd-flt spt-accel-y -5.4613333 3.4133334 1.0)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 147
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x2f :page #xc))
|
|
(sp-rnd-flt spt-num 0.0 8.0 1.0)
|
|
(sp-rnd-flt spt-x (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-y (meters -0.1) (meters 0.4) 1.0)
|
|
(sp-rnd-flt spt-z (meters -0.4) (meters 0.8) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.15) (meters 0.35) 1.0)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-flt spt-scale-y (meters 0.15))
|
|
(sp-rnd-flt spt-r 0.0 2.0 64.0)
|
|
(sp-rnd-int spt-g 1115684864 2 64.0)
|
|
(sp-rnd-flt spt-a 64.0 64.0 1.0)
|
|
(sp-rnd-flt spt-rotvel-z (degrees -2.4) (degrees 4.8) 1.0)
|
|
(sp-flt spt-fade-a -0.42666668)
|
|
(sp-rnd-flt spt-accel-y -5.4613333 3.4133334 1.0)
|
|
(sp-int spt-timer 300)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-12 sp-cpuinfo-flag-14)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 148
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 149
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 150
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 151
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-dark-eco-death
|
|
:id 56
|
|
:duration (seconds 2)
|
|
:flags (use-local-clock)
|
|
:bounds (static-bspherem 0 0 0 12)
|
|
:parts ((sp-item 154 :fade-after (meters 100) :period 600 :length 5 :binding 152)
|
|
(sp-item 152 :flags (start-dead launch-asap) :binding 153)
|
|
(sp-item 153 :fade-after (meters 80) :falloff-to (meters 100) :flags (start-dead))
|
|
(sp-item 152 :flags (start-dead launch-asap) :binding 153)
|
|
(sp-item 153 :fade-after (meters 80) :falloff-to (meters 100) :flags (start-dead))
|
|
(sp-item 152 :flags (start-dead launch-asap) :binding 153)
|
|
(sp-item 153 :fade-after (meters 80) :falloff-to (meters 100) :flags (start-dead))
|
|
(sp-item 152 :flags (start-dead launch-asap) :binding 153)
|
|
(sp-item 153 :fade-after (meters 80) :falloff-to (meters 100) :flags (start-dead))
|
|
(sp-item 152 :flags (start-dead launch-asap) :binding 153)
|
|
(sp-item 153 :fade-after (meters 80) :falloff-to (meters 100) :flags (start-dead))
|
|
(sp-item 152 :flags (start-dead launch-asap) :binding 153)
|
|
(sp-item 153 :fade-after (meters 80) :falloff-to (meters 100) :flags (start-dead))
|
|
(sp-item 152 :flags (start-dead launch-asap) :binding 153)
|
|
(sp-item 153 :fade-after (meters 80) :falloff-to (meters 100) :flags (start-dead))
|
|
(sp-item 152 :flags (start-dead launch-asap) :binding 153)
|
|
(sp-item 153 :fade-after (meters 80) :falloff-to (meters 100) :flags (start-dead))
|
|
(sp-item 152 :flags (start-dead launch-asap) :binding 153)
|
|
(sp-item 153 :fade-after (meters 80) :falloff-to (meters 100) :flags (start-dead))
|
|
(sp-item 152 :flags (start-dead launch-asap) :binding 153)
|
|
(sp-item 153 :fade-after (meters 80) :falloff-to (meters 100) :flags (start-dead))
|
|
(sp-item 152 :flags (start-dead launch-asap) :binding 153)
|
|
(sp-item 153 :fade-after (meters 80) :falloff-to (meters 100) :flags (start-dead))
|
|
(sp-item 152 :flags (start-dead launch-asap) :binding 153)
|
|
(sp-item 153 :fade-after (meters 80) :falloff-to (meters 100) :flags (start-dead))
|
|
(sp-item 152 :flags (start-dead launch-asap) :binding 153)
|
|
(sp-item 153 :fade-after (meters 80) :falloff-to (meters 100) :flags (start-dead))
|
|
(sp-item 152 :flags (start-dead launch-asap) :binding 153)
|
|
(sp-item 153 :fade-after (meters 80) :falloff-to (meters 100) :flags (start-dead))
|
|
(sp-item 152 :flags (start-dead launch-asap) :binding 153)
|
|
(sp-item 153 :fade-after (meters 80) :falloff-to (meters 100) :flags (start-dead))
|
|
(sp-item 152 :flags (start-dead launch-asap) :binding 153)
|
|
(sp-item 153 :fade-after (meters 80) :falloff-to (meters 100) :flags (start-dead))
|
|
(sp-item 155 :period 600 :length 5)
|
|
(sp-item 156 :fade-after (meters 80) :falloff-to (meters 80) :period 600 :length 40)
|
|
(sp-item 157 :period 600 :length 20)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-lava-death
|
|
:id 57
|
|
:duration (seconds 0.25)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 158) (sp-item 159) (sp-item 160) (sp-item 161))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-explode-death
|
|
:id 58
|
|
:duration (seconds 0.25)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 159) (sp-item 160))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpartgroup group-burn-death
|
|
:id 59
|
|
:duration (seconds 0.5)
|
|
:linger-duration (seconds 2)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 158))
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 161
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #xc9 :page #xc))
|
|
(sp-rnd-flt spt-num 8.0 16.0 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.2) (meters 0.5) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-flt spt-r 256.0)
|
|
(sp-rnd-flt spt-g 0.0 128.0 1.0)
|
|
(sp-rnd-flt spt-a 128.0 128.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.013333334) (meters 0.04) 1.0)
|
|
(sp-flt spt-scalevel-x (meters -0.0023333333))
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-accel-y -5.4613333)
|
|
(sp-int spt-timer 360)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-0 sp-cpuinfo-flag-3 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 0.0) (degrees 60.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-flt spt-conerot-radius (meters 1))
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 158
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 5.0)
|
|
(sp-rnd-flt spt-x (meters 0) (meters 0.5) 1.0)
|
|
(sp-rnd-flt spt-y (meters 0) (meters 3) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 1) (meters 2) 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-rnd-flt spt-g 0.0 128.0 1.0)
|
|
(sp-flt spt-b 0.0)
|
|
(sp-rnd-flt spt-a 32.0 64.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.053333335) (meters 0.053333335) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.023529412))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.6) (degrees 1.2) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -1.5058824)
|
|
(sp-flt spt-friction 0.98)
|
|
(sp-int spt-timer 81)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 sp-cpuinfo-flag-14)
|
|
(sp-rnd-flt spt-conerot-x (degrees 0.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-rnd-flt spt-rotate-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 159
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 32.0)
|
|
(sp-rnd-flt spt-x (meters 0.5) (meters 2) 1.0)
|
|
(sp-rnd-flt spt-y (meters 0.5) (meters 0.5) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 1) (meters 2) 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-rnd-flt spt-g 0.0 128.0 1.0)
|
|
(sp-flt spt-b 0.0)
|
|
(sp-rnd-flt spt-a 32.0 64.0 1.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0) (meters 0.0016666667) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.04444444))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.6) (degrees 1.2) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -2.8444443)
|
|
(sp-flt spt-friction 0.98)
|
|
(sp-int spt-timer 42)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 sp-cpuinfo-flag-14)
|
|
(sp-flt spt-conerot-x (degrees 90.0))
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
(sp-rnd-flt spt-rotate-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
;; failed to figure out what this is:
|
|
(defpart 160
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 8.0)
|
|
(sp-rnd-flt spt-x (meters -1) (meters 2) 1.0)
|
|
(sp-rnd-flt spt-y (meters 0) (meters 3) 1.0)
|
|
(sp-rnd-flt spt-z (meters -1) (meters 2) 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 2) (meters 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-flt spt-r 255.0)
|
|
(sp-flt spt-g 255.0)
|
|
(sp-flt spt-b 255.0)
|
|
(sp-flt spt-a 0.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.013333334) (meters 0.013333334) 1.0)
|
|
(sp-flt spt-scalevel-x (meters 0.008888889))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.6) (degrees 1.2) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-r -0.56666666)
|
|
(sp-flt spt-fade-g -0.56666666)
|
|
(sp-flt spt-fade-b -0.56666666)
|
|
(sp-flt spt-fade-a 0.15)
|
|
(sp-flt spt-friction 0.97)
|
|
(sp-int spt-timer 450)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-14)
|
|
(sp-int-plain-rnd spt-next-time 81 80 1)
|
|
(sp-launcher-by-id spt-next-launcher 162)
|
|
(sp-rnd-flt spt-conerot-x (degrees 0.0) (degrees 30.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 360.0) 1.0)
|
|
)
|
|
)
|
|
|
|
(defpart 162
|
|
:init-specs ((sp-flt spt-fade-a -0.08))
|
|
)
|
|
|
|
(defpart 163
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :page #xc))
|
|
(sp-flt spt-num 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 1.5) (meters 2) 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 32.0 32.0 1.0)
|
|
(sp-rnd-flt spt-g 32.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 32.0 32.0 1.0)
|
|
(sp-flt spt-a 0.0)
|
|
(sp-rnd-flt spt-vel-y (meters 0.0033333334) (meters 0.006666667) 1.0)
|
|
(sp-rnd-flt spt-scalevel-x (meters 0.0033333334) (meters 0.0033333334) 1.0)
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.2) (degrees 0.4) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a 0.85333335)
|
|
(sp-flt spt-friction 0.98)
|
|
(sp-int spt-timer 450)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-14)
|
|
(sp-int-plain-rnd spt-next-time 15 59 1)
|
|
(sp-launcher-by-id spt-next-launcher 164)
|
|
)
|
|
)
|
|
|
|
(defpart 164
|
|
:init-specs ((sp-flt spt-fade-a -0.28444445))
|
|
)
|
|
|
|
(defbehavior process-drawable-burn-effect target ((arg0 time-frame))
|
|
(sound-play "get-burned")
|
|
(let ((s5-1 (new 'stack 'rgbaf))
|
|
(s3-0 (-> self clock frame-counter))
|
|
(s4-1 (-> self parent))
|
|
)
|
|
(set! (-> s5-1 quad) (-> (the-as process-drawable (-> s4-1 0)) draw color-mult quad))
|
|
(let ((s2-1 (vector-float*! (the-as vector (new 'stack 'rgbaf)) (the-as vector s5-1) 0.0)))
|
|
(while (< (- (-> self clock frame-counter) s3-0) arg0)
|
|
(let ((v1-8 (- (-> self clock frame-counter) s3-0)))
|
|
(if (< v1-8 (the-as time-frame (/ arg0 2)))
|
|
(vector-lerp!
|
|
(-> (the-as process-drawable (-> s4-1 0)) draw color-mult)
|
|
s5-1
|
|
s2-1
|
|
(/ (the float v1-8) (the float arg0))
|
|
)
|
|
(vector-lerp!
|
|
(-> (the-as process-drawable (-> s4-1 0)) draw color-mult)
|
|
s5-1
|
|
s2-1
|
|
(- 1.0 (/ (the float v1-8) (the float arg0)))
|
|
)
|
|
)
|
|
)
|
|
(let ((v1-13 (process-drawable-random-point!
|
|
(the-as process-drawable (ppointer->process s4-1))
|
|
(new 'stack-no-clear 'vector)
|
|
)
|
|
)
|
|
(t9-7 sp-launch-particles-var)
|
|
(a0-18 *sp-particle-system-2d*)
|
|
(a1-7 (-> *part-id-table* 163))
|
|
(a2-3 *launch-matrix*)
|
|
)
|
|
(set! (-> a2-3 trans quad) (-> v1-13 quad))
|
|
(t9-7 a0-18 a1-7 a2-3 (the-as sparticle-launch-state #f) (the-as sparticle-launch-control #f) 1.0)
|
|
)
|
|
(suspend)
|
|
0
|
|
)
|
|
)
|
|
(let ((v0-8 (-> (the-as process-drawable (-> s4-1 0)) draw color-mult)))
|
|
(set! (-> v0-8 quad) (-> s5-1 quad))
|
|
v0-8
|
|
)
|
|
)
|
|
)
|
|
|
|
(defpart 165
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x2e :page #xc))
|
|
(sp-func spt-birth-func 'birth-func-target-orient)
|
|
(sp-flt spt-num 1.0)
|
|
(sp-flt spt-y (meters 0.02))
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.5) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-flt spt-r 110.0 32.0 1.0)
|
|
(sp-rnd-flt spt-g 128.0 32.0 1.0)
|
|
(sp-rnd-flt spt-b 96.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 8.0 40.0 1.0)
|
|
(sp-rnd-flt spt-scalevel-x (meters 0.0033333334) (meters 0.0033333334) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.2)
|
|
(sp-int spt-timer 240)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 sp-cpuinfo-flag-14)
|
|
(sp-flt spt-userdata -8192.0)
|
|
)
|
|
)
|
|
|
|
(defpart 166
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #xbb :page #xc))
|
|
(sp-flt spt-num 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.25) 1.0)
|
|
(sp-flt spt-rot-x 2048.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 64.0 64.0 1.0)
|
|
(sp-rnd-flt spt-g 128.0 64.0 1.0)
|
|
(sp-flt spt-b 255.0)
|
|
(sp-flt spt-a 32.0)
|
|
(sp-int spt-timer 5)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)
|
|
(sp-flt spt-userdata 4096.0)
|
|
(sp-int spt-next-time 5)
|
|
(sp-launcher-by-id spt-next-launcher 167)
|
|
)
|
|
)
|
|
|
|
(defpart 167
|
|
:init-specs ((sp-rnd-flt spt-scale-x (meters 0.2) (meters 0.25) 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 64.0 64.0 1.0)
|
|
(sp-rnd-flt spt-g 128.0 64.0 1.0)
|
|
(sp-flt spt-b 255.0)
|
|
(sp-rnd-flt spt-a 24.0 32.0 1.0)
|
|
(sp-int spt-next-time 5)
|
|
(sp-launcher-by-id spt-next-launcher 167)
|
|
)
|
|
)
|
|
|
|
(defpartgroup group-lightning-glow
|
|
:id 60
|
|
:bounds (static-bspherem 0 0 0 1)
|
|
:parts ((sp-item 168 :flags (bit6)) (sp-item 169 :flags (bit6)))
|
|
)
|
|
|
|
(defpart 168
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #xbb :page #xc))
|
|
(sp-flt spt-num 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 4) (meters 4) 1.0)
|
|
(sp-flt spt-rot-x 2048.0)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-flt spt-r 0.0 32.0 1.0)
|
|
(sp-rnd-flt spt-g 32.0 96.0 1.0)
|
|
(sp-rnd-flt spt-b 128.0 128.0 1.0)
|
|
(sp-rnd-flt spt-a 4.0 8.0 1.0)
|
|
(sp-int spt-timer 10)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)
|
|
(sp-flt spt-userdata 16384.0)
|
|
(sp-rnd-flt spt-conerot-x (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-radius (meters 0) (meters 2) 1.0)
|
|
)
|
|
)
|
|
|
|
(defpart 169
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #xbb :page #xc))
|
|
(sp-flt spt-num 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 1) (meters 2) 1.0)
|
|
(sp-flt spt-rot-x 2048.0)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-flt spt-r 128.0)
|
|
(sp-rnd-flt spt-g 128.0 128.0 1.0)
|
|
(sp-flt spt-b 255.0)
|
|
(sp-rnd-flt spt-a 6.0 12.0 1.0)
|
|
(sp-int spt-timer 10)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)
|
|
(sp-flt spt-userdata 16384.0)
|
|
(sp-rnd-flt spt-conerot-x (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-radius (meters 0) (meters 1) 1.0)
|
|
)
|
|
)
|
|
|
|
(defpartgroup group-lightning-green-glow
|
|
:id 61
|
|
:bounds (static-bspherem 0 0 0 1)
|
|
:parts ((sp-item 170 :flags (bit6)) (sp-item 171 :flags (bit6)))
|
|
)
|
|
|
|
(defpart 170
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #xbb :page #xc))
|
|
(sp-flt spt-num 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 4) (meters 4) 1.0)
|
|
(sp-flt spt-rot-x 2048.0)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-flt spt-r 0.0 32.0 1.0)
|
|
(sp-rnd-flt spt-g 128.0 128.0 1.0)
|
|
(sp-rnd-flt spt-b 32.0 96.0 1.0)
|
|
(sp-rnd-flt spt-a 4.0 8.0 1.0)
|
|
(sp-int spt-timer 10)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)
|
|
(sp-flt spt-userdata 16384.0)
|
|
(sp-rnd-flt spt-conerot-x (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-radius (meters 0) (meters 2) 1.0)
|
|
)
|
|
)
|
|
|
|
(defpart 171
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #xbb :page #xc))
|
|
(sp-flt spt-num 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 1) (meters 2) 1.0)
|
|
(sp-flt spt-rot-x 2048.0)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-rnd-flt spt-r 0.0 32.0 1.0)
|
|
(sp-rnd-flt spt-g 128.0 128.0 1.0)
|
|
(sp-rnd-flt spt-b 32.0 96.0 1.0)
|
|
(sp-rnd-flt spt-a 4.0 8.0 1.0)
|
|
(sp-int spt-timer 10)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)
|
|
(sp-flt spt-userdata 16384.0)
|
|
(sp-rnd-flt spt-conerot-x (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-radius (meters 0) (meters 1) 1.0)
|
|
)
|
|
)
|
|
|
|
(defpartgroup group-lightning-red-glow
|
|
:id 62
|
|
:bounds (static-bspherem 0 0 0 1)
|
|
:parts ((sp-item 172 :flags (bit6)) (sp-item 173 :flags (bit6)))
|
|
)
|
|
|
|
(defpart 172
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #xbb :page #xc))
|
|
(sp-flt spt-num 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 4) (meters 4) 1.0)
|
|
(sp-flt spt-rot-x 2048.0)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 3600.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 32.0 96.0 1.0)
|
|
(sp-rnd-flt spt-b 0.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 4.0 8.0 1.0)
|
|
(sp-int spt-timer 10)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)
|
|
(sp-flt spt-userdata 16384.0)
|
|
(sp-rnd-flt spt-conerot-x (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-radius (meters 0) (meters 2) 1.0)
|
|
)
|
|
)
|
|
|
|
(defpart 173
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #xbb :page #xc))
|
|
(sp-flt spt-num 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 1) (meters 2) 1.0)
|
|
(sp-flt spt-rot-x 2048.0)
|
|
(sp-rnd-flt spt-rot-z (degrees 0.0) (degrees 3600.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 32.0 96.0 1.0)
|
|
(sp-rnd-flt spt-b 0.0 32.0 1.0)
|
|
(sp-rnd-flt spt-a 4.0 8.0 1.0)
|
|
(sp-int spt-timer 10)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)
|
|
(sp-flt spt-userdata 16384.0)
|
|
(sp-rnd-flt spt-conerot-x (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-radius (meters 0) (meters 1) 1.0)
|
|
)
|
|
)
|
|
|
|
(defun lightning-probe-callback ((arg0 lightning-tracker))
|
|
(let ((v1-1 (+ (-> arg0 user-time 0) 1)))
|
|
(set! (-> arg0 user-time 0) v1-1)
|
|
(when (= v1-1 (seconds 0.007))
|
|
(let* ((v1-2 (rand-vu-int-range 64 128))
|
|
(v0-3 (logior (logior (logior #x800000 v1-2) (* v1-2 256)) (shl (rand-vu-int-range 32 64) 24)))
|
|
(v1-6 (-> arg0 lightning state))
|
|
)
|
|
(set! (-> v1-6 start-color) (the-as rgba v0-3))
|
|
(set! (-> v1-6 end-color) (the-as rgba v0-3))
|
|
)
|
|
)
|
|
)
|
|
(none)
|
|
)
|
|
|
|
(set! (-> *lightning-spec-id-table* 1) (new 'static 'lightning-spec
|
|
:name "lightning-shock"
|
|
:flags (lightning-spec-flags lsf0)
|
|
:start-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
|
|
:end-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
|
|
:fade-to-color (new 'static 'rgba :r #xbf :b #x8f :a #x5)
|
|
:fade-start-factor 0.2
|
|
:texture (new 'static 'texture-id :index #x83 :page #xc)
|
|
:reduction 0.42
|
|
:num-points 16
|
|
:box-size 16384.0
|
|
:merge-factor 0.5
|
|
:merge-count 2
|
|
:radius 2048.0
|
|
:duration 30.0
|
|
:sound (static-sound-spec "shock")
|
|
)
|
|
)
|
|
|
|
(set! (-> *lightning-spec-id-table* 2) (new 'static 'lightning-spec
|
|
:name "lightning-shock-dim"
|
|
:flags (lightning-spec-flags lsf0)
|
|
:start-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x20)
|
|
:end-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x20)
|
|
:fade-to-color (new 'static 'rgba :r #xbf :b #x8f :a #x5)
|
|
:fade-start-factor 0.2
|
|
:texture (new 'static 'texture-id :index #x83 :page #xc)
|
|
:reduction 0.42
|
|
:num-points 16
|
|
:box-size 16384.0
|
|
:merge-factor 0.5
|
|
:merge-count 2
|
|
:radius 2048.0
|
|
:duration 30.0
|
|
:sound (static-sound-spec "shock")
|
|
)
|
|
)
|
|
|
|
(set! (-> *lightning-spec-id-table* 3) (new 'static 'lightning-spec
|
|
:name "lightning-shock-red"
|
|
:flags (lightning-spec-flags lsf0)
|
|
:start-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
|
|
:end-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
|
|
:fade-to-color (new 'static 'rgba :r #xbf :b #x8f :a #x5)
|
|
:fade-start-factor 0.2
|
|
:texture (new 'static 'texture-id :index #x86 :page #xc)
|
|
:reduction 0.42
|
|
:num-points 16
|
|
:box-size 16384.0
|
|
:merge-factor 0.5
|
|
:merge-count 2
|
|
:radius 2048.0
|
|
:duration 30.0
|
|
:sound (static-sound-spec "shock")
|
|
)
|
|
)
|
|
|
|
(set! (-> *lightning-spec-id-table* 4) (new 'static 'lightning-spec
|
|
:name "lightning-shock-green"
|
|
:flags (lightning-spec-flags lsf0)
|
|
:start-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
|
|
:end-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
|
|
:fade-to-color (new 'static 'rgba :r #xbf :b #x8f :a #x5)
|
|
:fade-start-factor 0.2
|
|
:texture (new 'static 'texture-id :page #xd82)
|
|
:reduction 0.42
|
|
:num-points 16
|
|
:box-size 16384.0
|
|
:merge-factor 0.5
|
|
:merge-count 2
|
|
:radius 2048.0
|
|
:duration 30.0
|
|
:sound (static-sound-spec "shock")
|
|
)
|
|
)
|
|
|
|
(defun process-drawable-shock-effect ((arg0 process-drawable)
|
|
(arg1 lightning-spec)
|
|
(arg2 (function lightning-tracker none))
|
|
(arg3 sparticle-launcher)
|
|
(arg4 int)
|
|
(arg5 int)
|
|
(arg6 float)
|
|
)
|
|
(local-vars
|
|
(sv-624 (pointer lightning-tracker))
|
|
(sv-640 float)
|
|
(sv-656 int)
|
|
(sv-672 matrix)
|
|
(sv-688 collide-query)
|
|
(sv-704 symbol)
|
|
(sv-720 vector)
|
|
(sv-736 int)
|
|
(sv-752 lightning-tracker)
|
|
)
|
|
(with-pp
|
|
(set! sv-640 arg6)
|
|
(let ((s5-0 *lightning-probe-vars*))
|
|
(if (= arg4 256)
|
|
(set! sv-656 arg4)
|
|
(set! sv-656 (rand-vu-int-range 3 (/ (+ (-> arg0 node-list length) -1) 2)))
|
|
)
|
|
(set! sv-672 (new 'stack-no-clear 'matrix))
|
|
(set! sv-688 (new 'stack-no-clear 'collide-query))
|
|
(set! sv-704 (the-as symbol #f))
|
|
(when (nonzero? arg4)
|
|
(set! sv-656 arg4)
|
|
sv-656
|
|
)
|
|
(if (= arg4 256)
|
|
(set! (-> sv-688 start-pos quad) (-> arg0 root trans quad))
|
|
(vector<-cspace! (-> sv-688 start-pos) (-> arg0 node-list data sv-656))
|
|
)
|
|
(set! sv-720 (-> sv-688 move-dist))
|
|
(set! (-> sv-720 x) (rand-vu-float-range 0.0 65536.0))
|
|
(set! (-> sv-720 y) (rand-vu-float-range 0.0 65536.0))
|
|
(set! (-> sv-720 z) (rand-vu-float-range 0.0 65536.0))
|
|
(set! (-> sv-720 w) 1.0)
|
|
(matrix-rotate-zyx! sv-672 (-> sv-688 move-dist))
|
|
(set! sv-736 6)
|
|
(while (nonzero? sv-736)
|
|
(set! sv-736 (+ sv-736 -1))
|
|
(vector-rotate*! (-> sv-688 move-dist) (-> s5-0 probe-dirs sv-736) sv-672)
|
|
(vector-normalize! (-> sv-688 move-dist) sv-640)
|
|
(let ((v1-29 sv-688))
|
|
(set! (-> v1-29 radius) 409.6)
|
|
(set! (-> v1-29 collide-with) (collide-spec backgnd crate obstacle hit-by-others-list pusher))
|
|
(set! (-> v1-29 ignore-process0) arg0)
|
|
(set! (-> v1-29 ignore-process1) #f)
|
|
(set! (-> v1-29 ignore-pat) (new 'static 'pat-surface :noentity #x1 :nojak #x1 :probe #x1 :noendlessfall #x1))
|
|
(set! (-> v1-29 action-mask) (collide-action solid))
|
|
)
|
|
(when (>= (fill-and-probe-using-line-sphere *collide-cache* sv-688) 0.0)
|
|
(set! (-> s5-0 last-valid-time) (-> pp clock frame-counter))
|
|
(set! (-> s5-0 src-joint-index) (the-as uint sv-656))
|
|
(set! (-> s5-0 end-pos quad) (-> sv-688 best-other-tri intersect quad))
|
|
(when (< 8192.0 (vector-vector-distance (-> s5-0 end-pos) (-> sv-688 start-pos)))
|
|
(set! sv-704 #t)
|
|
(goto cfg-15)
|
|
)
|
|
)
|
|
)
|
|
(label cfg-15)
|
|
(when sv-704
|
|
(set! sv-752 (the-as lightning-tracker (get-process *default-dead-pool* lightning-tracker #x4000)))
|
|
(set! sv-624
|
|
(when sv-752
|
|
(let ((t9-11 (method-of-type lightning-tracker activate)))
|
|
(t9-11 sv-752 arg0 (symbol->string (-> lightning-tracker symbol)) (the-as pointer #x70004000))
|
|
)
|
|
(run-now-in-process
|
|
sv-752
|
|
lightning-tracker-init
|
|
arg1
|
|
arg5
|
|
arg2
|
|
arg0
|
|
(if (= arg4 256)
|
|
(-> arg0 root trans)
|
|
(-> s5-0 src-joint-index)
|
|
)
|
|
(-> s5-0 end-pos)
|
|
)
|
|
(-> sv-752 ppointer-override)
|
|
)
|
|
)
|
|
(when sv-624
|
|
(set! (-> sv-624 0 user-time 0) 0)
|
|
(when arg3
|
|
(let ((v1-62 (get-field-spec-by-id arg3 (sp-field-id spt-timer))))
|
|
(if v1-62
|
|
(set! (-> v1-62 initial-valuef) (the-as float (-> sv-624 0 duration)))
|
|
)
|
|
)
|
|
(let ((t9-14 sp-launch-particles-var)
|
|
(a0-29 *sp-particle-system-2d*)
|
|
(a2-7 *launch-matrix*)
|
|
)
|
|
(set! (-> a2-7 trans quad) (-> s5-0 end-pos quad))
|
|
(t9-14 a0-29 arg3 a2-7 (the-as sparticle-launch-state #f) (the-as sparticle-launch-control #f) 1.0)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
(the-as object 0)
|
|
)
|
|
)
|
|
|
|
;; definition for function process-drawable-shock-wall-effect
|
|
;; ERROR: function was not converted to expressions. Cannot decompile.
|
|
|
|
(defun process-drawable2-shock-effect ((arg0 process-drawable)
|
|
(arg1 process-drawable)
|
|
(arg2 lightning-spec)
|
|
(arg3 (function lightning-tracker none))
|
|
(arg4 sparticle-launcher)
|
|
)
|
|
(local-vars (sv-16 int) (sv-64 vector) (sv-68 vector) (sv-72 (pointer lightning-tracker)))
|
|
(when (and (nonzero? (-> arg0 skel)) (nonzero? (-> arg1 skel)))
|
|
(let* ((v1-7 (-> arg0 draw lod-set lod (-> arg0 draw lod-set max-lod) geo num-joints))
|
|
(s0-0 (-> arg1 draw lod-set lod (-> arg1 draw lod-set max-lod) geo num-joints))
|
|
(s1-0 (rand-vu-int-range 3 (+ v1-7 -1)))
|
|
)
|
|
(set! sv-16 (rand-vu-int-range 3 (+ s0-0 -1)))
|
|
(set! sv-64 (vector<-cspace! (new 'stack-no-clear 'vector) (-> arg0 node-list data s1-0)))
|
|
(set! sv-68 (vector<-cspace! (new 'stack-no-clear 'vector) (-> arg1 node-list data sv-16)))
|
|
(let ((s0-1 (the-as lightning-tracker (get-process *default-dead-pool* lightning-tracker #x4000))))
|
|
(set! sv-72 (when s0-1
|
|
(let ((t9-5 (method-of-type lightning-tracker activate)))
|
|
(t9-5 s0-1 arg1 (symbol->string (-> lightning-tracker symbol)) (the-as pointer #x70004000))
|
|
)
|
|
(run-now-in-process s0-1 lightning-tracker-init arg2 0 arg3 arg0 s1-0 sv-16)
|
|
(-> s0-1 ppointer-override)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
(when (and arg4 sv-72)
|
|
(let ((v1-21 (get-field-spec-by-id arg4 (sp-field-id spt-timer))))
|
|
(if v1-21
|
|
(set! (-> v1-21 initial-valuef) (the-as float (-> sv-72 0 duration)))
|
|
)
|
|
)
|
|
(let ((t9-8 sp-launch-particles-var)
|
|
(a0-20 *sp-particle-system-2d*)
|
|
(a1-16 arg4)
|
|
(a2-4 *launch-matrix*)
|
|
)
|
|
(set! (-> a2-4 trans quad) (-> sv-64 quad))
|
|
(t9-8 a0-20 a1-16 a2-4 (the-as sparticle-launch-state #f) (the-as sparticle-launch-control #f) 1.0)
|
|
)
|
|
(let ((t9-9 sp-launch-particles-var)
|
|
(a0-21 *sp-particle-system-2d*)
|
|
(a2-5 *launch-matrix*)
|
|
)
|
|
(set! (-> a2-5 trans quad) (-> sv-68 quad))
|
|
(t9-9 a0-21 arg4 a2-5 (the-as sparticle-launch-state #f) (the-as sparticle-launch-control #f) 1.0)
|
|
)
|
|
)
|
|
)
|
|
0
|
|
(none)
|
|
)
|
|
|
|
(set! (-> *lightning-spec-id-table* 5) (new 'static 'lightning-spec
|
|
:name "lightning-shock-skel"
|
|
:flags (lightning-spec-flags lsf0)
|
|
:rand-func #x2
|
|
:start-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
|
|
:end-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
|
|
:fade-to-color (new 'static 'rgba :r #xbf :b #x8f :a #x5)
|
|
:fade-start-factor 0.2
|
|
:fade-time 120.0
|
|
:texture (new 'static 'texture-id :index #x83 :page #xc)
|
|
:reduction 0.5
|
|
:num-points 32
|
|
:box-size 6144.0
|
|
:merge-factor 0.5
|
|
:merge-count 2
|
|
:radius 2048.0
|
|
:duration 30.0
|
|
:sound #f
|
|
)
|
|
)
|
|
|
|
|
|
(defun process-drawable-shock-skel-effect ((arg0 process-drawable)
|
|
(arg1 lightning-spec)
|
|
(arg2 (function lightning-tracker none))
|
|
(arg3 sparticle-launcher)
|
|
(arg4 float)
|
|
(arg5 int)
|
|
(arg6 int)
|
|
)
|
|
(local-vars
|
|
(sv-416 int)
|
|
(sv-432 vector)
|
|
(sv-448 vector)
|
|
(sv-464 vector)
|
|
(sv-480 quaternion)
|
|
(sv-496 vector)
|
|
(sv-512 matrix)
|
|
(sv-528 vector)
|
|
(sv-544 vector)
|
|
(sv-560 process)
|
|
(sv-576 int)
|
|
(sv-592 (function lightning-control int vector none))
|
|
(sv-608 lightning-control)
|
|
(sv-624 int)
|
|
(sv-640 vector)
|
|
)
|
|
(rlet ((acc :class vf)
|
|
(vf0 :class vf)
|
|
(vf4 :class vf)
|
|
(vf5 :class vf)
|
|
(vf6 :class vf)
|
|
(vf7 :class vf)
|
|
)
|
|
(init-vf0-vector)
|
|
(let ((s1-0 (-> arg0 draw lod-set lod (-> arg0 draw cur-lod) geo num-joints)))
|
|
(set! sv-416 (rand-vu-int-range 4 (+ s1-0 -1)))
|
|
(let ((s1-1 (rand-vu-int-range 4 (+ s1-0 -1))))
|
|
(when (!= arg5 -1)
|
|
(set! sv-416 arg5)
|
|
sv-416
|
|
)
|
|
(if (!= arg6 -1)
|
|
(set! s1-1 arg6)
|
|
)
|
|
(-> arg0 node-list data sv-416)
|
|
(let ((s0-1 (-> arg0 node-list data sv-416))
|
|
(a0-9 (-> arg0 node-list data s1-1))
|
|
(v1-18 #t)
|
|
)
|
|
(until #f
|
|
(let ((a1-3 a0-9))
|
|
(until #f
|
|
(cond
|
|
((and (-> a1-3 joint) (>= (-> a1-3 joint number) 2))
|
|
(when (= s0-1 a1-3)
|
|
#t
|
|
(goto cfg-24)
|
|
)
|
|
(set! a1-3 (-> a1-3 parent))
|
|
)
|
|
(else
|
|
(set! s0-1 (-> s0-1 parent))
|
|
(when (or (not (-> s0-1 joint)) (< (-> s0-1 joint number) 2))
|
|
(set! v1-18 #f)
|
|
(goto cfg-24)
|
|
)
|
|
(goto cfg-23)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
#f
|
|
(label cfg-23)
|
|
)
|
|
#f
|
|
(label cfg-24)
|
|
(when v1-18
|
|
;; (let ((s5-1 (the-as (array cspace) (new 'stack 'array cspace 32))))
|
|
(let ((s5-1 (new 'static 'boxed-array :type cspace :length 0 :allocated-length 32)))
|
|
(let ((v1-21 0))
|
|
(set! (-> s5-1 length) 0)
|
|
(let ((a1-12 (-> arg0 node-list data sv-416))
|
|
(a0-19 (-> arg0 node-list data s1-1))
|
|
)
|
|
(set! (-> s5-1 (-> s5-1 length)) a1-12)
|
|
(+! (-> s5-1 length) 1)
|
|
(while (!= a1-12 s0-1)
|
|
(set! a1-12 (-> a1-12 parent))
|
|
(set! (-> s5-1 (-> s5-1 length)) a1-12)
|
|
(+! (-> s5-1 length) 1)
|
|
)
|
|
(while (!= a0-19 s0-1)
|
|
(set! a0-19 (-> a0-19 parent))
|
|
(+! (-> s5-1 length) 1)
|
|
)
|
|
)
|
|
(let ((a0-23 (-> arg0 node-list data s1-1)))
|
|
(while (!= a0-23 s0-1)
|
|
(let ((a1-18 (-> a0-23 parent)))
|
|
(+! v1-21 1)
|
|
(set! (-> s5-1 (- (-> s5-1 length) v1-21)) a0-23)
|
|
(set! a0-23 a1-18)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
(when (< 2 (-> s5-1 length))
|
|
(let ((s1-2 (new 'stack-no-clear 'vector)))
|
|
(set! sv-512 (new 'stack-no-clear 'matrix))
|
|
(let ((s0-2 (new 'stack-no-clear 'vector)))
|
|
(set! sv-432 (new 'stack-no-clear 'vector))
|
|
(set! sv-448 (new 'stack-no-clear 'vector))
|
|
(set! sv-464 (new 'stack-no-clear 'vector))
|
|
(set! sv-480 (new 'stack-no-clear 'quaternion))
|
|
(set! sv-496 s1-2)
|
|
(set! (-> sv-496 x) (rand-vu-float-range 0.0 65536.0))
|
|
(set! (-> sv-496 y) (rand-vu-float-range 0.0 65536.0))
|
|
(set! (-> sv-496 z) (rand-vu-float-range 0.0 65536.0))
|
|
(set! (-> sv-496 w) 1.0)
|
|
(matrix-rotate-zyx! sv-512 s1-2)
|
|
(vector-rotate*! sv-448 *up-vector* sv-512)
|
|
(vector<-cspace! sv-432 (-> s5-1 0))
|
|
(set! sv-544 s0-2)
|
|
(set! sv-528 (vector<-cspace! (new 'stack-no-clear 'vector) (-> s5-1 0)))
|
|
(let ((v0-10 (vector<-cspace! (new 'stack-no-clear 'vector) (-> s5-1 1))))
|
|
(.lvf vf4 (&-> sv-528 quad))
|
|
(.lvf vf5 (&-> v0-10 quad))
|
|
)
|
|
(.mov.vf vf6 vf0 :mask #b1000)
|
|
(.sub.vf vf6 vf4 vf5 :mask #b111)
|
|
(.svf (&-> sv-544 quad) vf6)
|
|
(vector-normalize! s0-2 1.0)
|
|
(set! sv-560 (get-process *default-dead-pool* lightning-tracker #x4000))
|
|
(let ((a0-35 (when sv-560
|
|
(let ((t9-13 (method-of-type lightning-tracker activate)))
|
|
(t9-13
|
|
(the-as lightning-tracker sv-560)
|
|
arg0
|
|
(symbol->string (-> lightning-tracker symbol))
|
|
(the-as pointer #x70004000)
|
|
)
|
|
)
|
|
(run-now-in-process sv-560 lightning-tracker-init arg1 0 arg2 arg0 #f #f)
|
|
(-> sv-560 ppointer)
|
|
)
|
|
)
|
|
)
|
|
(when a0-35
|
|
(set! (-> (the-as lightning-tracker (-> a0-35 0)) user-time 0) 0)
|
|
(let ((s4-1 (-> (the-as lightning-tracker (-> a0-35 0)) lightning))
|
|
(s3-1 (new 'stack-no-clear 'vector))
|
|
(s2-1 (new 'stack-no-clear 'vector))
|
|
)
|
|
(set! (-> s4-1 state points-to-draw) 0)
|
|
(let ((a1-32 s3-1))
|
|
(let ((v1-46 sv-432))
|
|
(let ((a0-38 sv-448))
|
|
(let ((a2-32 arg4))
|
|
(.mov vf7 a2-32)
|
|
)
|
|
(.lvf vf5 (&-> a0-38 quad))
|
|
)
|
|
(.lvf vf4 (&-> v1-46 quad))
|
|
)
|
|
(.add.x.vf vf6 vf0 vf0 :mask #b1000)
|
|
(.mul.x.vf acc vf5 vf7 :mask #b111)
|
|
(.add.mul.w.vf vf6 vf4 vf0 acc :mask #b111)
|
|
(.svf (&-> a1-32 quad) vf6)
|
|
)
|
|
(set-point! s4-1 (-> s4-1 state points-to-draw) s3-1)
|
|
(+! (-> s4-1 state points-to-draw) 1)
|
|
(set! sv-576 0)
|
|
(while (< sv-576 (+ (-> s5-1 length) -1))
|
|
(set! sv-640 (new 'stack-no-clear 'vector))
|
|
(vector<-cspace! sv-640 (-> s5-1 (+ sv-576 1)))
|
|
(vector-! sv-464 sv-640 sv-432)
|
|
(vector-normalize! sv-464 1.0)
|
|
(quaternion-from-two-vectors! sv-480 s0-2 sv-464)
|
|
(vector-orient-by-quat! s1-2 sv-448 sv-480)
|
|
(set! (-> s1-2 quad) (-> (the-as (pointer uint128) sv-448) 0))
|
|
(let ((a1-40 s2-1))
|
|
(let ((v1-58 sv-640))
|
|
(let ((a0-47 s1-2))
|
|
(let ((a2-36 arg4))
|
|
(.mov vf7 a2-36)
|
|
)
|
|
(.lvf vf5 (&-> a0-47 quad))
|
|
)
|
|
(.lvf vf4 (&-> v1-58 quad))
|
|
)
|
|
(.add.x.vf vf6 vf0 vf0 :mask #b1000)
|
|
(.mul.x.vf acc vf5 vf7 :mask #b111)
|
|
(.add.mul.w.vf vf6 vf4 vf0 acc :mask #b111)
|
|
(.svf (&-> a1-40 quad) vf6)
|
|
)
|
|
(set! sv-608 s4-1)
|
|
(set! sv-592 (method-of-object sv-608 set-point!))
|
|
(set! sv-624 (-> s4-1 state points-to-draw))
|
|
(let ((a2-38 (vector-average! (new 'stack-no-clear 'vector) s2-1 s3-1)))
|
|
(sv-592 sv-608 sv-624 a2-38)
|
|
)
|
|
(+! (-> s4-1 state points-to-draw) 1)
|
|
(set-point! s4-1 (-> s4-1 state points-to-draw) s2-1)
|
|
(+! (-> s4-1 state points-to-draw) 1)
|
|
(set! (-> s3-1 quad) (-> s2-1 quad))
|
|
(set! (-> s0-2 quad) (-> (the-as (pointer uint128) sv-464) 0))
|
|
(set! (-> sv-448 quad) (-> s1-2 quad))
|
|
(set! (-> sv-432 quad) (-> sv-640 quad))
|
|
(set! sv-576 (+ sv-576 1))
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
0
|
|
(none)
|
|
)
|
|
)
|
|
|
|
(defpartgroup group-darkjak-bomb
|
|
:id 63
|
|
:duration (seconds 0.25)
|
|
:linger-duration (seconds 2)
|
|
:flags (use-local-clock)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 174 :period 3000 :length 50)
|
|
(sp-item 175 :period 3000 :length 5)
|
|
(sp-item 176 :flags (bit6) :period 3000 :length 5)
|
|
)
|
|
)
|
|
|
|
(defpart 174
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #x33 :page #xc))
|
|
(sp-flt spt-num 3.0)
|
|
(sp-flt spt-scale-x (meters 1))
|
|
(sp-flt spt-rot-x 204.8)
|
|
(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 0.0)
|
|
(sp-rnd-flt spt-b 128.0 128.0 1.0)
|
|
(sp-flt spt-a 16.0)
|
|
(sp-rnd-flt spt-scalevel-x (meters 0.53333336) (meters 0.53333336) 1.0)
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.1) (degrees 0.2) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.45714286)
|
|
(sp-int spt-timer 40)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)
|
|
(sp-flt spt-userdata 4096.0)
|
|
)
|
|
)
|
|
|
|
(defpart 175
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #xbb :page #xc))
|
|
(sp-flt spt-num 1.0)
|
|
(sp-flt spt-scale-x (meters 1))
|
|
(sp-flt spt-rot-x 409.6)
|
|
(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 0.0)
|
|
(sp-rnd-flt spt-b 128.0 128.0 1.0)
|
|
(sp-flt spt-a 24.0)
|
|
(sp-flt spt-scalevel-x (meters 0.34285715))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.3) (degrees 0.6) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-g -3.6571429)
|
|
(sp-flt spt-fade-b -0.9142857)
|
|
(sp-int spt-timer 400)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-0 sp-cpuinfo-flag-2 glow)
|
|
(sp-flt spt-userdata 4096.0)
|
|
(sp-int spt-next-time 35)
|
|
(sp-launcher-by-id spt-next-launcher 177)
|
|
)
|
|
)
|
|
|
|
(defpart 177
|
|
:init-specs ((sp-flt spt-scale-x (meters 4.5))
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-flt spt-scalevel-x (meters -0.05625))
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-g -0.875)
|
|
(sp-flt spt-fade-b 0.0)
|
|
(sp-flt spt-fade-a -0.15)
|
|
)
|
|
)
|
|
|
|
(defpart 176
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #xbb :page #xc))
|
|
(sp-flt spt-num 1.0)
|
|
(sp-flt spt-scale-x (meters 16))
|
|
(sp-flt spt-rot-x 409.6)
|
|
(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 255.0)
|
|
(sp-flt spt-g 255.0)
|
|
(sp-flt spt-b 255.0)
|
|
(sp-flt spt-a 128.0)
|
|
(sp-flt spt-scalevel-x (meters 1.6))
|
|
(sp-rnd-flt spt-rotvel-z (degrees -0.3) (degrees 0.6) 1.0)
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-int spt-timer 10)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-0 sp-cpuinfo-flag-2 glow)
|
|
(sp-flt spt-userdata 4096.0)
|
|
)
|
|
)
|
|
|
|
(defpartgroup group-darkjak-transform
|
|
:id 64
|
|
:duration (seconds 0.25)
|
|
:linger-duration (seconds 2)
|
|
:flags (use-local-clock)
|
|
:bounds (static-bspherem 0 0 0 2)
|
|
:parts ((sp-item 174 :period 3000 :length 50)
|
|
(sp-item 175 :period 3000 :length 5)
|
|
(sp-item 176 :period 3000 :length 5)
|
|
)
|
|
)
|
|
|
|
(set! (-> *lightning-spec-id-table* 6) (new 'static 'lightning-spec
|
|
:name "lightning-darkjak-transform"
|
|
:flags (lightning-spec-flags lsf0)
|
|
:start-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
|
|
:end-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
|
|
:fade-to-color (new 'static 'rgba :r #xbf :b #x8f :a #x5)
|
|
:fade-start-factor 0.2
|
|
:texture (new 'static 'texture-id :index #x84 :page #xc)
|
|
:reduction 0.42
|
|
:num-points 16
|
|
:box-size 8192.0
|
|
:merge-factor 0.5
|
|
:merge-count 2
|
|
:radius 1638.4
|
|
:duration 30.0
|
|
:duration-rand 90.0
|
|
:sound (static-sound-spec "transform-zap")
|
|
)
|
|
)
|
|
|
|
(set! (-> *lightning-spec-id-table* 7) (new 'static 'lightning-spec
|
|
:name "lightning-darkjak-pill"
|
|
:flags (lightning-spec-flags lsf0)
|
|
:start-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
|
|
:end-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
|
|
:fade-to-color (new 'static 'rgba :r #xbf :b #x8f :a #x5)
|
|
:fade-start-factor 0.2
|
|
:texture (new 'static 'texture-id :index #x84 :page #xc)
|
|
:reduction 0.42
|
|
:num-points 16
|
|
:box-size 8192.0
|
|
:merge-factor 0.5
|
|
:merge-count 2
|
|
:radius 1638.4
|
|
:duration 30.0
|
|
:duration-rand 90.0
|
|
:sound (static-sound-spec "transform-zap")
|
|
:delay 60.0
|
|
:delay-rand 120.0
|
|
)
|
|
)
|
|
|
|
(define *lightning-darkjak-pill* (-> *lightning-spec-id-table* 7))
|
|
|
|
(defpart 178
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #xc9 :page #xc))
|
|
(sp-flt spt-num 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.1) (meters 0.15) 1.0)
|
|
(sp-int spt-rot-x 4)
|
|
(sp-copy-from-other spt-scale-y -4)
|
|
(sp-flt spt-r 255.0)
|
|
(sp-rnd-flt spt-g 0.0 64.0 1.0)
|
|
(sp-flt spt-b 255.0)
|
|
(sp-rnd-flt spt-a 8.0 12.0 1.0)
|
|
(sp-flt spt-omega 40.96)
|
|
(sp-rnd-flt spt-vel-y (meters 0.053333335) (meters 0.026666667) 1.0)
|
|
(sp-flt spt-scalevel-x (meters -0.00033333333))
|
|
(sp-copy-from-other spt-scalevel-y -4)
|
|
(sp-flt spt-fade-a -0.26666668)
|
|
(sp-rnd-flt spt-friction 0.99 0.005 1.0)
|
|
(sp-int spt-timer 75)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3)
|
|
(sp-func spt-func 'sparticle-motion-blur)
|
|
(sp-rnd-flt spt-conerot-x (degrees 0.0) (degrees 3600.0) 1.0)
|
|
(sp-rnd-flt spt-conerot-y (degrees 0.0) (degrees 3600.0) 1.0)
|
|
)
|
|
)
|
|
|
|
(set! (-> *lightning-spec-id-table* 8) (new 'static 'lightning-spec
|
|
:name "lightning-darkjak-local"
|
|
:flags (lightning-spec-flags lsf0)
|
|
:start-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
|
|
:end-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
|
|
:fade-to-color (new 'static 'rgba :r #xbf :b #x8f :a #x5)
|
|
:fade-start-factor 0.2
|
|
:texture (new 'static 'texture-id :index #x84 :page #xc)
|
|
:reduction 0.42
|
|
:num-points 16
|
|
:box-size 8192.0
|
|
:merge-factor 0.6
|
|
:merge-count 2
|
|
:radius 1638.4
|
|
:duration 30.0
|
|
:duration-rand 150.0
|
|
:sound (static-sound-spec "transform-zap")
|
|
)
|
|
)
|
|
|
|
(set! (-> *lightning-spec-id-table* 9) (new 'static 'lightning-spec
|
|
:name "lightning-darkjak-attack"
|
|
:flags (lightning-spec-flags lsf0 size-from-adjust-dist)
|
|
:adjust-distance #xa
|
|
:start-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
|
|
:end-color (new 'static 'rgba :r #xff :g #xff :b #xff :a #x80)
|
|
:fade-to-color (new 'static 'rgba :r #xbf :b #x8f :a #x5)
|
|
:fade-start-factor 0.2
|
|
:texture (new 'static 'texture-id :index #x84 :page #xc)
|
|
:reduction 0.42
|
|
:num-points 20
|
|
:box-size 8192.0
|
|
:merge-factor 0.6
|
|
:merge-count 2
|
|
:radius 1638.4
|
|
:duration 30.0
|
|
:duration-rand 150.0
|
|
:sound (static-sound-spec "stretched-zap")
|
|
)
|
|
)
|
|
|
|
(defpart 179
|
|
:init-specs ((sp-tex spt-texture (new 'static 'texture-id :index #xbb :page #xc))
|
|
(sp-flt spt-num 1.0)
|
|
(sp-rnd-flt spt-scale-x (meters 0.5) (meters 0.25) 1.0)
|
|
(sp-flt spt-rot-x 2048.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 255.0)
|
|
(sp-rnd-flt spt-g 0.0 64.0 1.0)
|
|
(sp-flt spt-b 255.0)
|
|
(sp-flt spt-a 32.0)
|
|
(sp-int spt-timer 5)
|
|
(sp-cpuinfo-flags sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)
|
|
(sp-flt spt-userdata 4096.0)
|
|
(sp-int spt-next-time 5)
|
|
(sp-launcher-by-id spt-next-launcher 180)
|
|
)
|
|
)
|
|
|
|
(defpart 180
|
|
:init-specs ((sp-rnd-flt spt-scale-x (meters 0.2) (meters 0.25) 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 200.0 55.0 1.0)
|
|
(sp-rnd-flt spt-g 0.0 128.0 1.0)
|
|
(sp-rnd-flt spt-b 200.0 55.0 1.0)
|
|
(sp-rnd-flt spt-a 24.0 8.0 1.0)
|
|
(sp-int spt-next-time 5)
|
|
(sp-launcher-by-id spt-next-launcher 180)
|
|
)
|
|
)
|
|
|
|
|
|
|
|
|