summaryrefslogtreecommitdiff
path: root/bonnie-bee/boss.scm
diff options
context:
space:
mode:
authorDavid Thompson <dthompson@vistahigherlearning.com>2021-10-21 19:33:42 -0400
committerDavid Thompson <dthompson@vistahigherlearning.com>2021-10-21 19:33:42 -0400
commit10b02b1fb15b76c8037760f2a3e8dc3601759f28 (patch)
tree130d2531d8abf7d4b63873ed938959b57e354fd8 /bonnie-bee/boss.scm
parentac7bd2ccf3111575a549366e66bbf19b75785cf8 (diff)
Add roughly finished level.
Diffstat (limited to 'bonnie-bee/boss.scm')
-rw-r--r--bonnie-bee/boss.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/bonnie-bee/boss.scm b/bonnie-bee/boss.scm
index 7e4d375..885f0bc 100644
--- a/bonnie-bee/boss.scm
+++ b/bonnie-bee/boss.scm
@@ -49,7 +49,7 @@
(set! (invincible? boss) #f)
(let ((big-speed 2.0)
(little-speed 1.0))
- (while (> (health boss) 2000)
+ (while (> (health boss) 800)
(let ((d (direction-to boss (player (parent boss)))))
(add-bullet (bullets (parent boss))
large-enemy-bullet
@@ -63,7 +63,7 @@
(loop (+ i 1)))))))
(sleep 2.5)
(let loop ((theta 0.0))
- (unless (<= (health boss) 1000)
+ (unless (<= (health boss) 400)
(audio-play (asset-ref enemy-shoot-sound))
(repeat 2 (random-shot 0.5))
(circle-shot 2 theta 1.5 large-enemy-bullet)