factors delta time in.

2015-02-21 18:51:34 -08:00
parent e15c2bd6de
commit d7e53e3355
1 changed files with 3 additions and 0 deletions
--- a/desktop/src-common/advent/actions.clj
+++ b/desktop/src-common/advent/actions.clj
@@ -283,6 +283,9 @@
                                    delta-y (- target-y from-y)
                                    distance (utils/dist from-x from-y target-x target-y)
                                    speed (* (or scale-x 1.0) 1.5)
+                                    speed (* speed 
+                                             (/ (:delta-time screen)
+                                                (/ 1.0 60.0)))
                                    moved-x (if (= 0.0 distance)
                                              0
                                              (* speed (/ delta-x distance)))