diff options
author | Colin Okay <colin@cicadas.surf> | 2022-07-09 10:49:55 -0500 |
---|---|---|
committer | Colin Okay <colin@cicadas.surf> | 2022-07-09 10:49:55 -0500 |
commit | 33534367e22ea1b9eb44ea5b0fc648b7988ae528 (patch) | |
tree | 0d985f8b58475fee31e0e56bbd06fb0ca825dacc /examples/09-ghoulspree.lisp | |
parent | fa5205509e1e56e8894069d02c44f6e527c07fbd (diff) |
[example] print a message about what to do
Diffstat (limited to 'examples/09-ghoulspree.lisp')
-rw-r--r-- | examples/09-ghoulspree.lisp | 2 |
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)) |