jak-project/test/decompiler/reference/jak3/levels/stadium/rubble-part_REF.gc

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

;; failed to figure out what this is:
(defpartgroup group-rub-missile
  :id 1020
  :flags (sp0 sp4)
  :bounds (static-bspherem 0 0 0 640)
  :parts ((sp-item 3723 :binding 3722)
    (sp-item 3722 :flags (sp2) :period (seconds 0.017) :length (seconds 0.017))
    (sp-item 3724)
    )
  )

;; failed to figure out what this is:
(defpart 3723
  :init-specs ((:texture (starflash level-default-sprite))
    (:num 1.0)
    (:scale-x (meters 12) (meters 1))
    (:rot-x (degrees 22.5))
    (:rot-z (degrees 0) (degrees 360))
    (:scale-y :copy scale-x)
    (:r 255.0)
    (:g 200.0)
    (:b 128.0)
    (:a 128.0)
    (:timer (seconds 0.017))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
    )
  )

;; failed to figure out what this is:
(defpart 3722
  :init-specs ((:texture (bigpuff level-default-sprite))
    (:num 1.0)
    (:scale-x (meters 10) (meters 10))
    (:rot-z (degrees 0) (degrees 360))
    (:scale-y :copy scale-x)
    (:r 90.0 30.0)
    (:g :copy r)
    (:b :copy r)
    (:a 64.0)
    (:scalevel-x (meters 0.06666667) (meters 0.06666667))
    (:scalevel-y :copy scalevel-x)
    (:fade-a -0.21333334)
    (:timer (seconds 1))
    (:flags (sp-cpuinfo-flag-2))
    )
  )

;; failed to figure out what this is:
(defpart 3724
  :init-specs ((:texture (glow-soft level-default-sprite))
    (:num 1.0)
    (:scale-x (meters 30) (meters 2))
    (:rot-x (degrees 22.5))
    (:scale-y :copy scale-x)
    (:r 255.0)
    (:g 100.0 28.0)
    (:b 0.0)
    (:a 12.0 12.0)
    (:timer (seconds 0.017))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
    (:rotate-y (degrees 0))
    )
  )

;; failed to figure out what this is:
(defpartgroup group-rub-missile-explode
  :id 1021
  :flags (sp0)
  :bounds (static-bspherem 0 0 0 2)
  :parts ((sp-item 3725 :flags (sp3)) (sp-item 3726) (sp-item 3727) (sp-item 3728 :flags (sp3)))
  )

;; failed to figure out what this is:
(defpart 3725
  :init-specs ((:texture (glow-soft level-default-sprite))
    (:num 1.0)
    (:scale-x (meters 30))
    (:rot-x (degrees 225))
    (:scale-y :copy scale-x)
    (:r 255.0)
    (:g 128.0)
    (:b 40.0)
    (:a 32.0)
    (:fade-a -0.035555556)
    (:timer (seconds 3))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 sp-cpuinfo-flag-14 glow))
    (:userdata 40960.0)
    )
  )

;; failed to figure out what this is:
(defpart 3727
  :init-specs ((:texture (big-cloud level-default-sprite))
    (:num 5.0)
    (:scale-x (meters 1) (meters 2))
    (:rot-z (degrees 0) (degrees 360))
    (:scale-y :copy scale-x)
    (:r 128.0)
    (:g 80.0 20.0)
    (:b 30.0)
    (:a 255.0)
    (:vel-y (meters 0.26666668))
    (:scalevel-x (meters 0.033333335))
    (:scalevel-y :copy scalevel-x)
    (:fade-g -0.08888889)
    (:fade-b -0.033333335)
    (:fade-a -0.28333333 -0.28333333)
    (:friction 0.95 0.02)
    (:timer (seconds 3))
    (:flags (sp-cpuinfo-flag-0 sp-cpuinfo-flag-3 sp-cpuinfo-flag-14))
    (:conerot-x (degrees 80) (degrees 20))
    (:rotate-y (degrees 0) (degrees 3600))
    )
  )

