diff options
Diffstat (limited to 'lisparuga/bullets.scm')
| -rw-r--r-- | lisparuga/bullets.scm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisparuga/bullets.scm b/lisparuga/bullets.scm index 6645f0d..4fee7c1 100644 --- a/lisparuga/bullets.scm +++ b/lisparuga/bullets.scm @@ -73,15 +73,15 @@ (define small-dot (make-bullet 'small-dot (make-rect -1.0 -1.0 2.0 2.0) 0 1)) (define medium-dot - (make-bullet 'medium-dot (make-rect 0.0 0.0 0.0 0.0) 0 1)) + (make-bullet 'medium-dot (make-rect -2.0 -2.0 4.0 4.0) 6 7)) (define large-dot - (make-bullet 'large-dot (make-rect 0.0 0.0 0.0 0.0) 0 1)) -(define tapered-shot - (make-bullet 'tapered-shot (make-rect 0.0 0.0 0.0 0.0) 0 1)) + (make-bullet 'large-dot (make-rect -7.0 -7.0 14.0 14.0) 10 11)) +;; (define tapered-shot +;; (make-bullet 'tapered-shot (make-rect 0.0 0.0 0.0 0.0) 0 1)) ;; Do lasers need a special data type? maybe I won't even get around ;; to implementing them... -(define big-laser - (make-bullet 'big-laser (make-rect 0.0 0.0 0.0 0.0) 0 1)) +;; (define big-laser +;; (make-bullet 'big-laser (make-rect 0.0 0.0 0.0 0.0) 0 1)) ;;; |