mike: Added half movement speed key; added variables for keys

love/mike/lib/keys.lua

@@ -1,15 +1,22 @@
 require "lib/Tserial"
 
+QUIT_KEY = "q"
+SAVE_KEY = "s"
+LOAD_KEY = "l"
+HALF_SPEED = "lshift"
+MOVE_RIGHT = "right"
+MOVE_LEFT = "left"
+
 function love.keyreleased(key)
-  if key == "q" then
+  if key == QUIT_KEY then
       love.event.quit()
 
   -- save
-  elseif key == "s" then
+  elseif key == SAVE_KEY then
     love.filesystem.write(saveFile, Tserial.pack(player, false, true))
 
   -- Load
-  elseif key == "l" then
+  elseif key == LOAD_KEY then
   	
 		save_exists = love.filesystem.exists(saveFile)
 
@@ -19,6 +26,13 @@ function love.keyreleased(key)
   end 
 end
 
+function half_speed(object_speed)
+	if love.keyboard.isDown(HALF_SPEED) then
+		return object_speed/2
+	else return object_speed
+	end
+end
+
 function check_keys(object) 
   local newObject = {}
   newObject.x = object.x
@@ -27,12 +41,12 @@ function check_keys(object)
   newObject.height = object.height
   newObject.speed = object.speed
 	
-	if love.keyboard.isDown("right")  then
+	if love.keyboard.isDown(MOVE_RIGHT)  then
-    newObject.x = newObject.x + newObject.speed
+    newObject.x = newObject.x + half_speed(newObject.speed)
   end
 
-	if love.keyboard.isDown("left") then
+	if love.keyboard.isDown(MOVE_LEFT) then
-		newObject.x = newObject.x - newObject.speed
+		newObject.x = newObject.x - half_speed(newObject.speed)
 	end
 
 --  if love.keyboard.isDown("up") then