;; failed to figure out what this is:
(defpart 3726
  :init-specs ((:texture (explosion-edge level-default-sprite))
    (:num 10.0)
    (:scale-x (meters 1) (meters 2))
    (:scale-y :copy scale-x)
    (:r 128.0)
    (:g 80.0 20.0)
    (:b 30.0)
    (:a 255.0)
    (:vel-y (meters 0.033333335) (meters 0.26666668))
    (:scalevel-x (meters 0.033333335))
    (:scalevel-y :copy scalevel-x)
    (:fade-g -0.08888889)
    (:fade-b -0.033333335)
    (:fade-a -0.28333333 -0.28333333)
    (:friction 0.9 0.09)
    (:timer (seconds 3))
    (:flags (sp-cpuinfo-flag-0 sp-cpuinfo-flag-3 sp-cpuinfo-flag-14))
    (: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 3728
  :init-specs ((:texture (explo-texture level-default-sprite))
    (:num 5.0)
    (:scale-x (meters 10) (meters 2))
    (:rot-z (degrees 0) (degrees 360))
    (:scale-y :copy scale-x)
    (:r 128.0)
    (:g 80.0 20.0)
    (:b 30.0)
    (:a 255.0)
    (:vel-y (meters 0) (meters 0.33333334))
    (:scalevel-x (meters 0.06666667))
    (:scalevel-y :copy scalevel-x)
    (:fade-g -0.08888889)
    (:fade-b -0.033333335)
    (:fade-a -0.28333333 -0.28333333)
    (:friction 0.9)
    (:timer (seconds 3))
    (:flags (sp-cpuinfo-flag-0 sp-cpuinfo-flag-3 sp-cpuinfo-flag-14))
    (:conerot-x (degrees 0) (degrees 360))
    (:rotate-y (degrees 0) (degrees 3600))
    )
  )

;; failed to figure out what this is:
(defpartgroup group-rub-elec-gate
  :id 1022
  :flags (sp0 sp1)
  :bounds (static-bspherem 0 0 0 30)
  :parts ((sp-item 3729 :flags (is-3d sp7) :period (seconds 2) :length (seconds 0.035)))
  )

;; failed to figure out what this is:
(defpart 3729
  :init-specs ((:texture (lasersmoke-00 level-default-sprite))
    (:num 1.0)
    (:x (meters 0))
    (:z (meters 0))
    (:scale-x (meters 1))
    (:scale-y (meters 1))
    (:r 0.0)
    (:g 96.0)
    (:b 128.0)
    (:a 48.0)
    (:timer (seconds 2))
    (:flags (sp-cpuinfo-flag-3))
    (:userdata :data (new 'static 'boxed-array :type int32
                       20
                       1
                       0
                       #x401b00
                       #x401c00
                       #x401d00
                       #x401e00
                       #x401f00
                       #x402000
                       #x402100
                       #x402200
                       #x402300
                       #x402400
                       #x402500
                       #x402600
                       #x402700
                       #x402800
                       #x402900
                       #x402a00
                       #x402b00
                       #x402c00
                       #x402d00
                       #x402e00
                       #x402f00
                       #x403000
                       #x403100
                       #x403200
                       #x403300
                       #x403400
                       #x403500
                       #x403600
                       #x403700
                       #x403800
                       )
               )
    (:func 'spt-func-part-rub-elec-gate)
    (:rotate-x (degrees 90))
    )
  )

;; definition for function spt-func-match-part-def
;; WARN: Return type mismatch float vs none.
(defun spt-func-match-part-def ((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 sparticle-launchinfo))
  (set! (-> arg2 coneradius) (-> *part-id-table* 3729 init-specs 9 initial-valuef))
  (none)
  )

;; definition for function spt-func-part-rub-elec-gate
(defun spt-func-part-rub-elec-gate ((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 sparticle-launchinfo))
  (spt-func-match-part-def arg0 arg1 arg2)
  (sparticle-texture-animate arg0 arg1 (-> arg2 launchrot))
  (none)
  )

;; failed to figure out what this is:
(defpart 3730
  :init-specs ((:texture (static1 level-default-sprite))
    (:num 1.0)
    (:x (meters 0))
    (:z (meters 0))
    (:scale-x (meters 1))
    (:rot-y (degrees 0) 1 (degrees 180))
    (:scale-y (meters 1))
    (:r 10.0)
    (:g 10.0)
    (:b 255.0)
    (:a 4.0 16.0)
    (:timer (seconds 0.017))
    (:flags (sp-cpuinfo-flag-3))
    (:rotate-x (degrees 90))
    (:rotate-z (degrees 90))
    )
  )

;; definition for function rub-elec-gate-adjust-particles
;; WARN: Return type mismatch int vs none.
(defun rub-elec-gate-adjust-particles ((arg0 float) (arg1 float) (arg2 float))
  (/ arg0 2)
  (set! (-> *part-id-table* 3729 init-specs 3 initial-valuef) (- (/ arg1 2)))
  (set! (-> *part-id-table* 3729 init-specs 4 initial-valuef) arg0)
  (set! (-> *part-id-table* 3729 init-specs 5 initial-valuef) arg1)
  (set! (-> *part-id-table* 3729 init-specs 9 initial-valuef) (* 48.0 arg2))
  0
  (none)
  )

;; failed to figure out what this is:
(defpartgroup group-rubble-switch-glow
  :id 1023
  :flags (sp0 sp4)
  :bounds (static-bspherem 0 0 0 60)
  :parts ((sp-item 3731 :flags (sp6 sp7) :period (seconds 0.335) :length (seconds 0.085))
    (sp-item 3732 :flags (sp6 sp7) :period (seconds 0.335) :length (seconds 0.085) :offset 25)
    (sp-item 3733 :flags (sp6 sp7) :period (seconds 0.335) :length (seconds 0.085) :offset 50)
    (sp-item 3734 :flags (sp6 sp7) :period (seconds 0.335) :length (seconds 0.085) :offset 75)
    )
  )

;; failed to figure out what this is:
(defpart 3731
  :init-specs ((:texture (glow-soft level-default-sprite))
    (:num 1.0)
    (:y (meters 13.5))
    (:scale-x (meters 10) (meters 1))
    (:rot-x (degrees 22.5))
    (:rot-z (degrees 90))
    (:scale-y (meters 3) (meters 1))
    (:r 0.0)
    (:g 64.0)
    (:b 255.0)
    (:a 128.0)
    (:omega (degrees 9011.25))
    (:timer (seconds 0.017))
    (:flags (sp-cpuinfo-flag-3 glow))
    (:userdata 4096.0)
    )
  )

;; failed to figure out what this is:
(defpart 3732
  :init-specs ((:texture (glow-soft level-default-sprite))
    (:num 1.0)
    (:y (meters 15))
    (:scale-x (meters 10) (meters 1))
    (:rot-x (degrees 22.5))
    (:rot-z (degrees 90))
    (:scale-y (meters 3) (meters 1))
    (:r 0.0)
    (:g 64.0)
    (:b 255.0)
    (:a 128.0)
    (:omega (degrees 9011.25))
    (:timer (seconds 0.017))
    (:flags (sp-cpuinfo-flag-3 glow))
    (:userdata 4096.0)
    )
  )

;; failed to figure out what this is:
(defpart 3733
  :init-specs ((:texture (glow-soft level-default-sprite))
    (:num 1.0)
    (:y (meters 16.5))
    (:scale-x (meters 10) (meters 1))
    (:rot-x (degrees 22.5))
    (:rot-z (degrees 90))
    (:scale-y (meters 3) (meters 1))
    (:r 0.0)
    (:g 64.0)
    (:b 255.0)
    (:a 128.0)
    (:omega (degrees 9011.25))
    (:timer (seconds 0.017))
    (:flags (sp-cpuinfo-flag-3 glow))
    (:userdata 4096.0)
    )
  )

;; failed to figure out what this is:
(defpart 3734
  :init-specs ((:texture (glow-soft level-default-sprite))
    (:num 1.0)
    (:y (meters 18))
    (:scale-x (meters 10) (meters 1))
    (:rot-x (degrees 22.5))
    (:rot-z (degrees 90))
    (:scale-y (meters 3) (meters 1))
    (:r 0.0)
    (:g 64.0)
    (:b 255.0)
    (:a 128.0)
    (:omega (degrees 9011.25))
    (:timer (seconds 0.017))
    (:flags (sp-cpuinfo-flag-3 glow))
    (:userdata 4096.0)
    )
  )

;; failed to figure out what this is:
(defpartgroup group-rubble-switch-explode
  :id 1024
  :flags (sp0 sp4)
  :bounds (static-bspherem 0 0 0 20)
  :parts ((sp-item 3735 :flags (sp3 sp7))
    (sp-item 3736 :flags (sp6 sp7) :period (seconds 20) :length (seconds 0.167))
    (sp-item 3737 :flags (sp6 sp7) :period (seconds 20) :length (seconds 0.167))
    (sp-item 3738 :flags (sp6 sp7) :period (seconds 20) :length (seconds 0.167))
    (sp-item 3739 :flags (sp7) :period (seconds 20) :length (seconds 0.067))
    )
  )

;; failed to figure out what this is:
(defpart 3735
  :init-specs ((:texture (starflash level-default-sprite))
    (:num 1.0)
    (:y (meters 10))
    (:scale-x (meters 60))
    (:rot-x (degrees 2.25))
    (:rot-z (degrees 0) (degrees 360))
    (:scale-y :copy scale-x)
    (:r 128.0)
    (:g 150.0)
    (:b 255.0)
    (:a 128.0)
    (:omega (degrees 6767.9995))
    (:scalevel-x (meters -1))
    (:scalevel-y :copy scalevel-x)
    (:timer (seconds 0.167))
    (:flags (sp-cpuinfo-flag-0 sp-cpuinfo-flag-3 glow))
    (:userdata 4096.0)
    )
  )

;; failed to figure out what this is:
(defpart 3736
  :init-specs ((:texture (lightning-anim-01 level-default-sprite))
    (:num 1.0 1.0)
    (:y (meters 12))
    (:scale-x (meters 2) (meters 8))
    (:rot-x 4)
    (:rot-z (degrees 0) (degrees 360))
    (:scale-y (meters 3) (meters 4))
    (:r 40.0)
    (:g 40.0 40.0)
    (:b 255.0)
    (:a 128.0)
    (:timer (seconds 0.017) (seconds 0.33))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3))
    (:userdata :data (new 'static 'boxed-array :type int32 10 1 0 #x405700 #x405800 #x405900))
    (:func 'sparticle-texture-animate)
    )
  )

;; failed to figure out what this is:
(defpart 3737
  :init-specs ((:texture (lightning-anim-01 level-default-sprite))
    (:num 1.0 1.0)
    (:y (meters 10))
    (:scale-x (meters 2) (meters 8))
    (:rot-x 4)
    (:rot-z (degrees 0) (degrees 360))
    (:scale-y (meters 3) (meters 4))
    (:r 40.0)
    (:g 40.0 40.0)
    (:b 255.0)
    (:a 128.0)
    (:timer (seconds 0.017) (seconds 0.33))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3))
    (:userdata :data (new 'static 'boxed-array :type int32 10 1 0 #x405700 #x405800 #x405900))
    (:func 'sparticle-texture-animate)
    )
  )

;; failed to figure out what this is:
(defpart 3738
  :init-specs ((:texture (lightning-anim-01 level-default-sprite))
    (:num 1.0 1.0)
    (:y (meters 8))
    (:scale-x (meters 2) (meters 8))
    (:rot-x 4)
    (:rot-z (degrees 0) (degrees 360))
    (:scale-y (meters 3) (meters 4))
    (:r 40.0)
    (:g 40.0 40.0)
    (:b 255.0)
    (:a 128.0)
    (:timer (seconds 0.017) (seconds 0.33))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3))
    (:userdata :data (new 'static 'boxed-array :type int32 10 1 0 #x405700 #x405800 #x405900))
    (:func 'sparticle-texture-animate)
    )
  )

;; failed to figure out what this is:
(defpart 3739
  :init-specs ((:texture (hotdot level-default-sprite))
    (:num 100.0)
    (:y (meters 10) (meters 5))
    (:scale-x (meters 0.3) (meters 0.5))
    (:rot-y (degrees 0) (degrees 360))
    (:scale-y :copy scale-x)
    (:r 128.0 1 128.0)
    (:g :copy r)
    (:b 255.0)
    (:a 255.0)
    (:vel-y (meters 0.16666667) (meters 0.6666667))
    (:fade-a -0.425)
    (:accel-y (meters -0.0026666666))
    (:friction 0.9)
    (:timer (seconds 2))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3))
    (:conerot-x (degrees 0) (degrees 360))
    (:rotate-y (degrees 0) (degrees 3600))
    )
  )

;; failed to figure out what this is:
(defpartgroup group-rubble-switch-sparks
  :id 1025
  :flags (sp0 sp4)
  :bounds (static-bspherem 0 0 0 40)
  :parts ((sp-item 3740 :fade-after (meters 100) :falloff-to (meters 200) :flags (sp7) :period (seconds 1) :length (seconds 0.017))
    (sp-item 3741 :fade-after (meters 100) :falloff-to (meters 200) :flags (sp7))
    (sp-item 3741 :fade-after (meters 100) :falloff-to (meters 200) :flags (sp7))
    )
  )

;; failed to figure out what this is:
(defpart 3740
  :init-specs ((:texture (gun-blue-hit-spek level-default-sprite))
    (:num 10.0)
    (:y (meters 1))
    (:scale-x (meters 0.05) (meters 0.1))
    (:rot-x 4)
    (:scale-y :copy scale-x)
    (:r 128.0)
    (:g 128.0)
    (:b 128.0 128.0)
    (:a 128.0 128.0)
    (:omega (degrees 0.0675))
    (:vel-y (meters 0.033333335) (meters 0.06666667))
    (:accel-y (meters -0.0016666667))
    (:friction 0.96 0.02)
    (:timer (seconds 1.667))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 launch-along-z left-multiply-quat))
    (:func 'sparticle-motion-blur)
    (:next-time (seconds 1))
    (:next-launcher 3742)
    (:conerot-x (degrees 0) (degrees 60))
    (:rotate-y (degrees 0) (degrees 3600))
    )
  )

;; failed to figure out what this is:
(defpart 3742
  :init-specs ((:fade-a -0.85333335 -0.85333335))
  )

;; failed to figure out what this is:
(defpart 3741
  :init-specs ((:texture (colorflash level-default-sprite))
    (:num 0.1)
    (:x (meters 0) (meters 1))
    (:y (meters 2))
    (:scale-x (meters 1) (meters 3))
    (:rot-x (degrees 2.25))
    (:scale-y :copy scale-x)
    (:r 100.0)
    (:g 100.0)
    (:b 128.0 2.0 128.0)
    (:a -512.0 5 128.0)
    (:scalevel-x (meters -0.033333335))
    (:scalevel-y :copy scalevel-x)
    (:timer (seconds 0.05))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
    (:userdata 409.6)
    (:rotate-y (degrees 0) (degrees 3600))
    )
  )

;; failed to figure out what this is:
(defpartgroup group-rhino-door-break
  :id 1003
  :flags (sp0 sp4)
  :bounds (static-bspherem 0 0 0 20)
  :parts ((sp-item 3743 :flags (sp7) :period (seconds 20) :length (seconds 0.067)))
  )

;; failed to figure out what this is:
(defpart 3743
  :init-specs ((:texture (big-cloud level-default-sprite))
    (:num 10.0)
    (:x (meters -12) (meters 24))
    (:y (meters -4) (meters 20))
    (:scale-x (meters 4) (meters 4))
    (:rot-z (degrees -90))
    (:scale-y :copy scale-x)
    (:r 100.0 80.0)
    (:g :copy r)
    (:b :copy r)
    (:a 64.0 64.0)
    (:scalevel-x (meters 0.0033333334) (meters 0.0033333334))
    (:rotvel-z (degrees -0.2) (degrees 0.4))
    (:scalevel-y :copy scalevel-x)
    (:fade-a -0.21333334 -0.21333334)
    (:accel-y (meters -0.00033333333))
    (:friction 0.9)
    (:timer (seconds 2))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-13))
    (:rotate-y (degrees 0))
    )
  )

;; failed to figure out what this is:
(defpartgroup group-rubble-tower-break
  :id 1026
  :flags (sp0 sp4)
  :bounds (static-bspherem 0 0 0 20)
  :parts ((sp-item 3744 :flags (sp7) :period (seconds 20) :length (seconds 0.067) :offset 20))
  )

;; failed to figure out what this is:
(defpart 3744
  :init-specs ((:texture (big-cloud level-default-sprite))
    (:num 10.0)
    (:y (meters -4))
    (:scale-x (meters 4) (meters 6))
    (:rot-z (degrees -90))
    (:scale-y :copy scale-x)
    (:r 120.0)
    (:g 100.0)
    (:b 80.0)
    (:a 0.0)
    (:vel-y (meters 0.33333334) (meters 0.33333334))
    (:scalevel-x (meters 0.013333334) (meters 0.013333334))
    (:rotvel-z (degrees -0.2) (degrees 0.4))
    (:scalevel-y :copy scalevel-x)
    (:fade-a 0.64 -0.64)
    (:accel-y (meters 0.00033333333))
    (:friction 0.9)
    (:timer (seconds 2))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-13))
    (:next-time (seconds 0.335))
    (:next-launcher 3745)
    (:conerot-x (degrees 80) (degrees 20))
    (:rotate-y (degrees 0) (degrees 3600))
    )
  )

