Ship = class()
-- Free game by juaxix
-- http://www.xixgames.com
-- Copyright LGPL - 11/2011
function Ship:init()
    -- you can accept and set parameters here
    self.position = vec2(0,0)
    self.size = 66
    self.health = 50
    self.attackPower = 1
    self.attacks = {}
    self.invulnDuration = 0
    self.knockVel = vec2(0,0)
    self.maxattacks = 3
    self.nattacks = 0
    watch("ShipHealth")
    self.acolor   = color(255, 253, 0, 255)
end
 
function Ship:move(dir)
    newPos = self.position + dir * 20
    newPos = newPos + self.knockVel
    
    if cosmos:isCollidingWithAsteroids(self,45,false) or 
       cosmos:isCollidingWithAliens(self,66,false) then
        -- hit 
        self:applyDamageFromPoint(self.position,math.random(3,6))
    else
        if newPos.x > WIDTH then 
            newPos.x = 0
        elseif newPos.x < 0 then
            newPos.x = WIDTH
        end
        if newPos.y > HEIGHT then
            newPos.y = 0
        elseif newPos.y < 0 then
            newPos.y = HEIGHT
        end
        self.position = newPos
    end
    -- check loots
    for i,l in ipairs(cosmos.loots) do
        if l:collect(self.position) then
            if l.type == "powerup" then
                self.acolor = l.acolor
                self.maxattacks = math.min(self.maxattacks + 1, 21)
            else
                self.health = math.min(l.life+self.health,50)
            end
        end
        if l.position.y>HEIGHT or l.position.x<0 then
            table.remove(cosmos.loots, i)
            cosmos.nloots = cosmos.nloots - 1
        end
    end
end
 
function Ship:applyDamageFromPoint(point, damage)
    if self.health == 0 then return end
    if self.invulnDuration == 0 then
        sound(SOUND_HIT)
        self.health = math.max(self.health - damage, 0)
        if self.health == 0 then
           table.insert(cosmos.explosions, Explosion:init(self.position,color(255,255,255,255),"Died") )
        end
        local l = self.position - point
        l = l:normalize()
        self.invulnDuration = 0.5

    end
end
 
function Ship:fire()
    if self.nattacks<self.maxattacks then
        sound(SOUND_HIT,123)
        table.insert(self.attacks, Fire(self.position, self.attackPower,self.acolor) )
        self.nattacks = self.nattacks + 1
    end
end
 
function Ship:damageAtPoint(point)
  --  if self.currentAttack then
   --     dta = self.position:dist(point) 
   --     if dta < self.currentAttack.currentSize * 0.4 then
  --          return dta/self.currentAttack.blastSize * 30
   --     end
  --  end
    
    return 0
end
 
function Ship:isDead()
    return self.health == 0
end
 
function Ship:drawDead()
   -- tint(50,50,50,255)
    sprite("Small World:Bunny Skull", self.position.x + 5, self.position.y + 25, self.size + 20)
end
 
function Ship:computeHeadAngle()
    pushMatrix()
 
    translate(WIDTH/2, HEIGHT/2)
 
    grav = vec2(Gravity.x * 300, Gravity.y * 300)
 
    --print(grav)
 
    line(0, 0, grav.x, grav.y)
 
    -- Arrowhead
    down = vec2(0,-1)
    orient = down:angleBetween(grav)
 
    pushMatrix()
    resetMatrix()
 
    translate(WIDTH/2,HEIGHT/2)
    translate(grav.x,grav.y)
    rotate(math.deg(orient))
    
    line(0, 0, -20, 25)
    line(0, 0,  20, 25)
    popMatrix()
    -- End Arrowhead
 
    popMatrix()
    return math.deg(orient)
end
 
function Ship:draw()
    self.invulnDuration = math.max(self.invulnDuration - 1/60, 0)
    self.angle = self:computeHeadAngle()
    
    moveVec = vec2(Gravity.x, Gravity.y) + vec2(0,0.6)
    self:move(moveVec)
    
    pushStyle()
 
    for i,a in ipairs(self.attacks) do
        a:draw()
        if cosmos:isCollidingWithAsteroids(a, 48, true) or 
           cosmos:isCollidingWithAliens(a,45,true)
            or a.life<=0 
        then
            table.remove(self.attacks,i)
            self.nattacks = self.nattacks - 1
        end    
    end
    
    stroke(0,0,0,0)
    fill(15, 23, 65, 141)
    ellipse(self.position.x + 5, self.position.y - 5, self.size, self.size)
 
    self:tintForInvulnDuration(self.invulnDuration)
    
    pushMatrix()
    translate(self.position.x + 5, self.position.y)
    rotate(self.angle)
    sprite("SpaceCute:Rocketship", 0,0 + 25, self.size + 20)
    popMatrix()
    popStyle()
    noTint()
    ShipHealth = self.health
end
 
function Ship:touched(touch)
    if self.health == 0 then return end
    if touch.state == ENDED then --and self.invulnDuration == 0 then
        self:fire()
    end
end
 
function Ship:tintForInvulnDuration(inv)
    if inv > 0 then
        local flashAmount = (math.sin(inv*20)+1)*0.5
        tint(255,255,255,255 * flashAmount)
    else
        --tint(255,255,255,255)
        noTint()
    end
end