summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2023-10-22 21:42:52 -0400
committerDavid Thompson <dthompson2@worcester.edu>2023-10-22 21:42:52 -0400
commitc9ba8b1931e5675e0911ca17a3f16c95d73e8381 (patch)
tree1711770b815b2893fa2b9cde39c9e5291ddab814
parent2cfd7a3a98260a14cfd50f5f496b416da402eb05 (diff)
Add some more placeholder level.
-rw-r--r--game.scm32
1 files changed, 30 insertions, 2 deletions
diff --git a/game.scm b/game.scm
index cd9ff7f..106e9cc 100644
--- a/game.scm
+++ b/game.scm
@@ -389,7 +389,7 @@
;; Scrolling level:
(define *scroll* 0.0)
- (define *scroll-speed* 1.0)
+ (define *scroll-speed* 0.5)
(define (update-scroll!)
(set! *scroll* (+ *scroll* *scroll-speed*)))
;; sprite sheet offset, x, y
@@ -434,6 +434,34 @@
X X X _ _ _ _ _ _ _ _ _ X X X
X X _ _ _ _ _ _ _ _ _ _ _ X X
X _ _ _ _ _ _ _ _ _ _ _ _ _ X
+ X X _ _ _ _ _ _ _ _ _ _ _ X X
+ X X X _ _ _ _ _ _ _ _ _ X X X
+ X X _ _ _ _ _ _ _ _ _ _ _ X X
+ X _ _ _ _ _ _ _ _ _ _ _ _ _ X
+ X X _ _ _ _ _ _ _ _ _ _ _ X X
+ X X X _ _ _ _ _ _ _ _ _ X X X
+ X X _ _ _ _ _ _ _ _ _ _ _ X X
+ X _ _ _ _ _ _ _ _ _ _ _ _ _ X
+ X X _ _ _ _ _ _ _ _ _ _ _ X X
+ X X X _ _ _ _ _ _ _ _ _ X X X
+ X X _ _ _ _ _ _ _ _ _ _ _ X X
+ X _ _ _ _ _ _ _ _ _ _ _ _ _ X
+ X X _ _ _ _ _ _ _ _ _ _ _ X X
+ X X X _ _ _ _ _ _ _ _ _ X X X
+ X X _ _ _ _ _ _ _ _ _ _ _ X X
+ X _ _ _ _ _ _ _ _ _ _ _ _ _ X
+ X X _ _ _ _ _ _ _ _ _ _ _ X X
+ X X X _ _ _ _ _ _ _ _ _ X X X
+ X X _ _ _ _ _ _ _ _ _ _ _ X X
+ X _ _ _ _ _ _ _ _ _ _ _ _ _ X
+ X X _ _ _ _ _ _ _ _ _ _ _ X X
+ X X X _ _ _ _ _ _ _ _ _ X X X
+ X X _ _ _ _ _ _ _ _ _ _ _ X X
+ X _ _ _ _ _ _ _ _ _ _ _ _ _ X
+ X X _ _ _ _ _ _ _ _ _ _ _ X X
+ X X X _ _ _ _ _ _ _ _ _ X X X
+ X X _ _ _ _ _ _ _ _ _ _ _ X X
+ X _ _ _ _ _ _ _ _ _ _ _ _ _ X
X _ _ _ _ _ _ _ _ _ _ _ _ _ X
X _ _ _ _ _ _ _ _ _ _ _ _ _ X
X _ _ _ _ _ _ _ _ _ _ _ _ _ X
@@ -692,7 +720,7 @@
(set! *player-fire-counter*
(modulo (+ *player-fire-counter* 1) player-fire-interval))
(when (= *player-fire-counter* 0)
- (sound-effect-play sound:player-shoot)
+ (sound-effect-play sound:player-shoot 0.5)
(bullet-pool-add! player-bullets 0
(- (vec2-x player-position) 6.0)
(vec2-y player-position)