mirror of
https://github.com/AquariaOSE/Aquaria.git
synced 2025-10-17 03:49:28 +00:00
initial commit. This is icculus version 5542b94cae02a6333845854bbbd1abe0a259f1a4
This commit is contained in:
fgenesis
commit
3096eaf5e2
2519 changed files with 816064 additions and 0 deletions
303
game_scripts/scripts/entities/mermog.lua
Normal file
303
game_scripts/scripts/entities/mermog.lua
Normal file
|
|
@ -0,0 +1,303 @@
|
|||
-- 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
|
||||
|
||||
-- ================================================================================================
|
||||
-- AGGRO HOPPER
|
||||
-- ================================================================================================
|
||||
|
||||
-- specific
|
||||
local STATE_JUMP = 1000
|
||||
local STATE_TRANSITION = 1001
|
||||
local STATE_JUMPPREP = 1002
|
||||
local STATE_WALK = 1003
|
||||
|
||||
-- ================================================================================================
|
||||
-- L O C A L V A R I A B L E S
|
||||
-- ================================================================================================
|
||||
|
||||
v.jumpDelay = 0
|
||||
v.moveTimer = 0
|
||||
v.rotateOffset = 0
|
||||
v.angry = false
|
||||
v.enraged = false
|
||||
v.moving = 0.2
|
||||
v.n = 0
|
||||
|
||||
v.fireDelay = 0
|
||||
|
||||
v.lx = 0
|
||||
v.ly = 0
|
||||
|
||||
v.bubbleRelease = 0
|
||||
|
||||
-- ================================================================================================
|
||||
-- FUNCTIONS
|
||||
-- ================================================================================================
|
||||
|
||||
--[[
|
||||
function land(me)
|
||||
entity_clampToSurface(me)
|
||||
entity_moveAlongSurface(me, dt, 1, 6, 24)
|
||||
entity_rotateToSurfaceNormal(me, 0.1)
|
||||
end
|
||||
]]--
|
||||
|
||||
function init(me)
|
||||
|
||||
setupBasicEntity(
|
||||
me,
|
||||
"", -- texture
|
||||
12, -- health
|
||||
2, -- manaballamount
|
||||
2, -- exp
|
||||
10, -- money
|
||||
40, -- collideRadius
|
||||
STATE_IDLE, -- initState
|
||||
128, -- sprite width
|
||||
128, -- sprite height
|
||||
1, -- particle "explosion" type, 0 = none
|
||||
0, -- 0/1 hit other entities off/on (uses collideRadius)
|
||||
4000 -- updateCull -1: disabled, default: 4000
|
||||
)
|
||||
entity_initSkeletal(me, "Mermog")
|
||||
|
||||
entity_setDeathParticleEffect(me, "TinyGreenExplode")
|
||||
|
||||
--land(me)
|
||||
entity_setWeight(me, 1000)
|
||||
entity_setState(me, STATE_IDLE)
|
||||
|
||||
entity_setBounceType(me, BOUNCE_REAL)
|
||||
entity_setBounce(me, 0.9)
|
||||
--entity_setClampOnSwitchDir(me, false)
|
||||
esetv(me, EV_SWITCHCLAMP, 0)
|
||||
esetv(me, EV_WALLOUT, 64)--18)
|
||||
|
||||
entity_clampToSurface(me)
|
||||
|
||||
entity_setCullRadius(me, 512)
|
||||
|
||||
entity_setDeathSound(me, "mermog-die")
|
||||
|
||||
loadSound("mermog-die")
|
||||
loadSound("mermog-jump")
|
||||
end
|
||||
|
||||
function postInit(me)
|
||||
v.n = getNaija()
|
||||
end
|
||||
|
||||
function update(me, dt)
|
||||
v.lx, v.ly = entity_getPosition(me)
|
||||
|
||||
if v.enraged then
|
||||
dt = dt * 1.25
|
||||
end
|
||||
--[[
|
||||
if entity_hasTarget(me) then
|
||||
if entity_isTargetInRange(me, 64) then
|
||||
entity_hurtTarget(me, 1)
|
||||
entity_pushTarget(me, 500)
|
||||
end
|
||||
end
|
||||
]]--
|
||||
if entity_isState(me, STATE_IDLE) or entity_isState(me, STATE_TRANSITION) then
|
||||
entity_moveAlongSurface(me, dt, 0.5, 6)
|
||||
--entity_switchSurfaceDirection(me)
|
||||
end
|
||||
if entity_getState(me)==STATE_IDLE then
|
||||
if not(entity_hasTarget(me)) then
|
||||
entity_findTarget(me, 1200)
|
||||
else
|
||||
if entity_isTargetInRange(me, 900) then
|
||||
v.jumpDelay = v.jumpDelay - dt
|
||||
if v.jumpDelay < 0 then
|
||||
v.angry = true
|
||||
v.jumpDelay = 0.2
|
||||
entity_setState(me, STATE_JUMPPREP)
|
||||
end
|
||||
end
|
||||
end
|
||||
elseif entity_isState(me, STATE_WALK) then
|
||||
if entity_isfh(me) then
|
||||
entity_switchSurfaceDirection(me, 0)
|
||||
else
|
||||
entity_switchSurfaceDirection(me, 1)
|
||||
end
|
||||
entity_moveAlongSurface(me, dt, 1000*v.moving, 6)
|
||||
entity_rotateToSurfaceNormal(me, 0.1)
|
||||
elseif entity_getState(me)==STATE_JUMPPREP then
|
||||
if not entity_isAnimating(me) then
|
||||
entity_setState(me, STATE_JUMP)
|
||||
end
|
||||
elseif entity_getState(me)==STATE_JUMP then
|
||||
--entity_flipToVel(me)
|
||||
entity_updateCurrents(me, dt)
|
||||
entity_updateMovement(me, dt)
|
||||
|
||||
v.bubbleRelease = v.bubbleRelease - dt
|
||||
if v.bubbleRelease < 0 then
|
||||
v.bubbleRelease = 0.4
|
||||
spawnParticleEffect("bubble-release-short", entity_x(me), entity_y(me))
|
||||
end
|
||||
|
||||
--[[
|
||||
v.fireDelay = v.fireDelay - dt
|
||||
if v.fireDelay < 0 then
|
||||
v.fireDelay = 0.4
|
||||
s = createShot("mermog-shot", me, v.n, entity_x(me), entity_y(me))
|
||||
end
|
||||
]]--
|
||||
elseif not(entity_getState(me)==STATE_TRANSITION or entity_isState(me, STATE_WALK)) then
|
||||
entity_updateMovement(me, dt)
|
||||
end
|
||||
|
||||
|
||||
--[[
|
||||
if isObstructed(entity_x(me), entity_y(me)) then
|
||||
entity_setPosition(me, v.lx, v.ly)
|
||||
entity_clampToSurface(me)
|
||||
end
|
||||
]]--
|
||||
|
||||
entity_handleShotCollisions(me)
|
||||
entity_touchAvatarDamage(me, 64, 1, 500)
|
||||
|
||||
if isObstructed(entity_x(me), entity_y(me)) then
|
||||
entity_adjustPositionBySurfaceNormal(me, 1)
|
||||
end
|
||||
end
|
||||
|
||||
function damage(me, attacker, bone, damageType, dmg)
|
||||
if entity_isState(me, STATE_IDLE) then
|
||||
entity_setState(me, STATE_JUMPPREP)
|
||||
end
|
||||
return true
|
||||
end
|
||||
|
||||
v.bounces = 0
|
||||
function hitSurface(me)
|
||||
if entity_getState(me)==STATE_JUMP then
|
||||
local t = egetvf(me, EV_CLAMPTRANSF)
|
||||
if entity_checkSurface(me, 6, STATE_TRANSITION, t) then
|
||||
entity_rotateToSurfaceNormal(me, 0)
|
||||
entity_scale(me, 1, 0.5)
|
||||
entity_scale(me, 1, 1, t)
|
||||
--[[
|
||||
entity_setInternalOffset(me, 0, 64)
|
||||
entity_setInternalOffset(me, 0, 0, t)
|
||||
]]--
|
||||
else
|
||||
local nx, ny = getWallNormal(entity_getPosition(me))
|
||||
nx, ny = vector_setLength(nx, ny, 400)
|
||||
entity_addVel(me, nx, ny)
|
||||
end
|
||||
--[[
|
||||
if entity_isNearObstruction(me, 4, OBSCHECK_4DIR) then
|
||||
entity_clampToSurface(me)
|
||||
entity_setState(me, STATE_TRANSITION, 0.001)
|
||||
end
|
||||
]]--
|
||||
end
|
||||
--[[
|
||||
if entity_getState(me)==STATE_JUMP then
|
||||
local nx, ny = getWallNormal(cx, cy)
|
||||
if ny < 0 then
|
||||
land(me)
|
||||
entity_setState(me, STATE_TRANSITION)
|
||||
else
|
||||
v.bounces = v.bounces + 1
|
||||
if v.bounces > 8 then
|
||||
land(me)
|
||||
entity_setState(me, STATE_TRANSITION)
|
||||
end
|
||||
end
|
||||
end
|
||||
]]--
|
||||
end
|
||||
|
||||
function enterState(me)
|
||||
if entity_getState(me)==STATE_IDLE then
|
||||
entity_animate(me, "idle", LOOP_INF)
|
||||
entity_setMaxSpeed(me, 1200)
|
||||
elseif entity_getState(me)==STATE_JUMPPREP then
|
||||
|
||||
local nx, ny = entity_getNormal(me)
|
||||
for i=20,400,20 do
|
||||
|
||||
local nx1, ny1 = vector_setLength(nx, ny, i)
|
||||
local tx = entity_x(me) + nx1
|
||||
local ty = entity_y(me) + ny1
|
||||
--debugLog(string.format("t(%d, %d)", tx, ty))
|
||||
if isObstructed(tx, ty) then
|
||||
--debugLog("idle!")
|
||||
entity_setState(me, STATE_WALK, 2, 1)
|
||||
return
|
||||
end
|
||||
end
|
||||
|
||||
entity_animate(me, "jumpPrep")
|
||||
entity_flipToEntity(me, entity_getTarget(me))
|
||||
elseif entity_isState(me, STATE_TRANSITION) then
|
||||
entity_setStateTime(me, entity_animate(me, "land"))
|
||||
elseif entity_isState(me, STATE_WALK) then
|
||||
entity_animate(me, "walk", -1)
|
||||
elseif entity_getState(me)==STATE_JUMP then
|
||||
v.bounces = 0
|
||||
entity_flipToEntity(me, entity_getTarget(me))
|
||||
entity_animate(me, "jump")
|
||||
|
||||
v.rotateOffset = 0
|
||||
entity_applySurfaceNormalForce(me, 1000)
|
||||
if entity_isfh(me) then
|
||||
entity_addVel(me, 400, 0)
|
||||
else
|
||||
entity_addVel(me, -400, 0)
|
||||
end
|
||||
entity_adjustPositionBySurfaceNormal(me, 10)
|
||||
|
||||
entity_sound(me, "mermog-jump")
|
||||
--entity_adjustPositionBySurfaceNormal(me, 32)
|
||||
end
|
||||
end
|
||||
|
||||
function animationKey(me, key)
|
||||
end
|
||||
|
||||
function exitState(me)
|
||||
if entity_getState(me)==STATE_TRANSITION then
|
||||
entity_setState(me, STATE_IDLE)
|
||||
if chance(50) then
|
||||
entity_setState(me, STATE_WALK, 2)
|
||||
end
|
||||
elseif entity_getState(me)==STATE_WALK then
|
||||
entity_setState(me, STATE_IDLE)
|
||||
end
|
||||
end
|
||||
|
||||
function dieNormal(me)
|
||||
if chance(20) then
|
||||
local x, y = entity_getNormal(me)
|
||||
x, y = vector_setLength(x, y, 64)
|
||||
spawnIngredient("PlantLeaf", entity_x(me)+x, entity_y(me)+y)
|
||||
end
|
||||
end
|
||||
Loading…
Add table
Add a link
Reference in a new issue