-- main

require 'vec2'
require 'player'


scene = {}
scene.width = love.graphics.getWidth()
scene.height = love.graphics.getHeight()
scene.players = {}
scene.grid = {}
scene.grid.bgcolor = {0.2, 0.2, 0.5}
scene.grid.linecolor = {0.3, 0.3, 0.6}
scene.grid.delta = 50

-- load
function scene:load()
    table.insert(scene.players, require('players/1'))
    table.insert(scene.players, require('players/2'))
end

-- draw
function scene:drawGrid()
    love.graphics.setBackgroundColor(self.grid.bgcolor)
    love.graphics.setColor(self.grid.linecolor)

    for x=0,self.width,self.grid.delta do
        love.graphics.line(x, 0, x, self.height)
    end
    for y=0,self.height,self.grid.delta do
        love.graphics.line(0, y, self.width, y)
    end
end

function scene:drawPlayers()
    for _,player in pairs(self.players) do
        player:draw()
    end
end

function scene:draw()
    self:drawGrid()
    self:drawPlayers()
end

-- update
function scene:updatePlayers(dt)
    for _,player in pairs(self.players) do
        player:update(dt)
    end
end

function doesLineIntersectPlayerPaths(path, x1, y1, x2, y2)
    return false
end

function scene:handleCollisions()
    -- calculate the last line for each player from current position
    -- check if line intersects any other path line
    -- if so, raise collision event for player
    for _,player in pairs(self.players) do
        local x1 = player.path[#player.path-1]
        local y1 = player.path[#player.path]
        local x2 = player.position.x
        local y2 = player.position.y

        -- check intersection against each existing path
        for _,player2 in pairs(self.players) do
            if doesLineIntersectPlayerPaths(player2.path, x1, y1, x2, y2) then
                love.event.push('collision', player)
            end
        end
    end
end

function scene:update(dt)
    self:updatePlayers(dt)
    self:handleCollisions()
end

-- quit
function scene:quit()
    for _,player in pairs(self.players) do
        print(tostring(player)..' generated '.. #player.path / 2 .. ' path points')
    end
end