From 33534367e22ea1b9eb44ea5b0fc648b7988ae528 Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Sat, 9 Jul 2022 10:49:55 -0500 Subject: [example] print a message about what to do --- examples/09-ghoulspree.lisp | 2 ++ 1 file changed, 2 insertions(+) (limited to 'examples') 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)) -- cgit v1.2.3