mirror of
https://github.com/AquariaOSE/Aquaria.git
synced 2024-12-28 07:45:49 +00:00
211 lines
6 KiB
Lua
211 lines
6 KiB
Lua
-- Copyright (C) 2007, 2010 - Bit-Blot
|
|
--
|
|
-- This file is part of Aquaria.
|
|
--
|
|
-- Aquaria is free software; you can redistribute it and/or
|
|
-- modify it under the terms of the GNU General Public License
|
|
-- as published by the Free Software Foundation; either version 2
|
|
-- of the License, or (at your option) any later version.
|
|
--
|
|
-- This program is distributed in the hope that it will be useful,
|
|
-- but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
|
--
|
|
-- See the GNU General Public License for more details.
|
|
--
|
|
-- You should have received a copy of the GNU General Public License
|
|
-- along with this program; if not, write to the Free Software
|
|
-- Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
|
|
if not v then v = {} end
|
|
if not AQUARIA_VERSION then dofile("scripts/entities/entityinclude.lua") end
|
|
|
|
-- ================================================================================================
|
|
-- I C E C H U N K C O M M O N S C R I P T
|
|
-- ================================================================================================
|
|
|
|
-- ================================================================================================
|
|
-- L O C A L V A R I A B L E S
|
|
-- ================================================================================================
|
|
|
|
v.n = 0
|
|
|
|
v.chunkSize = 0
|
|
v.width = 0
|
|
v.dir = -1
|
|
|
|
-- ================================================================================================
|
|
-- F U N C T I O N S
|
|
-- ================================================================================================
|
|
|
|
function v.commonInit(me, size)
|
|
v.maxSpeed = 321 + math.random(32)
|
|
v.chunkSize = size
|
|
|
|
setupBasicEntity(
|
|
me,
|
|
"IceChunk/Large", -- texture
|
|
8, -- health
|
|
1, -- manaballamount
|
|
1, -- exp
|
|
0, -- money
|
|
64, -- collideRadius (for hitting entities + spells)
|
|
STATE_IDLE, -- initState
|
|
512, -- sprite width
|
|
512, -- sprite height
|
|
1, -- particle "explosion" type, maps to particleEffects.txt -1 = none
|
|
1, -- 0/1 hit other entities off/on (uses collideRadius)
|
|
4000 -- updateCull -1: disabled, default: 4000
|
|
)
|
|
|
|
loadSound("IceChunkBreak")
|
|
|
|
entity_setEntityType(me, ET_NEUTRAL)
|
|
--entity_setAllDamageTargets(me, false)
|
|
--entity_setDamageTarget(me, DT_AVATAR_LIZAP, false)
|
|
entity_setDamageTarget(me, DT_AVATAR_BITE, false)
|
|
|
|
entity_setDeathScene(me, true)
|
|
|
|
-- SLIGHT SCALE AND COLOUR VARIATION
|
|
local sz = 0.8 + (math.random(400) * 0.001)
|
|
entity_scale(me, sz, sz)
|
|
local cl = 1.0 - (math.random(2345) * 0.0001)
|
|
entity_color(me, cl, cl, cl)
|
|
|
|
-- IF LARGE
|
|
if v.chunkSize <= 0 then
|
|
v.chunkSize = 0
|
|
entity_setTexture(me, "IceChunk/Large")
|
|
v.width = 154
|
|
entity_setHealth(me, 8)
|
|
|
|
-- IF MEDIUM
|
|
elseif v.chunkSize == 1 then
|
|
v.chunkSize = 1
|
|
entity_setTexture(me, "IceChunk/Medium")
|
|
v.width = 76
|
|
entity_setHealth(me, 4)
|
|
v.maxSpeed = v.maxSpeed * 1.23
|
|
|
|
-- IF SMALL
|
|
else
|
|
v.chunkSize = 2
|
|
entity_setTexture(me, "IceChunk/Small")
|
|
v.width = 42
|
|
entity_setHealth(me, 2)
|
|
v.maxSpeed = v.maxSpeed * 1.54
|
|
end
|
|
|
|
v.width = v.width * sz
|
|
entity_setCollideRadius(me, v.width)
|
|
entity_setDeathSound(me, "")
|
|
entity_alpha(me, 0.9)
|
|
end
|
|
|
|
function postInit(me)
|
|
v.n = getNaija()
|
|
|
|
entity_setMaxSpeed(me, v.maxSpeed)
|
|
entity_rotate(me, randAngle360())
|
|
entity_addRandomVel(me, 123)
|
|
|
|
if chance(50) then v.dir = 1 end
|
|
end
|
|
|
|
function update(me, dt)
|
|
entity_clearTargetPoints(me)
|
|
|
|
-- ROTATE GENTLY
|
|
local rotSpeed = (entity_getVelLen(me)/300) + 1
|
|
if entity_velx(me) < 0 then v.dir = -1
|
|
else v.dir = 1 end
|
|
entity_rotateTo(me, entity_getRotation(me) + (rotSpeed * v.dir))
|
|
|
|
-- IF LARGE
|
|
if v.chunkSize == 0 then
|
|
-- LOCK ON TO BIG CHUNK
|
|
if entity_touchAvatarDamage(me, v.width*1.1, 0) then
|
|
if avatar_isBursting() and entity_setBoneLock(v.n, me) then
|
|
else
|
|
local vecX, vecY = entity_getVectorToEntity(me, v.n, 1000)
|
|
entity_addVel(v.n, vecX, vecY)
|
|
end
|
|
end
|
|
|
|
if entity_getBoneLockEntity(v.n) ~= me and entity_touchAvatarDamage(me, v.width, 0, 321) then
|
|
end
|
|
|
|
-- IF MEDIUM
|
|
elseif v.chunkSize == 1 then
|
|
-- NAIJA COLLISION
|
|
if entity_getBoneLockEntity(v.n) ~= me and entity_touchAvatarDamage(me, v.width, 0, 210) then
|
|
if avatar_isBursting() then
|
|
entity_moveTowards(me, entity_x(getNaija()), entity_y(getNaija()), 1, -456)
|
|
else
|
|
entity_moveTowards(me, entity_x(getNaija()), entity_y(getNaija()), 1, -87)
|
|
end
|
|
end
|
|
|
|
-- IF SMALL
|
|
elseif v.chunkSize == 2 then
|
|
-- NAIJA COLLISION
|
|
if entity_getBoneLockEntity(v.n) ~= me and entity_touchAvatarDamage(me, v.width, 0, 128) then
|
|
if avatar_isBursting() then
|
|
entity_moveTowards(me, entity_x(getNaija()), entity_y(getNaija()), 1, -1234)
|
|
else
|
|
entity_moveTowards(me, entity_x(getNaija()), entity_y(getNaija()), 1, -128)
|
|
end
|
|
end
|
|
end
|
|
|
|
-- AVOIDANCE
|
|
if entity_getBoneLockEntity(v.n) ~= me then entity_doEntityAvoidance(me, dt, v.width*1.1, 1.23) end
|
|
entity_doCollisionAvoidance(me, dt, ((v.width*0.01)*7)+1, 0.421)
|
|
-- MOVEMENT
|
|
if entity_getVelLen(me) > 64 then entity_doFriction(me, dt, 42) end
|
|
entity_updateMovement(me, dt)
|
|
-- SHOT COLLISIONS
|
|
entity_handleShotCollisions(me)
|
|
end
|
|
|
|
function enterState(me)
|
|
if entity_getState(me) == STATE_IDLE then
|
|
|
|
elseif entity_getState(me) == STATE_DEATHSCENE then
|
|
local deathTime = 0.23
|
|
entity_setStateTime(me, deathTime)
|
|
entity_alpha(me, 0, deathTime)
|
|
entity_scale(me, 0, 0, deathTime)
|
|
entity_delete(me, deathTime)
|
|
|
|
entity_sound(me, "IceChunkBreak")
|
|
|
|
if v.chunkSize ~= 2 then
|
|
for i=1,3 do
|
|
local newChunk
|
|
if v.chunkSize == 0 then
|
|
newChunk = createEntity("IceChunkMedium", "", entity_x(me) + (math.random(8) - 4), entity_y(me) + (math.random(8) - 4))
|
|
else
|
|
newChunk = createEntity("IceChunkSmall", "", entity_x(me) + (math.random(4) - 2), entity_y(me) + (math.random(4) - 2))
|
|
end
|
|
entity_moveTowards(newChunk, entity_x(me), entity_y(me), 1, -321)
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
function exitState(me)
|
|
end
|
|
|
|
function hitSurface(me)
|
|
|
|
|
|
end
|
|
|
|
function damage(me, attacker, bone, damageType, dmg)
|
|
return true
|
|
end
|
|
|
|
function activate(me)
|
|
end
|