Files
jak-project/test/decompiler/reference/engine/ui/progress/progress-part_REF.gc
T
ManDude 89ccb8cbc7 [decomp] progress (#780)
* cleanup `main`

* whitespace

* start `progress` decomp pt1

* fill in more stuff

* Update label_types.jsonc

* run cheats

* clang

* make most of `progress` decompile

* `progress` pt 2

* [decompiler] support dynamic format strings

* Make `progress-draw` decompile and almost all `progress`

* make clang shut up

* fix unhandled format string

* fix `progress-draw`

* Update DecompilerTypeSystem.cpp

* fix?

* fixes

* fix a few functions

* make `language-enum`

* warn on weird floats

* fix minor pad bug

* dump stuff in `progress`

* make `progress-screen` enum

* progress progress

* update refs and fix stupid bug

* trying to get it to work

* it works!?

* disable sound functions

* fixes

* final touches

* tests

* tests

* add process allocations

* use the right register for windows

* another try for windows, counting is hard

* one more try

* use process allocations

Co-authored-by: water <awaterford111445@gmail.com>
2021-09-06 20:35:03 -04:00

3657 lines
93 KiB
Common Lisp
Vendored

;;-*-Lisp-*-
(in-package goal)
;; definition for function part-progress-hud-left-func
;; INFO: Return type mismatch float vs none.
(defun
part-progress-hud-left-func
((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 matrix))
(let ((v1-0 *progress-process*))
(set! (-> arg2 vector 0 w) (-> v1-0 0 left-side-x-scale))
(set! (-> arg2 vector 1 w) (-> v1-0 0 left-side-y-scale))
)
(none)
)
;; definition for function part-progress-hud-right-func
;; INFO: Return type mismatch float vs none.
(defun
part-progress-hud-right-func
((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 matrix))
(let ((v1-0 *progress-process*))
(set! (-> arg2 vector 0 w) (-> v1-0 0 right-side-x-scale))
(set! (-> arg2 vector 1 w) (-> v1-0 0 right-side-y-scale))
)
(none)
)
;; definition for function part-progress-hud-orb-func
;; INFO: Return type mismatch float vs none.
(defun
part-progress-hud-orb-func
((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 matrix))
(set! (-> arg2 vector 0 w) (/ 5324.8 (-> *progress-process* 0 sides-x-scale)))
(set! (-> arg2 vector 1 w) (/ 5324.8 (-> *progress-process* 0 sides-x-scale)))
(none)
)
;; definition for function part-progress-hud-buzzer-func
;; INFO: Return type mismatch float vs none.
(defun
part-progress-hud-buzzer-func
((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 matrix))
(set! (-> arg2 vector 0 w) (/ 6144.0 (-> *progress-process* 0 sides-x-scale)))
(set! (-> arg2 vector 1 w) (/ 6144.0 (-> *progress-process* 0 sides-x-scale)))
(none)
)
;; definition for function part-progress-hud-button-func
;; INFO: Return type mismatch float vs none.
(defun
part-progress-hud-button-func
((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 matrix))
(set! (-> arg2 vector 0 w) (/ 6553.6 (-> *progress-process* 0 sides-x-scale)))
(set! (-> arg2 vector 1 w) (/ 6553.6 (-> *progress-process* 0 sides-x-scale)))
(none)
)
;; definition for function part-progress-hud-tint-func
;; INFO: Return type mismatch int vs none.
(defun
part-progress-hud-tint-func
((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 matrix))
(set!
(-> arg2 vector 2 w)
(the float (- 64 (sar (* 63 (-> *progress-process* 0 in-out-position)) 12)))
)
0
(none)
)
;; definition for function part-progress-card-slot-01-func
;; INFO: Return type mismatch int vs none.
(defun
part-progress-card-slot-01-func
((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 matrix))
(set! (-> arg2 vector 2 w) (if (zero? (-> *progress-process* 0 option-index))
64.0
32.0
)
)
(set! (-> arg2 vector 1 w) (-> *progress-process* 0 slot-scale))
0
(none)
)
;; definition for function part-progress-card-slot-02-func
;; INFO: Return type mismatch int vs none.
(defun
part-progress-card-slot-02-func
((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 matrix))
(set! (-> arg2 vector 2 w) (if (= (-> *progress-process* 0 option-index) 1)
64.0
32.0
)
)
(set! (-> arg2 vector 1 w) (-> *progress-process* 0 slot-scale))
0
(none)
)
;; definition for function part-progress-card-slot-03-func
;; INFO: Return type mismatch int vs none.
(defun
part-progress-card-slot-03-func
((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 matrix))
(set! (-> arg2 vector 2 w) (if (= (-> *progress-process* 0 option-index) 2)
64.0
32.0
)
)
(set! (-> arg2 vector 1 w) (-> *progress-process* 0 slot-scale))
0
(none)
)
;; definition for function part-progress-card-slot-04-func
;; INFO: Return type mismatch int vs none.
(defun
part-progress-card-slot-04-func
((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 matrix))
(set! (-> arg2 vector 2 w) (if (= (-> *progress-process* 0 option-index) 3)
64.0
32.0
)
)
(set! (-> arg2 vector 1 w) (-> *progress-process* 0 slot-scale))
0
(none)
)
;; definition for function part-progress-card-cell-func
;; INFO: Return type mismatch int vs none.
(defun
part-progress-card-cell-func
((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 matrix))
(let
((f0-1
(* 2.0 (+ -0.5 (-> *progress-process* 0 transition-percentage-invert)))
)
)
(if (< f0-1 0.0)
(set! f0-1 0.0)
)
(set! (-> arg2 vector 2 w) (* 128.0 f0-1))
)
0
(none)
)
;; definition for function part-progress-save-icon-func
;; INFO: Return type mismatch int vs none.
(defun
part-progress-save-icon-func
((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 matrix))
(let
((f0-1 (* 6144.0 (-> *progress-process* 0 transition-percentage-invert))))
(set! (-> arg2 vector 0 w) f0-1)
(set! (-> arg2 vector 1 w) f0-1)
)
0
(none)
)
;; definition for function fuel-cell-progress-hud-orbit-callback
;; INFO: Return type mismatch int vs none.
(defun
fuel-cell-progress-hud-orbit-callback
((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 matrix))
(let* ((a0-1 (-> arg1 key))
(s5-0 (the-as progress (-> a0-1 proc)))
(v1-0 (the int (the-as float (-> arg1 user-float))))
(s4-0 -1)
)
(let ((a1-1 0))
(dotimes (a2-1 (-> *progress-process* 0 nb-of-particles))
(if (= (-> a0-1 matrix) (-> s5-0 particles a1-1 part matrix))
(set! s4-0 a1-1)
)
(+! a1-1 1)
)
)
(cond
((= v1-0 3)
(if (= (-> s5-0 particle-state s4-0) 1)
(set! (-> arg2 vector 2 w) 42.0)
(set! (-> arg2 vector 2 w) 128.0)
)
0
)
(else
(let ((s3-0 (new 'stack-no-clear 'vector))
(s2-0 (new 'stack-no-clear 'vector))
)
(cond
((or
(= s4-0 -1)
(= (-> s5-0 particle-state s4-0) 2)
(= (-> s5-0 particle-state s4-0) 1)
)
(set! (-> arg2 vector 0 x) 245760.0)
)
((= v1-0 -1)
(set! (-> arg2 vector 0 x) 0.0)
(set! (-> arg2 vector 0 y) 0.0)
)
(else
(vector<-cspace!
s3-0
(-> s5-0 icons (logand s4-0 3) icon 0 node-list data v1-0)
)
(vector<-cspace!
s2-0
(-> s5-0 icons (logand s4-0 3) icon 0 node-list data 3)
)
(vector-! s3-0 s3-0 s2-0)
(set! (-> arg2 vector 0 x) (* 48.0 (-> s3-0 x)))
(set! (-> arg2 vector 0 y) (* 60.0 (-> s3-0 y)))
(set! (-> arg2 vector 0 z) (* 32.0 (-> s3-0 z)))
)
)
)
0
)
)
)
0
(none)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 85)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x5
:name "group-part-progress-hud-previous"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x14c :flags #x8)
)
:bounds (new 'static 'sphere :w 4096.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 86)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x5
:name "group-part-progress-hud-next"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x14d :flags #x8)
)
:bounds (new 'static 'sphere :w 4096.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 87)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-hud-selector"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x14e :flags #x8)
)
:bounds (new 'static 'sphere :w 4096.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 88)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-hud-left"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x14f :flags #x8)
)
:bounds (new 'static 'sphere :w 4096.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 89)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-hud-right"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x150 :flags #x8)
)
:bounds (new 'static 'sphere :w 4096.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 90)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-hud-tint"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x151 :flags #x8)
)
:bounds (new 'static 'sphere :w 4096.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 91)
(new 'static 'sparticle-launch-group
:length 3
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-card-cell"
:launcher
(new 'static 'inline-array sparticle-group-item 3
(new 'static 'sparticle-group-item :launcher #x88e :flags #x8)
(new 'static 'sparticle-group-item :launcher #x88f :flags #x8)
(new 'static 'sparticle-group-item :launcher #x890 :flags #x8)
)
:bounds (new 'static 'sphere :w 4096.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 570)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-button-x"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x920 :flags #x8)
)
:bounds (new 'static 'sphere :w 4096.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 571)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-button-square"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x921 :flags #x8)
)
:bounds (new 'static 'sphere :w 4096.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 572)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-button-triangle"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x922 :flags #x8)
)
:bounds (new 'static 'sphere :w 4096.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 573)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-button-circle"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x923 :flags #x8)
)
:bounds (new 'static 'sphere :w 4096.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 92)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-card-slot-01"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x85e :flags #x8)
)
:bounds (new 'static 'sphere :w 4096.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 93)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-card-slot-02"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x85f :flags #x8)
)
:bounds (new 'static 'sphere :w 4096.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 94)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-card-slot-03"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x860 :flags #x8)
)
:bounds (new 'static 'sphere :w 4096.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 95)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-card-slot-04"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x861 :flags #x8)
)
:bounds (new 'static 'sphere :w 4096.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 96)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name
"group-part-progress-hud-power-cell-center"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x152 :flags #x8)
)
:bounds (new 'static 'sphere :w 409600.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 337)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 12
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x203600)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 61440.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x1
:initial-valuef 47104.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 32.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec :field #x14 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 64.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2204)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-hud-tint-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 2190)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 12
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef 0.0000000000000000000015910302
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 3276.8
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2200)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-card-cell-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 2191)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 13
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef 0.0000000000000000000015910044
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xa
:flags #x1
:initial-valuef 4300.8
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 3276.8
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2200)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-card-cell-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 2192)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 13
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef 0.0000000000000000000015909785
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xa
:flags #x1
:initial-valuef 9420.8
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 3276.8
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2200)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-card-cell-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 2336)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 12
(new 'static 'sp-field-init-spec :field #x1 :initial-valuef 4.0006104)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 6553.6
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2204)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-hud-button-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 2337)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 12
(new 'static 'sp-field-init-spec :field #x1 :initial-valuef 4.0007324)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 6553.6
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2204)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-hud-button-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 2338)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 12
(new 'static 'sp-field-init-spec :field #x1 :initial-valuef 4.0008545)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 6553.6
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2204)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-hud-button-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 2339)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 12
(new 'static 'sp-field-init-spec :field #x1 :initial-valuef 4.0009766)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 6553.6
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2204)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-hud-button-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 2142)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 12
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x203600)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 37683.2
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x1
:initial-valuef 8192.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec :field #x12 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec :field #x13 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec :field #x14 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 64.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2200)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-card-slot-01-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 2143)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 12
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x203600)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 37683.2
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x1
:initial-valuef 8192.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec :field #x12 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec :field #x13 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec :field #x14 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 64.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2200)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-card-slot-02-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 2144)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 12
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x203600)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 37683.2
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x1
:initial-valuef 8192.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec :field #x12 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec :field #x13 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec :field #x14 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 64.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2200)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-card-slot-03-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 2145)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 12
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x203600)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 37683.2
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x1
:initial-valuef 8192.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec :field #x12 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec :field #x13 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec :field #x14 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 64.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2200)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-card-slot-04-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 332)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 11
(new 'static 'sp-field-init-spec :field #x1 :initial-valuef 4.000244)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 4915.2
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2204)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 333)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 11
(new 'static 'sp-field-init-spec :field #x1 :initial-valuef 4.000122)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 4915.2
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2204)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 334)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 11
(new 'static 'sp-field-init-spec :field #x1 :initial-valuef 4.0004883)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 7372.8
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2204)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 335)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 12
(new 'static 'sp-field-init-spec :field #x1 :initial-valuef 4.0)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 14336.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x1
:initial-valuef 53248.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2204)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-hud-left-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 336)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 12
(new 'static 'sp-field-init-spec :field #x1 :initial-valuef 4.000366)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 24576.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x1
:initial-valuef 53248.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2204)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-hud-right-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 339)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 13
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x203100)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 1228.8
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2200)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x30
:flags #x1
:initial-valuef 4.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'fuel-cell-progress-hud-orbit-callback
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 340)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 13
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x203100)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 1228.8
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2200)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x30
:flags #x1
:initial-valuef 5.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'fuel-cell-progress-hud-orbit-callback
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 341)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 13
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x203100)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 1228.8
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2200)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x30
:flags #x1
:initial-valuef 6.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'fuel-cell-progress-hud-orbit-callback
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 342)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 13
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x203100)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 1228.8
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2200)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x30
:flags #x1
:initial-valuef 7.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'fuel-cell-progress-hud-orbit-callback
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 343)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 13
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x203100)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 819.2
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2200)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x30
:flags #x1
:initial-valuef 9.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'fuel-cell-progress-hud-orbit-callback
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 338)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 13
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x203000)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 4915.2
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2204)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x30
:flags #x1
:initial-valuef 3.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'fuel-cell-progress-hud-orbit-callback
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 344)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 2
(new 'static 'sp-field-init-spec
:field #x24
:flags #x1
:initial-valuef -0.53333336
:random-multf 1.0
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 345)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 22
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x200200)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 0.5
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xc
:flags #x1
:initial-valuef 2160.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 1024.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xe
:initial-valuef (the-as float #x4)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x10
:flags #x1
:random-rangef 65536.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x1
:initial-valuef 286.72
:random-rangef 1884.16
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x2
:random-rangef (the-as float #x1)
:random-multf 255.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x2
:random-rangef (the-as float #x1)
:random-multf 255.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x2
:random-rangef (the-as float #x1)
:random-multf 255.0
)
(new 'static 'sp-field-init-spec :field #x15 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec
:field #x1c
:flags #x1
:initial-valuef 40.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x1f
:flags #x1
:initial-valuef -27.306667
:random-rangef 54.613335
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x20
:flags #x1
:initial-valuef 40.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x24
:flags #x1
:initial-valuef 0.35555556
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x220c)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x30
:flags #x1
:initial-valuef -1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'fuel-cell-progress-hud-orbit-callback
)
(new 'static 'sp-field-init-spec
:field #x32
:initial-valuef (the-as float #x5a)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x33
:flags #x6
:initial-valuef (the-as float #xe8)
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 346)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 21
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x200200)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 0.06
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xc
:flags #x1
:initial-valuef 2160.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 4096.0
:random-rangef 1024.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xe
:initial-valuef (the-as float #x4)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x10
:flags #x1
:random-rangef 65536.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x1
:initial-valuef 409.6
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x2
:random-rangef (the-as float #x1)
:random-multf 255.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x2
:random-rangef (the-as float #x1)
:random-multf 255.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x2
:random-rangef (the-as float #x1)
:random-multf 255.0
)
(new 'static 'sp-field-init-spec :field #x15 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec
:field #x1c
:flags #x1
:initial-valuef 40.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x1f
:flags #x1
:initial-valuef -27.306667
:random-rangef 54.613335
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x24
:flags #x1
:initial-valuef 0.32
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x220c)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x30
:flags #x1
:initial-valuef -1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'fuel-cell-progress-hud-orbit-callback
)
(new 'static 'sp-field-init-spec
:field #x32
:initial-valuef (the-as float #x4b)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x33
:flags #x6
:initial-valuef (the-as float #xe8)
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 347)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 16
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x201200)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xc
:flags #x1
:initial-valuef 2160.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 8192.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x10
:flags #x1
:random-rangef 65536.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x1
:initial-valuef 7372.8
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 192.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 192.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:random-rangef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 64.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x1f
:flags #x1
:initial-valuef -72.81778
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x220c)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x30
:flags #x1
:initial-valuef -1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'fuel-cell-progress-hud-orbit-callback
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 348)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 16
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x201200)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xc
:flags #x1
:initial-valuef 2160.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 9830.4
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x10
:flags #x1
:random-rangef 65536.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x1
:initial-valuef 8192.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 64.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x1f
:flags #x1
:initial-valuef 54.613335
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x220c)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x30
:flags #x1
:initial-valuef -1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'fuel-cell-progress-hud-orbit-callback
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 97)
(new 'static 'sparticle-launch-group
:length 8
:duration #xbb8
:linger-duration #x5dc
:flags #x5
:name
"group-part-progress-hud-power-cell-whole"
:launcher
(new 'static 'inline-array sparticle-group-item 8
(new 'static 'sparticle-group-item :launcher #x152 :flags #x8)
(new 'static 'sparticle-group-item
:launcher #x15b
:flags #x8
:period #xe10
:length #x5
)
(new 'static 'sparticle-group-item
:launcher #x15c
:flags #x8
:period #xe10
:length #x5
)
(new 'static 'sparticle-group-item :launcher #x157 :flags #x8)
(new 'static 'sparticle-group-item :launcher #x153 :flags #x8)
(new 'static 'sparticle-group-item :launcher #x154 :flags #x8)
(new 'static 'sparticle-group-item :launcher #x155 :flags #x8)
(new 'static 'sparticle-group-item :launcher #x156 :flags #x8)
)
:bounds (new 'static 'sphere :w 409600.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 98)
(new 'static 'sparticle-launch-group
:length 2
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-buzzer"
:launcher
(new 'static 'inline-array sparticle-group-item 2
(new 'static 'sparticle-group-item
:launcher #x7be
:flags #x8
:binding #x7bd
)
(new 'static 'sparticle-group-item :launcher #x7bd :flags #xc)
)
:bounds (new 'static 'sphere :w 409600.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 1982)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 11
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x202a00)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 9011.2
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec :field #x15 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2200)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 1981)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 17
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x202a00)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec :field #xa :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec
:field #xb
:flags #x1
:initial-valuef 5461.3335
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xc
:flags #x1
:initial-valuef 409.6
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 8192.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec :field #x18 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec
:field #x19
:flags #x1
:initial-valuef 218.45334
:random-multf 1.0
)
(new 'static 'sp-field-init-spec :field #x1b :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2284)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 99)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-orb"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x7bf :flags #x8)
)
:bounds (new 'static 'sphere :w 409600.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 1983)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 11
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x202c00)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 9011.2
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2204)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 100)
(new 'static 'sparticle-launch-group
:length 2
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-buzzer-small"
:launcher
(new 'static 'inline-array sparticle-group-item 2
(new 'static 'sparticle-group-item
:launcher #x7c1
:flags #x8
:binding #x7c0
)
(new 'static 'sparticle-group-item :launcher #x7c0 :flags #xc)
)
:bounds (new 'static 'sphere :w 409600.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 1985)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 11
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x202a00)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 4096.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec :field #x15 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2200)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 1984)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 18
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x202a00)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec :field #xa :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec
:field #xb
:flags #x1
:initial-valuef 5461.3335
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xc
:flags #x1
:initial-valuef 204.8
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 6144.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec :field #x18 :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec
:field #x19
:flags #x1
:initial-valuef 206.31703
:random-multf 1.0
)
(new 'static 'sp-field-init-spec :field #x1b :flags #x1 :random-multf 1.0)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2284)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-hud-buzzer-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 101)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-orb-small"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x7c2 :flags #x8)
)
:bounds (new 'static 'sphere :w 409600.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 1986)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 12
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef (the-as float #x202c00)
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 5324.8
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2204)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-hud-orb-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; failed to figure out what this is:
(set!
(-> *part-group-id-table* 615)
(new 'static 'sparticle-launch-group
:length 1
:duration #xbb8
:linger-duration #x5dc
:flags #x4
:name "group-part-progress-save-icon"
:launcher
(new 'static 'inline-array sparticle-group-item 1
(new 'static 'sparticle-group-item :launcher #x9ae :flags #x8)
)
:bounds (new 'static 'sphere :w 409600.0)
)
)
;; failed to figure out what this is:
(set!
(-> *part-id-table* 2478)
(new 'static 'sparticle-launcher
:init-specs
(new 'static 'inline-array sp-field-init-spec 12
(new 'static 'sp-field-init-spec
:field #x1
:initial-valuef 0.0000000000000000000015909527
)
(new 'static 'sp-field-init-spec
:field #x6
:flags #x1
:initial-valuef 1.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #xd
:flags #x1
:initial-valuef 7372.8
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x11
:flags #x3
:initial-valuef (the-as float #xfffffffc)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x12
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x13
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x14
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x15
:flags #x1
:initial-valuef 128.0
:random-multf 1.0
)
(new 'static 'sp-field-init-spec
:field #x2e
:initial-valuef (the-as float #xffffffff)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x2f
:initial-valuef (the-as float #x2204)
:random-multf (the-as float #x1)
)
(new 'static 'sp-field-init-spec
:field #x31
:flags #x5
:sym 'part-progress-save-icon-func
)
(new 'static 'sp-field-init-spec :field #x43)
)
)
)
;; definition for method 34 of type progress
;; INFO: Return type mismatch int vs none.
(defmethod initialize-particles progress ((obj progress))
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-0 (-> obj nb-of-particles)))
(set! (-> obj particles s5-0) (new 'static 'hud-particle))
(set!
(-> obj particles s5-0 part)
(create-launch-control (-> *part-group-id-table* 90) obj)
)
(set! (-> obj particles s5-0 init-pos x) 256.0)
(set! (-> obj particles s5-0 init-pos y) 224.0)
(set! (-> obj particles s5-0 init-pos z) 16.0)
(set! (-> obj particles s5-0 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-1 (-> obj nb-of-particles)))
(set! (-> obj particles s5-1) (new 'static 'hud-particle))
(set!
(-> obj particles s5-1 part)
(create-launch-control (-> *part-group-id-table* 88) obj)
)
(set! (-> obj particles s5-1 init-pos x) -42.0)
(set! (-> obj particles s5-1 init-pos y) 254.0)
(set! (-> obj particles s5-1 init-pos z) 5.0)
(set! (-> obj particles s5-1 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-2 (-> obj nb-of-particles)))
(set! (-> obj particles s5-2) (new 'static 'hud-particle))
(set!
(-> obj particles s5-2 part)
(create-launch-control (-> *part-group-id-table* 89) obj)
)
(set! (-> obj particles s5-2 init-pos x) 610.0)
(set! (-> obj particles s5-2 init-pos y) 254.0)
(set! (-> obj particles s5-2 init-pos z) 5.0)
(set! (-> obj particles s5-2 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-3 (-> obj nb-of-particles)))
(set! (-> obj particles s5-3) (new 'static 'hud-particle))
(set!
(-> obj particles s5-3 part)
(create-launch-control (-> *part-group-id-table* 85) obj)
)
(set! (-> obj particles s5-3 init-pos x) -320.0)
(set! (-> obj particles s5-3 init-pos y) 40.0)
(set! (-> obj particles s5-3 init-pos z) 14.0)
(set! (-> obj particles s5-3 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-4 (-> obj nb-of-particles)))
(set! (-> obj particles s5-4) (new 'static 'hud-particle))
(set!
(-> obj particles s5-4 part)
(create-launch-control (-> *part-group-id-table* 86) obj)
)
(set! (-> obj particles s5-4 init-pos x) -320.0)
(set! (-> obj particles s5-4 init-pos y) 400.0)
(set! (-> obj particles s5-4 init-pos z) 14.0)
(set! (-> obj particles s5-4 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-5 (-> obj nb-of-particles)))
(set! (-> obj particles s5-5) (new 'static 'hud-particle))
(set!
(-> obj particles s5-5 part)
(create-launch-control (-> *part-group-id-table* 87) obj)
)
(set! (-> obj particles s5-5 init-pos x) -320.0)
(set! (-> obj particles s5-5 init-pos y) 194.0)
(set! (-> obj particles s5-5 init-pos z) 15.0)
(set! (-> obj particles s5-5 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-6 (-> obj nb-of-particles)))
(set! (-> obj particles s5-6) (new 'static 'hud-particle))
(set!
(-> obj particles s5-6 part)
(create-launch-control (-> *part-group-id-table* 97) obj)
)
(set! (-> obj particles s5-6 init-pos x) -320.0)
(set! (-> obj particles s5-6 init-pos y) 194.0)
(set! (-> obj particles s5-6 init-pos z) 14.0)
(set! (-> obj particles s5-6 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-7 (-> obj nb-of-particles)))
(set! (-> obj particles s5-7) (new 'static 'hud-particle))
(set!
(-> obj particles s5-7 part)
(create-launch-control (-> *part-group-id-table* 97) obj)
)
(set! (-> obj particles s5-7 init-pos x) -320.0)
(set! (-> obj particles s5-7 init-pos y) 194.0)
(set! (-> obj particles s5-7 init-pos z) 14.0)
(set! (-> obj particles s5-7 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-8 (-> obj nb-of-particles)))
(set! (-> obj particles s5-8) (new 'static 'hud-particle))
(set!
(-> obj particles s5-8 part)
(create-launch-control (-> *part-group-id-table* 97) obj)
)
(set! (-> obj particles s5-8 init-pos x) -320.0)
(set! (-> obj particles s5-8 init-pos y) 194.0)
(set! (-> obj particles s5-8 init-pos z) 14.0)
(set! (-> obj particles s5-8 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-9 (-> obj nb-of-particles)))
(set! (-> obj particles s5-9) (new 'static 'hud-particle))
(set!
(-> obj particles s5-9 part)
(create-launch-control (-> *part-group-id-table* 97) obj)
)
(set! (-> obj particles s5-9 init-pos x) -320.0)
(set! (-> obj particles s5-9 init-pos y) 194.0)
(set! (-> obj particles s5-9 init-pos z) 14.0)
(set! (-> obj particles s5-9 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-10 (-> obj nb-of-particles)))
(set! (-> obj particles s5-10) (new 'static 'hud-particle))
(set!
(-> obj particles s5-10 part)
(create-launch-control (-> *part-group-id-table* 97) obj)
)
(set! (-> obj particles s5-10 init-pos x) -320.0)
(set! (-> obj particles s5-10 init-pos y) 194.0)
(set! (-> obj particles s5-10 init-pos z) 14.0)
(set! (-> obj particles s5-10 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-11 (-> obj nb-of-particles)))
(set! (-> obj particles s5-11) (new 'static 'hud-particle))
(set!
(-> obj particles s5-11 part)
(create-launch-control (-> *part-group-id-table* 97) obj)
)
(set! (-> obj particles s5-11 init-pos x) -320.0)
(set! (-> obj particles s5-11 init-pos y) 194.0)
(set! (-> obj particles s5-11 init-pos z) 14.0)
(set! (-> obj particles s5-11 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-12 (-> obj nb-of-particles)))
(set! (-> obj particles s5-12) (new 'static 'hud-particle))
(set!
(-> obj particles s5-12 part)
(create-launch-control (-> *part-group-id-table* 97) obj)
)
(set! (-> obj particles s5-12 init-pos x) -320.0)
(set! (-> obj particles s5-12 init-pos y) 194.0)
(set! (-> obj particles s5-12 init-pos z) 14.0)
(set! (-> obj particles s5-12 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-13 (-> obj nb-of-particles)))
(set! (-> obj particles s5-13) (new 'static 'hud-particle))
(set!
(-> obj particles s5-13 part)
(create-launch-control (-> *part-group-id-table* 97) obj)
)
(set! (-> obj particles s5-13 init-pos x) -320.0)
(set! (-> obj particles s5-13 init-pos y) 194.0)
(set! (-> obj particles s5-13 init-pos z) 14.0)
(set! (-> obj particles s5-13 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-14 (-> obj nb-of-particles)))
(set! (-> obj particles s5-14) (new 'static 'hud-particle))
(set!
(-> obj particles s5-14 part)
(create-launch-control (-> *part-group-id-table* 98) obj)
)
(set! (-> obj particles s5-14 init-pos x) -320.0)
(set! (-> obj particles s5-14 init-pos y) 224.0)
(set! (-> obj particles s5-14 init-pos z) 14.0)
(set! (-> obj particles s5-14 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-15 (-> obj nb-of-particles)))
(set! (-> obj particles s5-15) (new 'static 'hud-particle))
(set!
(-> obj particles s5-15 part)
(create-launch-control (-> *part-group-id-table* 99) obj)
)
(set! (-> obj particles s5-15 init-pos x) -320.0)
(set! (-> obj particles s5-15 init-pos y) 224.0)
(set! (-> obj particles s5-15 init-pos z) 14.0)
(set! (-> obj particles s5-15 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-16 (-> obj nb-of-particles)))
(set! (-> obj particles s5-16) (new 'static 'hud-particle))
(set!
(-> obj particles s5-16 part)
(create-launch-control (-> *part-group-id-table* 97) obj)
)
(set! (-> obj particles s5-16 init-pos x) -320.0)
(set! (-> obj particles s5-16 init-pos y) 112.0)
(set! (-> obj particles s5-16 init-pos z) 4.0)
(set! (-> obj particles s5-16 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-17 (-> obj nb-of-particles)))
(set! (-> obj particles s5-17) (new 'static 'hud-particle))
(set!
(-> obj particles s5-17 part)
(create-launch-control (-> *part-group-id-table* 100) obj)
)
(set! (-> obj particles s5-17 init-pos x) -320.0)
(set! (-> obj particles s5-17 init-pos y) 193.0)
(set! (-> obj particles s5-17 init-pos z) 4.0)
(set! (-> obj particles s5-17 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-18 (-> obj nb-of-particles)))
(set! (-> obj particles s5-18) (new 'static 'hud-particle))
(set!
(-> obj particles s5-18 part)
(create-launch-control (-> *part-group-id-table* 101) obj)
)
(set! (-> obj particles s5-18 init-pos x) -320.0)
(set! (-> obj particles s5-18 init-pos y) 40.0)
(set! (-> obj particles s5-18 init-pos z) 4.0)
(set! (-> obj particles s5-18 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-19 (-> obj nb-of-particles)))
(set! (-> obj particles s5-19) (new 'static 'hud-particle))
(set!
(-> obj particles s5-19 part)
(create-launch-control (-> *part-group-id-table* 92) obj)
)
(set! (-> obj particles s5-19 init-pos x) -320.0)
(set! (-> obj particles s5-19 init-pos y) 90.0)
(set! (-> obj particles s5-19 init-pos z) 16.0)
(set! (-> obj particles s5-19 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-20 (-> obj nb-of-particles)))
(set! (-> obj particles s5-20) (new 'static 'hud-particle))
(set!
(-> obj particles s5-20 part)
(create-launch-control (-> *part-group-id-table* 93) obj)
)
(set! (-> obj particles s5-20 init-pos x) -320.0)
(set! (-> obj particles s5-20 init-pos y) 172.0)
(set! (-> obj particles s5-20 init-pos z) 16.0)
(set! (-> obj particles s5-20 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-21 (-> obj nb-of-particles)))
(set! (-> obj particles s5-21) (new 'static 'hud-particle))
(set!
(-> obj particles s5-21 part)
(create-launch-control (-> *part-group-id-table* 94) obj)
)
(set! (-> obj particles s5-21 init-pos x) -320.0)
(set! (-> obj particles s5-21 init-pos y) 254.0)
(set! (-> obj particles s5-21 init-pos z) 16.0)
(set! (-> obj particles s5-21 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-22 (-> obj nb-of-particles)))
(set! (-> obj particles s5-22) (new 'static 'hud-particle))
(set!
(-> obj particles s5-22 part)
(create-launch-control (-> *part-group-id-table* 95) obj)
)
(set! (-> obj particles s5-22 init-pos x) -320.0)
(set! (-> obj particles s5-22 init-pos y) 336.0)
(set! (-> obj particles s5-22 init-pos z) 16.0)
(set! (-> obj particles s5-22 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-23 (-> obj nb-of-particles)))
(set! (-> obj particles s5-23) (new 'static 'hud-particle))
(set!
(-> obj particles s5-23 part)
(create-launch-control (-> *part-group-id-table* 91) obj)
)
(set! (-> obj particles s5-23 init-pos x) -320.0)
(set! (-> obj particles s5-23 init-pos y) 102.0)
(set! (-> obj particles s5-23 init-pos z) 13.0)
(set! (-> obj particles s5-23 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-24 (-> obj nb-of-particles)))
(set! (-> obj particles s5-24) (new 'static 'hud-particle))
(set!
(-> obj particles s5-24 part)
(create-launch-control (-> *part-group-id-table* 91) obj)
)
(set! (-> obj particles s5-24 init-pos x) -320.0)
(set! (-> obj particles s5-24 init-pos y) 184.0)
(set! (-> obj particles s5-24 init-pos z) 13.0)
(set! (-> obj particles s5-24 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-25 (-> obj nb-of-particles)))
(set! (-> obj particles s5-25) (new 'static 'hud-particle))
(set!
(-> obj particles s5-25 part)
(create-launch-control (-> *part-group-id-table* 91) obj)
)
(set! (-> obj particles s5-25 init-pos x) -320.0)
(set! (-> obj particles s5-25 init-pos y) 266.0)
(set! (-> obj particles s5-25 init-pos z) 13.0)
(set! (-> obj particles s5-25 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-26 (-> obj nb-of-particles)))
(set! (-> obj particles s5-26) (new 'static 'hud-particle))
(set!
(-> obj particles s5-26 part)
(create-launch-control (-> *part-group-id-table* 91) obj)
)
(set! (-> obj particles s5-26 init-pos x) -320.0)
(set! (-> obj particles s5-26 init-pos y) 348.0)
(set! (-> obj particles s5-26 init-pos z) 13.0)
(set! (-> obj particles s5-26 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-27 (-> obj nb-of-particles)))
(set! (-> obj particles s5-27) (new 'static 'hud-particle))
(set!
(-> obj particles s5-27 part)
(create-launch-control (-> *part-group-id-table* 570) obj)
)
(set! (-> obj particles s5-27 init-pos x) -320.0)
(set! (-> obj particles s5-27 init-pos y) 338.0)
(set! (-> obj particles s5-27 init-pos z) 4.0)
(set! (-> obj particles s5-27 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-28 (-> obj nb-of-particles)))
(set! (-> obj particles s5-28) (new 'static 'hud-particle))
(set!
(-> obj particles s5-28 part)
(create-launch-control (-> *part-group-id-table* 571) obj)
)
(set! (-> obj particles s5-28 init-pos x) -320.0)
(set! (-> obj particles s5-28 init-pos y) 338.0)
(set! (-> obj particles s5-28 init-pos z) 4.0)
(set! (-> obj particles s5-28 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-29 (-> obj nb-of-particles)))
(set! (-> obj particles s5-29) (new 'static 'hud-particle))
(set!
(-> obj particles s5-29 part)
(create-launch-control (-> *part-group-id-table* 572) obj)
)
(set! (-> obj particles s5-29 init-pos x) -320.0)
(set! (-> obj particles s5-29 init-pos y) 338.0)
(set! (-> obj particles s5-29 init-pos z) 4.0)
(set! (-> obj particles s5-29 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-30 (-> obj nb-of-particles)))
(set! (-> obj particles s5-30) (new 'static 'hud-particle))
(set!
(-> obj particles s5-30 part)
(create-launch-control (-> *part-group-id-table* 573) obj)
)
(set! (-> obj particles s5-30 init-pos x) -320.0)
(set! (-> obj particles s5-30 init-pos y) 338.0)
(set! (-> obj particles s5-30 init-pos z) 4.0)
(set! (-> obj particles s5-30 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
(when (< (-> obj nb-of-particles) (-> obj max-nb-of-particles))
(let ((s5-31 (-> obj nb-of-particles)))
(set! (-> obj particles s5-31) (new 'static 'hud-particle))
(set!
(-> obj particles s5-31 part)
(create-launch-control (-> *part-group-id-table* 615) obj)
)
(set! (-> obj particles s5-31 init-pos x) -320.0)
(set! (-> obj particles s5-31 init-pos y) 180.0)
(set! (-> obj particles s5-31 init-pos z) 4.0)
(set! (-> obj particles s5-31 part matrix) -1)
)
(+! (-> obj nb-of-particles) 1)
)
0
(none)
)