diff options
Diffstat (limited to 'super-bloom')
-rw-r--r-- | super-bloom/game.scm | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/super-bloom/game.scm b/super-bloom/game.scm index 311319c..24895ee 100644 --- a/super-bloom/game.scm +++ b/super-bloom/game.scm @@ -67,7 +67,7 @@ (water-particles (make <particles> #:name 'water-particles - #:rank 1 + #:rank 2 #:particles (make-particles 1024 #:texture (artifact water-particle-texture) @@ -79,7 +79,7 @@ (trail-particles (make <particles> #:name 'trail-particles - #:rank 1 + #:rank 2 #:particles (make-particles 1024 #:texture (artifact trail-particle-texture) @@ -92,7 +92,7 @@ (explosion-particles (make <particles> #:name 'explosion-particles - #:rank 1 + #:rank 2 #:particles (make-particles 1024 #:texture (artifact explosion-particle-texture) @@ -106,14 +106,6 @@ water-particles trail-particles explosion-particles - (make <player> - #:name 'player - #:rank 2 - #:position (vec2 (/ %game-width:float 2.0) - (/ %game-height:float 4.0)) - #:quadtree (quadtree mode) - #:water-particles water-particles - #:trail-particles trail-particles) (make <flower> #:name 'flower #:rank 4 @@ -121,7 +113,15 @@ (/ %game-height:float 2.0)) #:quadtree (quadtree mode) #:growth-goal 20 - #:growth-interval 3.0)) + #:growth-interval 3.0) + (make <player> + #:name 'player + #:rank 5 + #:position (vec2 (/ %game-width:float 2.0) + (/ %game-height:float 4.0)) + #:quadtree (quadtree mode) + #:water-particles water-particles + #:trail-particles trail-particles)) (run-script mode (show-instructions mode) (start-game mode)))) |