Committing first version of the 1 or 2 player pong game.

src/main.lua

@@ -0,0 +1,288 @@
-- Copyright (c) 2012 Patrick Jones http://patrickmjones.com
-- 
-- Permission is hereby granted, free of charge, to any person obtaining
-- a copy of this software and associated documentation files (the
-- "Software"), to deal in the Software without restriction, including
-- without limitation the rights to use, copy, modify, merge, publish,
-- distribute, sublicense, and/or sell copies of the Software, and to
-- permit persons to whom the Software is furnished to do so, subject to
-- the following conditions:
-- 
-- The above copyright notice and this permission notice shall be
-- included in all copies or substantial portions of the Software.
-- 
-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
-- EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
-- MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
-- NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
-- LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
-- OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
-- WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
-- 
-- 
--
-- Controls:
--  Left Player: "a" moves paddle up, "z" moves paddle down
--  Right Player: "up" key moves paddle up, "down" key moves paddle down
--  "Spacebar" to serve the ball: 
--    NOTE: left player serves first and last scoring player serves thereafter
--
--
--
-- pjones-pong
function love.config(t)
    t.title = "Pong by Patrick Jones"
    t.author = "Patrick Jones"  
	t.version = "0.8.0"
	t.fullscreen = true
	t.screen.width = 800
	t.screen.height = 200
	t.release = true
	t.modules.joystick = false
	t.modules.physics = false
end

function love.load()
	screenX = love.graphics.getWidth()
	screenY = love.graphics.getHeight()
	singlePlayerMode = false
	showMenu = true

	-- Basic configuration
	gameconfig = {}
	gameconfig.quitKey = "escape"
	gameconfig.paddles = {}
	gameconfig.paddles.width = 15
	gameconfig.paddles.height = 70
	gameconfig.paddles.speed = 600
	gameconfig.ball = {}
	gameconfig.ball.vspeedmin = 50
	gameconfig.ball.vspeedmax = 600
	gameconfig.ball.speedinitial = 150
	gameconfig.ball.speedplus = 100
	gameconfig.buttons = {}
	gameconfig.buttons.height = 40
	gameconfig.buttons.width = 100
	gameconfig.buttons.Y = screenY * 0.5 - 20
	gameconfig.buttons.button1X = screenX*0.4 - (gameconfig.buttons.width * 0.5)
	gameconfig.buttons.button2X = screenX*0.6 - (gameconfig.buttons.width * 0.5)

	-- p1 specific config
	paddle1 = initialize_paddle()
	paddle1.upKey = "a"
	paddle1.downKey = "z"

	-- p2 specific config
	paddle2 = initialize_paddle()
	paddle2.x = screenX - gameconfig.paddles.width
	paddle2.upKey = "up"
	paddle2.downKey = "down"

	-- ball initialization
	ball = {}
	ball.inmotion = false
	ball.direction = "l"
	ball.vdirection = "d"
	ball.speed = gameconfig.ball.speedinitial
	ball.vspeed = 0
	ball.height = 10
	ball.width = 10

	recenter_ball()

	-- load necessary sound effects
	sounds = {}
	sounds.blip = love.audio.newSource( "blip.wav", "static" )
	sounds.score = love.audio.newSource( "score.wav", "static" )
end

-- This is the main logic part of the loop
function love.update(dt)
	if love.keyboard.isDown(gameconfig.quitKey) then
		showMenu = true
	elseif showMenu then		
		if love.mouse.isDown("l") then -- click!
			local mouseX, mouseY = love.mouse.getPosition()
			if mouseX > gameconfig.buttons.button1X 
				and mouseX < gameconfig.buttons.button1X + gameconfig.buttons.width 
				and mouseY > gameconfig.buttons.Y 
				and mouseY < gameconfig.buttons.Y + gameconfig.buttons.height then
					showMenu = false
					singlePlayerMode = true
			elseif mouseX > gameconfig.buttons.button2X 
				and mouseX < gameconfig.buttons.button2X + gameconfig.buttons.width 
				and mouseY > gameconfig.buttons.Y 
				and mouseY < gameconfig.buttons.Y + gameconfig.buttons.height then
					showMenu = false
					singlePlayerMode = false
			end
		end
	else
		move_paddle(paddle1, dt)

		if singlePlayerMode then
			ai_paddle_movement(paddle2, dt)
		else
			move_paddle(paddle2, dt)
		end

		-- press "space" to serve
		if ball.inmotion == false and love.keyboard.isDown(" ") then
			ball.inmotion = true
			ball.vspeed = math.random(gameconfig.ball.vspeedmin, gameconfig.ball.vspeedmax)
		end

		-- Move the ball as necessary
		if ball.inmotion == true then
			if ball.direction == "l" then
				ball.x = ball.x - ball.speed*dt			
			else
				ball.x = ball.x + ball.speed*dt
			end

			if ball.vdirection == "u" then
				ball.y = ball.y - ball.vspeed*dt
			else
				ball.y = ball.y + ball.vspeed*dt
			end
		end

		-- ball/paddle collision
		if ball.x < paddle1.x + paddle1.width and ball.y > paddle1.y and ball.y < paddle1.y + paddle1.height and not (ball.direction == "r") then
			paddle_collision()
		elseif ball.x > paddle2.x - 5 and ball.y > paddle2.y and ball.y < paddle2.y + paddle2.height and not (ball.direction == "l") then
			paddle_collision()
		end

		-- ball edge bouncing
		if ball.y < 0 then -- ball hit top of screen
			ball.vdirection = "d" 
		elseif ball.y > screenY - ball.height then -- ball hit bottom of screen
			ball.vdirection = "u"
		end

		-- See if anyone scored
		if ball.x < 0 then -- p2 scored!
			point_scored(paddle2) 
		elseif ball.x > screenX - ball.width then -- p1 scored!
			point_scored(paddle1)
		end
	end
