Files
jak-project/test/decompiler/reference/jak3/levels/tower/tower-scenes_REF.gc
T
Hat Kid 58a5440c8a decomp3: more misc files (#3466)
Makes a bunch of missions mostly playable, including:
- `arena-training-1`
- `arena-fight-1`
- `wascity-chase`
- `arena-fight-2`
- `arena-fight-3`
- `volcano-darkeco`
- `desert-hover`
- `nest-eggs`
- `temple-climb`
- `temple-oracle`
- `temple-tests`
- `desert-beast-battle`
- `desert-turtle-training`
- `desert-course-race`
- `desert-artifact-race1`
- `wascity-leaper-race`
- `wascity-pre-game`
- `sewer-met-hum`
- `forest-kill-plants`
- `forest-ring-chase`
- `temple-defend`
- `tower-destroy`
- `desert-glide`

---
Files:

- `ripple`
- `waswide-mood`
- `sig-rider`
- `nst-tasks`
- `nst-part`
- `nst-gas`
- `nst-eggs-h`
- `nst-obs`
- `nst-mood`
- `egg-spider`
- `wasdoors-init`
- `wasall-tasks`
- `wvehicle-race`
- `wcar-marauder`
- `wcar-marauder-b`
- `turret-control`
- `was-squad-control`
- `turtle-training`
- `kleever-rider`
- `course-race`
- `artifact-race`
- `desert-hover`
- `desbeast-path-h`
- `des-beast`
- `desertg-obs`
- `desertf-obs`
- `desertd-obs`
- `desert-dust-storm`
- `des-cactus`
- `race-hud`
- `race-info`
- `race-manager`
- `tizard`
- `flyingsaw`
- `hover-training`
- `temple-mood`
- `temple-obs`
- `temple-obs2`
- `temple-part`
- `temple-scenes`
- `templex-mood`
- `templex-obs`
- `templex-part`
- `tomb-baby-spider`
- `target-turret-shot`
- `target-turret`
- `beast-battle-path`
- `des-beast-2`
- `mh-flyer`
- `scorpion-gun`
- `hover-enemy-h`
- `hover-enemy`
- `hover-formation-h`
- `hover-formation`
- `hover-nav-control-h`
- `hover-nav-control`
- `flamer-hover`
- `hover-nav-templea`
- `robo-hover`
- `hover-nav-sewb`
- `hover-nav-sewg`
- `hover-nav-sewj`
- `hover-nav-sewl`
- `hover-nav-sewo`
- `hover-nav-towera`
- `tower-mood`
- `tower-obs`
- `tower-scenes`
- `tower-part`
- `eco-green-collider`
- `forest-bridges`
- `forest-kill-plants`
- `forest-mood`
- `forest-ring-chase`
- `forest-tasks`
- `forest-part`
- `foresta-obs`
- `hover-nav-foresta`
- `mh-plant`
- `dp-bipedal-part`
- `dp-bipedal-shot`
- `dp-bipedal`
- `neo-spawner`
- `for-turret`
- `for-turret-shot`
- `neo-wasp`
- `neo-wasp-part`
- `volcanox-scenes`
- `volcanox-mood`
- `volcano-scenes`
- `volcano-mood`
- `volcano-obs`
- `volcano-obs2`
- `chain-physics`
- `rigid-body-plat`
- `volcano-part`
- `flamer-lava`
- `flitter`
- `spiky-frog`
- `flut-wild`
- `target-indax`
- `target-indax-hang`
- `mantis`
- `volcanox-obs`
- `spyder`
- `wcar-faccar`
- `mhcity-obs2`
- `mhcity-part`
- `mhcity-obs`
- `dm-mine-spider`
- `rapid-gunner`
- `stadium-mood`
- `stadium-scenes`
- `stadiuma-mood`
- `stadiuma-part`
- `kanga-lizard`
- `marauder`
- `arena-scenes`
- `wasstada-mood`
- `wasstada-obs`
- `wasstada-part`
- `wasstadb-obs`
- `wasstadc-obs`
- `dm-flyer`
- `maker-part`
- `maker-projectile`
- `skeet-part`
- `wascity-turret`
- `wasgun-h`
- `wasgun-hud`
- `wasgun-manager`
- `nav-graph-h`
- `traffic-engine-h`
- `waswide-init`
- `cty-borrow-manager-h`
- `cty-borrow-manager`
- `desert-part`
- `height-map-h`
- `height-map`
- `traffic-height-map`
- `vehicle-control`
- `hvehicle-h`
- `hvehicle`
- `hvehicle-effects`
- `hvehicle-physics`
- `hvehicle-util`
- `glider-h`
- `glider-hud`
- `glider-manager`
- `glider-ring`
- `glider-ring-part`
- `h-glider`
- `hanga-init`
- `was-pre-game`
- `was-leaper-race`
- `flut-racer`
- `desert-scenes`
- `desert-lizard-h`
- `desert-lizard-task`
- `desert-lizard`
- `throne-scenes`
- `waspal-mood`
- `waspala-obs`
- `waspala-part`
- `deswalk-obs`
- `deswalk-part`
- `terraformer-drone`
- `terraformer-head`
- `terraformer-part`
- `terraformer-setup`
2024-04-22 18:43:51 +02:00

1581 lines
51 KiB
Common Lisp
Vendored
Generated

;;-*-Lisp-*-
(in-package goal)
;; failed to figure out what this is:
(defskelgroup skel-tow-break-fma tow-break tow-break-lod0-jg tow-break-idle-ja
((tow-break-lod0-mg (meters 999999)))
:bounds (static-spherem 0 0 0 5000)
:origin-joint-index 3
)
;; failed to figure out what this is:
(defskelgroup skel-tow-break-base-fma tow-break-base tow-break-base-lod0-jg tow-break-base-idle-ja
((tow-break-base-lod0-mg (meters 999999)))
:bounds (static-spherem 0 0 0 5000)
:origin-joint-index 3
)
;; failed to figure out what this is:
(defskelgroup skel-tow-top-fma tow-top tow-top-lod0-jg tow-top-idle-ja
((tow-top-lod0-mg (meters 999999)))
:bounds (static-spherem 0 0 0 500)
:origin-joint-index 3
)
;; failed to figure out what this is:
(defskelgroup skel-tow-large-plat-fma tow-large-plat tow-large-plat-lod0-jg tow-large-plat-idle-ja
((tow-large-plat-lod0-mg (meters 999999)))
:bounds (static-spherem 0 0 0 30)
:origin-joint-index 3
)
;; failed to figure out what this is:
(defskelgroup skel-lfac-hanger-door-fma lfac-hanger-door lfac-hanger-door-lod0-jg lfac-hanger-door-idle-ja
((lfac-hanger-door-lod0-mg (meters 999999)))
:bounds (static-spherem 0 0 0 30)
)
;; failed to figure out what this is:
(set! (-> *lightning-spec-id-table* 44) (new 'static 'lightning-spec
:name "warp-gate-lightning-shock"
:flags (lightning-spec-flags lsf0)
:start-color (new 'static 'rgba :r #x80 :g #x20 :b #x60 :a #x80)
:end-color (new 'static 'rgba :r #x80 :g #x20 :b #x60 :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 #x8f :page #x4)
:reduction 0.48
:num-points 30
:box-size 8601.6
:merge-factor 0.5
:merge-count 2
:radius 2048.0
:duration 30.0
:sound (static-sound-spec "shock" :group 0)
)
)
;; failed to figure out what this is:
(set! (-> *lightning-spec-id-table* 45) (new 'static 'lightning-spec
:name "warp-gate-lightning-crystal"
:flags (lightning-spec-flags lsf0)
:start-color (new 'static 'rgba :r #x80 :g #x20 :b #x60 :a #x80)
:end-color (new 'static 'rgba :r #x80 :g #x20 :b #x60 :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 #x3f :page #x4)
:reduction 0.52
:num-points 80
:box-size 8601.6
:merge-factor 0.5
:merge-count 2
:radius 409.6
:duration 30.0
:sound (static-sound-spec "shock" :group 0)
)
)
;; failed to figure out what this is:
(load-scene
(new 'static 'scene
:name "tower-destroy-res"
:extra #f
:info #f
:scene-flags (scene-flags scf1 scf2 scf3 scf4)
:mask-to-clear (process-mask movie projectile)
:entity "scene-stage-210"
:art-group "scenecamera"
:anim "tower-destroy-res"
:parts 18
:command-list '((0 (want-display 'towerb 'special) (want-display 'towerc 'display) (fade-in (frame-time-30 5)))
(155 (setting-reset
borrow
mode
'((towera 0 ltowerb display) (towerc 0 ltowcity special) (towerc 1 lfacrm1 special))
)
)
(169 (part-tracker
"group-tower-errol-hand-glow"
entity
"errol"
joint
"Lhand"
track
#t
duration
(frame-range 169 208)
)
)
(567 (part-tracker
"group-tower-errol-hand-glow"
entity
"errol"
joint
"Lhand"
track
#t
duration
(frame-range 567 626)
)
)
(769
(part-tracker
"group-tower-dark-warpgate"
entity
"particleman"
joint
"particleD"
track
#t
duration
(frame-range 769 778)
)
(lightning-tracker
"warp-gate-lightning-shock"
from-entity
"particleman"
to-entity
"particleman"
from-joint
"particleD"
to-joint
"particleA"
duration
(frame-range 769 790)
)
(lightning-tracker
"warp-gate-lightning-shock"
from-entity
"particleman"
to-entity
"particleman"
from-joint
"particleD"
to-joint
"particleB"
duration
(frame-range 769 799)
)
(lightning-tracker
"warp-gate-lightning-shock"
from-entity
"particleman"
to-entity
"particleman"
from-joint
"particleD"
to-joint
"particleC"
duration
(frame-range 769 805)
)
(lightning-tracker
"warp-gate-lightning-shock"
from-entity
"particleman"
to-entity
"particleman"
from-joint
"particleD"
to-joint
"particleE"
duration
(frame-range 769 783)
)
)
(833
(lightning-tracker
"warp-gate-lightning-crystal"
from-entity
"eco-crystal-dark"
to-entity
"particleman"
from-joint
"main"
to-joint
"particleA"
duration
(frame-range 833 1050)
)
(lightning-tracker
"warp-gate-lightning-crystal"
from-entity
"eco-crystal-dark"
to-entity
"particleman"
from-joint
"main"
to-joint
"particleB"
duration
(frame-range 833 1050)
)
(lightning-tracker
"warp-gate-lightning-crystal"
from-entity
"eco-crystal-dark"
to-entity
"particleman"
from-joint
"main"
to-joint
"particleC"
duration
(frame-range 833 1050)
)
)
(1020
(setting-reset
borrow
mode
'((towera 0 ltowerb display) (towerc 1 lfacrm1 display) (towerc 0 ltowcity display))
)
(part-tracker
"group-tower-hellcat-heathaze"
entity
"particleman"
joint
"particleH"
track
#t
duration
(frame-range 1020 1265)
)
)
(1137 (cloth-slow-mo "jakc-highres"))
(1265 (cloth-restore-mo "jakc-highres"))
(1266 (setting-reset
borrow
mode
'((towera 0 ltowerb special) (towerc 1 lfacrm1 display) (towerc 0 ltowcity display))
)
)
(1303
(part-tracker
"group-tower-hellcat-thrusters-fire"
entity
"particleman"
joint
"particleF"
track
#t
duration
(frame-range 1303 1500)
)
(part-tracker
"group-tower-hellcat-thrusters-fire"
entity
"particleman"
joint
"particleG"
track
#t
duration
(frame-range 1303 1500)
)
(part-tracker
"group-tower-hellcat-thrusters-trail"
entity
"particleman"
joint
"particleF"
track
#t
duration
(frame-range 1303 1500)
)
(part-tracker
"group-tower-hellcat-thrusters-trail"
entity
"particleman"
joint
"particleG"
track
#t
duration
(frame-range 1303 1500)
)
)
(1351 (part-tracker
"group-dark-tower-explosion"
entity
"particleman"
joint
"particleI"
track
#f
duration
(frame-range 1351 1471)
)
)
(1400 (apply ,(lambda :behavior scene-player
()
(when (not (-> self aborted?))
(disable *screen-filter*)
(setup
*screen-filter*
(new 'static 'vector)
(new 'static 'vector :w 128.0)
(* 0.05 (seconds-per-frame))
(bucket-id tex-hud-pris2)
#x3fffff
#x33001
#t
)
(set-setting! 'allow-blackout #f 0.0 0)
)
(none)
)
)
)
(10000
(apply ,(lambda :behavior scene-player
()
(disable *screen-filter*)
(set-blackout-frames (seconds 0.2))
(remove-setting! 'allow-blackout)
(none)
)
)
(send-event self 'user-data-set! (task-closed? "tower-destroy-resolution"))
(task-close! "tower-destroy-resolution")
)
)
:cut-list '(-29 0 32 74 123 168 222 293 335 382 446 482 523 626 793 833 859 926 985 1051 1090 1137 1226 1266 1303)
:wait-ground-time (seconds 1)
:actor (new 'static 'boxed-array :type scene-actor
(new 'static 'scene-actor
:name "scenecamera"
:level #f
:art-group "skel-scenecamera"
:prefix ""
:draw-frames '((min max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:camera 4
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "particleman"
:level 'ltowerb
:art-group "skel-particleman"
:prefix ""
:draw-frames '((min max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "jakc-highres"
:level 'ltowerb
:art-group "skel-jakc-highres"
:prefix ""
:draw-frames '((min 750) (776 max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '(-29 0 293 335 793 833 859 985 1137 1226 1266 1303 (1303 1500))
:cloth-commands '()
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
:no-draw-seg #x80
)
(new 'static 'scene-actor
:name "errol"
:level 'ltowerb
:art-group "skel-errol"
:prefix ""
:draw-frames '((min 769))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "sig-highres"
:level 'ltowerb
:art-group "skel-sig-highres"
:prefix ""
:draw-frames '((min max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "hellcat-movie"
:level 'ltowerb
:art-group "skel-hellcat-movie"
:prefix ""
:draw-frames '((min max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "sidekick-highres"
:level 'towerc
:art-group "skel-sidekick-highres"
:prefix ""
:draw-frames '((min 750) (776 max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "tow-break-fma"
:level 'towerc
:art-group "skel-tow-break-fma"
:prefix ""
:draw-frames '((1350 max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:light-index #x1
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "tow-break-base-fma"
:level 'ltowerb
:art-group "skel-tow-break-base-fma"
:prefix ""
:draw-frames '((1350 max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:light-index #x1
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "tow-break-base-fma"
:level 'ltowerb
:art-group "skel-tow-break-base-fma"
:prefix "a-"
:draw-frames '((1350 max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:light-index #x1
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "tow-break-base-fma"
:level 'ltowerb
:art-group "skel-tow-break-base-fma"
:prefix "b-"
:draw-frames '((1350 max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:light-index #x1
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "eco-crystal-dark"
:level 'ltowerb
:art-group "skel-eco-crystal-dark"
:prefix ""
:draw-frames '((min max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "tow-top-fma"
:level 'ltowerb
:art-group "skel-tow-top-fma"
:prefix ""
:draw-frames '((1303 1350))
:scissor-frames '((1303 1350))
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:light-index #x1
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "tow-top-fma"
:level 'ltowerb
:art-group "skel-tow-top-fma"
:prefix "b-"
:draw-frames '((1303 1350))
:scissor-frames '((1303 1350))
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:light-index #x1
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "tow-top-fma"
:level 'ltowerb
:art-group "skel-tow-top-fma"
:prefix "c-"
:draw-frames '((1303 1350))
:scissor-frames '((1303 1350))
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:light-index #x1
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "tow-large-plat-fma"
:level 'towerb
:art-group "skel-tow-large-plat-fma"
:prefix ""
:draw-frames '((min max))
:scissor-frames '((min max))
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
)
)
:load-point "ltowerb-fma"
:end-point "lfacrm1-start"
:borrow '((towera 0 ltowerb display) (towerc 0 ltowcity special) (towerc 1 lfacrm1 special))
:sfx-volume -1.0
:ambient-volume -1.0
:music-delay 1500.0
:scene-task #xff
:on-running '(sound-play-loop "tower-amb-mov")
:on-complete '(unless (send-event self 'user-data) (talker-spawn "powup027"))
)
)
;; failed to figure out what this is:
(load-scene (new 'static 'scene
:name "tower-destroy-res-b"
:extra #f
:info #f
:scene-flags (scene-flags scf1 scf2 scf3 scf4)
:mask-to-clear (process-mask movie projectile)
:entity "scene-stage-150"
:art-group "scenecamera"
:anim "tower-destroy-res-b"
:parts 7
:command-list '((0 (fadein (frame-time-30 10)) (kill "lfac-hanger-door-1"))
(1
(part-tracker
"group-tower-hellcat-thrusters-fire"
entity
"particleman"
joint
"particleB"
track
#t
duration
(frame-range 1 184)
)
(part-tracker
"group-tower-hellcat-thrusters-fire"
entity
"particleman"
joint
"particleC"
track
#t
duration
(frame-range 1 184)
)
(part-tracker
"group-tower-hellcat-thrusters-trail"
entity
"particleman"
joint
"particleB"
track
#t
duration
(frame-range 1 184)
subsample-num
(new 'static 'bfloat :data 10.0)
)
(part-tracker
"group-tower-hellcat-thrusters-trail"
entity
"particleman"
joint
"particleC"
track
#t
duration
(frame-range 1 184)
subsample-num
(new 'static 'bfloat :data 10.0)
)
)
(184 (setting-reset
borrow
mode
'((towera 0 ltowerb special) (towerc 1 lfacrm1 display) (towerc 0 ltowcity special))
)
)
(185
(part-tracker
"group-tower-hellcat-thrusters-landing"
entity
"particleman"
joint
"particleB"
track
#t
duration
(frame-range 185 587)
)
(part-tracker
"group-tower-hellcat-thrusters-landing"
entity
"particleman"
joint
"particleC"
track
#t
duration
(frame-range 185 587)
)
(part-tracker
"group-tower-hellcat-heathaze"
entity
"particleman"
joint
"particleA"
track
#t
duration
(frame-range 185 527)
)
)
(450 (part-tracker
"group-hellcat-tower-dust-landing"
entity
"particleman"
joint
"particleD"
track
#t
duration
(frame-range 450 587)
)
)
(740 (fadeout (frame-time-30 60)))
)
:cut-list '(0 184 252 588 676 815)
:wait-ground-time (seconds 1)
:actor (new 'static 'boxed-array :type scene-actor
(new 'static 'scene-actor
:name "scenecamera"
:level #f
:art-group "skel-scenecamera"
:prefix ""
:draw-frames '((min max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:camera 4
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "particleman"
:level 'ltowerb
:art-group "skel-particleman"
:prefix ""
:draw-frames '((min max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "jakc-highres"
:level 'ltowerb
:art-group "skel-jakc-highres"
:prefix ""
:draw-frames '((min max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '(184 676 815)
:cloth-commands '()
:light-index #xa
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
:no-draw-seg #x80
)
(new 'static 'scene-actor
:name "sidekick-highres"
:level 'towerc
:art-group "skel-sidekick-highres"
:prefix ""
:draw-frames '((min max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:light-index #xa
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "hellcat-movie"
:level 'ltowerb
:art-group "skel-hellcat-movie"
:prefix ""
:draw-frames '((min max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:light-index #xa
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
:no-draw-seg #x1fe
)
(new 'static 'scene-actor
:name "lfac-hanger-door-fma"
:level 'lfacrm1
:art-group "skel-lfac-hanger-door-fma"
:prefix ""
:draw-frames '((min max))
:scissor-frames '()
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:light-index #xa
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
)
(new 'static 'scene-actor
:name "sig-highres"
:level 'ltowerb
:art-group "skel-sig-highres"
:prefix ""
:draw-frames '((407 max))
:scissor-frames '((min max))
:shadow-frames '((min max))
:cloth-reset-frames '()
:cloth-commands '()
:flags #x1
:shadow-flags -1
:shadow-volume-joint #f
)
)
:load-point "ltowerb-fma"
:end-point "lfacrm1-start"
:borrow '((towera 0 ltowerb special) (towerc 0 ltowcity display) (towerc 1 lfacrm1 display))
:sfx-volume -1.0
:ambient-volume -1.0
:music-delay 1500.0
:scene-task #xff
:on-running #f
:on-complete #f
)
)
;; failed to figure out what this is:
(defpartgroup group-dark-tower-explosion
:id 1441
:duration (seconds 4)
:flags (sp0 sp4)
:bounds (static-bspherem 0 0 0 100)
:parts ((sp-item 4730 :flags (sp3) :period (seconds 5) :length (seconds 0.017))
(sp-item 4731 :flags (sp3) :period (seconds 5) :length (seconds 0.017))
(sp-item 4732 :period (seconds 5) :length (seconds 0.035))
(sp-item 4733 :flags (sp3) :period (seconds 5) :length (seconds 0.017))
(sp-item 4734 :period (seconds 5) :length (seconds 0.335))
(sp-item 4735 :period (seconds 5) :length (seconds 0.5))
(sp-item 4736 :flags (sp3) :binding 4729)
(sp-item 4736 :flags (sp3) :binding 4729)
(sp-item 4736 :flags (sp3) :binding 4729)
(sp-item 4736 :flags (sp3) :binding 4729)
(sp-item 4736 :flags (sp3) :binding 4729)
(sp-item 4736 :flags (sp3) :binding 4729)
(sp-item 4736 :flags (sp3) :binding 4729)
(sp-item 4736 :flags (sp3) :binding 4729)
(sp-item 4736 :flags (sp3) :binding 4729)
(sp-item 4729 :flags (sp2) :period (seconds 5) :length (seconds 2))
(sp-item 4729 :flags (sp2) :period (seconds 5) :length (seconds 2))
(sp-item 4729 :flags (sp2) :period (seconds 5) :length (seconds 2))
(sp-item 4729 :flags (sp2) :period (seconds 5) :length (seconds 2))
(sp-item 4729 :flags (sp2) :period (seconds 5) :length (seconds 2))
(sp-item 4729 :flags (sp2) :period (seconds 5) :length (seconds 2))
(sp-item 4729 :flags (sp2) :period (seconds 5) :length (seconds 2))
(sp-item 4729 :flags (sp2) :period (seconds 5) :length (seconds 2))
(sp-item 4729 :flags (sp2) :period (seconds 5) :length (seconds 2))
)
)
;; failed to figure out what this is:
(defpart 4730
:init-specs ((:texture (glow-soft level-default-sprite))
(:num 1.0)
(:scale-x (meters 800))
(:rot-x (degrees 225))
(:scale-y :copy scale-x)
(:r 255.0)
(:g 128.0)
(:b 40.0)
(:a 64.0)
(:omega (degrees 90011.25))
(:fade-a -0.053333335)
(:timer (seconds 4))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 40960.0)
)
)
;; failed to figure out what this is:
(defpart 4731
:init-specs ((:texture (starflash level-default-sprite))
(:num 1.0)
(:scale-x (meters 600))
(:rot-x (degrees 2.25))
(:rot-z (degrees 0) (degrees 360))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 80.0)
(:b 40.0)
(:a 128.0)
(:omega (degrees 90011.25))
(:scalevel-x (meters -6.6666665))
(:scalevel-y :copy scalevel-x)
(:timer (seconds 0.135))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 4096.0)
)
)
;; failed to figure out what this is:
(defpart 4732
:init-specs ((:texture (middot level-default-sprite))
(:num 100.0)
(:y (meters 0) (meters 50))
(:scale-x (meters 4))
(:scale-y :copy scale-x)
(:r 255.0)
(:g 255.0)
(:b 255.0)
(:a 255.0)
(:omega (degrees 0.225))
(:vel-y (meters 2.6666667) (meters 1.3333334))
(:fade-a -0.51 -0.51)
(:accel-y (meters -0.0033333334) (meters -0.0033333334))
(:friction 0.9 0.08)
(:timer (seconds 1.667))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3))
(:func 'sparticle-motion-blur)
(:conerot-x (degrees 0) (degrees 360))
(:rotate-y (degrees 0) (degrees 3600))
)
)
;; failed to figure out what this is:
(defpart 4733
:init-specs ((:texture (explosion-nebula level-default-sprite))
(:num 10.0)
(:scale-x (meters 40) (meters 20))
(:rot-z (degrees 0) (degrees 360))
(:scale-y :copy scale-x)
(:r 255.0)
(:g 255.0)
(:b 255.0)
(:a 255.0)
(:vel-y (meters 0) (meters 0.8))
(:scalevel-x (meters 0.13333334))
(:rotvel-z (degrees -0.2) 1 (degrees 0.4))
(:scalevel-y :copy scalevel-x)
(:fade-a -0.425 -0.425)
(:friction 0.93)
(:timer (seconds 2))
(:flags (sp-cpuinfo-flag-3))
(:conerot-x (degrees 0) (degrees 360))
(:rotate-y (degrees 0) (degrees 3600))
)
)
;; failed to figure out what this is:
(defpart 4734
:init-specs ((:texture (explosion-edge level-default-sprite))
(:num 5.0)
(:scale-x (meters 60) (meters 40))
(:rot-y (degrees 0) (degrees 360))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 80.0 20.0)
(:b 30.0)
(:a 128.0)
(:vel-y (meters 5.3333335) (meters 2))
(:scalevel-x (meters 0.33333334) (meters 0.06666667))
(:scalevel-y :copy scalevel-x)
(:fade-g -0.06666667)
(:fade-b -0.025)
(:fade-a -0.10666667 -0.10666667)
(:friction 0.7 0.05)
(:timer (seconds 4))
(:flags (sp-cpuinfo-flag-0 sp-cpuinfo-flag-3))
(:func 'sparticle-2d-spline-align-instant)
(:conerot-x (degrees 0) (degrees 360))
(:rotate-y (degrees 0) (degrees 3600))
)
)
;; failed to figure out what this is:
(defpart 4735
:init-specs ((:texture (explo-texture level-default-sprite))
(:birth-func 'birth-func-curve)
(:num 4.0)
(:x (meters -100) (meters 200))
(:y (meters 0) (meters 100))
(:scale-x (meters 1))
(:rot-z (degrees 0) (degrees 360))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 128.0)
(:b 128.0)
(:a 128.0)
(:vel-y (meters 0.6666667) (meters 0.33333334))
(:friction 0.9)
(:timer (seconds 1))
(:flags (sp-cpuinfo-flag-14))
(:userdata 0.0)
(:func 'live-func-curve)
(:conerot-x (degrees 20) (degrees 90))
(:rotate-y (degrees 0) (degrees 3600))
)
)
;; failed to figure out what this is:
(if #t
(set! *range-dark-tower-explo-color* (new 'static 'curve-color-fast
:xs (new 'static 'vector :y -1.0 :z -2.0 :w -3.0)
:ys (new 'static 'inline-array vector 4
(new 'static 'vector :x 255.0 :y 255.0 :z 255.0 :w 128.0)
(new 'static 'vector :x 255.0 :y 255.0 :z 255.0 :w 128.0)
(new 'static 'vector :x 255.0 :y 255.0 :z 255.0 :w 128.0)
(new 'static 'vector :x 255.0 :y 255.0 :z 255.0 :w 128.0)
)
:one-over-x-deltas (new 'static 'vector :x 1.0 :y 1.0 :z 1.0 :w 1.0)
)
)
)
;; failed to figure out what this is:
(if #t
(set! *range-dark-tower-explo-alpha* (new 'static 'curve2d-fast
:xs (new 'static 'vector :y -1.0 :z -2.0 :w -3.0)
:ys (new 'static 'vector :x 128.0 :y 128.0 :z 129.0 :w 130.0)
:one-over-x-deltas (new 'static 'vector :y 1.0 :z 1.0 :w 1.0)
)
)
)
;; failed to figure out what this is:
(if #t
(set! *range-dark-tower-explo-scale-x* (new 'static 'curve2d-fast
:xs (new 'static 'vector :y -1.0 :z -2.0 :w -3.0)
:ys (new 'static 'vector :x 80.0 :y 160.0 :z 161.0 :w 162.0)
:one-over-x-deltas (new 'static 'vector :x 80.0 :y 1.0 :z 1.0 :w 1.0)
)
)
)
;; failed to figure out what this is:
(if #t
(set! *range-dark-tower-explo-scale-y* (new 'static 'curve2d-fast
:xs (new 'static 'vector :y -1.0 :z -2.0 :w -3.0)
:ys (new 'static 'vector :x 80.0 :y 160.0 :z 161.0 :w 162.0)
:one-over-x-deltas (new 'static 'vector :x 80.0 :y 1.0 :z 1.0 :w 1.0)
)
)
)
;; failed to figure out what this is:
(if #t
(set! *curve-dark-tower-explo-alpha* (new 'static 'curve2d-fast
:xs (new 'static 'vector :y -0.05 :z -0.7 :w -1.0)
:ys (new 'static 'vector :y 1.0 :z 0.8)
:one-over-x-deltas (new 'static 'vector :x 20.0 :y -0.3076923 :z -2.6666665 :w 1.0)
)
)
)
;; failed to figure out what this is:
(if #t
(set! *curve-dark-tower-explo-scale-x* (new 'static 'curve2d-fast
:xs (new 'static 'vector :y -0.8 :z -1.0 :w -2.0)
:ys (new 'static 'vector :y 1.0 :z 1.5 :w 2.5)
:one-over-x-deltas (new 'static 'vector :x 1.25 :y 2.5000002 :z 1.0 :w 1.0)
)
)
)
;; failed to figure out what this is:
(if #t
(set! *curve-dark-tower-explo-scale-y* (new 'static 'curve2d-fast
:xs (new 'static 'vector :y -0.8 :z -1.0 :w -2.0)
:ys (new 'static 'vector :y 1.0 :z 1.5 :w 2.5)
:one-over-x-deltas (new 'static 'vector :x 1.25 :y 2.5000002 :z 1.0 :w 1.0)
)
)
)
;; definition for symbol *part-dark-tower-explosion-texture-curve-settings*, type particle-curve-settings
(define *part-dark-tower-explosion-texture-curve-settings* (new 'static 'particle-curve-settings
:lifetime-base (seconds 1.8)
:lifetime-offset (seconds 0.4)
:flags (particle-curve-flags pcf0)
)
)
;; failed to figure out what this is:
(set! (-> *part-id-table* 4735 init-specs 16 initial-valuef)
(the-as float *part-dark-tower-explosion-texture-curve-settings*)
)
;; failed to figure out what this is:
(set! (-> *part-dark-tower-explosion-texture-curve-settings* color-start) *range-dark-tower-explo-color*)
;; failed to figure out what this is:
(set! (-> *part-dark-tower-explosion-texture-curve-settings* alpha-start) *range-dark-tower-explo-alpha*)
;; failed to figure out what this is:
(set! (-> *part-dark-tower-explosion-texture-curve-settings* scale-x-start) *range-dark-tower-explo-scale-x*)
;; failed to figure out what this is:
(set! (-> *part-dark-tower-explosion-texture-curve-settings* scale-y-start) *range-dark-tower-explo-scale-y*)
;; failed to figure out what this is:
(set! (-> *part-dark-tower-explosion-texture-curve-settings* r-scalar) #f)
;; failed to figure out what this is:
(set! (-> *part-dark-tower-explosion-texture-curve-settings* g-scalar) #f)
;; failed to figure out what this is:
(set! (-> *part-dark-tower-explosion-texture-curve-settings* b-scalar) #f)
;; failed to figure out what this is:
(set! (-> *part-dark-tower-explosion-texture-curve-settings* a-scalar) *curve-dark-tower-explo-alpha*)
;; failed to figure out what this is:
(set! (-> *part-dark-tower-explosion-texture-curve-settings* scale-x-scalar) *curve-dark-tower-explo-scale-x*)
;; failed to figure out what this is:
(set! (-> *part-dark-tower-explosion-texture-curve-settings* scale-y-scalar) *curve-dark-tower-explo-scale-y*)
;; failed to figure out what this is:
(defpart 4736
:init-specs ((:texture (hotdot level-default-sprite))
(:num 1.0)
(:scale-x (meters 70) (meters 60))
(:scale-y :copy scale-x)
(:r 255.0)
(:g 255.0)
(:b 200.0)
(:a 128.0)
(:vel-y (meters 2.3333333) (meters 0.33333334))
(:scalevel-x (meters -0.46666667) (meters -0.13333334))
(:scalevel-y :copy scalevel-x)
(:accel-y (meters -0.0033333334) (meters -0.0033333334))
(:friction 0.97)
(:timer (seconds 1))
(:flags (sp-cpuinfo-flag-0 sp-cpuinfo-flag-3))
(:conerot-x (degrees 0) (degrees 360))
(:rotate-y (degrees 0) (degrees 3600))
)
)
;; failed to figure out what this is:
(defpart 4729
:init-specs ((:texture (explosion-nebula level-default-sprite))
(:birth-func 'birth-func-inherit-size)
(:num 1.0)
(:scale-x (meters 0.00024414062) (meters 0.00012207031))
(:rot-z (degrees 0) (degrees 360))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 60.0 40.0)
(:b 0.0)
(:a 128.0)
(:fade-a -0.21333334 -0.21333334)
(:accel-y (meters -0.00066666666) (meters -0.00066666666))
(:timer (seconds 2))
(:flags (sp-cpuinfo-flag-3))
)
)
;; failed to figure out what this is:
(defpartgroup group-tower-errol-hand-glow
:id 1442
:bounds (static-bspherem 0 0 0 100)
:parts ((sp-item 4737 :flags (sp6 sp7)))
)
;; failed to figure out what this is:
(defpart 4737
:init-specs ((:texture (glow level-default-sprite))
(:num 1.0)
(:y (meters 0))
(:scale-x (meters 1.3) (meters 0.1))
(:rot-x (degrees 22.5))
(:rot-z (degrees 0))
(:scale-y :copy scale-x)
(:r 255.0)
(:g 20.0)
(:b 0.0)
(:a 30.0 20.0)
(:omega (degrees 4511.25))
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-3 glow))
(:userdata 4096.0)
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpartgroup group-tower-dark-warpgate
:id 1443
:flags (sp0 sp4)
:bounds (static-bspherem 0 0 0 20)
:parts ((sp-item 4738 :flags (sp3 sp7))
(sp-item 4739 :flags (sp3 sp7))
(sp-item 4740 :flags (sp7) :period (seconds 2) :length (seconds 0.167))
)
)
;; failed to figure out what this is:
(defpart 4738
:init-specs ((:texture (starflash level-default-sprite))
(:num 1.0)
(:scale-x (meters 10))
(:rot-x (degrees 22.5))
(:rot-z (degrees 0))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 128.0)
(:b 128.0)
(:a 128.0)
(:scalevel-x (meters -0.16666667))
(:scalevel-y (meters 0.26666668))
(:timer (seconds 0.167))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 4096.0)
)
)
;; failed to figure out what this is:
(defpart 4739
:init-specs ((:texture (rainbow-halo level-default-sprite))
(:num 1.0)
(:scale-x (meters 10))
(:rot-x (degrees 22.5))
(:rot-z (degrees 0))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 128.0)
(:b 128.0)
(:a 64.0)
(:scalevel-x (meters 0.06666667))
(:scalevel-y (meters 0.13333334))
(:fade-a -0.21333334)
(:timer (seconds 1))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 4096.0)
)
)
;; failed to figure out what this is:
(defpart 4740
:init-specs ((:texture (middot level-default-sprite))
(:num 10.0)
(:scale-x (meters 0.1) (meters 0.1))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 128.0)
(:b 128.0)
(:a 128.0)
(:omega (degrees 0.1125))
(:vel-z (meters -0.13333334) (meters -0.016666668))
(:scalevel-x (meters -0.00033333333))
(:scalevel-y :copy scalevel-x)
(:fade-r -0.42666668)
(:fade-g -0.21333334 -0.21333334)
(:friction 0.96)
(:timer (seconds 1))
(:flags (sp-cpuinfo-flag-3))
(:func 'sparticle-motion-blur)
(:conerot-x (degrees -30) (degrees 60))
(:rotate-y (degrees 0))
(:rotate-z (degrees 0) (degrees 3600))
)
)
;; failed to figure out what this is:
(defpartgroup group-tower-hellcat-thrusters-fire
:id 1444
:flags (sp0 sp4)
:bounds (static-bspherem 0 0 0 640)
:parts ((sp-item 4741 :flags (is-3d sp6 sp7)) (sp-item 4742 :flags (sp6 sp7)))
)
;; failed to figure out what this is:
(defpart 4741
:init-specs ((:texture (gun-enemy-muzzleflash level-default-sprite))
(:num 8.0)
(:z (meters -3))
(:scale-x (meters 3) (meters 1))
(:rot-x (degrees 180))
(:rot-y (degrees 0))
(:rot-z (degrees 90))
(:scale-y (meters 6) (meters 1))
(:r 10.0 20.0)
(:g 200.0)
(:b 255.0)
(:a 10.0 10.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3))
(:conerot-z (degrees 0))
(:rotate-x (degrees 0))
(:rotate-y (degrees 0))
(:rotate-z (degrees 0) 2.0 (degrees 90))
)
)
;; failed to figure out what this is:
(defpart 4742
:init-specs ((:texture (glow level-default-sprite))
(:num 3.0)
(:z (meters 0.5))
(:scale-x (meters 10) (meters 1))
(:rot-x (degrees 13.500001))
(:scale-y :copy scale-x)
(:r 0.0)
(:g 30.0)
(:b 128.0)
(:a 20.0 2.0)
(:omega (degrees 13511.25))
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 0.0)
(:conerot-z (degrees 0))
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpartgroup group-tower-hellcat-thrusters-trail
:id 1445
:flags (sp0 sp4 sp13)
:bounds (static-bspherem 0 0 0 640)
:parts ((sp-item 4743 :flags (sp7)))
)
;; failed to figure out what this is:
(defpart 4743
:init-specs ((:texture (big-cloud level-default-sprite))
(:num 1.0)
(:scale-x (meters 2) (meters 1))
(:rot-z (degrees 0) (degrees 360))
(:scale-y :copy scale-x)
(:r 120.0)
(:g 120.0)
(:b 255.0)
(:a 30.0 10.0)
(:scalevel-x (meters 0.006666667) (meters 0.006666667))
(:scalevel-y :copy scalevel-x)
(:fade-a -0.23333333 -0.46666667)
(:timer (seconds 1))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-13))
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpartgroup group-tower-hellcat-thrusters-landing
:id 1446
:flags (sp0 sp4)
:bounds (static-bspherem 0 0 0 640)
:parts ((sp-item 4744 :flags (sp6 sp7)) (sp-item 4745 :flags (sp6 sp7)))
)
;; failed to figure out what this is:
(defpart 4744
:init-specs ((:texture (colorflash level-default-sprite))
(:num 1.0)
(:z (meters 0.5))
(:scale-x (meters 1.5) (meters 0.2))
(:rot-x (degrees 4.5))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 128.0)
(:b 128.0)
(:a 128.0)
(:omega (degrees 13511.25))
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 409.6)
(:conerot-z (degrees 0))
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpart 4745
:init-specs ((:texture (glow level-default-sprite))
(:num 3.0)
(:z (meters 0.5))
(:scale-x (meters 4) (meters 0.2))
(:rot-x (degrees 13.500001))
(:scale-y :copy scale-x)
(:r 0.0)
(:g 30.0)
(:b 128.0)
(:a 20.0 2.0)
(:omega (degrees 13511.25))
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 0.0)
(:conerot-z (degrees 0))
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpartgroup group-tower-hellcat-heathaze
:id 1447
:flags (sp0 sp4)
:bounds (static-bspherem 0 0 0 640)
:parts ((sp-item 4746 :flags (sp7)))
)
;; failed to figure out what this is:
(defpart 4746
:init-specs ((:num 1.0)
(:x (meters 0) (meters 5))
(:rot-x 8)
(:r 4096.0)
(:g 2048.0)
(:b 2048.0)
(:vel-y (meters -0.033333335))
(:fade-b -2.7306666)
(:friction 0.99 0.01)
(:timer (seconds 1))
(:flags (distort))
(:next-time (seconds 0.5))
(:next-launcher 4747)
(:conerot-x (degrees 0) (degrees 20))
(:rotate-y (degrees 0) (degrees 3600))
)
)
;; failed to figure out what this is:
(defpart 4747
:init-specs ((:fade-b 2.7306666))
)
;; failed to figure out what this is:
(defpartgroup group-hellcat-tower-dust-landing
:id 1448
:flags (sp0 sp4)
:bounds (static-bspherem 0 0 0 64)
:parts ((sp-item 4748 :flags (sp7)))
)
;; failed to figure out what this is:
(defpart 4748
:init-specs ((:texture (big-cloud level-default-sprite))
(:birth-func 'birth-func-curve)
(:num 1.0)
(:x (meters 0) (meters 1))
(:scale-x (meters 0.5))
(:rot-z (degrees 0) (degrees 360))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 100.0)
(:b 60.0)
(:a 0.0)
(:vel-x (meters 0.016666668) (meters 0.033333335))
(:rotvel-z (degrees -0.2) (degrees 0.4))
(:accel-y (meters 0) (meters 0.00016666666))
(:timer (seconds 3))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-13 launch-along-z))
(:userdata 0.0)
(:func 'live-func-curve)
(:conerot-z (degrees 0) (degrees 40))
(:rotate-y (degrees 0) (degrees 3600))
)
)
;; failed to figure out what this is:
(if #t
(set! *range-tower-dust-color* (new 'static 'curve-color-fast
:xs (new 'static 'vector :y -1.0 :z -2.0 :w -3.0)
:ys (new 'static 'inline-array vector 4
(new 'static 'vector :x 120.0 :y 120.0 :z 120.0 :w 128.0)
(new 'static 'vector :x 80.0 :y 80.0 :z 80.0 :w 128.0)
(new 'static 'vector :x 80.0 :y 80.0 :z 80.0 :w 128.0)
(new 'static 'vector :x 80.0 :y 80.0 :z 80.0 :w 128.0)
)
:one-over-x-deltas (new 'static 'vector :x 1.0 :y 1.0 :z 1.0 :w 1.0)
)
)
)
;; failed to figure out what this is:
(if #t
(set! *range-tower-dust-alpha* (new 'static 'curve2d-fast
:xs (new 'static 'vector :y -1.0 :z -2.0 :w -3.0)
:ys (new 'static 'vector :x 20.0 :y 40.0 :z 41.0 :w 42.0)
:one-over-x-deltas (new 'static 'vector :x 20.0 :y 1.0 :z 1.0 :w 1.0)
)
)
)
;; failed to figure out what this is:
(if #t
(set! *range-tower-dust-scale-x* (new 'static 'curve2d-fast
:xs (new 'static 'vector :y -1.0 :z -2.0 :w -3.0)
:ys (new 'static 'vector :x 1.0 :y 2.0 :z 3.0 :w 4.0)
:one-over-x-deltas (new 'static 'vector :x 1.0 :y 1.0 :z 1.0 :w 1.0)
)
)
)
;; failed to figure out what this is:
(if #t
(set! *range-tower-dust-scale-y* (new 'static 'curve2d-fast
:xs (new 'static 'vector :y -1.0 :z -2.0 :w -3.0)
:ys (new 'static 'vector :x 1.0 :y 2.0 :z 3.0 :w 4.0)
:one-over-x-deltas (new 'static 'vector :x 1.0 :y 1.0 :z 1.0 :w 1.0)
)
)
)
;; failed to figure out what this is:
(if #t
(set! *curve-tower-dust-alpha* (new 'static 'curve2d-fast
:xs (new 'static 'vector :y -0.3 :z -0.5 :w -1.0)
:ys (new 'static 'vector :y 1.0 :z 1.0)
:one-over-x-deltas (new 'static 'vector :x 3.3333333 :z -2.0 :w 1.0)
)
)
)
;; failed to figure out what this is:
(if #t
(set! *curve-tower-dust-scale-x* (new 'static 'curve2d-fast
:xs (new 'static 'vector :y -0.3 :z -0.4 :w -1.0)
:ys (new 'static 'vector :y 5.0 :z 6.0 :w 6.5)
:one-over-x-deltas (new 'static 'vector :x 16.666666 :y 10.000001 :z 0.8333333 :w 1.0)
)
)
)
;; failed to figure out what this is:
(if #t
(set! *curve-tower-dust-scale-y* (new 'static 'curve2d-fast
:xs (new 'static 'vector :y -0.3 :z -0.4 :w -1.0)
:ys (new 'static 'vector :y 5.0 :z 6.0 :w 6.5)
:one-over-x-deltas (new 'static 'vector :x 16.666666 :y 10.000001 :z 0.8333333 :w 1.0)
)
)
)
;; definition for symbol *part-hellcat-tower-dust-landing-curve-settings*, type particle-curve-settings
(define *part-hellcat-tower-dust-landing-curve-settings* (new 'static 'particle-curve-settings
:lifetime-base (seconds 1.5)
:lifetime-offset (seconds 1)
:flags (particle-curve-flags pcf0)
)
)
;; failed to figure out what this is:
(set! (-> *part-id-table* 4748 init-specs 16 initial-valuef)
(the-as float *part-hellcat-tower-dust-landing-curve-settings*)
)
;; failed to figure out what this is:
(set! (-> *part-hellcat-tower-dust-landing-curve-settings* color-start) *range-tower-dust-color*)
;; failed to figure out what this is:
(set! (-> *part-hellcat-tower-dust-landing-curve-settings* alpha-start) *range-tower-dust-alpha*)
;; failed to figure out what this is:
(set! (-> *part-hellcat-tower-dust-landing-curve-settings* scale-x-start) *range-tower-dust-scale-x*)
;; failed to figure out what this is:
(set! (-> *part-hellcat-tower-dust-landing-curve-settings* scale-y-start) *range-tower-dust-scale-y*)
;; failed to figure out what this is:
(set! (-> *part-hellcat-tower-dust-landing-curve-settings* r-scalar) #f)
;; failed to figure out what this is:
(set! (-> *part-hellcat-tower-dust-landing-curve-settings* g-scalar) #f)
;; failed to figure out what this is:
(set! (-> *part-hellcat-tower-dust-landing-curve-settings* b-scalar) #f)
;; failed to figure out what this is:
(set! (-> *part-hellcat-tower-dust-landing-curve-settings* a-scalar) *curve-tower-dust-alpha*)
;; failed to figure out what this is:
(set! (-> *part-hellcat-tower-dust-landing-curve-settings* scale-x-scalar) *curve-tower-dust-scale-x*)
;; failed to figure out what this is:
(set! (-> *part-hellcat-tower-dust-landing-curve-settings* scale-y-scalar) *curve-tower-dust-scale-y*)