aboutsummaryrefslogtreecommitdiffhomepage
path: root/examples/09-ghoulspree.lisp
diff options
context:
space:
mode:
authorColin Okay <colin@cicadas.surf>2022-07-09 10:49:55 -0500
committerColin Okay <colin@cicadas.surf>2022-07-09 10:49:55 -0500
commit33534367e22ea1b9eb44ea5b0fc648b7988ae528 (patch)
tree0d985f8b58475fee31e0e56bbd06fb0ca825dacc /examples/09-ghoulspree.lisp
parentfa5205509e1e56e8894069d02c44f6e527c07fbd (diff)
[example] print a message about what to do
Diffstat (limited to 'examples/09-ghoulspree.lisp')
-rw-r--r--examples/09-ghoulspree.lisp2
1 files changed, 2 insertions, 0 deletions
diff --git a/examples/09-ghoulspree.lisp b/examples/09-ghoulspree.lisp
index 9b40605..d0e5ca1 100644
--- a/examples/09-ghoulspree.lisp
+++ b/examples/09-ghoulspree.lisp
@@ -111,6 +111,8 @@ on which boundary VAL is outside of."
(defmethod ww::boot ((app ghoulspree))
"Adds the intro text and sets up the start button handler."
+ (format t "Click to add ghouls to the screen.~%Press any key to toggle collision detection.~%")
+
(ww:add-handler app #'add-ghouls)
(ww:add-handler app #'moveghouls)
(ww:add-handler app #'toggle-collision))