Files
jak-project/test/decompiler/reference/jak2/levels/hiphog/hiphog-part_REF.gc
T
water111 7348e6a4ff [decompiler] Update vector ops, reduce casts (#3849)
Update the decompiler to use the new vf macros.

Also, fix a bunch of silly casting issues where accessing inline fields
with an offset of 0 would be better than a cast:

![image](https://github.com/user-attachments/assets/885bbb07-634f-47b8-99f5-5a947941cdde)

---------

Co-authored-by: water111 <awaterford1111445@gmail.com>
2025-01-20 16:32:58 -05:00

1668 lines
45 KiB
Common Lisp
Vendored
Generated

;;-*-Lisp-*-
(in-package goal)
;; definition of type hiphog-part
(deftype hiphog-part (part-spawner)
()
)
;; definition for method 3 of type hiphog-part
(defmethod inspect ((this hiphog-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-hiphog-red-light
:id 741
:flags (unk-4)
:bounds (static-bspherem 0 0 0 1)
:parts ((sp-item 3283 :flags (bit6 bit7)))
)
;; failed to figure out what this is:
(defpart 3283
:init-specs ((:texture (glow effects))
(:num 1.0)
(:scale-x (meters 1.5))
(:rot-x (degrees 0.9))
(:scale-y :copy scale-x)
(:r 255.0)
(:g 64.0 64.0)
(:b 0.0)
(:a 32.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 819.2)
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpartgroup group-hiphog-ceiling-light
:id 742
:flags (unk-4)
:bounds (static-bspherem 0 0 0 1)
:parts ((sp-item 3284 :flags (bit6 bit7)) (sp-item 3285 :flags (bit6 bit7)) (sp-item 3286 :flags (bit6 bit7)))
)
;; failed to figure out what this is:
(defpart 3284
:init-specs ((:texture (glow effects))
(:num 1.0)
(:y (meters 1.1))
(:scale-x (meters 2))
(:rot-x (degrees 0.9))
(:scale-y :copy scale-x)
(:r 255.0)
(:g 192.0 64.0)
(:b 128.0)
(:a 16.0)
(:timer (seconds 0.017))
(: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 3285
:init-specs ((:texture (glow effects))
(:num 1.0)
(:scale-x (meters 2))
(:rot-x (degrees 0.9))
(:rot-z (degrees 127))
(:scale-y :copy scale-x)
(:r 255.0)
(:g 192.0 64.0)
(:b 128.0)
(:a 16.0)
(:timer (seconds 0.017))
(: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 3286
:init-specs ((:texture (glow effects))
(:num 1.0)
(:y (meters -1.1))
(:scale-x (meters 2))
(:rot-x (degrees 0.9))
(:rot-z (degrees 225.99998))
(:scale-y :copy scale-x)
(:r 255.0)
(:g 192.0 64.0)
(:b 128.0)
(:a 16.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 819.2)
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpartgroup group-hiphog-booth-ceiling-light
:id 743
:flags (unk-4)
:bounds (static-bspherem 0 0 0 1)
:parts ((sp-item 3287 :flags (bit6 bit7)))
)
;; failed to figure out what this is:
(defpart 3287
:init-specs ((:texture (glow effects))
(:num 1.0)
(:scale-x (meters 1))
(:rot-x (degrees 0.9))
(:rot-z (degrees -209))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 192.0 64.0)
(:b 255.0)
(:a 20.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 1638.4)
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpartgroup group-hiphog-booth-wall-light
:id 744
:flags (unk-4)
:bounds (static-bspherem 0 0 0 1)
:parts ((sp-item 3288 :flags (bit6 bit7)) (sp-item 3289 :flags (bit6 bit7)))
)
;; failed to figure out what this is:
(defpart 3288
:init-specs ((:texture (glow effects))
(:num 1.0)
(:y (meters -0.3))
(:scale-x (meters 1))
(:rot-x (degrees 0.9))
(:rot-z (degrees -209))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 192.0 64.0)
(:b 255.0)
(:a 16.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 1228.8)
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpart 3289
:init-specs ((:texture (glow effects))
(:num 1.0)
(:y (meters 0.3))
(:scale-x (meters 1))
(:rot-x (degrees 0.9))
(:rot-z (degrees -127))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 192.0 64.0)
(:b 255.0)
(:a 16.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 1228.8)
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpartgroup group-hiphog-bar-light
:id 745
:flags (unk-4)
:bounds (static-bspherem 0 0 0 1)
:parts ((sp-item 3290 :flags (bit6 bit7)) (sp-item 3291 :flags (bit6 bit7)) (sp-item 3292 :flags (bit6 bit7)))
)
;; failed to figure out what this is:
(defpart 3290
:init-specs ((:texture (glow effects))
(:num 1.0)
(:x (meters 0.8))
(:y (meters 0.05))
(:scale-x (meters 1.5))
(:rot-x (degrees 0.225))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 192.0 64.0)
(:b 255.0)
(:a 16.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 409.6)
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpart 3291
:init-specs ((:texture (glow effects))
(:num 1.0)
(:y (meters 0.05))
(:scale-x (meters 2))
(:rot-x (degrees 0.225))
(:rot-z (degrees 127))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 192.0 64.0)
(:b 255.0)
(:a 16.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 409.6)
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpart 3292
:init-specs ((:texture (glow effects))
(:num 1.0)
(:x (meters -0.8))
(:y (meters 0.05))
(:scale-x (meters 1.5))
(:rot-x (degrees 0.225))
(:rot-z (degrees 225.99998))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 192.0 64.0)
(:b 255.0)
(:a 16.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 409.6)
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpartgroup group-hiphog-booth-table-light
:id 746
:flags (unk-4)
:bounds (static-bspherem 0 0 0 1)
:parts ((sp-item 3293 :flags (bit6 bit7)) (sp-item 3294 :flags (bit6 bit7)) (sp-item 3295 :flags (bit6 bit7)))
)
;; failed to figure out what this is:
(defpart 3293
:init-specs ((:texture (glow effects))
(:num 1.0)
(:x (meters 0.8))
(:scale-x (meters 1.5))
(:rot-x (degrees 0.9))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 192.0 64.0)
(:b 255.0)
(:a 16.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 2048.0)
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpart 3294
:init-specs ((:texture (glow effects))
(:num 1.0)
(:scale-x (meters 2))
(:rot-x (degrees 0.9))
(:rot-z (degrees 127))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 192.0 64.0)
(:b 255.0)
(:a 16.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 2048.0)
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpart 3295
:init-specs ((:texture (glow effects))
(:num 1.0)
(:x (meters -0.8))
(:scale-x (meters 1.5))
(:rot-x (degrees 0.9))
(:rot-z (degrees 225.99998))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 192.0 64.0)
(:b 255.0)
(:a 16.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 2048.0)
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpartgroup group-hiphog-floor-light
:id 747
:flags (unk-4)
:bounds (static-bspherem 0 0 0 1)
:parts ((sp-item 3296 :flags (bit6 bit7)) (sp-item 3297 :flags (bit6 bit7)) (sp-item 3298 :flags (bit6 bit7)))
)
;; failed to figure out what this is:
(defpart 3296
:init-specs ((:texture (glow effects))
(:num 1.0)
(:z (meters 0.6))
(:scale-x (meters 1.5))
(:rot-x (degrees 0.9))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 192.0 64.0)
(:b 255.0)
(:a 12.0)
(:timer (seconds 0.017))
(: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 3297
:init-specs ((:texture (glow effects))
(:num 1.0)
(:scale-x (meters 1.5))
(:rot-x (degrees 0.9))
(:rot-z (degrees 127))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 192.0 64.0)
(:b 255.0)
(:a 12.0)
(:timer (seconds 0.017))
(: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 3298
:init-specs ((:texture (glow effects))
(:num 1.0)
(:z (meters -0.6))
(:scale-x (meters 1.5))
(:rot-x (degrees 0.9))
(:rot-z (degrees 225.99998))
(:scale-y :copy scale-x)
(:r 128.0)
(:g 192.0 64.0)
(:b 255.0)
(:a 12.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 sp-cpuinfo-flag-3 glow))
(:userdata 819.2)
(:rotate-y (degrees 0))
)
)
;; failed to figure out what this is:
(defpartgroup group-hiphog-neon-hiphog
:id 748
:bounds (static-bspherem 0 0 0 8)
:parts ((sp-item 34 :flags (is-3d bit6) :period (seconds 2) :length (seconds 1))
(sp-item 33 :flags (is-3d bit6) :period (seconds 2) :length (seconds 1) :offset 300)
(sp-item 36 :flags (is-3d bit6) :period (seconds 2) :length (seconds 1))
(sp-item 35 :flags (is-3d bit6) :period (seconds 2) :length (seconds 1) :offset 300)
(sp-item 3299 :flags (bit6) :period (seconds 2) :length (seconds 0.017) :offset 300)
)
)
;; failed to figure out what this is:
(defpart 3299
:init-specs ((:texture (hiphog-neon-on hiphog-sprite))
(:num 1.0)
(:sound (static-sound-spec "neon-zap-3" :volume 70.0))
(:y (meters 0))
(:z (meters -8.25))
(:scale-x (meters 0))
(:scale-y (meters 0))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
)
)
;; failed to figure out what this is:
(defpart 36
:init-specs ((:texture (hiphog-neon-off hiphog-sprite))
(:num 1.0)
(:y (meters 0))
(:z (meters -8.25))
(:scale-x (meters 6))
(:rot-x (degrees 90))
(:rot-y (degrees 0))
(:rot-z (degrees 0))
(:scale-y (meters 3))
(:r 116.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 35
:init-specs ((:texture (hiphog-neon-on hiphog-sprite))
(:num 1.0)
(:sound (static-sound-spec "neon-zap-1" :num 0.3 :volume 50.0))
(:y (meters 0))
(:z (meters -8.25))
(:scale-x (meters 6))
(:rot-x (degrees 90))
(:rot-y (degrees 0))
(:rot-z (degrees 0))
(:scale-y (meters 3))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 34
:init-specs ((:texture (hiphog-neon-off hiphog-sprite))
(:num 1.0)
(:y (meters 0))
(:z (meters 0.25))
(:scale-x (meters 6))
(:rot-x (degrees 90))
(:rot-y (degrees 0))
(:rot-z (degrees 0))
(:scale-y (meters 3))
(:r 116.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 33
:init-specs ((:texture (hiphog-neon-on hiphog-sprite))
(:num 1.0)
(:y (meters 0))
(:z (meters 0.25))
(:scale-x (meters 6))
(:rot-x (degrees 90))
(:rot-y (degrees 0))
(:rot-z (degrees 0))
(:scale-y (meters 3))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpartgroup group-hiphog-neon-hiphog-daxter
:id 749
:bounds (static-bspherem 0 0 0 8)
:parts ((sp-item 3300 :flags (is-3d bit6) :period (seconds 2) :length (seconds 1))
(sp-item 3301 :flags (is-3d bit6) :period (seconds 2) :length (seconds 1) :offset 300)
(sp-item 3302 :flags (is-3d bit6) :period (seconds 2) :length (seconds 1))
(sp-item 3303 :flags (is-3d bit6) :period (seconds 2) :length (seconds 1) :offset 300)
(sp-item 3299 :flags (bit6) :period (seconds 2) :length (seconds 0.017) :offset 300)
)
)
;; failed to figure out what this is:
(defpart 3302
:init-specs ((:texture (hiphog-daxter-neon-off hiphog-sprite))
(:num 1.0)
(:y (meters 0))
(:z (meters -8.25))
(:scale-x (meters 6))
(:rot-x (degrees 90))
(:rot-y (degrees 0))
(:rot-z (degrees 0))
(:scale-y (meters 3))
(:r 116.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 3303
:init-specs ((:texture (hiphog-daxter-neon-on hiphog-sprite))
(:num 1.0)
(:sound (static-sound-spec "neon-zap-1" :num 0.3 :volume 50.0))
(:y (meters 0))
(:z (meters -8.25))
(:scale-x (meters 6))
(:rot-x (degrees 90))
(:rot-y (degrees 0))
(:rot-z (degrees 0))
(:scale-y (meters 3))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 3300
:init-specs ((:texture (hiphog-daxter-neon-off hiphog-sprite))
(:num 1.0)
(:y (meters 0))
(:z (meters 0.25))
(:scale-x (meters 6))
(:rot-x (degrees 90))
(:rot-y (degrees 0))
(:rot-z (degrees 0))
(:scale-y (meters 3))
(:r 116.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 3301
:init-specs ((:texture (hiphog-daxter-neon-on hiphog-sprite))
(:num 1.0)
(:y (meters 0))
(:z (meters 0.25))
(:scale-x (meters 6))
(:rot-x (degrees 90))
(:rot-y (degrees 0))
(:rot-z (degrees 0))
(:scale-y (meters 3))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpartgroup group-hiphog-neon-morgan
:id 750
:bounds (static-bspherem 0 0 0 8)
:parts ((sp-item 25 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.335))
(sp-item 19 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 1) :offset 100)
(sp-item 25 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.335) :offset 400)
(sp-item 19 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 1) :offset 500)
(sp-item 26 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.5))
(sp-item 20 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.835) :offset 150)
(sp-item 26 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.335) :offset 400)
(sp-item 20 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 1) :offset 500)
(sp-item 27 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.667))
(sp-item 21 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.667) :offset 200)
(sp-item 27 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.335) :offset 400)
(sp-item 21 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 1) :offset 500)
(sp-item 28 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.835))
(sp-item 22 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.5) :offset 250)
(sp-item 28 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.335) :offset 400)
(sp-item 22 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 1) :offset 500)
(sp-item 29 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 1))
(sp-item 23 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.335) :offset 300)
(sp-item 29 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.335) :offset 400)
(sp-item 23 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 1) :offset 500)
(sp-item 30 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 1.167))
(sp-item 24 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.167) :offset 350)
(sp-item 30 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.335) :offset 400)
(sp-item 24 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 1) :offset 500)
(sp-item 3299 :period (seconds 2.667) :length (seconds 0.017) :offset 100)
(sp-item 3299 :period (seconds 2.667) :length (seconds 0.017) :offset 150)
(sp-item 3299 :period (seconds 2.667) :length (seconds 0.017) :offset 200)
(sp-item 3299 :period (seconds 2.667) :length (seconds 0.017) :offset 250)
(sp-item 3299 :period (seconds 2.667) :length (seconds 0.017) :offset 300)
(sp-item 3299 :period (seconds 2.667) :length (seconds 0.017) :offset 350)
(sp-item 3299 :period (seconds 2.667) :length (seconds 0.017) :offset 500)
)
)
;; failed to figure out what this is:
(defpart 25
:init-specs ((:texture (hiphog-neon-m-off hiphog-sprite))
(:num 1.0)
(:x (meters 3))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 116.0 16.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 19
:init-specs ((:texture (hiphog-neon-m-on hiphog-sprite))
(:num 1.0)
(:sound (static-sound-spec "neon-zap-1" :num 0.3 :volume 50.0))
(:x (meters 3))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 26
:init-specs ((:texture (hiphog-neon-o-off hiphog-sprite))
(:num 1.0)
(:x (meters 2))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 116.0 16.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 20
:init-specs ((:texture (hiphog-neon-o-on hiphog-sprite))
(:num 1.0)
(:x (meters 2))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 27
:init-specs ((:texture (hiphog-neon-r-off hiphog-sprite))
(:num 1.0)
(:x (meters 1))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 116.0 16.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 21
:init-specs ((:texture (hiphog-neon-r-on hiphog-sprite))
(:num 1.0)
(:x (meters 1))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 28
:init-specs ((:texture (hiphog-neon-g-off hiphog-sprite))
(:num 1.0)
(:x (meters 0.05))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 116.0 16.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 22
:init-specs ((:texture (hiphog-neon-g-on hiphog-sprite))
(:num 1.0)
(:x (meters 0.05))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 29
:init-specs ((:texture (hiphog-neon-a-off hiphog-sprite))
(:num 1.0)
(:x (meters -1.05))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 116.0 16.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 23
:init-specs ((:texture (hiphog-neon-a-on hiphog-sprite))
(:num 1.0)
(:x (meters -1.05))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 30
:init-specs ((:texture (hiphog-neon-n-off hiphog-sprite))
(:num 1.0)
(:x (meters -2))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 116.0 16.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 24
:init-specs ((:texture (hiphog-neon-n-on hiphog-sprite))
(:num 1.0)
(:x (meters -2))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpartgroup group-hiphog-neon-morgan-small
:id 751
:bounds (static-bspherem 0 0 0 8)
:parts ((sp-item 3304 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 1) :offset 100)
(sp-item 3304 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 1) :offset 500)
(sp-item 3305 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.835) :offset 150)
(sp-item 3305 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 1) :offset 500)
(sp-item 3306 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.667) :offset 200)
(sp-item 3306 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 1) :offset 500)
(sp-item 3307 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.5) :offset 250)
(sp-item 3307 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 1) :offset 500)
(sp-item 3308 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.335) :offset 300)
(sp-item 3308 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 1) :offset 500)
(sp-item 3309 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 0.167) :offset 350)
(sp-item 3309 :flags (is-3d bit6) :period (seconds 2.667) :length (seconds 1) :offset 500)
)
)
;; failed to figure out what this is:
(defpart 3304
:init-specs ((:texture (hiphog-neon-m-small-on hiphog-sprite))
(:num 1.0)
(:x (meters 3))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 64.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 3305
:init-specs ((:texture (hiphog-neon-o-small-on hiphog-sprite))
(:num 1.0)
(:x (meters 2))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 64.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 3306
:init-specs ((:texture (hiphog-neon-r-small-on hiphog-sprite))
(:num 1.0)
(:x (meters 1))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 64.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 3307
:init-specs ((:texture (hiphog-neon-g-small-on hiphog-sprite))
(:num 1.0)
(:x (meters 0.05))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 64.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 3308
:init-specs ((:texture (hiphog-neon-a-small-on hiphog-sprite))
(:num 1.0)
(:x (meters -1.05))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 64.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 3309
:init-specs ((:texture (hiphog-neon-n-small-on hiphog-sprite))
(:num 1.0)
(:x (meters -2))
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1.5))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 1.5))
(:r 64.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpartgroup group-hiphog-neon-hip-daxter :id 752 :bounds (static-bspherem 0 0 0 8) :parts ((sp-item 209)))
;; failed to figure out what this is:
(defpartgroup group-hiphog-neon-hip
:id 753
:bounds (static-bspherem 0 0 0 8)
:parts ((sp-item 32 :flags (is-3d bit6) :period (seconds 2) :length (seconds 1))
(sp-item 31 :flags (is-3d bit6) :period (seconds 2) :length (seconds 1) :offset 300)
(sp-item 3310 :flags (is-3d bit6) :period (seconds 2) :length (seconds 1) :offset 300)
(sp-item 3311 :flags (is-3d bit6) :period (seconds 2) :length (seconds 1))
(sp-item 3299 :flags (bit6) :period (seconds 1) :length (seconds 0.017) :offset 300)
)
)
;; failed to figure out what this is:
(defpart 3311
:init-specs ((:texture (hiphog-neon-hog-1-off hiphog-sprite))
(:num 1.0)
(:x (meters 0))
(:y (meters 0))
(:z (meters 0.5))
(:scale-x (meters 4))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 4))
(:r 48.0 16.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 31
:init-specs ((:texture (hiphog-neon-hog-1-on hiphog-sprite))
(:num 1.0)
(:sound (static-sound-spec "neon-zap-1" :num 0.2 :volume 39.941406))
(:x (meters 0))
(:y (meters 0))
(:z (meters 0.5))
(:scale-x (meters 4))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 4))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 3310
:init-specs ((:texture (hiphog-neon-hog-2-off hiphog-sprite))
(:num 1.0)
(:x (meters 0))
(:y (meters 0))
(:z (meters 0.5))
(:scale-x (meters 4))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 4))
(:r 48.0 16.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 32
:init-specs ((:texture (hiphog-neon-hog-2-on hiphog-sprite))
(:num 1.0)
(:sound (static-sound-spec "neon-zap-1" :num 0.1 :volume 39.941406))
(:x (meters 0))
(:y (meters 0))
(:z (meters 0.5))
(:scale-x (meters 4))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 4))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpartgroup group-hiphog-neon-hip-small
:id 754
:bounds (static-bspherem 0 0 0 8)
:parts ((sp-item 3312 :flags (is-3d bit6) :period (seconds 2) :length (seconds 1))
(sp-item 3313 :flags (is-3d bit6) :period (seconds 2) :length (seconds 1) :offset 300)
)
)
;; failed to figure out what this is:
(defpart 3313
:init-specs ((:texture (hiphog-neon-hog-1-small-on hiphog-sprite))
(:num 1.0)
(:x (meters 0))
(:y (meters 0))
(:z (meters 0.5))
(:scale-x (meters 4))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 4))
(:r 64.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 3312
:init-specs ((:texture (hiphog-neon-hog-2-small-on hiphog-sprite))
(:num 1.0)
(:x (meters 0))
(:y (meters 0))
(:z (meters 0.5))
(:scale-x (meters 4))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 4))
(:r 64.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpartgroup group-hiphog-neon-clock
:id 755
:bounds (static-bspherem 0 0 0 4)
:parts ((sp-item 3314 :flags (is-3d))
(sp-item 3315 :flags (is-3d))
(sp-item 37 :flags (is-3d) :hour-mask #b111111000000000000111111)
(sp-item 38 :flags (is-3d) :hour-mask #b111111111111000000)
)
)
;; definition for function birth-func-rotate-minute
;; WARN: Return type mismatch int vs none.
(defun birth-func-rotate-minute ((arg0 sparticle-system)
(arg1 sparticle-cpuinfo)
(arg2 sprite-vec-data-3d)
(arg3 sparticle-launcher)
(arg4 sparticle-launch-state)
)
"Determines the position of the minute hand of the hiphog's clock associated with [[time-of-day-proc]]
TODO - check args
Every real second is 1 minute in Jak's time of day"
(local-vars (v1-4 float) (v1-5 float))
(rlet ((vf0 :class vf)
(vf1 :class vf)
(vf2 :class vf)
)
(init-vf0-vector)
(let ((quat (new 'stack-no-clear 'quaternion)))
(let ((temp-vec (new 'stack-no-clear 'vector)))
(let* ((tod *time-of-day*)
(curr-minutes (the float (if tod
(-> tod 0 minutes)
0
)
)
)
)
(set-vector! temp-vec (+ 16384.0 (* 1092.2667 curr-minutes)) 55238.84 49152.0 1.0)
)
(quaternion-zxy! quat temp-vec)
)
(cond
((< (-> quat w) 0.0)
(.lvf vf1 (&-> arg2 qx-qy-qz-sy quad))
(.lvf vf2 (&-> quat quad))
(.sub.vf.xyz vf1 vf0 vf2)
(.svf (&-> arg2 qx-qy-qz-sy quad) vf1)
(.mov v1-4 vf1)
)
(else
(.lvf vf1 (&-> arg2 qx-qy-qz-sy quad))
(.lvf vf2 (&-> quat quad))
(.add.vf.xyz vf1 vf0 vf2)
(.svf (&-> arg2 qx-qy-qz-sy quad) vf1)
(.mov v1-5 vf1)
)
)
)
0
(none)
)
)
;; definition for function birth-func-rotate-hour
;; WARN: Return type mismatch int vs none.
(defun birth-func-rotate-hour ((arg0 sparticle-system)
(arg1 sparticle-cpuinfo)
(arg2 sprite-vec-data-3d)
(arg3 sparticle-launcher)
(arg4 sparticle-launch-state)
)
"Determines the position of the hour hand of the hiphog's clock associated with [[time-of-day-proc]]
TODO - check args
Every real minute is 1 hour in Jak's time of day"
(local-vars (v1-4 float) (v1-5 float))
(rlet ((vf0 :class vf)
(vf1 :class vf)
(vf2 :class vf)
)
(init-vf0-vector)
(let ((quat (new 'stack-no-clear 'quaternion)))
(let ((temp-vec (new 'stack-no-clear 'vector)))
(let* ((tod *time-of-day*)
(curr-hours (the float (if tod
(-> tod 0 hours)
0
)
)
)
)
(set-vector! temp-vec (+ 16384.0 (* 5461.3335 curr-hours)) 55238.84 49152.0 1.0)
)
(quaternion-zxy! quat temp-vec)
)
(cond
((< (-> quat w) 0.0)
(.lvf vf1 (&-> arg2 qx-qy-qz-sy quad))
(.lvf vf2 (&-> quat quad))
(.sub.vf.xyz vf1 vf0 vf2)
(.svf (&-> arg2 qx-qy-qz-sy quad) vf1)
(.mov v1-4 vf1)
)
(else
(.lvf vf1 (&-> arg2 qx-qy-qz-sy quad))
(.lvf vf2 (&-> quat quad))
(.add.vf.xyz vf1 vf0 vf2)
(.svf (&-> arg2 qx-qy-qz-sy quad) vf1)
(.mov v1-5 vf1)
)
)
)
0
(none)
)
)
;; definition for function birth-func-rotate-second
;; WARN: Return type mismatch int vs none.
(defun birth-func-rotate-second ((arg0 sparticle-system)
(arg1 sparticle-cpuinfo)
(arg2 sprite-vec-data-3d)
(arg3 sparticle-launcher)
(arg4 sparticle-launch-state)
)
"Determines the position of the second hand of the hiphog's clock associated with [[time-of-day-proc]]
TODO - check args
The clock actually only has 2 hands, this one does not appear to have been used?
Every real second is 1/60th of a second in Jak's time of day"
(local-vars (v1-4 float) (v1-5 float))
(rlet ((vf0 :class vf)
(vf1 :class vf)
(vf2 :class vf)
)
(init-vf0-vector)
(let ((quat (new 'stack-no-clear 'quaternion)))
(let ((temp-vec (new 'stack-no-clear 'vector)))
(let* ((tod *time-of-day*)
(curr-seconds (the float (if tod
(-> tod 0 seconds)
0
)
)
)
)
(set-vector! temp-vec (+ 16384.0 (* 1092.2667 curr-seconds)) 55238.84 49152.0 1.0)
)
(quaternion-zxy! quat temp-vec)
)
(cond
((< (-> quat w) 0.0)
(.lvf vf1 (&-> arg2 qx-qy-qz-sy quad))
(.lvf vf2 (&-> quat quad))
(.sub.vf.xyz vf1 vf0 vf2)
(.svf (&-> arg2 qx-qy-qz-sy quad) vf1)
(.mov v1-4 vf1)
)
(else
(.lvf vf1 (&-> arg2 qx-qy-qz-sy quad))
(.lvf vf2 (&-> quat quad))
(.add.vf.xyz vf1 vf0 vf2)
(.svf (&-> arg2 qx-qy-qz-sy quad) vf1)
(.mov v1-5 vf1)
)
)
)
0
(none)
)
)
;; failed to figure out what this is:
(defpart 3315
:init-specs ((:texture (hiphog-neon-clock-hand hiphog-sprite))
(:birth-func 'birth-func-rotate-minute)
(:num 1.0)
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1))
(:rot-x (degrees 90))
(:rot-y (degrees 270))
(:rot-z (degrees 270))
(:scale-y (meters 4))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 left-multiply-quat))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 3314
:init-specs ((:texture (hiphog-neon-clock-hand hiphog-sprite))
(:birth-func 'birth-func-rotate-hour)
(:num 1.0)
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1))
(:rot-x (degrees 90))
(:rot-y (degrees 270))
(:rot-z (degrees 270))
(:scale-y (meters 2.5))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 37
:init-specs ((:texture (hiphog-neon-clock-sun hiphog-sprite))
(:num 1.0)
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 4))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 4))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 38
:init-specs ((:texture (hiphog-neon-clock-moon hiphog-sprite))
(:num 1.0)
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 4))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 4))
(:r 128.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpartgroup group-hiphog-neon-clock-small
:id 756
:bounds (static-bspherem 0 0 0 8)
:parts ((sp-item 3316 :flags (is-3d bit6))
(sp-item 3317 :flags (is-3d bit6))
(sp-item 3318 :flags (is-3d bit6) :hour-mask #b111110000000000001111111)
(sp-item 3319 :flags (is-3d bit6) :hour-mask #b111111111110000000)
)
)
;; failed to figure out what this is:
(defpart 3317
:init-specs ((:texture (hiphog-neon-clock-hand-small hiphog-sprite))
(:birth-func 'birth-func-rotate-minute)
(:num 1.0)
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1))
(:rot-x (degrees 90))
(:rot-y (degrees 270))
(:rot-z (degrees 270))
(:scale-y (meters 4))
(:r 64.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 left-multiply-quat))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 3316
:init-specs ((:texture (hiphog-neon-clock-hand-small hiphog-sprite))
(:birth-func 'birth-func-rotate-hour)
(:num 1.0)
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 1))
(:rot-x (degrees 90))
(:rot-y (degrees 270))
(:rot-z (degrees 270))
(:scale-y (meters 2.5))
(:r 64.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 3318
:init-specs ((:texture (hiphog-neon-clock-sun-small hiphog-sprite))
(:num 1.0)
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 4))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 4))
(:r 64.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpart 3319
:init-specs ((:texture (hiphog-neon-clock-moon-small hiphog-sprite))
(:num 1.0)
(:y (meters 0))
(:z (meters 0))
(:scale-x (meters 4))
(:rot-x (degrees 90))
(:rot-y (degrees 180))
(:rot-z (degrees 0))
(:scale-y (meters 4))
(:r 64.0 128.0)
(:g :copy r)
(:b :copy g)
(:a 128.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2))
(:rotate-y (degrees 33.436))
)
)
;; failed to figure out what this is:
(defpartgroup group-hiphog-mirror
:id 757
:bounds (static-bspherem 0 0 0 16)
:parts ((sp-item 3320 :flags (is-3d bit6)))
)
;; definition of type hiphog-mirror-wf-pt
(deftype hiphog-mirror-wf-pt (structure)
"@unused seemingly not used, but probably stood for hiphog-mirror-waveform-point"
((x float)
(y float)
)
)
;; definition for method 3 of type hiphog-mirror-wf-pt
(defmethod inspect ((this hiphog-mirror-wf-pt))
(when (not this)
(set! this this)
(goto cfg-4)
)
(format #t "[~8x] ~A~%" this 'hiphog-mirror-wf-pt)
(format #t "~1Tx: ~f~%" (-> this x))
(format #t "~1Ty: ~f~%" (-> this y))
(label cfg-4)
this
)
;; definition for symbol *hiphog-mirror-sheen-waveform*, type (inline-array ripple-wave)
(define *hiphog-mirror-sheen-waveform*
"A collection of [[ripple-wave]]'s used to apply the effect to the hiphog's mirror"
(new 'static 'inline-array ripple-wave 6
(new 'static 'ripple-wave :xmul 0.0625 :zmul 0.5)
(new 'static 'ripple-wave :offs 0.125 :zmul 0.375 :delta 0.9)
(new 'static 'ripple-wave :xdiv -13107 :zdiv #x3ecc :delta 0.5)
(new 'static 'ripple-wave :scale 1.0 :speed 0.52)
(new 'static 'ripple-wave :scale 0.5625 :offs 0.5 :xmul 0.625)
(new 'static 'ripple-wave :offs 0.875 :zdiv #x3f80 :zmul 1.0)
)
)
;; definition for function hiphog-mirror-sheen-func
;; WARN: Return type mismatch int vs none.
(defun hiphog-mirror-sheen-func ((arg0 sparticle-system) (arg1 sparticle-cpuinfo) (arg2 matrix))
"Handles the effect on the hiphogs mirror, which involves using [[*hiphog-mirror-sheen-waveform*]]
TODO on args and some more documentation"
(let ((s5-0 (new 'stack-no-clear 'vector)))
(set-vector! s5-0 -1515.52 0.0 -95436.8 1.0)
(vector-! s5-0 (camera-pos) s5-0)
(set! (-> s5-0 y) 0.0)
(vector-normalize! s5-0 1.0)
(let* ((f0-8 (+ 32768.0 (atan (-> s5-0 x) (-> s5-0 z))))
(f0-9 (lerp-scale 0.0 1.0 f0-8 19478.756 45875.2))
(curr-ripple-wave (the-as object (-> *hiphog-mirror-sheen-waveform* 0)))
(prev-ripple-wave (the-as ripple-wave curr-ripple-wave))
)
(while (< (-> (the-as ripple-wave curr-ripple-wave) scale) f0-9)
(set! prev-ripple-wave (the-as ripple-wave curr-ripple-wave))
(set! curr-ripple-wave (&-> (the-as (inline-array ripple-wave) curr-ripple-wave) 0 xmul))
)
(let ((f0-12 (lerp 0.9 1.0 (lerp
(-> prev-ripple-wave offs)
(-> (the-as ripple-wave curr-ripple-wave) offs)
(/ (- f0-9 (-> prev-ripple-wave scale))
(- (-> (the-as ripple-wave curr-ripple-wave) scale) (-> prev-ripple-wave scale))
)
)
)
)
)
(set! (-> arg2 vector 2 w) (* 128.0 f0-12 f0-12 f0-12))
)
)
)
0
(none)
)
;; failed to figure out what this is:
(defpart 3320
:init-specs ((:texture (hiphog-mirror hiphog-sprite))
(:num 1.0)
(:x (meters 0.2))
(:y (meters -0.2))
(:z (meters -0.99))
(:scale-x (meters 17))
(:rot-x (degrees 90))
(:rot-y (degrees 0))
(:rot-z (degrees 0))
(:scale-y (meters 8.4))
(:r 64.0)
(:g :copy r)
(:b :copy g)
(:a 96.0)
(:timer (seconds 0.017))
(:flags (sp-cpuinfo-flag-2 left-multiply-quat))
(:func 'hiphog-mirror-sheen-func)
(:rotate-y (degrees 33.436))
)
)