diff --git a/src/play_clj/core_basics.clj b/src/play_clj/core_basics.clj
index e0b785c..fd0585f 100644
--- a/src/play_clj/core_basics.clj
+++ b/src/play_clj/core_basics.clj
@@ -102,7 +102,7 @@
     :fullscreen? (graphics! :is-fullscreen)
     :touched? (input! :is-touched)
     :x (input! :get-x)
-    :y (input! :get-y)
+    :y (- (graphics! :get-height) (input! :get-y))
     (u/throw-key-not-found k)))
 
 (defmacro key-code