aboutsummaryrefslogtreecommitdiffhomepage
path: root/examples/06-sprite.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'examples/06-sprite.lisp')
-rw-r--r--examples/06-sprite.lisp3
1 files changed, 2 insertions, 1 deletions
diff --git a/examples/06-sprite.lisp b/examples/06-sprite.lisp
index 91910f4..8b6380a 100644
--- a/examples/06-sprite.lisp
+++ b/examples/06-sprite.lisp
@@ -18,7 +18,7 @@
(unless (ww::runningp (ww::current-frameset sprite))
(setf (ww::runningp (ww::current-frameset sprite)) t)))
-(define-symbol-macro +walking-speed+ 1)
+(define-symbol-macro +walking-speed+ 10)
(ww::defhandler move-by-face
(ww::on-perframe (sprite)
@@ -93,6 +93,7 @@
:right right)
:frameset-key :front)))
+ (setf (ww::runningp (ww::current-frameset dude)) nil)
(ww::add-handler dude #'move-by-face )
(ww::add-handler dude #'move-dude)
(ww::add-handler dude #'stand)