;; failed to figure out what this is:
(defpart 3745
  :init-specs ((:fade-a -0.256 -0.256))
  )

;; failed to figure out what this is:
(defpartgroup group-elec-gate-sparks
  :id 1027
  :flags (sp0 sp4)
  :bounds (static-bspherem 0 0 0 20)
  :parts ((sp-item 3746 :flags (sp6 sp7) :period (seconds 20) :length (seconds 0.667))
    (sp-item 3747 :flags (sp6 sp7) :period (seconds 20) :length (seconds 0.667))
    )
  )

;; failed to figure out what this is:
(defpart 3746
  :init-specs ((:texture (lightning-anim-01 level-default-sprite))
    (:num 1.0 3.0)
    (:scale-x (meters 2) (meters 4))
    (:rot-x 4)
    (:rot-z (degrees 0) (degrees 360))
    (:scale-y (meters 2) (meters 3))
    (:r 40.0)
    (:g 40.0 40.0)
    (:b 255.0)
    (:a 128.0)
    (:timer (seconds 0.017) (seconds 0.33))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3))
    (:userdata :data (new 'static 'boxed-array :type int32 10 1 0 #x405700 #x405800 #x405900))
    (:func 'sparticle-texture-animate)
    )
  )

;; failed to figure out what this is:
(defpart 3747
  :init-specs ((:texture (lightning-anim-01 level-default-sprite))
    (:num 1.0 1.0)
    (:scale-x (meters 4) (meters 6))
    (:rot-x 4)
    (:rot-z (degrees 0) (degrees 360))
    (:scale-y (meters 3) (meters 4))
    (:r 40.0)
    (:g 40.0 40.0)
    (:b 255.0)
    (:a 128.0)
    (:timer (seconds 0.017) (seconds 0.33))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3))
    (:userdata :data (new 'static 'boxed-array :type int32 10 1 0 #x405700 #x405800 #x405900))
    (:func 'sparticle-texture-animate)
    )
  )