better particle hacks

This commit is contained in:
ManDude
2022-06-21 01:06:29 +01:00
parent 3ed72dab75
commit e32cd4422a
@@ -938,7 +938,8 @@
(if (-> *pc-settings* ps2-parts?)
;; pc port : launchers have larger bsphere if you have ps2 parts off
(sphere-in-view-frustum? (the-as sphere gp-1))
(sphere-in-view-frustum? (the-as sphere (let ((bsph (new-stack-vector0))) (vector-copy! bsph gp-1) (*! (-> bsph w) 4.0) bsph))))
(sphere-in-view-frustum? (the-as sphere (begin (*! (-> gp-1 w) 8.0) gp-1)))
)
)
)
)
@@ -990,10 +991,10 @@
(set! f30-0 0.0)
)
;; pc hack for more particles.
;; if we have ps2 particles off, say we're at the camera
(with-pc
(if (not (-> *pc-settings* ps2-parts?))
(/! f30-0 256.0)))
(set! f30-0 0.0)))
;; loop over particles in the group.
(let ((s2-1 (-> obj length)))