Permalink
Browse files

Tweaking basic example

  • Loading branch information...
Josh Marchán
Josh Marchán committed Jul 1, 2010
1 parent 4c4b8f8 commit fbce98ed060f3e059f7f81b7b14307c3531fd776
Showing with 2 additions and 2 deletions.
  1. +2 −2 examples/basic.lisp
View
@@ -13,8 +13,8 @@
(defmethod uid:on-draw ((game my-basic-game))
(uid:clear game)
- (uid:draw-rectangle (- (uid:width game) 25)
- (- (uid:height game) 25)
+ (uid:draw-rectangle (- (/ (uid:width game) 2) 25)
+ (- (/ (uid:height game) 2) 25)
50 50 :color uid:*red*))
(defmethod uid:on-key-down ((game my-basic-game) keycode keysym string)

0 comments on commit fbce98e

Please sign in to comment.