centering

1 files changed, 3 insertions, 5 deletions

diff --git a/the-price-of-a-cup-of-coffee.lisp b/the-price-of-a-cup-of-coffee.lisp
index 891d702..bdb5bd7 100644
--- a/the-price-of-a-cup-of-coffee.lisp
+++ b/the-price-of-a-cup-of-coffee.lisp
@@ -170,20 +170,18 @@
   (generosity 0.25)
   (vulnerability 3))
 
-
-
 (defvar *nance*)
 
 
 (defun boot-up (renderer)
-
   (boot-up-assets renderer)
-  (setf *nance* (make-instance 'hero :sheet *nance-texture*)))
+  (setf *nance* (make-instance 'hero :sheet *nance-texture*))
+  (setf (sdl2:rect-x (pos *nance*))
+        (round (* 0.5 (- +window-width+ (sdl2:rect-width (pos *nance*)))))))
 
 
 (defparameter +frame-delay+ (round (/ 1000 60)))
 
-
 (defun action-key-pressed ()
   (print "Action"))