;;-*-Lisp-*- (in-package goal) ;; definition of type dig-part (deftype dig-part (part-spawner) () ) ;; definition for method 3 of type dig-part (defmethod inspect ((this dig-part)) (when (not this) (set! this this) (goto cfg-4) ) (let ((t9-0 (method-of-type part-spawner inspect))) (t9-0 this) ) (label cfg-4) this ) ;; failed to figure out what this is: (defpartgroup group-dig-hanging-light :id 1153 :bounds (static-bspherem 0 0 0 5) :parts ((sp-item 4995 :fade-after (meters 120) :flags (bit6)) (sp-item 4996 :fade-after (meters 120) :flags (bit6))) ) ;; failed to figure out what this is: (defpart 4995 :init-specs ((:texture (new 'static 'texture-id :index #xbb :page #xc)) (:num 1.0) (:scale-x (meters 2) (meters 0.1)) (:rot-x (degrees 2.25)) (:rot-z (degrees -17)) (:scale-y :copy scale-x) (:r 255.0) (:g 255.0) (:b 255.0) (:a 32.0) (:omega (degrees 2715.75)) (:timer (seconds 0.017)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 10240.0) ) ) ;; failed to figure out what this is: (defpart 4996 :init-specs ((:texture (new 'static 'texture-id :index #xbb :page #xc)) (:num 1.0) (:scale-x (meters 10) (meters 0.1)) (:rot-x (degrees 4.5)) (:rot-z (degrees -17)) (:scale-y :copy scale-x) (:r 255.0) (:g 255.0 255.0) (:b 255.0) (:a 16.0) (:omega (degrees 2715.75)) (:timer (seconds 0.017)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 2048.0) ) ) ;; failed to figure out what this is: (defpartgroup group-dig-digger-explode :id 1154 :duration (seconds 3) :flags (use-local-clock) :bounds (static-bspherem 0 0 0 15) :parts ((sp-item 4997 :period (seconds 32) :length (seconds 0.085)) (sp-item 4998 :period (seconds 32) :length (seconds 0.267) :offset 80) (sp-item 4999 :period (seconds 32) :length (seconds 0.035) :offset 25) (sp-item 5000 :period (seconds 32) :length (seconds 0.167) :offset 45) (sp-item 5001 :period (seconds 32) :length (seconds 0.117) :offset 30) (sp-item 5002 :period (seconds 32) :length (seconds 0.167) :offset 35) (sp-item 5003 :period (seconds 32) :length (seconds 0.017)) (sp-item 5004 :period (seconds 32) :length (seconds 0.167) :offset 35) (sp-item 5005 :period (seconds 32) :length (seconds 0.017)) (sp-item 5006 :flags (is-3d) :period (seconds 32) :length (seconds 0.017) :offset 20) ) ) ;; failed to figure out what this is: (defpart 4998 :init-specs ((:texture (new 'static 'texture-id :page #xc)) (:num 8.0) (:y (meters -2.5)) (:scale-x (meters 16.5) (meters 20)) (:rot-z (degrees 0) (degrees 360)) (:scale-y :copy scale-x) (:r 0.0 64.0) (:g :copy r) (:b :copy g) (:a 0.0) (:vel-y (meters 0.1) (meters 0.53333336)) (:scalevel-x (meters 0.05) (meters 0.1)) (:rotvel-z (degrees -0.12) (degrees 0.24)) (:scalevel-y :copy scalevel-x) (:fade-a 1.28 0.64) (:friction 0.92 0.02) (:timer (seconds 8)) (:flags (sp-cpuinfo-flag-2)) (:next-time (seconds 0.117) (seconds 0.097)) (:next-launcher 5007) (:conerot-x (degrees 0) (degrees 120)) (:conerot-y (degrees 0) (degrees 3600)) (:rotate-y (degrees 90)) (:conerot-radius (meters 0) (meters 16)) ) ) ;; failed to figure out what this is: (defpart 5007 :init-specs ((:scalevel-x (meters 0.016666668)) (:scalevel-y :copy scalevel-x) (:fade-a 0.0) (:next-time (seconds 2) (seconds 1.997)) (:next-launcher 5008) ) ) ;; failed to figure out what this is: (defpart 5008 :init-specs ((:scalevel-x (meters 0.016666668)) (:scalevel-y :copy scalevel-x) (:fade-a -0.08 -0.08)) ) ;; failed to figure out what this is: (defpart 5006 :init-specs ((:texture (new 'static 'texture-id :index #x2c :page #xc)) (:num 8.0) (:scale-x (meters 16)) (:scale-y :copy scale-x) (:r 255.0) (:g :copy r) (:b 128.0) (:a 136.0) (:scalevel-x (meters 2)) (:rotvel-y (degrees 0.1)) (:scalevel-y :copy scalevel-x) (:fade-r -1.0625) (:fade-g -2.125) (:fade-b -2.1333334) (:fade-a -3.2) (:timer (seconds 1.067)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 sp-cpuinfo-flag-14)) (:next-time (seconds 0.135)) (:next-launcher 5009) (:rotate-y (degrees 0) (degrees 3600)) ) ) ;; failed to figure out what this is: (defpart 5009 :init-specs ((:fade-a -0.06666667)) ) ;; failed to figure out what this is: (defpart 5003 :init-specs ((:texture (new 'static 'texture-id :index #xbb :page #xc)) (:num 1.0) (:y (meters -2.5)) (:scale-x (meters 64)) (:rot-x (degrees 45)) (:scale-y :copy scale-x) (:r 255.0) (:g 255.0) (:b 255.0) (:a 96.0) (:scalevel-x (meters 0.26666668)) (:rotvel-z (degrees 0.3)) (:scalevel-y :copy scalevel-x) (:fade-r 0.0) (:fade-g -1.28) (:fade-b -5.1) (:fade-a 0.0) (:timer (seconds 0.217)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 122880.0) (:next-time (seconds 0.1)) (:next-launcher 5010) ) ) ;; failed to figure out what this is: (defpart 5010 :init-specs ((:scalevel-x (meters -0.22857143)) (:scalevel-y :copy scalevel-x) (:fade-r 0.0) (:fade-g -3.6571429) (:fade-b 0.0) (:fade-a -2.7428572) ) ) ;; failed to figure out what this is: (defpart 5005 :init-specs ((:texture (new 'static 'texture-id :index #xca :page #xc)) (:num 1.0) (:scale-x (meters 80)) (:rot-x (degrees 45)) (:scale-y :copy scale-x) (:r 255.0) (:g 255.0) (:b 255.0) (:a 24.0) (:scalevel-x (meters 1.3333334)) (:rotvel-z (degrees 0.3)) (:scalevel-y :copy scalevel-x) (:fade-r 0.0) (:fade-g -4.266667) (:fade-b -4.266667) (:fade-a 0.0) (:timer (seconds 0.5)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 sp-cpuinfo-flag-14 glow)) (:userdata 409600.0) (:next-time (seconds 0.25)) (:next-launcher 5011) ) ) ;; failed to figure out what this is: (defpart 5011 :init-specs ((:scalevel-x (meters 0)) (:scalevel-y :copy scalevel-x) (:fade-r -0.85333335) (:fade-g -1.7066667) (:fade-b -1.7066667) (:fade-a -0.64) ) ) ;; failed to figure out what this is: (defpart 5001 :init-specs ((:texture (new 'static 'texture-id :index #x92 :page #xc)) (:num 16.0) (:y (meters 0)) (:scale-x (meters 2.5)) (:rot-x 4) (:scale-y (meters 0.2) (meters 0.3)) (:r 255.0) (:g 255.0) (:b 255.0) (:a 64.0 32.0) (:omega (degrees 0.0675)) (:vel-y (meters 0.53333336) (meters 0.33333334)) (:fade-b -8.0) (:accel-y (meters -0.0033333334) (meters -0.0016666667)) (:friction 0.9 0.08) (:timer (seconds 1.5) (seconds 0.997)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3)) (:func 'sparticle-motion-blur) (:next-time (seconds 0.05)) (:next-launcher 5012) (:conerot-x (degrees 0) (degrees 3600)) (:conerot-y (degrees 0) (degrees 3600)) (:rotate-y (degrees 90)) ) ) ;; failed to figure out what this is: (defpart 5012 :init-specs ((:r 255.0) (:g 255.0) (:b 0.0) (:fade-r 0.0) (:fade-g -2.6133332) (:fade-b -1.7066667) (:fade-a -0.096 -0.096) (:next-time (seconds 0.25)) (:next-launcher 5013) ) ) ;; failed to figure out what this is: (defpart 5013 :init-specs ((:fade-r 0.0) (:fade-g 0.0) (:fade-b 0.0)) ) ;; failed to figure out what this is: (defpart 5004 :init-specs ((:texture (new 'static 'texture-id :index #x34 :page #xc)) (:num 5.0) (:y (meters -2.5)) (:scale-x (meters 6) (meters 8)) (:rot-x 4) (:rot-z (degrees 0) (degrees 3600) :store) (:scale-y (meters 20) (meters 8)) (:r 255.0) (:g 255.0) (:b 255.0) (:a 16.0 16.0) (:vel-y (meters 0.1) (meters 0.4)) (:scalevel-x (meters 0.26666668) (meters 0.13333334)) (:scalevel-y :copy scalevel-x) (:fade-r 0.0) (:fade-g -0.36) (:fade-b -4.24) (:fade-a -0.13333334) (:friction 0.92 0.02) (:timer (seconds 3.335)) (:flags (sp-cpuinfo-flag-2)) (:func 'sparticle-motion-blur) (:next-time (seconds 0.085)) (:next-launcher 5014) (:conerot-x '*sp-temp*) (:conerot-y (degrees 0) (degrees 3600)) (:rotate-y (degrees 90)) (:conerot-radius (meters 0) (meters 2)) ) ) ;; failed to figure out what this is: (defpart 5014 :init-specs ((:scalevel-x (meters 0.016666668) (meters 0.016666668)) (:scalevel-y :copy scalevel-x) (:fade-r -0.55) (:fade-g -2.95) (:fade-b -3.3) (:next-time (seconds 0.1) (seconds 0.03)) (:next-launcher 5015) ) ) ;; failed to figure out what this is: (defpart 5015 :init-specs ((:scalevel-x (meters 0.008333334) (meters 0.008333334)) (:scalevel-y :copy scalevel-x) (:fade-r -1.2944444) (:fade-g -0.7111111) (:fade-b -0.2) (:fade-a -0.1 -0.1) ) ) ;; failed to figure out what this is: (defpart 5002 :init-specs ((:texture (new 'static 'texture-id :index #x33 :page #xc)) (:birth-func 'birth-func-texture-group) (:num 16.0 10.0) (:y (meters -2.5)) (:scale-x (meters 6) (meters 4)) (:rot-z (degrees 0)) (:scale-y (meters 12.8) (meters 2.4)) (:r 255.0) (:g 255.0) (:b 255.0) (:a 32.0 32.0) (:vel-y (meters 0.06666667) (meters 0.2)) (:scalevel-x (meters 0.26666668) (meters 0.2)) (:rotvel-z (degrees -0.3) (degrees 0.6)) (:scalevel-y :copy scalevel-x) (:fade-r 0.0) (:fade-g -0.36) (:fade-b -4.24) (:fade-a -0.32) (:friction 0.94) (:timer (seconds 3.335)) (:flags (sp-cpuinfo-flag-2)) (:userdata :data (new 'static 'boxed-array :type int32 40 1 0 #xc00000 #xc03300)) (:next-time (seconds 0.085)) (:next-launcher 5016) (:conerot-x (degrees 0) (degrees 3600)) (:conerot-y (degrees 0) (degrees 3600)) (:rotate-y (degrees 90)) (:conerot-radius (meters 0) (meters 8)) ) ) ;; failed to figure out what this is: (defpart 5016 :init-specs ((:fade-r 0.0) (:fade-g 0.0) (:fade-b 0.0) (:next-time (seconds 0.017) (seconds 0.065)) (:next-launcher 5017)) ) ;; failed to figure out what this is: (defpart 5017 :init-specs ((:scalevel-x (meters 0.016666668) (meters 0.016666668)) (:scalevel-y :copy scalevel-x) (:fade-r -0.44) (:fade-g -2.36) (:fade-b -2.64) (:next-time (seconds 0.117) (seconds 0.047)) (:next-launcher 5018) ) ) ;; failed to figure out what this is: (defpart 5018 :init-specs ((:scalevel-x (meters 0.008333334) (meters 0.008333334)) (:scalevel-y :copy scalevel-x) (:fade-r -1.2) (:fade-g -0.7111111) (:fade-b -0.2) (:fade-a -0.06545454 -0.06545454) (:next-time (seconds 0.5) (seconds 0.097)) (:next-launcher 5019) ) ) ;; failed to figure out what this is: (defpart 5019 :init-specs ((:fade-r 0.0) (:fade-g 0.0) (:fade-b 0.0) (:fade-a -0.1125)) ) ;; failed to figure out what this is: (defpart 5000 :init-specs ((:texture (new 'static 'texture-id :index #x32 :page #xc)) (:num 16.0 4.0) (:x (meters 0.25)) (:y (meters -2.5)) (:scale-x (meters 4) (meters 4)) (:rot-z (degrees 0) (degrees 360)) (:scale-y :copy scale-x) (:r 255.0) (:g 255.0) (:b 255.0) (:a 32.0 48.0) (:vel-y (meters 0.13333334) (meters 0.8)) (:scalevel-x (meters 0.02) (meters 0.02)) (:rotvel-z (degrees -0.12) (degrees 0.24)) (:scalevel-y :copy scalevel-x) (:fade-r 0.0) (:fade-g -0.18) (:fade-b -2.12) (:accel-y (meters -0.0013333333) (meters -0.0056666667)) (:friction 0.84 0.02) (:timer (seconds 10)) (:flags (sp-cpuinfo-flag-2)) (:next-time (seconds 0.117) (seconds 0.047)) (:next-launcher 5020) (:conerot-x (degrees 0) (degrees 3600)) (:conerot-y (degrees 0) (degrees 3600)) (:rotate-y (degrees 90)) (:conerot-radius (meters 3) (meters 5)) ) ) ;; failed to figure out what this is: (defpart 5020 :init-specs ((:scalevel-x (meters 0.0016666667)) (:scalevel-y :copy scalevel-x) (:fade-r 0.0) (:fade-g 0.02) (:fade-b 0.23555556) (:next-time (seconds 0.15) (seconds 0.047)) (:next-launcher 5021) ) ) ;; failed to figure out what this is: (defpart 5021 :init-specs ((:fade-r -0.5543478) (:fade-g -0.5543478) (:fade-b -0.5543478) (:fade-a -0.13333334 -0.10666667)) ) ;; failed to figure out what this is: (defpart 4997 :init-specs ((:texture (new 'static 'texture-id :page #xc)) (:num 12.0 8.0) (:y (meters -2.5)) (:scale-x (meters 16.5) (meters 16)) (:rot-z (degrees 0) (degrees 360)) (:scale-y :copy scale-x) (:r 70.0 20.0) (:g 70.0 20.0) (:b 70.0 20.0) (:a 0.0 40.0) (:vel-y (meters 0.06666667) (meters 0.33333334)) (:scalevel-x (meters 0.033333335) (meters 0.086666666)) (:rotvel-z (degrees -0.12) (degrees 0.24)) (:scalevel-y :copy scalevel-x) (:fade-r 3.3) (:fade-g 3.12) (:fade-b 1.18) (:fade-a 1.76) (:friction 0.89) (:timer (seconds 2.367)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3)) (:next-time (seconds 0.117) (seconds 0.047)) (:next-launcher 5022) (:conerot-x (degrees 0) (degrees 3600)) (:conerot-y (degrees 0) (degrees 3600)) (:rotate-y (degrees 90)) (:conerot-radius (meters 0) (meters 16)) ) ) ;; failed to figure out what this is: (defpart 5022 :init-specs ((:scalevel-x (meters 0.0033333334)) (:scalevel-y :copy scalevel-x) (:fade-r -0.53333336) (:fade-g -1.9666667) (:fade-b -2.2) (:fade-a -0.41666666) (:next-time (seconds 0.15) (seconds 0.047)) (:next-launcher 5023) ) ) ;; failed to figure out what this is: (defpart 5023 :init-specs ((:scalevel-x (meters 0)) (:scalevel-y :copy scalevel-x) (:fade-r -0.38833332) (:fade-g -0.21333334) (:fade-b -0.028333334) (:fade-a -0.38833332) ) ) ;; failed to figure out what this is: (defpart 4999 :init-specs ((:texture (new 'static 'texture-id :index #x31 :page #xc)) (:num 8.0) (:y (meters -2.5)) (:scale-x (meters 16) (meters 16)) (:rot-x 4) (:rot-z (degrees 0) (degrees 360)) (:scale-y (meters 1.5) (meters 0.5)) (:r 128.0 128.0) (:g 96.0) (:b 64.0) (:a 64.0 64.0) (:scalevel-x (meters 0.4) (meters 0.4)) (:fade-g 1.6) (:fade-b 3.2) (:fade-a -0.9142857) (:timer (seconds 0.3)) (:flags (sp-cpuinfo-flag-2)) ) ) ;; failed to figure out what this is: (defpartgroup group-dig-digger-trailer-small :id 1155 :bounds (static-bspherem 0 0 0 15) :parts ((sp-item 5024)) ) ;; failed to figure out what this is: (defpart 5024 :init-specs ((:texture (new 'static 'texture-id :page #xc)) (:num 0.0 1.0) (:scale-x (meters 3) (meters 5)) (:rot-z (degrees 0) (degrees 3600)) (:scale-y (meters 3) (meters 5)) (:r 64.0 128.0) (:g :copy r) (:b :copy g) (:a 0.0) (:scalevel-x (meters 0.006666667) (meters 0.01)) (:rotvel-z (degrees -0.3) (degrees 0.6)) (:scalevel-y :copy scalevel-x) (:fade-a 0.8 1.6) (:accel-y (meters -0.00033333333) (meters -0.00033333333)) (:timer (seconds 2.167)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)) (:next-time (seconds 0.067)) (:next-launcher 5025) (:conerot-x (degrees 0) (degrees 3600)) (:conerot-y (degrees 0) (degrees 3600)) (:conerot-radius (meters -1.5) (meters 5)) ) ) ;; failed to figure out what this is: (defpartgroup group-dig-digger-trailer-medium :id 1156 :bounds (static-bspherem 0 0 0 15) :parts ((sp-item 5026)) ) ;; failed to figure out what this is: (defpart 5026 :init-specs ((:texture (new 'static 'texture-id :page #xc)) (:num 0.0 1.0) (:scale-x (meters 6) (meters 6)) (:rot-z (degrees 0) (degrees 3600)) (:scale-y (meters 6) (meters 6)) (:r 64.0 128.0) (:g :copy r) (:b :copy g) (:a 0.0) (:scalevel-x (meters 0.006666667) (meters 0.013333334)) (:rotvel-z (degrees -0.3) (degrees 0.6)) (:scalevel-y :copy scalevel-x) (:fade-a 1.6 1.6) (:accel-y (meters -0.00033333333) (meters -0.00033333333)) (:timer (seconds 2.167)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)) (:next-time (seconds 0.067)) (:next-launcher 5025) (:conerot-x (degrees 0) (degrees 3600)) (:conerot-y (degrees 0) (degrees 3600)) (:conerot-radius (meters -1) (meters 4)) ) ) ;; failed to figure out what this is: (defpart 5025 :init-specs ((:fade-a -0.10666667 -0.42666668)) ) ;; failed to figure out what this is: (defpartgroup group-dig-digger-trailer-large :id 1157 :bounds (static-bspherem 0 0 0 15) :parts ((sp-item 5027)) ) ;; failed to figure out what this is: (defpart 5027 :init-specs ((:texture (new 'static 'texture-id :page #xc)) (:num 0.0 1.0) (:scale-x (meters 12) (meters 12)) (:rot-z (degrees 0) (degrees 3600)) (:scale-y (meters 8) (meters 8)) (:r 64.0 128.0) (:g :copy r) (:b :copy g) (:a 0.0) (:scalevel-x (meters 0.01) (meters 0.02)) (:rotvel-z (degrees -0.3) (degrees 0.6)) (:scalevel-y :copy scalevel-x) (:fade-a 1.6 2.4) (:accel-y (meters -0.00033333333) (meters -0.00033333333)) (:timer (seconds 2.167)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-12)) (:next-time (seconds 0.067)) (:next-launcher 5025) (:conerot-x (degrees 0) (degrees 3600)) (:conerot-y (degrees 0) (degrees 3600)) (:conerot-radius (meters -2) (meters 6)) ) ) ;; failed to figure out what this is: (defpartgroup group-dig-lava-glow-floor :id 1158 :bounds (static-bspherem 0 0 0 16) :parts ((sp-item 5032 :fade-after (meters 100) :falloff-to (meters 100) :flags (bit6)) (sp-item 5033 :fade-after (meters 40) :falloff-to (meters 40)) (sp-item 5034 :fade-after (meters 100) :falloff-to (meters 100)) (sp-item 5035 :fade-after (meters 80) :falloff-to (meters 80) :binding 5028) (sp-item 5028 :flags (bit1 start-dead) :binding 5029) (sp-item 5028 :flags (bit1 start-dead) :binding 5029) (sp-item 5028 :flags (bit1 start-dead) :binding 5029) (sp-item 5028 :flags (bit1 start-dead) :binding 5029) (sp-item 5028 :flags (bit1 start-dead) :binding 5029) (sp-item 5028 :flags (bit1 start-dead) :binding 5029) (sp-item 5028 :flags (bit1 start-dead) :binding 5029) (sp-item 5028 :flags (bit1 start-dead) :binding 5029) (sp-item 5029 :flags (bit1 start-dead)) (sp-item 5029 :flags (bit1 start-dead)) (sp-item 5029 :flags (bit1 start-dead)) (sp-item 5029 :flags (bit1 start-dead)) (sp-item 5029 :flags (bit1 start-dead)) (sp-item 5029 :flags (bit1 start-dead)) (sp-item 5029 :flags (bit1 start-dead)) (sp-item 5029 :flags (bit1 start-dead)) (sp-item 5029 :flags (bit1 start-dead)) (sp-item 5029 :flags (bit1 start-dead)) (sp-item 5036 :fade-after (meters 80) :falloff-to (meters 80) :binding 5030) (sp-item 5030 :flags (start-dead launch-asap)) (sp-item 5030 :flags (start-dead launch-asap)) (sp-item 5030 :flags (start-dead launch-asap)) (sp-item 5030 :flags (start-dead launch-asap)) (sp-item 5030 :flags (start-dead launch-asap)) (sp-item 5030 :flags (start-dead launch-asap)) (sp-item 5030 :flags (start-dead launch-asap)) (sp-item 5037 :fade-after (meters 80) :falloff-to (meters 80) :binding 5031) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) (sp-item 5031 :flags (bit1 start-dead launch-asap)) ) ) ;; failed to figure out what this is: (defpartgroup group-dig-lava-glow-wall :id 1159 :flags (unk-4 unk-6) :bounds (static-bspherem 0 0 0 16) :rotate ((degrees 90) (degrees 0) (degrees 0)) :parts ((sp-item 5038 :fade-after (meters 200) :falloff-to (meters 200) :flags (bit7)) (sp-item 5039 :fade-after (meters 120) :falloff-to (meters 120) :period (seconds 0.135) :length (seconds 0.017) :binding 5030) (sp-item 5030 :flags (start-dead launch-asap bit7)) (sp-item 5030 :flags (start-dead launch-asap bit7)) (sp-item 5030 :flags (start-dead launch-asap bit7)) (sp-item 5030 :flags (start-dead launch-asap bit7)) (sp-item 5030 :flags (start-dead launch-asap bit7)) (sp-item 5030 :flags (start-dead launch-asap bit7)) (sp-item 5030 :flags (start-dead launch-asap bit7)) ) ) ;; failed to figure out what this is: (defpart 5037 :init-specs ((:texture (new 'static 'texture-id :index #x26 :page #xc)) (:num 0.0 0.025) (:sound (static-sound-spec "fire-pop" :volume 10000.0)) (:x (meters 0) (meters 3)) (:scale-x (meters 0.1)) (:scale-y :copy scale-x) (:r 0.0) (:g 255.0) (:b 0.0) (:a 0.0) (:vel-y (meters 0.053333335) (meters 0.053333335)) (:accel-y (meters -0.0001) (meters -0.000033333334)) (:friction 0.98 0.01) (:timer (seconds 4)) (:flags (sp-cpuinfo-flag-1 sp-cpuinfo-flag-3)) (:conerot-x (degrees 0) (degrees 20)) (:conerot-y (degrees 0) (degrees 3600)) (:rotate-y (degrees 0) (degrees 3600)) ) ) ;; failed to figure out what this is: (defpart 5031 :init-specs ((:texture (new 'static 'texture-id :page #xc)) (:num 1.0) (:x (meters 0) (meters 16)) (:y (meters 0) (meters 16)) (:z (meters 0.3) (meters 0.6)) (:scale-x (meters 0.2) (meters 0.2)) (:scale-y (meters 0.2) (meters 0.2)) (:r 256.0) (:g 128.0 128.0) (:b 0.0 128.0) (:a 96.0 32.0) (:omega (degrees 0) (degrees 360)) (:vel-x (meters -0.053333335) (meters 0.10666667)) (:vel-y (meters -0.002962963) (meters 0.13333334)) (:vel-z (meters 0.0013333333) (meters 0.0026666666)) (:rotvel-z (degrees -1.2) (degrees 2.4)) (:fade-r 0.0) (:fade-g -0.56666666) (:fade-b -1.7066667) (:friction 0.995) (:timer (seconds 4)) (:flags (sp-cpuinfo-flag-1 sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 ready-to-launch)) (:next-time (seconds 1.5)) (:next-launcher 5040) ) ) ;; failed to figure out what this is: (defpart 5040 :init-specs ((:fade-r -0.28444445) (:fade-g 0.28444445) (:fade-b 0.28444445) (:next-time (seconds 1.5)) (:next-launcher 5041) ) ) ;; failed to figure out what this is: (defpart 5041 :init-specs ((:fade-r 0.0) (:fade-g 0.0) (:fade-b 0.0) (:fade-a -0.28444445)) ) ;; failed to figure out what this is: (defpart 5034 :init-specs ((:texture (new 'static 'texture-id :page #xc)) (:num 0.1) (:x (meters 0) (meters 5)) (:scale-x (meters 6) (meters 4)) (:rot-z (degrees 0) (degrees 360)) (:scale-y :copy scale-x) (:r 256.0) (:g 0.0 196.0) (:b 0.0) (:a 0.0) (:vel-y (meters 0.006666667) (meters 0.006666667)) (:scalevel-x (meters 0.0033333334)) (:rotvel-z (degrees -0.2) (degrees 0.4)) (:scalevel-y :copy scalevel-x) (:fade-a 0.42666668) (:friction 0.97 0.01) (:timer (seconds 2)) (:flags (sp-cpuinfo-flag-2)) (:next-time (seconds 0.125) (seconds 0.12)) (:next-launcher 5042) (:rotate-y (degrees 0) (degrees 3600)) ) ) ;; failed to figure out what this is: (defpart 5038 :init-specs ((:texture (new 'static 'texture-id :page #xc)) (:num 0.1) (:x (meters 0) (meters 5)) (:y (meters 1)) (:scale-x (meters 6) (meters 4)) (:rot-z (degrees 0) (degrees 360)) (:scale-y :copy scale-x) (:r 256.0) (:g 0.0 196.0) (:b 0.0) (:a 0.0) (:vel-y (meters 0.0033333334)) (:scalevel-x (meters 0.0033333334)) (:rotvel-z (degrees -0.2) (degrees 0.4)) (:scalevel-y :copy scalevel-x) (:fade-a 0.16410257) (:accel-y (meters 0.00033333333) (meters 0.00033333333)) (:friction 0.94 0.01) (:timer (seconds 2.4)) (:flags (sp-cpuinfo-flag-2 use-global-acc)) (:next-time (seconds 0.325) (seconds 0.32)) (:next-launcher 5042) (:rotate-y (degrees 0) (degrees 3600)) ) ) ;; failed to figure out what this is: (defpart 5036 :init-specs ((:texture (new 'static 'texture-id :index #xbb :page #xc)) (:num 0.0 0.05) (:x (meters 0) (meters 5)) (:scale-x (meters 3.5) (meters 1.5)) (:rot-x (degrees 0.45)) (:rot-z (degrees 0) (degrees 3600)) (:scale-y :copy scale-x) (:r 255.0) (:g 128.0) (:b 0.0) (:a 64.0) (:omega (degrees 3615.75)) (:rotvel-z (degrees -0.1) (degrees 0.2)) (:fade-a -0.2) (:timer (seconds 1.067)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 819.2) (:rotate-y (degrees 0) (degrees 3600)) ) ) ;; failed to figure out what this is: (defpart 5039 :init-specs ((:texture (new 'static 'texture-id :index #xbb :page #xc)) (:num 0.0 0.1) (:scale-x (meters 2.5) (meters 1.5)) (:rot-x (degrees 0.45)) (:rot-z (degrees 0) (degrees 3600)) (:scale-y :copy scale-x) (:r 255.0) (:g 128.0) (:b 0.0) (:a 64.0) (:omega (degrees 3615.75)) (:rotvel-z (degrees -0.1) (degrees 0.2)) (:fade-a -0.2) (:timer (seconds 1.067)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 3276.8) (:rotate-y (degrees 0)) ) ) ;; failed to figure out what this is: (defpart 5043 :init-specs ((:texture (new 'static 'texture-id :index #xbb :page #xc)) (:num 1.0) (:scale-x (meters 2.5) (meters 1.5)) (:rot-x (degrees 0.45)) (:rot-z (degrees 0) (degrees 3600)) (:scale-y :copy scale-x) (:r 255.0) (:g 128.0) (:b 0.0) (:a 64.0) (:omega (degrees 3615.75)) (:rotvel-z (degrees -0.1) (degrees 0.2)) (:fade-a -0.2) (:timer (seconds 1.067)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 819.2) (:rotate-y (degrees 0)) ) ) ;; failed to figure out what this is: (defpart 5035 :init-specs ((:texture (new 'static 'texture-id :page #xade)) (:num 0.0 0.01) (:x (meters 0) (meters 5)) (:scale-x (meters 0.75) (meters 0.25)) (:scale-y :copy scale-x) (:r 256.0) (:g 0.0 128.0) (:a 128.0) (:vel-y (meters 0.04) (meters 0.053333335)) (:fade-g -0.30476192) (:accel-y (meters -0.0026666666)) (:timer (seconds 2)) (:flags (sp-cpuinfo-flag-2)) (:func 'check-drop-level-dig-lava-bloops) (:conerot-x (degrees 0) (degrees 30)) (:conerot-y (degrees 0) (degrees 360)) (:rotate-y (degrees 0) (degrees 3600)) ) ) ;; failed to figure out what this is: (defpart 5032 :init-specs ((:texture (new 'static 'texture-id :page #xc)) (:num 0.02) (:x (meters -5) (meters 10)) (:y (meters 1) (meters 2)) (:scale-x (meters 5) (meters 5)) (:rot-x (degrees 4.5)) (:rot-y (degrees 0) (degrees 3600)) (:rot-z (degrees 0) (degrees 3600)) (:scale-y (meters 5) (meters 5)) (:r 255.0) (:g 0.0 196.0) (:b 0.0) (:a 0.0) (:omega (degrees 2265.75)) (:vel-y (meters 0.006666667) (meters 0.006666667)) (:fade-a 0.12) (:friction 0.97 0.02) (:timer (seconds 1.5)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 0.0) (:next-time (seconds 0.5)) (:next-launcher 5044) ) ) ;; definition for function check-drop-level-dig-lava-bloops ;; INFO: Used lq/sq (defun check-drop-level-dig-lava-bloops ((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 matrix)) "Ensure the lava bloop splats where it originated" (let ((origin-y (-> arg1 key origin trans y))) (when (< (-> arg2 vector 0 y) origin-y) (let ((gp-0 (new 'stack-no-clear 'vector))) (sp-kill-particle arg0 arg1) (set-vector! gp-0 (-> arg2 vector 0 x) origin-y (-> arg2 vector 0 z) 1.0) (launch-particles (-> *part-id-table* 5043) gp-0) (launch-particles (-> *part-id-table* 5030) gp-0) ) ) ) (none) ) ;; failed to figure out what this is: (defpart 5033 :init-specs ((:num 1.0) (:x (meters 0) (meters 10)) (:rot-x 5) (:r 8192.0) (:g 5324.8) (:b 5324.8) (:vel-y (meters 0.006666667) (meters 0.006666667)) (:fade-r 40.96) (:fade-g 27.306667) (:fade-b 38.229332) (:timer (seconds 0.5)) (:flags (distort)) (:next-time (seconds 0.25)) (:next-launcher 5045) (:rotate-y (degrees 0) (degrees 3600)) ) ) ;; failed to figure out what this is: (defpart 5045 :init-specs ((:fade-b 16.384)) ) ;; failed to figure out what this is: (defpart 5042 :init-specs ((:fade-a 0.0) (:next-time (seconds 0.25)) (:next-launcher 5046)) ) ;; failed to figure out what this is: (defpart 5046 :init-specs ((:fade-g -0.42666668) (:next-time (seconds 0.5)) (:next-launcher 5047)) ) ;; failed to figure out what this is: (defpart 5047 :init-specs ((:fade-r 0.0) (:fade-g 0.0) (:fade-a -0.10666667)) ) ;; failed to figure out what this is: (defpart 5028 :init-specs ((:texture (new 'static 'texture-id :index #xca :page #xc)) (:num 1.0) (:scale-x (meters 2.75) (meters 0.25)) (:rot-x (degrees 1.125)) (:rot-z (degrees 0) (degrees 3600)) (:scale-y (meters 2.75) (meters 0.25)) (:r 255.0) (:g 64.0 128.0) (:b 0.0) (:a 32.0 6.0) (:omega (degrees 2715.75)) (:timer (seconds 0.017)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 819.2) ) ) ;; failed to figure out what this is: (defpart 5029 :init-specs ((:texture (new 'static 'texture-id :page #xc)) (:num 1.5) (:scale-x (meters 0.6) (meters 0.6)) (:rot-z (degrees 0) (degrees 3600)) (:scale-y (meters 0.6) (meters 0.6)) (:r 128.0) (:g 0.0 128.0) (:b 0.0) (:a 64.0 64.0) (:vel-y (meters 0) (meters 0.00066666666)) (:scalevel-x (meters -0.0020833334)) (:rotvel-z (degrees -1.2) (degrees 2.4)) (:scalevel-y :copy scalevel-x) (:fade-a -0.10666667 -0.10666667) (:accel-y (meters -0.00033333333) (meters 0.001)) (:friction 0.9) (:timer (seconds 0.167) (seconds 0.665)) (:flags (sp-cpuinfo-flag-0 sp-cpuinfo-flag-3)) (:conerot-x (degrees 0) (degrees 3600)) (:conerot-y (degrees 0) (degrees 3600)) (:rotate-y (degrees 0)) (:conerot-radius (meters 0.2) (meters 0.2)) ) ) ;; failed to figure out what this is: (defpart 5030 :init-specs ((:texture (new 'static 'texture-id :page #xc)) (:num 32.0 2.0) (:x (meters 0) (meters 0.5)) (:scale-x (meters 0.4) (meters 0.3)) (:rot-z (degrees 0) (degrees 3600)) (:scale-y (meters 0.4) (meters 0.3)) (:r 128.0) (:g 0.0 128.0) (:b 0.0) (:a 128.0 64.0) (:vel-y (meters 0.016666668) (meters 0.013333334)) (:scalevel-x (meters -0.0013333333) (meters 0.00033333333)) (:rotvel-z (degrees -1.2) (degrees 2.4)) (:scalevel-y (meters -0.0013333333) (meters 0.00033333333)) (:fade-a -0.10666667 -0.10666667) (:accel-y (meters -0.00066666666) (meters -0.00066666666)) (:timer (seconds 1.5)) (:flags (sp-cpuinfo-flag-0 sp-cpuinfo-flag-3 use-global-acc)) (:conerot-x (degrees 0) (degrees 10)) (:conerot-y (degrees 0) (degrees 3600)) (:rotate-y (degrees 0) (degrees 3600)) (:conerot-radius (meters 0) (meters -0.2)) ) ) ;; failed to figure out what this is: (defpart 5044 :init-specs ((:fade-a -0.10666667 -0.10666667)) ) ;; failed to figure out what this is: (defpartgroup group-dig-big-lava-glow :id 1160 :bounds (static-bspherem 0 0 0 5) :parts ((sp-item 209))) ;; failed to figure out what this is: (defpart 5048 :init-specs ((:texture (new 'static 'texture-id :page #xc)) (:num 1.0) (:y (meters 2)) (:z (meters -2)) (:scale-x (meters 80) (meters 0.1)) (:rot-x (degrees 112.5)) (:rot-z (degrees -17)) (:scale-y :copy scale-x) (:r 255.0) (:g 32.0 16.0) (:b 0.0) (:a 12.0) (:omega (degrees 22520.25)) (:timer (seconds 0.017)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 2048.0) ) ) ;; failed to figure out what this is: (defpartgroup group-dig-big-light :id 1161 :bounds (static-bspherem 0 0 0 12) :parts ((sp-item 5049 :fade-after (meters 300) :flags (bit6)) (sp-item 5050 :fade-after (meters 300) :flags (bit6))) ) ;; failed to figure out what this is: (defpart 5049 :init-specs ((:texture (new 'static 'texture-id :index #xbb :page #xc)) (:num 2.0) (:y (meters -0.5) (meters 1)) (:scale-x (meters 8) (meters 0.5)) (:rot-x (degrees 11.25)) (:rot-z (degrees -17) (degrees 10)) (:scale-y :copy scale-x) (:r 0.0) (:g 128.0 32.0) (:b 255.0) (:a 8.0 16.0) (:omega (degrees 6763.5)) (:timer (seconds 0.017)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 20480.0) (:rotate-y (degrees 0)) ) ) ;; failed to figure out what this is: (defpart 5050 :init-specs ((:texture (new 'static 'texture-id :index #xca :page #xc)) (:num 2.0) (:y (meters -0.25) (meters 0.5)) (:scale-x (meters 25) (meters 0.5)) (:rot-x (degrees 11.25)) (:rot-z (degrees -17) (degrees 10)) (:scale-y :copy scale-x) (:r 0.0) (:g 128.0 32.0) (:b 255.0) (:a 8.0 8.0) (:omega (degrees 6763.5)) (:timer (seconds 0.017)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 20480.0) (:rotate-y (degrees 0)) ) ) ;; failed to figure out what this is: (defpart 5051 :init-specs ((:texture (new 'static 'texture-id :index #xbb :page #xc)) (:num 2.0) (:y (meters -0.05) (meters 0.1)) (:scale-x (meters 8) (meters 0.5)) (:rot-x (degrees 11.25)) (:rot-z (degrees -17) (degrees 10)) (:scale-y :copy scale-x) (:r 0.0) (:g 128.0 32.0) (:b 255.0) (:a 16.0) (:omega (degrees 6763.5)) (:timer (seconds 0.017)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 20480.0) (:rotate-y (degrees 0)) ) ) ;; failed to figure out what this is: (defpart 5052 :init-specs ((:texture (new 'static 'texture-id :index #xca :page #xc)) (:num 2.0) (:scale-x (meters 25) (meters 0.5)) (:rot-x (degrees 11.25)) (:rot-z (degrees -17) (degrees 10)) (:scale-y :copy scale-x) (:r 0.0) (:g 128.0 32.0) (:b 255.0) (:a 8.0 8.0) (:omega (degrees 6763.5)) (:timer (seconds 0.017)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 20480.0) (:rotate-y (degrees 0)) ) ) ;; failed to figure out what this is: (defpartgroup group-dig-red-light :id 1162 :bounds (static-bspherem 0 0 0 8) :parts ((sp-item 5053 :fade-after (meters 80) :flags (bit6)) (sp-item 5054 :fade-after (meters 120) :flags (bit6))) ) ;; failed to figure out what this is: (defpart 5053 :init-specs ((:texture (new 'static 'texture-id :index #xbb :page #xc)) (:num 1.0) (:scale-x (meters 0.7) (meters 0.1)) (:rot-x (degrees 1.125)) (:scale-y :copy scale-x) (:r 255.0) (:g 0.0 64.0) (:b 0.0) (:a 24.0 4.0) (:omega (degrees 1815.7499)) (:timer (seconds 0.017)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 1024.0) ) ) ;; failed to figure out what this is: (defpart 5054 :init-specs ((:texture (new 'static 'texture-id :index #xbb :page #xc)) (:num 1.0) (:scale-x (meters 4) (meters 0.1)) (:rot-x (degrees 1.125)) (:scale-y :copy scale-x) (:r 255.0) (:g 0.0 32.0) (:b 0.0) (:a 8.0) (:omega (degrees 2715.75)) (:timer (seconds 0.017)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 1024.0) ) ) ;; failed to figure out what this is: (defpartgroup group-dig-lantern :id 1163 :bounds (static-bspherem 0 0.1 0 1) :parts ((sp-item 5055 :fade-after (meters 180) :flags (bit6)) (sp-item 5056 :fade-after (meters 180) :flags (bit6))) ) ;; failed to figure out what this is: (defpart 5055 :init-specs ((:texture (new 'static 'texture-id :index #xca :page #xc)) (:num 1.0) (:scale-x (meters 2.5) (meters 0.1)) (:rot-x (degrees 2.25)) (:rot-z (degrees -17)) (:scale-y :copy scale-x) (:r 220.0) (:g 255.0) (:b 128.0) (:a 32.0) (:omega (degrees 4065.75)) (:timer (seconds 0.017)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 4096.0) ) ) ;; failed to figure out what this is: (defpart 5056 :init-specs ((:texture (new 'static 'texture-id :index #xca :page #xc)) (:num 1.0) (:scale-x (meters 16) (meters 0.1)) (:rot-x (degrees 22.5)) (:rot-z (degrees -17)) (:scale-y :copy scale-x) (:r 220.0) (:g 255.0) (:b 128.0) (:a 16.0) (:omega (degrees 4065.75)) (:timer (seconds 0.017)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow)) (:userdata 819.2) ) ) ;; failed to figure out what this is: (defpartgroup group-dig-jump-pad-launcher :id 1147 :duration (seconds 4) :flags (use-local-clock) :bounds (static-bspherem 0 3 0 5) :parts ((sp-item 77 :fade-after (meters 100) :falloff-to (meters 100)) (sp-item 5057 :fade-after (meters 70) :falloff-to (meters 100) :flags (is-3d)) (sp-item 5058 :fade-after (meters 70) :falloff-to (meters 100) :flags (is-3d)) (sp-item 5059 :fade-after (meters 70) :falloff-to (meters 100)) (sp-item 5060 :fade-after (meters 70) :falloff-to (meters 100) :period (seconds 5) :length (seconds 0.335)) ) ) ;; failed to figure out what this is: (defpart 5057 :init-specs ((:texture (new 'static 'texture-id :index #xc9 :page #xc)) (:num 1.0) (:x (meters 0) (meters 1.4)) (:scale-x (meters 0.2)) (:rot-x (degrees 90)) (:rot-z (degrees 0) (degrees 360)) (:scale-y (meters 2.5) (meters 2.5)) (:r 64.0 32.0) (:g 32.0 32.0) (:b 10.0 5.0) (:a 128.0) (:scalevel-x (meters -0.0025)) (:scalevel-y (meters 0.12207031) (meters 0.24414062)) (:timer (seconds 0.15)) (:flags (sp-cpuinfo-flag-3)) (:rotate-y (degrees 0) (degrees 360)) ) ) ;; failed to figure out what this is: (defpart 5058 :init-specs ((:texture (new 'static 'texture-id :index #xc9 :page #xc)) (:num 2.0) (:x (meters 1.4) (meters 0.9)) (:scale-x (meters 0.2)) (:rot-x (degrees 90)) (:rot-z (degrees 0) (degrees 360)) (:scale-y (meters 0.5) (meters 1)) (:r 64.0 32.0) (:g 32.0 32.0) (:b 10.0 5.0) (:a 128.0) (:scalevel-x (meters -0.0025)) (:scalevel-y (meters 0.024414062) (meters 0.048828125)) (:timer (seconds 0.15)) (:flags (sp-cpuinfo-flag-3)) (:rotate-y (degrees 0) (degrees 360)) ) ) ;; failed to figure out what this is: (defpart 5059 :init-specs ((:texture (new 'static 'texture-id :page #xc)) (:num 0.5) (:x (meters 1.45) (meters 1.25)) (:y (meters -0.5)) (:scale-x (meters 2) (meters 1)) (:rot-z (degrees 0) (degrees 360)) (:scale-y :copy scale-x) (:r 64.0 32.0) (:g 32.0 32.0) (:b 10.0 5.0) (:a 0.0) (:vel-x (meters -0.011666667) (meters -0.0033333334)) (:vel-y (meters 0)) (:rotvel-z (degrees -1.2) 1 (degrees 2.4)) (:fade-a 0.6) (:accel-y (meters 0.0016666667)) (:friction 0.996) (:timer (seconds 0.9)) (:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3)) (:next-time (seconds 0.15)) (:next-launcher 83) (:rotate-y (degrees 0) (degrees 360)) ) ) ;; failed to figure out what this is: (defpart 5060 :init-specs ((:texture (new 'static 'texture-id :index #xbb :page #xc)) (:num 1.0) (:y (meters -0.5)) (:scale-x (meters 7) (meters 1)) (:rot-x (degrees 11.25)) (:scale-y :copy scale-x) (:r 64.0 8.0) (:g 48.0 8.0) (:b 10.0 5.0) (:a 128.0) (:omega (degrees 2715.75)) (:timer (seconds 0.017)) (:flags (glow)) (:userdata 20480.0) ) )