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

;; name: precurd-part.gc
;; name in dgo: precurd-part
;; dgos: PRECA, PRECD

;; DECOMP BEGINS

(defpartgroup group-precur-debris-wind
  :id 1309
  :flags (sp0 sp4 sp10)
  :bounds (static-bspherem 0 0 0 500)
  :parts ((sp-item 4401 :flags (is-3d sp7)) (sp-item 4402 :flags (sp7)) (sp-item 4403 :flags (sp7)))
  )

(defpart 4401
  :init-specs ((:texture (crate-wood-01-splinter level-default-sprite))
    (:birth-func 'birth-func-texture-group)
    (:num 0.5)
    (:x (meters 0) (meters 50))
    (:z (meters -300))
    (:scale-x (meters 0.5) (meters 10))
    (:scale-y (meters 0.5) (meters 10))
    (:r 20.0 50.0)
    (:g :copy r)
    (:b :copy r)
    (:a 128.0)
    (:vel-z (meters 0.6) (meters 0.06666667))
    (:rotvel-x (degrees -5) (degrees 10))
    (:rotvel-y (degrees -5) (degrees 10))
    (:rotvel-z (degrees -5) (degrees 10))
    (:timer (seconds 2.5))
    (:flags (launch-along-z left-multiply-quat))
    (:userdata :data (new 'static 'boxed-array :type int32 5 0 0 #x400600 -743440384 -743440128 -743439872))
    (:next-time (seconds 0.335))
    (:next-launcher 4404)
    (:rotate-y (degrees 0))
    (:rotate-z (degrees 0) (degrees 3600))
    )
  )

(defpart 4404
  :init-specs ((:r 20.0 50.0)
    (:g :copy r)
    (:b :copy r)
    (:rotvel-x (degrees -5) (degrees 10))
    (:rotvel-y (degrees -5) (degrees 10))
    (:rotvel-z (degrees -5) (degrees 10))
    (:accel-x (meters -0.0033333334) (meters 0.006666667))
    (:accel-y (meters -0.0033333334) (meters 0.006666667))
    (:accel-z (meters -0.0033333334) (meters 0.006666667))
    (:next-time (seconds 0.017) (seconds 0.997))
    (:next-launcher 4405)
    )
  )

(defpart 4405
  :init-specs ((:r 255.0)
    (:g :copy r)
    (:b :copy r)
    (:rotvel-x (degrees -5) (degrees 10))
    (:rotvel-y (degrees -5) (degrees 10))
    (:rotvel-z (degrees -5) (degrees 10))
    (:next-time (seconds 0.017))
    (:next-launcher 4404)
    )
  )

(defpart 4402
  :init-specs ((:texture (big-cloud level-default-sprite))
    (:num 3.0)
    (:x (meters 0) (meters 50))
    (:z (meters -300))
    (:scale-x (meters 10) (meters 10))
    (:rot-z (degrees 0) (degrees 360))
    (:scale-y :copy scale-x)
    (:r 128.0 100.0)
    (:g :copy r)
    (:b :copy r)
    (:a 0.0)
    (:vel-z (meters 0.6) (meters 0.06666667))
    (:fade-a 0.06 0.06)
    (:timer (seconds 2.5))
    (:flags ())
    (:next-time (seconds 0.335))
    (:next-launcher 4406)
    (:rotate-y (degrees 0))
    (:rotate-z (degrees 0) (degrees 3600))
    )
  )

(defpart 4406
  :init-specs ((:fade-a 0.0))
  )

(defpart 4403
  :init-specs ((:texture (big-cloud level-default-sprite))
    (:num 2.0)
    (:x (meters 40) (meters 40))
    (:z (meters -300))
    (:scale-x (meters 20) (meters 40))
    (:rot-z (degrees 0) (degrees 360))
    (:scale-y :copy scale-x)
    (:r 128.0 100.0)
    (:g :copy r)
    (:b :copy r)
    (:a 0.0)
    (:vel-z (meters 0.6666667) (meters 0.06666667))
    (:fade-a 0.08 0.08)
    (:timer (seconds 2.5))
    (:flags ())
    (:next-time (seconds 0.335))
    (:next-launcher 4406)
    (:rotate-y (degrees 0))
    (:rotate-z (degrees 0) (degrees 3600))
    )
  )

(defpartgroup group-precurd-bulb-green-glow-small
  :id 1310
  :bounds (static-bspherem 0 0 0 3)
  :parts ((sp-item 4407 :fade-after (meters 120) :flags (sp6)))
  )

(defpart 4407
  :init-specs ((:texture (glow-soft level-default-sprite))
    (:num 1.0)
    (:scale-x (meters 5) (meters 0.1))
    (:rot-x (degrees 9))
    (:rot-z (degrees -17))
    (:scale-y :copy scale-x)
    (:r 0.0)
    (:g 128.0)
    (:b 0.0)
    (:a 40.0 4.0)
    (:omega (degrees 2715.75))
    (:timer (seconds 0.017))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
    (:userdata 819.2)
    )
  )

(defpartgroup group-precurd-bulb-green-glow-long
  :id 1311
  :bounds (static-bspherem 0 0 0 3)
  :parts ((sp-item 4408 :fade-after (meters 120) :flags (sp6)))
  )

(defpart 4409
  :init-specs ((:texture (glow-soft level-default-sprite))
    (:num 1.0)
    (:scale-x (meters 10) (meters 0.1))
    (:rot-x (degrees 9))
    (:rot-z (degrees -17))
    (:scale-y :copy scale-x)
    (:r 0.0)
    (:g 128.0)
    (:b 0.0)
    (:a 40.0 4.0)
    (:omega (degrees 2715.75))
    (:timer (seconds 0.017))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
    (:userdata 819.2)
    )
  )

(defpartgroup group-precurd-bulb-ceiling-glow
  :id 1312
  :bounds (static-bspherem 0 0 0 3)
  :parts ((sp-item 4410 :fade-after (meters 120) :flags (sp6)))
  )

(defpart 4410
  :init-specs ((:texture (glow-soft level-default-sprite))
    (:num 1.0)
    (:scale-x (meters 22) (meters 2))
    (:rot-x (degrees 9))
    (:rot-z (degrees -17))
    (:scale-y :copy scale-x)
    (:r 0.0)
    (:g 128.0)
    (:b 128.0)
    (:a 40.0 4.0)
    (:omega (degrees 2715.75))
    (:timer (seconds 0.017))
    (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
    (:userdata 819.2)
    )
  )
