;;-*-Lisp-*-
(in-package goal)

;; failed to figure out what this is:
(defskelgroup skel-centipede-fma centipede-fma centipede-fma-lod0-jg -1
              ((centipede-fma-lod0-mg (meters 999999)))
              :bounds (static-spherem 0 0 0 30)
              :origin-joint-index 3
              )

;; failed to figure out what this is:
(defskelgroup skel-under-break-bridge under-break-bridge under-break-bridge-lod0-jg -1
              ((under-break-bridge-lod0-mg (meters 999999)))
              :bounds (static-spherem 0 0 -7 200)
              :origin-joint-index 3
              )

;; failed to figure out what this is:
(defskelgroup skel-under-break-bridge-b under-break-bridge-b under-break-bridge-b-lod0-jg -1
              ((under-break-bridge-b-lod0-mg (meters 999999)))
              :bounds (static-spherem 0 0 -7 200)
              :origin-joint-index 3
              )

;; failed to figure out what this is:
(defskelgroup skel-under-break-ceiling under-break-ceiling under-break-ceiling-lod0-jg -1
              ((under-break-ceiling-lod0-mg (meters 999999)))
              :bounds (static-spherem 0 0 0 50)
              :origin-joint-index 4
              )

;; failed to figure out what this is:
(defskelgroup skel-under-break-wall under-break-wall under-break-wall-lod0-jg -1
              ((under-break-wall-lod0-mg (meters 999999)))
              :bounds (static-spherem 0 0 0 30)
              :origin-joint-index 4
              )

;; failed to figure out what this is:
(defskelgroup skel-under-break-wall-b under-break-wall-b under-break-wall-b-lod0-jg -1
              ((under-break-wall-b-lod0-mg (meters 999999)))
              :bounds (static-spherem 0 0 0 30)
              :origin-joint-index 4
              )

;; failed to figure out what this is:
(defpartgroup group-under-break-ceiling
  :id 509
  :duration (seconds 1)
  :linger-duration (seconds 2)
  :flags (use-local-clock)
  :bounds (static-bspherem 0 0 0 64)
  :parts ((sp-item 2269 :period (seconds 32) :length (seconds 0.085))
    (sp-item 2270 :period (seconds 32) :length (seconds 0.335))
    (sp-item 2271 :period (seconds 32) :length (seconds 0.167))
    (sp-item 2272 :period (seconds 32) :length (seconds 0.167))
    )
  )

;; failed to figure out what this is:
(defpartgroup group-under-explosion
  :id 510
  :duration (seconds 1)
  :linger-duration (seconds 2)
  :flags (use-local-clock)
  :bounds (static-bspherem 0 0 0 64)
  :parts ((sp-item 2269 :period (seconds 32) :length (seconds 0.017))
    (sp-item 2270 :period (seconds 32) :length (seconds 0.067))
    (sp-item 2271 :period (seconds 32) :length (seconds 0.035))
    (sp-item 2272 :period (seconds 32) :length (seconds 0.035))
    )
  )

