require "luaScript/extern"
require "luaScript/VisibleRect"
require "luaScript/TouchesTest/Paddle"

Ball = class("Ball", function(texture)
    return CCSprite:createWithTexture(texture)
end)

Ball.__index = Ball

Ball.m_velocity = CCPoint(0,0)

local M_PI = 3.1415926

function Ball:radius()
    local  size = self:getTexture():getContentSize()
    return size.width/2
end

function Ball:move(delta)
    local getPosition = CCPoint(self:getPosition())
    local position = CCPoint.__mul(self.m_velocity, delta)
    self:setPosition( CCPoint.__add(getPosition, position) );
    
    if (getPosition.x > VisibleRect:right().x - self:radius()) then
        self:setPosition( CCPoint( VisibleRect:right().x - self:radius(), getPosition.y) );
        self.m_velocity.x = self.m_velocity.x * -1;
    elseif (getPosition.x < VisibleRect:left().x + self:radius()) then
        self:setPosition( CCPoint(VisibleRect:left().x + self:radius(), getPosition.y) );
        self.m_velocity.x = self.m_velocity.x * -1;
    end
end

function Ball:collideWithPaddle(paddle)
    local paddleRect = paddle:rect()
    local paddleGetPosition = CCPoint(paddle:getPosition())
    local selfGetPosition = CCPoint(self:getPosition())

    paddleRect.origin.x = paddleRect.origin.x + paddleGetPosition.x;
    paddleRect.origin.y = paddleRect.origin.y + paddleGetPosition.y;

    local lowY  = paddleRect:getMinY();
    local midY  = paddleRect:getMidY();
    local highY = paddleRect:getMaxY();

    local leftX  = paddleRect:getMinX();
    local rightX = paddleRect:getMaxX();

    if (selfGetPosition.x > leftX and selfGetPosition.x < rightX)  then

        local hit = false;
        local angleOffset = 0.0; 

        if (selfGetPosition.y > midY and selfGetPosition.y <= highY + self:radius()) then
            self:setPosition( CCPoint(selfGetPosition.x, highY + self:radius()) );
            hit = true;
            angleOffset = M_PI / 2;
        elseif (selfGetPosition.y < midY and selfGetPosition.y >= lowY - self:radius()) then
            self:setPosition( CCPoint(selfGetPosition.x, lowY - self:radius()) );
            hit = true;
            angleOffset = -M_PI / 2;
        end

        if (hit) then
            local hitAngle = (CCPoint.__sub(paddleGetPosition, paddleGetPosition)):getAngle() + angleOffset;

            local scalarVelocity = (self.m_velocity):getLength() * 1.05;
            local velocityAngle = -(self.m_velocity):getAngle() + 0.5 * hitAngle;

            self.m_velocity = CCPoint.__mul(CCPoint:forAngle(velocityAngle), scalarVelocity);
        end
    end   

end

function Ball:setVelocity(velocity)
    self.m_velocity = velocity
end

function Ball:getVelocity()
    return self.m_velocity
end

function Ball.ballWithTexture(aTexture)

    if(aTexture == nil) then
        cclog("in ballWithTexture aTexture == nil")
    end

    local ball = Ball.new(aTexture)
    ball:autorelease()
    return ball
end