end

-- Now that all the calculations are done, we just draw everything on screen
function love.draw()
	if showMenu then
		love.graphics.setBackgroundColor(70, 113, 213, 150)
		love.graphics.setColor(6, 38, 111, 150)
		love.graphics.rectangle("fill", gameconfig.buttons.button1X, gameconfig.buttons.Y, gameconfig.buttons.width, gameconfig.buttons.height)
		love.graphics.rectangle("fill", gameconfig.buttons.button2X, gameconfig.buttons.Y, gameconfig.buttons.width, gameconfig.buttons.height)

		love.graphics.setColor(255, 255, 255, 255)
		love.graphics.print("1 Player", gameconfig.buttons.button1X + 25, gameconfig.buttons.Y + 12)
		love.graphics.print("2 Player", gameconfig.buttons.button2X + 25, gameconfig.buttons.Y + 12)
	else
		love.graphics.print(paddle1.score, screenX * 0.25, 5)
		love.graphics.print(paddle2.score, screenX * 0.75, 5)

		love.graphics.print("Player 1: '" .. paddle1.upKey .. "' to move up, '" .. paddle1.downKey .. "' to move down", screenX * 0.05, screenY - 20)
		if not singlePlayerMode then
			love.graphics.print("Player 2: '" .. paddle2.upKey .. "' to move up, '" .. paddle2.downKey .. "' to move down", screenX * 0.60, screenY - 20)
		end
		if not ball.inmotion then
			love.graphics.print("Press 'spacebar' to serve", screenX * 0.5 - 75, (screenY * 0.5) + 25)
		end
		love.graphics.setColor(255,255,255,255)
		love.graphics.rectangle("fill", paddle1.x, paddle1.y, paddle1.width, paddle1.height)
		love.graphics.rectangle("fill", paddle2.x, paddle2.y, paddle2.width, paddle2.height)
		love.graphics.rectangle("fill", ball.x, ball.y, ball.width, ball.height)
	end
end

-- Sets the ball to the center of the screen
function recenter_ball() 
	ball.x = (screenX * 0.5) - (ball.width * 0.5)
	ball.y = (screenY * 0.5) - (ball.height * 0.5)
end

-- Basic paddle setup
function initialize_paddle()
	local paddle = {}
	paddle.x = 0
	paddle.y = 0
	paddle.speed = gameconfig.paddles.speed
	paddle.height = gameconfig.paddles.height
	paddle.width = gameconfig.paddles.width
	paddle.score = 0
	return paddle
end

-- Check if a paddle's configured key is pressed for up or down and moves it accordlingly
function move_paddle(paddle, dt)
	if love.keyboard.isDown(paddle.upKey) then
		paddle.y = paddle.y - paddle.speed*dt
	elseif love.keyboard.isDown(paddle.downKey) then
		paddle.y = paddle.y + paddle.speed*dt
	end
	enforce_paddle_boundaries(paddle)
end

-- Ball has collided with a paddle, take appropriate action
function paddle_collision()
	-- bounce the ball back, if "r"ight then go "l"eft and vice versa
	if ball.direction == "l" then
		ball.direction = "r"
	else
		ball.direction = "l"
	end

	-- increase ball speed each time it is hit
	ball.speed = ball.speed + gameconfig.ball.speedplus

	-- randomize the vertical bounce
	ball.vspeed = math.random(gameconfig.ball.vspeedmin, gameconfig.ball.vspeedmax)	

	-- play sound
	love.audio.rewind(sounds.blip)
	love.audio.play(sounds.blip)
end

-- A point has been scored!
function point_scored(paddle)
	ball.inmotion = false
	ball.speed = gameconfig.ball.speedinitial
	recenter_ball()
	paddle.score = paddle.score + 1
	love.audio.rewind(sounds.score)
	love.audio.play(sounds.score)
end

-- Computer controlled paddle
function ai_paddle_movement(paddle, dt)
	-- paddle only reacts when ball is coming towards it
	if ball.direction == "r" then
		if ball.y < paddle.y + (paddle.height * 0.5) then
			paddle.y = paddle.y - paddle.speed*dt*0.7 -- ai moves at 70% of human speed
		elseif ball.y > paddle.y + (paddle.height * 0.5) then
			paddle.y = paddle.y + paddle.speed*dt
		end	
		enforce_paddle_boundaries(paddle)
	end
end

-- Enforces that the paddle does not go outside the screen
function enforce_paddle_boundaries(paddle)
 	if paddle.y < 0 then
		paddle.y = 0
	elseif paddle.y > screenY - paddle.height then
		paddle.y = screenY - paddle.height
	end
end

-- checks for keypresses, used for quit app
function love.keypressed(key)
   if key == gameconfig.quitKey then
      love.event.push("quit") 
   end
end