;; failed to figure out what this is:
(defpart 2272
  :init-specs ((:texture (new 'static 'texture-id :index #x34 :page #xc))
    (:num 40.0 25.0)
    (:y (meters 4))
    (:scale-x (meters 3) (meters 3))
    (:rot-x 4)
    (:rot-z (degrees 0) (degrees 360) :store)
    (:scale-y (meters 4) (meters 3.5))
    (:r 196.0 64.0)
    (:g 164.0 16.0)
    (:b 6.0)
    (:a 16.0 16.0)
    (:vel-y (meters 0.05) (meters 0.1))
    (:scalevel-x (meters 0.033333335) (meters 0.033333335))
    (:scalevel-y :copy scalevel-x)
    (:fade-a -0.26666668)
    (:friction 0.92 0.02)
    (:timer (seconds 3.335))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-12))
    (:func 'sparticle-motion-blur)
    (:next-time (seconds 0.085))
    (:next-launcher 2273)
    (:conerot-x '*sp-temp*)
    (:conerot-y (degrees 0) (degrees 3600))
    (:rotate-y (degrees 0))
    (:conerot-radius (meters 0) (meters -5))
    )
  )

;; failed to figure out what this is:
(defpart 2273
  :init-specs ((:scalevel-x (meters 0.033333335) (meters 0.033333335))
    (:scalevel-y :copy scalevel-x)
    (:next-time (seconds 0.1) (seconds 0.03))
    (:next-launcher 2274)
    )
  )

;; failed to figure out what this is:
(defpart 2274
  :init-specs ((:scalevel-x (meters 0.016666668) (meters 0.016666668))
    (:scalevel-y :copy scalevel-x)
    (:fade-a -0.225 -0.225)
    )
  )

;; failed to figure out what this is:
(defpart 2271
  :init-specs ((:birth-func 'birth-func-texture-group)
    (:num 40.0 25.0)
    (:y (meters 4))
    (:scale-x (meters 3) (meters 3))
    (:rot-z (degrees 0) (degrees 3600) :store)
    (:scale-y (meters 4) (meters 3.5))
    (:r 196.0 64.0)
    (:g 164.0 16.0)
    (:b 6.0)
    (:a 16.0 16.0)
    (:vel-y (meters 0.05) (meters 0.1))
    (:scalevel-x (meters 0.033333335) (meters 0.033333335))
    (:scalevel-y :copy scalevel-x)
    (:fade-a -0.26666668)
    (:friction 0.92 0.02)
    (:timer (seconds 3.335))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-12))
    (:userdata :data (new 'static 'boxed-array :type int32 40 1 0 #xc00000 #xc03300))
    (:next-time (seconds 0.085))
    (:next-launcher 2273)
    (:conerot-x '*sp-temp*)
    (:conerot-y (degrees 0) (degrees 3600))
    (:rotate-y (degrees 0))
    (:conerot-radius (meters 0) (meters 2))
    )
  )

;; failed to figure out what this is:
(defpart 2270
  :init-specs ((:texture (new 'static 'texture-id :index #x32 :page #xc))
    (:num 30.0 40.0)
    (:x (meters 0.25))
    (:y (meters 4))
    (:scale-x (meters 1) (meters 2))
    (:rot-z (degrees 0) (degrees 360))
    (:scale-y :copy scale-x)
    (:r 196.0 64.0)
    (:g 164.0 16.0)
    (:b 6.0)
    (:a 16.0 48.0)
    (:vel-y (meters 0) (meters 0.13333334))
    (:scalevel-x (meters 0.006666667) (meters 0.0033333334))
    (:rotvel-z (degrees -0.12) (degrees 0.24))
    (:scalevel-y :copy scalevel-x)
    (:accel-y (meters -0.00016666666) (meters -0.00066666666))
    (:friction 0.88 0.02)
    (:timer (seconds 10))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-12))
    (:next-time (seconds 0.117) (seconds 0.047))
    (:next-launcher 2275)
    (:conerot-x (degrees 0) (degrees 3600))
    (:conerot-y (degrees 0) (degrees 3600))
    (:rotate-y (degrees 0))
    (:conerot-radius (meters 0) (meters 3))
    )
  )

;; failed to figure out what this is:
(defpart 2275
  :init-specs ((:scalevel-x (meters 0.01))
    (:scalevel-y :copy scalevel-x)
    (:next-time (seconds 0.15) (seconds 0.047))
    (:next-launcher 2276)
    )
  )

;; failed to figure out what this is:
(defpart 2276
  :init-specs ((:scalevel-x (meters 0.0033333334)) (:scalevel-y :copy scalevel-x) (:fade-a -0.10666667 -0.10666667))
  )

;; failed to figure out what this is:
(defpart 2269
  :init-specs ((:texture (new 'static 'texture-id :page #xc))
    (:num 40.0)
    (:x (meters 0) (meters 0.6))
    (:y (meters 4))
    (:scale-x (meters 6.5) (meters 5))
    (:rot-z (degrees 0) (degrees 3600))
    (:scale-y :copy scale-x)
    (:r 196.0 64.0)
    (:g 164.0 16.0)
    (:b 6.0)
    (:a 0.0)
    (:vel-y (meters 0.033333335) (meters 0.04))
    (:scalevel-x (meters 0.016666668) (meters 0.016666668))
    (:rotvel-z (degrees -0.12) (degrees 0.24))
    (:scalevel-y :copy scalevel-x)
    (:fade-a 0.64 0.64)
    (:friction 0.94 0.04)
    (:timer (seconds 4))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-12))
    (:next-time (seconds 0.117) (seconds 0.047))
    (:next-launcher 2277)
    (:conerot-x (degrees 0) (degrees 3600))
    (:conerot-y (degrees 0) (degrees 3600))
    (:rotate-y (degrees 0))
    )
  )

;; failed to figure out what this is:
(defpart 2277
  :init-specs ((:scalevel-x (meters 0.008333334))
    (:scalevel-y :copy scalevel-x)
    (:fade-a 0.0)
    (:next-time (seconds 1) (seconds 0.665))
    (:next-launcher 2278)
    )
  )

;; failed to figure out what this is:
(defpart 2278
  :init-specs ((:scalevel-x (meters 0.0033333334)) (:scalevel-y :copy scalevel-x) (:fade-a -0.10666667 -0.10666667))
  )

;; failed to figure out what this is:
(defpartgroup group-under-explosion-trailer
  :id 511
  :bounds (static-bspherem 0 0 0 15)
  :parts ((sp-item 2279))
  )

;; failed to figure out what this is:
(defpart 2279
  :init-specs ((:texture (new 'static 'texture-id :page #xc))
    (:num 1.0)
    (:x (meters -0.25) (meters 1))
    (:scale-x (meters 1) (meters 2))
    (:rot-z (degrees 0) (degrees 3600))
    (:scale-y (meters 1) (meters 2))
    (:r 196.0 64.0)
    (:g 164.0 16.0)
    (:b 6.0)
    (:a 16.0 32.0)
    (:vel-y (meters -0.013333334) (meters -0.013333334))
    (:scalevel-x (meters 0.0033333334) (meters 0.006666667))
    (:rotvel-z (degrees -0.3) (degrees 0.6))
    (:scalevel-y :copy scalevel-x)
    (:fade-a -0.08 -0.16)
    (:friction 0.95 0.03)
    (:timer (seconds 2.167))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-12))
    (:rotate-y (degrees 0) (degrees 3600))
    )
  )

;; failed to figure out what this is:
(defpartgroup group-under-centipede-one-explosion
  :id 512
  :duration (seconds 1)
  :linger-duration (seconds 2)
  :flags (use-local-clock)
  :bounds (static-bspherem 0 0 0 8)
  :parts ((sp-item 2280 :period (seconds 32) :length (seconds 0.085))
    (sp-item 2281 :period (seconds 32) :length (seconds 0.267))
    (sp-item 2282 :period (seconds 32) :length (seconds 0.117))
    (sp-item 2283 :period (seconds 32) :length (seconds 0.117))
    )
  )

;; failed to figure out what this is:
(defpart 2283
  :init-specs ((:texture (new 'static 'texture-id :index #x34 :page #xc))
    (:num 8.0 6.0)
    (:y (meters 4))
    (:scale-x (meters 3) (meters 3))
    (:rot-x 4)
    (:rot-z (degrees 0) (degrees 360) :store)
    (:scale-y (meters 4) (meters 3.5))
    (:r 64.0 128.0)
    (:g :copy r)
    (:b :copy g)
    (:a 16.0 16.0)
    (:vel-y (meters 0.05) (meters 0.1))
    (:scalevel-x (meters 0.02) (meters 0.013333334))
    (:scalevel-y :copy scalevel-x)
    (:fade-a -0.26666668)
    (:friction 0.92 0.02)
    (:timer (seconds 3.335))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-12))
    (:func 'sparticle-motion-blur)
    (:next-time (seconds 0.085))
    (:next-launcher 2284)
    (:conerot-x '*sp-temp*)
    (:conerot-y (degrees 0) (degrees 3600))
    (:rotate-y (degrees 0))
    (:conerot-radius (meters 0) (meters -5))
    )
  )

;; failed to figure out what this is:
(defpart 2284
  :init-specs ((:scalevel-x (meters 0.033333335) (meters 0.033333335))
    (:scalevel-y :copy scalevel-x)
    (:next-time (seconds 0.1) (seconds 0.03))
    (:next-launcher 2285)
    )
  )

;; failed to figure out what this is:
(defpart 2285
  :init-specs ((:scalevel-x (meters 0.016666668) (meters 0.016666668))
    (:scalevel-y :copy scalevel-x)
    (:fade-a -0.225 -0.225)
    )
  )

;; failed to figure out what this is:
(defpart 2282
  :init-specs ((:birth-func 'birth-func-texture-group)
    (:num 8.0 6.0)
    (:y (meters 4))
    (:scale-x (meters 3) (meters 3))
    (:rot-z (degrees 0) (degrees 3600) :store)
    (:scale-y (meters 4) (meters 3.5))
    (:r 64.0 128.0)
    (:g :copy r)
    (:b :copy g)
    (:a 16.0 16.0)
    (:vel-y (meters 0.05) (meters 0.1))
    (:scalevel-x (meters 0.02) (meters 0.013333334))
    (:scalevel-y :copy scalevel-x)
    (:fade-a -0.26666668)
    (:friction 0.92 0.02)
    (:timer (seconds 3.335))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-12))
    (:userdata :data (new 'static 'boxed-array :type int32 40 1 0 #xc00000 #xc03300))
    (:next-time (seconds 0.085))
    (:next-launcher 2284)
    (:conerot-x '*sp-temp*)
    (:conerot-y (degrees 0) (degrees 3600))
    (:rotate-y (degrees 0))
    (:conerot-radius (meters 0) (meters 2))
    )
  )

;; failed to figure out what this is:
(defpart 2281
  :init-specs ((:texture (new 'static 'texture-id :index #x32 :page #xc))
    (:num 16.0 4.0)
    (:x (meters 0.25))
    (:y (meters 4))
    (:scale-x (meters 1) (meters 2))
    (:rot-z (degrees 0) (degrees 360))
    (:scale-y :copy scale-x)
    (:r 64.0 128.0)
    (:g :copy r)
    (:b :copy g)
    (:a 16.0 48.0)
    (:vel-y (meters 0) (meters 0.083333336))
    (:scalevel-x (meters 0.0033333334) (meters 0.006666667))
    (:rotvel-z (degrees -0.12) (degrees 0.24))
    (:scalevel-y :copy scalevel-x)
    (:accel-y (meters -0.00016666666) (meters -0.00066666666))
    (:friction 0.88 0.02)
    (:timer (seconds 10))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-12))
    (:next-time (seconds 0.117) (seconds 0.047))
    (:next-launcher 2286)
    (:conerot-x (degrees 0) (degrees 3600))
    (:conerot-y (degrees 0) (degrees 3600))
    (:rotate-y (degrees 0))
    (:conerot-radius (meters 0) (meters 3))
    )
  )

;; failed to figure out what this is:
(defpart 2286
  :init-specs ((:scalevel-x (meters 0.01))
    (:scalevel-y :copy scalevel-x)
    (:next-time (seconds 0.15) (seconds 0.047))
    (:next-launcher 2287)
    )
  )

;; failed to figure out what this is:
(defpart 2287
  :init-specs ((:scalevel-x (meters 0.0033333334)) (:scalevel-y :copy scalevel-x) (:fade-a -0.10666667 -0.10666667))
  )

;; failed to figure out what this is:
(defpart 2280
  :init-specs ((:texture (new 'static 'texture-id :page #xc))
    (:num 16.0)
    (:x (meters 0) (meters 0.6))
    (:y (meters 4))
    (:scale-x (meters 3.5) (meters 3))
    (:rot-z (degrees 0) (degrees 3600))
    (:scale-y :copy scale-x)
    (:r 64.0 128.0)
    (:g :copy r)
    (:b :copy g)
    (:a 0.0)
    (:vel-y (meters 0.033333335) (meters 0.04))
    (:scalevel-x (meters 0.01) (meters 0.01))
    (:rotvel-z (degrees -0.12) (degrees 0.24))
    (:scalevel-y :copy scalevel-x)
    (:fade-a 0.64 0.64)
    (:friction 0.94 0.04)
    (:timer (seconds 4))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-12))
    (:next-time (seconds 0.117) (seconds 0.047))
    (:next-launcher 2288)
    (:conerot-x (degrees 0) (degrees 3600))
    (:conerot-y (degrees 0) (degrees 3600))
    (:rotate-y (degrees 0))
    )
  )

;; failed to figure out what this is:
(defpart 2288
  :init-specs ((:scalevel-x (meters 0.008333334))
    (:scalevel-y :copy scalevel-x)
    (:fade-a 0.0)
    (:next-time (seconds 1) (seconds 0.665))
    (:next-launcher 2289)
    )
  )

;; failed to figure out what this is:
(defpart 2289
  :init-specs ((:scalevel-x (meters 0.0033333334)) (:scalevel-y :copy scalevel-x) (:fade-a -0.10666667 -0.10666667))
  )

;; failed to figure out what this is:
(defpartgroup group-under-centipede-one-trailer
  :id 513
  :bounds (static-bspherem 0 0 0 15)
  :parts ((sp-item 2290))
  )

;; failed to figure out what this is:
(defpart 2290
  :init-specs ((:texture (new 'static 'texture-id :page #xc))
    (:num 1.0)
    (:x (meters -0.25) (meters 1))
    (:scale-x (meters 1) (meters 2))
    (:rot-z (degrees 0) (degrees 3600))
    (:scale-y (meters 1) (meters 2))
    (:r 64.0 128.0)
    (:g :copy r)
    (:b :copy g)
    (:a 16.0 32.0)
    (:vel-y (meters -0.013333334) (meters -0.013333334))
    (:scalevel-x (meters 0.0033333334) (meters 0.006666667))
    (:rotvel-z (degrees -0.3) (degrees 0.6))
    (:scalevel-y :copy scalevel-x)
    (:fade-a -0.08 -0.16)
    (:friction 0.95 0.03)
    (:timer (seconds 2.167))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-12))
    (:rotate-y (degrees 0) (degrees 3600))
    )
  )

;; failed to figure out what this is:
(defpartgroup group-under-centipede-two-explosion
  :id 514
  :duration (seconds 1)
  :linger-duration (seconds 2)
  :flags (use-local-clock)
  :bounds (static-bspherem 0 0 0 15)
  :parts ((sp-item 2269 :period (seconds 32) :length (seconds 0.017))
    (sp-item 2270 :period (seconds 32) :length (seconds 0.067))
    (sp-item 2271 :period (seconds 32) :length (seconds 0.035))
    (sp-item 2272 :period (seconds 32) :length (seconds 0.035))
    )
  )

;; failed to figure out what this is:
(defpartgroup group-under-centipede-two-trailer
  :id 515
  :bounds (static-bspherem 0 0 0 8)
  :parts ((sp-item 2279))
  )

;; failed to figure out what this is:
(defpartgroup group-under-centipede-three-explosion
  :id 516
  :duration (seconds 1)
  :linger-duration (seconds 2)
  :flags (use-local-clock)
  :bounds (static-bspherem 0 0 0 15)
  :parts ((sp-item 2269 :period (seconds 32) :length (seconds 0.017))
    (sp-item 2270 :period (seconds 32) :length (seconds 0.067))
    (sp-item 2271 :period (seconds 32) :length (seconds 0.035))
    (sp-item 2272 :period (seconds 32) :length (seconds 0.035))
    )
  )

;; failed to figure out what this is:
(defpartgroup group-under-centipede-three-trailer
  :id 517
  :bounds (static-bspherem 0 0 0 8)
  :parts ((sp-item 2279))
  )

;; failed to figure out what this is:
(defpart 2291
  :init-specs ((:texture (new 'static 'texture-id :index #x46 :page #xc))
    (:birth-func 'birth-func-set-quat)
    (:num 1.0)
    (:scale-x (meters 1))
    (:scale-y (meters 6))
    (:r 128.0)
    (:g 0.0)
    (:b 0.0)
    (:a 128.0)
    (:fade-a -3.6571429)
    (:timer (seconds 0.117))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 sp-cpuinfo-flag-14 left-multiply-quat))
    )
  )

;; failed to figure out what this is:
(defpart 2292
  :init-specs ((:texture (new 'static 'texture-id :index #x46 :page #xc))
    (:birth-func 'birth-func-set-quat)
    (:num 1.0)
    (:scale-x (meters 1))
    (:scale-y (meters 40))
    (:r 128.0)
    (:g 0.0)
    (:b 0.0)
    (:a 0.0)
    (:timer (seconds 0.585))
    (:flags (sp-cpuinfo-flag-3 sp-cpuinfo-flag-14 left-multiply-quat))
    (:next-time (seconds 0.335))
    (:next-launcher 2293)
    )
  )

;; failed to figure out what this is:
(defpart 2293
  :init-specs ((:a 128.0) (:fade-a -1.7066667))
  )

;; failed to figure out what this is:
(defpartgroup under-sig-shot-overhead-starflash
  :id 518
  :duration (seconds 0.167)
  :flags (use-local-clock)
  :bounds (static-bspherem 0 0 0 8)
  :parts ((sp-item 2294))
  )

;; failed to figure out what this is:
(defpart 2294
  :init-specs ((:texture (new 'static 'texture-id :index #xca :page #xc))
    (:num 1.0)
    (:scale-x (meters 0.75))
    (:rot-x (degrees 2.25))
    (:scale-y :copy scale-x)
    (:r 128.0)
    (:g 0.0)
    (:b 0.0)
    (:a 48.0)
    (:rotvel-z (degrees 0.3))
    (:fade-a -2.4)
    (:timer (seconds 0.067))
    (:flags (sp-cpuinfo-flag-2 glow))
    (:userdata 4096.0)
    )
  )

;; definition for function under-sig-red-shot
;; WARN: Return type mismatch int vs none.
(defbehavior under-sig-red-shot scene-player ((arg0 object) (arg1 vector) (arg2 sparticle-launch-state))
  (when (not (-> self aborted?))
    (set! (-> *part-id-table* 2291 init-specs 3 initial-valuef) 4096.0)
    (set! (-> *part-id-table* 2291 init-specs 4 initial-valuef) 24576.0)
    (set! (-> *part-id-table* 2291 init-specs 10 initial-valuef) 35.0)
    (set! (-> *part-id-table* 2291 init-specs 9 initial-valuef) -3.6571429)
    (draw-beam (-> *part-id-table* 2291) arg1 (-> arg2 sprite rot-syvel) #f #t)
    )
  0
  (none)
  )

;; definition for function under-sig-red-shot-overhead
;; INFO: Used lq/sq
;; WARN: Return type mismatch int vs none.
(defbehavior under-sig-red-shot-overhead scene-player ((arg0 process-tree) (arg1 vector) (arg2 sparticle-launch-state))
  (when (not (-> self aborted?))
    (let ((part (get-process *default-dead-pool* part-tracker #x4000)))
      (when part
        (let ((activate-func (method-of-type part-tracker activate)))
          (activate-func
            (the-as part-tracker part)
            arg0
            (symbol->string (-> part-tracker symbol))
            (the-as pointer #x70004000)
            )
          )
        (let ((t9-2 run-function-in-process)
              (a0-3 part)
              (a1-5 part-tracker-init)
              (a2-3 (-> *part-group-id-table* 518))
              (a3-1 0)
              (t0-0 #f)
              (t1-0 #f)
              (t2-0 #f)
              (t3-0 *launch-matrix*)
              )
          (set! (-> t3-0 trans quad) (-> arg1 quad))
          ((the-as (function object object object object object object object object none) t9-2)
           a0-3
           a1-5
           a2-3
           a3-1
           t0-0
           t1-0
           t2-0
           t3-0
           )
          )
        (-> part ppointer)
        )
      )
    (draw-beam (-> *part-id-table* 2291) arg1 (-> arg2 sprite rot-syvel) #f #t)
    (draw-beam (-> *part-id-table* 2292) arg1 (-> arg2 sprite rot-syvel) #f #t)
    )
  0
  (none)
  )

;; definition for function under-sig-red-shot-grunt
;; INFO: Used lq/sq
;; WARN: Return type mismatch (pointer process) vs none.
(defbehavior under-sig-red-shot-grunt scene-player ((arg0 vector) (arg1 vector) (arg2 sparticle-launch-state))
  (let ((beam-end (vector-! (new 'stack-no-clear 'vector) arg1 arg0)))
    (set! (-> *part-id-table* 2291 init-specs 4 initial-valuef) (vector-length beam-end))
    (draw-beam (-> *part-id-table* 2291) arg0 beam-end #f #t)
    )
  (let ((part (get-process *default-dead-pool* part-tracker #x4000)))
    (when part
      (let ((activate-func (method-of-type part-tracker activate)))
        (activate-func
          (the-as part-tracker part)
          (command-get-process "grunt-fma" *target*)
          (symbol->string (-> part-tracker symbol))
          (the-as pointer #x70004000)
          )
        )
      (let ((t9-4 run-function-in-process)
            (a0-7 part)
            (a1-6 part-tracker-init)
            (a2-5 (-> *part-group-id-table* 146))
            (a3-2 0)
            (t0-1 #f)
            (t1-0 #f)
            (t2-0 #f)
            (t3-0 *launch-matrix*)
            )
        (set! (-> t3-0 trans quad) (-> arg1 quad))
        ((the-as (function object object object object object object object object none) t9-4)
         a0-7
         a1-6
         a2-5
         a3-2
         t0-1
         t1-0
         t2-0
         t3-0
         )
        )
      (-> part ppointer)
      )
    )
  (none)
  )

;; failed to figure out what this is:
(scene-method-16
  (new 'static 'scene
    :name "under-find-sig-res"
    :extra #f
    :info #f
    :mask-to-clear (process-mask movie enemy platform projectile)
    :entity "scene-stage-74"
    :art-group "scenecamera"
    :anim "under-find-sig-res"
    :parts 8
    :command-list '((0
        (setting-reset music mode #f)
        (send-event "sig-under-1" 'hide #t)
        (send-event "sig-intro-grunt-1" 'draw #f)
        (part-tracker "group-sig-gun-glow" entity "sig-highres" joint "blast" track #t duration (frame-range 0 880))
        )
      (6 (joint-eval under-sig-red-shot entity "sig-highres" joint "blast"))
      (26 (joint-eval under-sig-red-shot entity "sig-highres" joint "blast"))
      (75 (joint-eval under-sig-red-shot-overhead entity "sig-highres" joint "blast"))
      (160 (joint-eval under-sig-red-shot entity "sig-highres" joint "blast"))
      (514 (joint-eval under-sig-red-shot entity "sig-highres" joint "blast"))
      (528
        (send-event
          "sig-highres"
          'trans-hook
          ,(lambda :behavior scene-player
             ((arg0 object) (arg1 object) (arg2 sparticle-launch-state))
             (let ((f0-0 (ja-aframe-num 0)))
               (when (and (< 527.0 f0-0) (< f0-0 533.0))
                 (let ((vec1 (new 'stack-no-clear 'vector))
                       (vec2 (new 'stack-no-clear 'vector))
                       )
                   (let ((v1-4 (the-as target (command-get-process "grunt-fma" *target*))))
                     (set! (-> vec1 quad) (-> self node-list data 52 bone transform trans quad))
                     (set! (-> vec2 quad) (-> v1-4 node-list data 3 bone transform trans quad))
                     )
                   (under-sig-red-shot-grunt vec1 vec2 arg2)
                   )
                 )
               )
             (none)
             )
          )
        )
      (10000
        (send-event "sig-intro-grunt-1" 'draw #t)
        (send-event "sig-under-1" 'hide #f)
        (task-close! "under-sig-introduction")
        (setting-pers music mode #f time (seconds 5))
        )
      )
    :cut-list '(51 67 81 100 121 155 268 407 520 543 635 691)
    :wait-ground-time (seconds 1)
    :draw-target #f
    :abort #t
    :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 '()
        :camera 4
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "sidekick-highres"
        :level 'under
        :art-group "skel-sidekick-highres"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "jak-highres"
        :level 'under
        :art-group "skel-jak-highres"
        :prefix ""
        :draw-frames '((5 max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "sig-highres"
        :level 'under
        :art-group "skel-sig-highres"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '((120 155))
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "grunt-fma"
        :level 'under
        :art-group "skel-grunt-fma"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      )
    :load-point-obj "under-start"
    :end-point-obj (new 'static 'continue-point
      :name "under-start"
      :level #f
      :flags (continue-flags change-continue)
      :trans (new 'static 'vector :x -281437.8 :y -266239.6 :z 7897175.0 :w 1.0)
      :quat (new 'static 'vector :y -0.0077 :w 0.9999)
      :camera-trans (new 'static 'vector :x -251373.16 :y -249839.2 :z 7882176.0 :w 1.0)
      :camera-rot (new 'static 'inline-array vector3s 3
        (new 'static 'vector3s :data (new 'static 'array float 3 0.4951 0.0 0.8687))
        (new 'static 'vector3s :data (new 'static 'array float 3 -0.1604 0.9827 0.0914))
        (new 'static 'vector3s :data (new 'static 'array float 3 -0.8538 -0.1846 0.4866))
        )
      :on-goto '(want-continue "under-start")
      :vis-nick 'under
      :want (new 'static 'inline-array level-buffer-state 6
        (new 'static 'level-buffer-state :name 'underb :display? 'display :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name 'under :display? 'display :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        )
      :want-sound (new 'static 'array symbol 3 'under3 'under4 'under5)
      )
    :borrow '()
    :sfx-volume -1.0
    :ambient-volume -1.0
    :music-volume -1.0
    :blackout-end #t
    :peaceful #t
    :save #t
    )
  )

;; failed to figure out what this is:
(scene-method-16
  (new 'static 'scene
    :name "under-centipede-one"
    :extra #f
    :info #f
    :mask-to-clear (process-mask movie enemy platform projectile)
    :entity "scene-stage-81"
    :art-group "scenecamera"
    :anim "under-centipede-one"
    :parts 6
    :command-list '((0
        (send-event "sig-under-1" 'hide #t)
        (kill "under-break-wall-1")
        (kill "centipede-2")
        (kill "under-int-door-1")
        (fadein (frame-range 0 5))
        )
      (1 (send-event "under-break-wall-1" 'die-fast))
      (4 (part-tracker
           "group-under-centipede-one-explosion"
           entity
           "under-break-wall"
           joint
           "explode"
           track
           #t
           duration
           (frame-time (new 'static 'bfloat :data 30.0))
           )
         )
      (48
        (part-tracker
          "group-under-centipede-one-explosion"
          entity
          "under-break-wall"
          joint
          "explode"
          track
          #t
          duration
          (frame-time (new 'static 'bfloat :data 30.0))
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "f"
          track
          #t
          duration
          (frame-range 48 76)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "q"
          track
          #t
          duration
          (frame-range 48 76)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "t"
          track
          #t
          duration
          (frame-range 48 76)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "y"
          track
          #t
          duration
          (frame-range 48 76)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "az"
          track
          #t
          duration
          (frame-range 48 76)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "bd"
          track
          #t
          duration
          (frame-range 48 76)
          )
        )
      (50
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "c"
          track
          #t
          duration
          (frame-range 50 81)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "h"
          track
          #t
          duration
          (frame-range 50 81)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "z"
          track
          #t
          duration
          (frame-range 50 81)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "zz"
          track
          #t
          duration
          (frame-range 50 81)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "ac"
          track
          #t
          duration
          (frame-range 50 81)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "av"
          track
          #t
          duration
          (frame-range 50 81)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "bc"
          track
          #t
          duration
          (frame-range 50 81)
          )
        )
      (53
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "b"
          track
          #t
          duration
          (frame-range 53 83)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "d"
          track
          #t
          duration
          (frame-range 53 83)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "g"
          track
          #t
          duration
          (frame-range 53 83)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "i"
          track
          #t
          duration
          (frame-range 53 83)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "ba"
          track
          #t
          duration
          (frame-range 53 83)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "bb"
          track
          #t
          duration
          (frame-range 53 83)
          )
        )
      (55
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "main"
          track
          #t
          duration
          (frame-range 55 96)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "e"
          track
          #t
          duration
          (frame-range 55 96)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "ab"
          track
          #t
          duration
          (frame-range 55 96)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "ad"
          track
          #t
          duration
          (frame-range 55 96)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "af"
          track
          #t
          duration
          (frame-range 55 96)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "al"
          track
          #t
          duration
          (frame-range 55 96)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "ax"
          track
          #t
          duration
          (frame-range 55 96)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "ag"
          track
          #t
          duration
          (frame-range 55 113)
          )
        )
      (56
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "l"
          track
          #t
          duration
          (frame-range 56 69)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "m"
          track
          #t
          duration
          (frame-range 56 69)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "n"
          track
          #t
          duration
          (frame-range 56 69)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "r"
          track
          #t
          duration
          (frame-range 56 69)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "d"
          track
          #t
          duration
          (frame-range 56 69)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "u"
          track
          #t
          duration
          (frame-range 56 69)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "x"
          track
          #t
          duration
          (frame-range 56 69)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "ah"
          track
          #t
          duration
          (frame-range 56 69)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "ai"
          track
          #t
          duration
          (frame-range 56 69)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "an"
          track
          #t
          duration
          (frame-range 56 69)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "ao"
          track
          #t
          duration
          (frame-range 56 69)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "ap"
          track
          #t
          duration
          (frame-range 56 69)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "aw"
          track
          #t
          duration
          (frame-range 56 69)
          )
        )
      (57
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "k"
          track
          #t
          duration
          (frame-range 55 70)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "o"
          track
          #t
          duration
          (frame-range 55 70)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "v"
          track
          #t
          duration
          (frame-range 55 70)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "w"
          track
          #t
          duration
          (frame-range 55 70)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "aa"
          track
          #t
          duration
          (frame-range 55 70)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "aq"
          track
          #t
          duration
          (frame-range 55 70)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "ar"
          track
          #t
          duration
          (frame-range 55 70)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "as"
          track
          #t
          duration
          (frame-range 55 70)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "at"
          track
          #t
          duration
          (frame-range 55 70)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "au"
          track
          #t
          duration
          (frame-range 55 70)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "ay"
          track
          #t
          duration
          (frame-range 55 70)
          )
        (part-tracker
          "group-under-centipede-one-trailer"
          entity
          "under-break-wall"
          joint
          "ae"
          track
          #t
          duration
          (frame-range 55 80)
          )
        )
      (315 (fadeout (frame-range 315 320)))
      (10000 (task-close! "under-sig-centipede1-start"))
      )
    :cut-list '()
    :wait-ground-time (seconds 1)
    :draw-target #f
    :abort #t
    :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 '()
        :camera 4
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "sidekick-highres"
        :level 'under
        :art-group "skel-sidekick-highres"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "jak-highres"
        :level 'under
        :art-group "skel-jak-highres"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "sig-highres"
        :level 'under
        :art-group "skel-sig-highres"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "centipede-fma"
        :level 'under
        :art-group "skel-centipede-fma"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "under-break-wall"
        :level 'underb
        :art-group "skel-under-break-wall"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :light-index #x1
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      )
    :load-point-obj "under-start"
    :end-point-obj (new 'static 'continue-point
      :name "under-start"
      :level #f
      :flags (continue-flags change-continue)
      :trans (new 'static 'vector :x -277934.5 :y -273739.38 :z 8274381.0 :w 1.0)
      :quat (new 'static 'vector :y 0.1135 :w -0.9935)
      :camera-trans (new 'static 'vector :x -251817.98 :y -252642.1 :z 8230336.0 :w 1.0)
      :camera-rot (new 'static 'inline-array vector3s 3
        (new 'static 'vector3s :data (new 'static 'array float 3 0.861 0.0 0.5086))
        (new 'static 'vector3s :data (new 'static 'array float 3 -0.0616 0.9926 0.1044))
        (new 'static 'vector3s :data (new 'static 'array float 3 -0.5048 -0.1212 0.8546))
        )
      :on-goto '(apply
         ,(lambda :behavior scene-player
            ()
            (reset! (-> *display* user0-clock))
            (send-event (process-by-name "sig-under-1" *active-pool*) 'centipede-chase 1)
            (none)
            )
         )
      :vis-nick 'under
      :want (new 'static 'inline-array level-buffer-state 6
        (new 'static 'level-buffer-state :name 'underb :display? 'display :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name 'under :display? 'display :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        )
      :want-sound (new 'static 'array symbol 3 'under3 'under4 'under5)
      )
    :borrow '()
    :sfx-volume -1.0
    :ambient-volume -1.0
    :music-volume -1.0
    :blackout-end #t
    :peaceful #t
    :music-delay 1500.0
    :save #f
    )
  )

;; failed to figure out what this is:
(scene-method-16
  (new 'static 'scene
    :name "under-centipede-two"
    :extra #f
    :info #f
    :mask-to-clear (process-mask movie enemy platform projectile)
    :entity "scene-stage-81"
    :art-group "scenecamera"
    :anim "under-centipede-two"
    :parts 6
    :command-list '((0
        (send-event "sig-under-1" 'hide #t)
        (kill "centipede-2")
        (kill "under-break-bridge-1")
        (kill "under-laser-2")
        (fadein (frame-range 0 5))
        )
      (48
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "bc"
          track
          #t
          duration
          (frame-range 48 84)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "bd"
          track
          #t
          duration
          (frame-range 48 84)
          )
        )
      (65
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "b"
          track
          #t
          duration
          (frame-range 65 120)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "c"
          track
          #t
          duration
          (frame-range 65 120)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "av"
          track
          #t
          duration
          (frame-range 65 120)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "aw"
          track
          #t
          duration
          (frame-range 65 120)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "ax"
          track
          #t
          duration
          (frame-range 65 120)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "ay"
          track
          #t
          duration
          (frame-range 65 120)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "az"
          track
          #t
          duration
          (frame-range 65 120)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "ba"
          track
          #t
          duration
          (frame-range 65 120)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "bb"
          track
          #t
          duration
          (frame-range 65 120)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "bj"
          track
          #t
          duration
          (frame-range 65 120)
          )
        )
      (72
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "al"
          track
          #t
          duration
          (frame-range 72 86)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "ao"
          track
          #t
          duration
          (frame-range 72 86)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "ap"
          track
          #t
          duration
          (frame-range 72 86)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "as"
          track
          #t
          duration
          (frame-range 72 86)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "be"
          track
          #t
          duration
          (frame-range 72 86)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "bi"
          track
          #t
          duration
          (frame-range 72 86)
          )
        )
      (74
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "an"
          track
          #t
          duration
          (frame-range 74 120)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "aq"
          track
          #t
          duration
          (frame-range 74 120)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "ar"
          track
          #t
          duration
          (frame-range 74 120)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "at"
          track
          #t
          duration
          (frame-range 74 120)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "au"
          track
          #t
          duration
          (frame-range 74 120)
          )
        )
      (75
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "d"
          track
          #t
          duration
          (frame-range 75 86)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "y"
          track
          #t
          duration
          (frame-range 75 86)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "ai"
          track
          #t
          duration
          (frame-range 75 86)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "aj"
          track
          #t
          duration
          (frame-range 75 86)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "ak"
          track
          #t
          duration
          (frame-range 75 86)
          )
        )
      (76
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "main"
          track
          #t
          duration
          (frame-range 76 90)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "x"
          track
          #t
          duration
          (frame-range 76 90)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "z"
          track
          #t
          duration
          (frame-range 76 90)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "zz"
          track
          #t
          duration
          (frame-range 76 90)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "ag"
          track
          #t
          duration
          (frame-range 76 90)
          )
        )
      (78
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "e"
          track
          #t
          duration
          (frame-range 78 100)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "f"
          track
          #t
          duration
          (frame-range 78 100)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "g"
          track
          #t
          duration
          (frame-range 78 100)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "h"
          track
          #t
          duration
          (frame-range 78 100)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "i"
          track
          #t
          duration
          (frame-range 78 100)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "j"
          track
          #t
          duration
          (frame-range 78 100)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "k"
          track
          #t
          duration
          (frame-range 78 100)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "ab"
          track
          #t
          duration
          (frame-range 78 100)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "ac"
          track
          #t
          duration
          (frame-range 78 100)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "ad"
          track
          #t
          duration
          (frame-range 78 100)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "ae"
          track
          #t
          duration
          (frame-range 78 100)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "af"
          track
          #t
          duration
          (frame-range 78 100)
          )
        )
      (140
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "main"
          track
          #t
          duration
          (frame-range 140 146)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "c"
          track
          #t
          duration
          (frame-range 140 191)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "h"
          track
          #t
          duration
          (frame-range 140 170)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "k"
          track
          #t
          duration
          (frame-range 140 147)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "l"
          track
          #t
          duration
          (frame-range 140 170)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "m"
          track
          #t
          duration
          (frame-range 140 170)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "n"
          track
          #t
          duration
          (frame-range 140 170)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "o"
          track
          #t
          duration
          (frame-range 140 170)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "p"
          track
          #t
          duration
          (frame-range 140 170)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "q"
          track
          #t
          duration
          (frame-range 140 170)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "r"
          track
          #t
          duration
          (frame-range 140 170)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "s"
          track
          #t
          duration
          (frame-range 140 170)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "t"
          track
          #t
          duration
          (frame-range 140 170)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "u"
          track
          #t
          duration
          (frame-range 140 170)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "v"
          track
          #t
          duration
          (frame-range 140 170)
          )
        (part-tracker
          "group-under-centipede-two-trailer"
          entity
          "under-break-bridge"
          joint
          "w"
          track
          #t
          duration
          (frame-range 140 170)
          )
        )
      (307 (fadeout (frame-range 307 312)))
      (10000 (task-close! "under-sig-centipede1-end") (send-event "sig-under-1" 'hide #f))
      )
    :cut-list '(119 142 191 219)
    :wait-ground-time (seconds 1)
    :draw-target #f
    :abort #t
    :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 '()
        :camera 4
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "sidekick-highres"
        :level 'under
        :art-group "skel-sidekick-highres"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "jak-highres"
        :level 'under
        :art-group "skel-jak-highres"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "sig-highres"
        :level 'under
        :art-group "skel-sig-highres"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "centipede-fma"
        :level 'under
        :art-group "skel-centipede-fma"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "under-break-bridge"
        :level 'under
        :art-group "skel-under-break-bridge"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :light-index #x1
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      )
    :load-point-obj "under-start"
    :end-point-obj (new 'static 'continue-point
      :name "under-start"
      :level #f
      :flags (continue-flags change-continue)
      :trans (new 'static 'vector :x -912500.75 :y -274436.5 :z 8332461.5 :w 1.0)
      :quat (new 'static 'vector :y -0.9997 :w 0.0214)
      :camera-trans (new 'static 'vector :x -910896.3 :y -257269.77 :z 8368969.0 :w 1.0)
      :camera-rot (new 'static 'inline-array vector3s 3
        (new 'static 'vector3s :data (new 'static 'array float 3 -0.999 0.0 0.0438))
        (new 'static 'vector3s :data (new 'static 'array float 3 -0.0073 0.986 -0.1665))
        (new 'static 'vector3s :data (new 'static 'array float 3 -0.0432 -0.1666 -0.985))
        )
      :on-goto #f
      :vis-nick 'under
      :want (new 'static 'inline-array level-buffer-state 6
        (new 'static 'level-buffer-state :name 'underb :display? 'display :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name 'under :display? 'display :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        )
      :want-sound (new 'static 'array symbol 3 'under3 'under4 'under5)
      )
    :borrow '()
    :sfx-volume -1.0
    :ambient-volume -1.0
    :music-volume -1.0
    :blackout-end #t
    :peaceful #t
    :music-delay 1500.0
    :save #f
    )
  )

;; failed to figure out what this is:
(scene-method-16
  (new 'static 'scene
    :name "under-centipede-three"
    :extra #f
    :info #f
    :mask-to-clear (process-mask movie enemy platform projectile)
    :entity "scene-stage-81"
    :art-group "scenecamera"
    :anim "under-centipede-three"
    :parts 6
    :command-list '((0
        (send-event "sig-under-1" 'hide #t)
        (kill "under-break-wall-2")
        (kill "under-plat-shoot-1")
        (kill "under-int-door-3")
        (kill "centipede-3")
        (kill "under-part-344")
        (kill "under-part-345")
        (kill "under-part-346")
        (kill "under-part-347")
        (kill "under-part-348")
        (kill "under-part-349")
        (kill "under-laser-3")
        (kill "under-laser-4")
        (kill "under-laser-5")
        (fadein (frame-range 0 5))
        )
      (6 (part-tracker
           "group-under-centipede-three-explosion"
           entity
           "under-break-wall-b"
           joint
           "explode"
           track
           #t
           duration
           (frame-time (new 'static 'bfloat :data 30.0))
           )
         )
      (40
        (part-tracker
          "group-under-centipede-three-explosion"
          entity
          "under-break-wall-b"
          joint
          "explode"
          track
          #t
          duration
          (frame-time (new 'static 'bfloat :data 30.0))
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "q"
          track
          #t
          duration
          (frame-range 40 84)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "s"
          track
          #t
          duration
          (frame-range 40 84)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "aa"
          track
          #t
          duration
          (frame-range 40 84)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "ba"
          track
          #t
          duration
          (frame-range 40 84)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "bc"
          track
          #t
          duration
          (frame-range 40 84)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "bd"
          track
          #t
          duration
          (frame-range 40 84)
          )
        )
      (42
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "l"
          track
          #t
          duration
          (frame-range 42 56)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "o"
          track
          #t
          duration
          (frame-range 42 56)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "p"
          track
          #t
          duration
          (frame-range 42 56)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "u"
          track
          #t
          duration
          (frame-range 42 56)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "an"
          track
          #t
          duration
          (frame-range 42 56)
          )
        )
      (45
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "k"
          track
          #t
          duration
          (frame-range 45 65)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "w"
          track
          #t
          duration
          (frame-range 45 65)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "aq"
          track
          #t
          duration
          (frame-range 45 65)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "ar"
          track
          #t
          duration
          (frame-range 45 65)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "as"
          track
          #t
          duration
          (frame-range 45 65)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "at"
          track
          #t
          duration
          (frame-range 45 65)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "au"
          track
          #t
          duration
          (frame-range 45 65)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "ay"
          track
          #t
          duration
          (frame-range 45 65)
          )
        )
      (46
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "f"
          track
          #t
          duration
          (frame-range 46 81)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "h"
          track
          #t
          duration
          (frame-range 46 81)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "i"
          track
          #t
          duration
          (frame-range 46 81)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "y"
          track
          #t
          duration
          (frame-range 46 81)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "az"
          track
          #t
          duration
          (frame-range 46 81)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "t"
          track
          #t
          duration
          (frame-range 46 111)
          )
        )
      (55
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "main"
          track
          #t
          duration
          (frame-range 55 99)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "d"
          track
          #t
          duration
          (frame-range 55 99)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "zz"
          track
          #t
          duration
          (frame-range 55 99)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "ac"
          track
          #t
          duration
          (frame-range 55 99)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "af"
          track
          #t
          duration
          (frame-range 55 99)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "al"
          track
          #t
          duration
          (frame-range 55 99)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "ag"
          track
          #t
          duration
          (frame-range 55 99)
          )
        )
      (57
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "b"
          track
          #t
          duration
          (frame-range 57 89)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "c"
          track
          #t
          duration
          (frame-range 57 89)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "e"
          track
          #t
          duration
          (frame-range 57 89)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "v"
          track
          #t
          duration
          (frame-range 57 89)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "z"
          track
          #t
          duration
          (frame-range 57 89)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "ab"
          track
          #t
          duration
          (frame-range 57 89)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "ad"
          track
          #t
          duration
          (frame-range 57 89)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "ae"
          track
          #t
          duration
          (frame-range 57 89)
          )
        (part-tracker
          "group-under-centipede-three-trailer"
          entity
          "under-break-wall-b"
          joint
          "ax"
          track
          #t
          duration
          (frame-range 57 89)
          )
        )
      (335 (fadeout (frame-range 335 340)))
      (10000 (task-close! "under-sig-centipede2-start"))
      )
    :cut-list '()
    :wait-ground-time (seconds 1)
    :draw-target #f
    :abort #t
    :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 '()
        :camera 4
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "sidekick-highres"
        :level 'under
        :art-group "skel-sidekick-highres"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "jak-highres"
        :level 'under
        :art-group "skel-jak-highres"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "sig-highres"
        :level 'under
        :art-group "skel-sig-highres"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "centipede-fma"
        :level 'under
        :art-group "skel-centipede-fma"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "under-break-wall-b"
        :level 'underb
        :art-group "skel-under-break-wall-b"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '((55 70) (115 125) (175 185) (200 216))
        :light-index #x1
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      )
    :load-point-obj "under-start"
    :end-point-obj (new 'static 'continue-point
      :name "under-start"
      :level #f
      :flags (continue-flags change-continue)
      :trans (new 'static 'vector :x -934223.06 :y -290824.2 :z 7948726.0 :w 1.0)
      :quat (new 'static 'vector :y 0.4849 :w 0.8745)
      :camera-trans (new 'static 'vector :x -978344.75 :y -270091.06 :z 7925256.5 :w 1.0)
      :camera-rot (new 'static 'inline-array vector3s 3
        (new 'static 'vector3s :data (new 'static 'array float 3 0.4686 0.0 -0.8833))
        (new 'static 'vector3s :data (new 'static 'array float 3 0.1064 0.9927 0.0564))
        (new 'static 'vector3s :data (new 'static 'array float 3 0.8769 -0.1204 0.4652))
        )
      :on-goto '(apply
         ,(lambda :behavior scene-player
            ()
            (reset! (-> *display* user0-clock))
            (send-event (process-by-name "sig-under-1" *active-pool*) 'centipede-chase 2)
            (none)
            )
         )
      :vis-nick 'under
      :want (new 'static 'inline-array level-buffer-state 6
        (new 'static 'level-buffer-state :name 'underb :display? 'display :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name 'under :display? 'display :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        )
      :want-sound (new 'static 'array symbol 3 'under3 'under4 'under5)
      )
    :borrow '()
    :sfx-volume -1.0
    :ambient-volume -1.0
    :music-volume -1.0
    :blackout-end #t
    :peaceful #t
    :music-delay 1500.0
    :save #f
    )
  )

;; failed to figure out what this is:
(scene-method-16
  (new 'static 'scene
    :name "under-get-sig-out-res"
    :extra #f
    :info #f
    :mask-to-clear (process-mask movie enemy platform projectile)
    :entity "scene-stage-78"
    :art-group "scenecamera"
    :anim "under-get-sig-out-res"
    :parts 9
    :command-list '((0
        (send-event "sig-under-1" 'hide #t)
        (kill "under-break-bridge-2")
        (kill "centipede-3")
        (part-tracker "group-sig-gun-glow" entity "sig-highres" joint "blast" track #t duration (frame-range 0 831))
        )
      (760 (part-tracker
             "group-under-explosion"
             entity
             "under-break-ceiling"
             joint
             "explode"
             track
             #f
             duration
             (frame-time (new 'static 'bfloat :data 20.0))
             )
           )
      (763
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-ceiling"
          joint
          "b"
          track
          #t
          duration
          (frame-range 763 771)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-ceiling"
          joint
          "c"
          track
          #t
          duration
          (frame-range 763 771)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-ceiling"
          joint
          "e"
          track
          #t
          duration
          (frame-range 763 771)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-ceiling"
          joint
          "f"
          track
          #t
          duration
          (frame-range 763 771)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-ceiling"
          joint
          "g"
          track
          #t
          duration
          (frame-range 763 771)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-ceiling"
          joint
          "h"
          track
          #t
          duration
          (frame-range 763 771)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-ceiling"
          joint
          "i"
          track
          #t
          duration
          (frame-range 763 771)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-ceiling"
          joint
          "j"
          track
          #t
          duration
          (frame-range 763 771)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-ceiling"
          joint
          "k"
          track
          #t
          duration
          (frame-range 763 771)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-ceiling"
          joint
          "l"
          track
          #t
          duration
          (frame-range 763 771)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-ceiling"
          joint
          "m"
          track
          #t
          duration
          (frame-range 763 771)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-ceiling"
          joint
          "n"
          track
          #t
          duration
          (frame-range 763 771)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-ceiling"
          joint
          "o"
          track
          #t
          duration
          (frame-range 763 771)
          )
        )
      (778 (part-tracker
             "group-under-explosion-trailer"
             entity
             "under-break-ceiling"
             joint
             "l"
             track
             #t
             duration
             (frame-range 778 787)
             )
           )
      (795 (part-tracker
             "group-under-explosion"
             entity
             "under-break-bridge-b"
             joint
             "main"
             track
             #f
             duration
             (frame-time (new 'static 'bfloat :data 20.0))
             )
           )
      (810
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-bridge-b"
          joint
          "u"
          track
          #t
          duration
          (frame-range 810 815)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-bridge-b"
          joint
          "v"
          track
          #t
          duration
          (frame-range 810 815)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-bridge-b"
          joint
          "l"
          track
          #t
          duration
          (frame-range 810 815)
          )
        )
      (838
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-bridge-b"
          joint
          "d"
          track
          #t
          duration
          (frame-range 838 871)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-bridge-b"
          joint
          "be"
          track
          #t
          duration
          (frame-range 838 871)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-bridge-b"
          joint
          "bj"
          track
          #t
          duration
          (frame-range 838 871)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-bridge-b"
          joint
          "ao"
          track
          #t
          duration
          (frame-range 838 871)
          )
        (part-tracker
          "group-under-explosion-trailer"
          entity
          "under-break-bridge-b"
          joint
          "av"
          track
          #t
          duration
          (frame-range 838 871)
          )
        )
      (980 (fadeout (seconds (new 'static 'bfloat :data 0.333))))
      (10000 (task-close! "under-sig-resolution"))
      )
    :cut-list '(61 136 221 325 381 436 506 546 596 656 719 781 811 841 871)
    :wait-ground-time (seconds 1)
    :draw-target #f
    :abort #t
    :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 '()
        :camera 4
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "sidekick-highres"
        :level 'under
        :art-group "skel-sidekick-highres"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "jak-highres"
        :level 'under
        :art-group "skel-jak-highres"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "sig-highres"
        :level 'under
        :art-group "skel-sig-highres"
        :prefix ""
        :draw-frames '((min 831))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "centipede-fma"
        :level 'under
        :art-group "skel-centipede-fma"
        :prefix ""
        :draw-frames '((min 841))
        :scissor-frames '()
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "under-break-bridge-b"
        :level 'under
        :art-group "skel-under-break-bridge-b"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '((380 436) (580 656) (719 781) (871 max))
        :light-index #x1
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      (new 'static 'scene-actor
        :name "under-break-ceiling"
        :level 'under
        :art-group "skel-under-break-ceiling"
        :prefix ""
        :draw-frames '((min max))
        :scissor-frames '((719 811))
        :flags #x1
        :shadow-flags -1
        :shadow-volume-joint #f
        )
      )
    :load-point-obj "under-start"
    :end-point-obj (new 'static 'continue-point
      :name "under-start"
      :level #f
      :trans (new 'static 'vector :x -875137.0 :y -405510.97 :z 7435856.5 :w 1.0)
      :quat (new 'static 'vector :y -0.631 :w -0.7757)
      :camera-trans (new 'static 'vector :x -896477.2 :y -385284.5 :z 7392907.5 :w 1.0)
      :camera-rot (new 'static 'inline-array vector3s 3
        (new 'static 'vector3s :data (new 'static 'array float 3 0.8827 0.0 -0.4697))
        (new 'static 'vector3s :data (new 'static 'array float 3 0.0559 0.9928 0.105))
        (new 'static 'vector3s :data (new 'static 'array float 3 0.4664 -0.119 0.8765))
        )
      :on-goto #f
      :vis-nick 'under
      :want (new 'static 'inline-array level-buffer-state 6
        (new 'static 'level-buffer-state :name 'underb :display? 'display :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name 'under :display? 'display :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        (new 'static 'level-buffer-state :name #f :display? #f :force-vis? #f :force-inside? #f)
        )
      :want-sound (new 'static 'array symbol 3 'under3 'under4 'under5)
      )
    :borrow '()
    :sfx-volume -1.0
    :ambient-volume -1.0
    :music-volume -1.0
    :blackout-end #t
    :peaceful #t
    :music-delay 1500.0
    :save #t
    )
  )