diff options
| author | David Thompson <dthompson@vistahigherlearning.com> | 2021-10-21 19:33:42 -0400 |
|---|---|---|
| committer | David Thompson <dthompson@vistahigherlearning.com> | 2021-10-21 19:33:42 -0400 |
| commit | 10b02b1fb15b76c8037760f2a3e8dc3601759f28 (patch) | |
| tree | 130d2531d8abf7d4b63873ed938959b57e354fd8 /bonnie-bee/flower.scm | |
| parent | ac7bd2ccf3111575a549366e66bbf19b75785cf8 (diff) | |
Add roughly finished level.
Diffstat (limited to 'bonnie-bee/flower.scm')
| -rw-r--r-- | bonnie-bee/flower.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/bonnie-bee/flower.scm b/bonnie-bee/flower.scm index 2c018e9..13d8c10 100644 --- a/bonnie-bee/flower.scm +++ b/bonnie-bee/flower.scm @@ -38,10 +38,13 @@ (define-method (on-collide (flower <flower>) (bullet <bullet>)) (cond - ((player-bullet? bullet) + ((player-primary-bullet? bullet) (damage flower 1) (kill-bullet bullet) #t) + ((player-bomb-bullet? bullet) + (damage flower 5) + (kill-bullet bullet)) ((and (not (pollen-enabled?)) (enemy-bullet? bullet)) (damage flower 1000) (kill-bullet bullet)) |