1
0
Fork 0
mirror of https://github.com/AquariaOSE/Aquaria.git synced 2024-11-16 14:50:01 +00:00
Aquaria/files/scripts/entities/sunkendad.lua

573 lines
14 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
v.attackTimer = 0
v.n = 0
v.mom = 0
v.body = 0
v.started = false
local STATE_ATTACK1 = 1001
local STATE_ATTACK2 = 1002
local STATE_ATTACK3 = 1003
local STATE_PREP1 = 1005
local STATE_PREP2 = 1006
local STATE_PREP3 = 1007
v.enraged = false
v.dadMax = 0
v.dadMin = 0
v.deathScene = false
v.lastPhase = false
v.almostDone = false
v.hitDelay = 0
function init(me)
setupEntity(me)
--entity_setHealth(me, 50)
-- for debug
--entity_setHealth(me, 2)
entity_setHealth(me, 290) -- 90 -- 100
entity_initSkeletal(me, "SunkenDad")
entity_setState(me, STATE_IDLE)
entity_scale(me, 2, 2)
entity_setCull(me, false)
entity_setEntityType(me, ET_ENEMY)
entity_generateCollisionMask(me)
v.n = getNaija()
--entity_setAllDamageTargets(me, false)
--[[
entity_setDamageTarget(me, DT_AVATAR_ENERGYBLAST, true)
entity_setDamageTarget(me, DT_AVATAR_SHOCK, true)
]]--
entity_setDamageTarget(me, DT_AVATAR_LIZAP, false)
entity_setDamageTarget(me, DT_ENEMY_ENERGYBLAST, false)
entity_setEatType(me, EAT_NONE)
entity_setTargetRange(me, 256)
v.body = entity_getBoneByName(me, "Body")
--[[
bone_alpha(entity_getBoneByName(me, "MomPosition"), 0.5)
bone_alpha(entity_getBoneByName(me, "BabySpawn"), 0.5)
bone_alpha(entity_getBoneByName(me, "PE"), 0.5)
]]--
--entity_setAutoSkeletalUpdate(me, false)
entity_setDeathScene(me, true)
entity_setTargetRange(me, 2000)
loadSound("sunkendad-roar")
loadSound("sunkendad-hit")
loadSound("ChopRock")
loadSound("sunkendad-stomp")
loadSound("sunkendad-breakout")
loadSound("mia-appear")
loadSound("sunkendad-headspurt")
entity_setDamageTarget(me, DT_AVATAR_PET, false)
end
function postInit(me)
v.mom = getEntity("SunkenMom")
end
function animationKey(me, key)
if entity_isState(me, STATE_ATTACK1) then
if key == 4 then
shakeCamera(10, 0.5)
playSfx("ChopRock")
end
elseif entity_isState(me, STATE_ATTACK2) then
if key == 2 then
shakeCamera(10, 0.5)
playSfx("ChopRock")
end
elseif entity_isState(me, STATE_PREP3) then
if key == 4 or key == 6 or key == 8 then
playSfx("sunkendad-stomp")
end
elseif entity_isState(me, STATE_ATTACK3) then
if key == 2 or key == 4 then
playSfx("sunkendad-stomp")
end
end
v.dadMax = getNode("DADMAX")
v.dadMin = getNode("DADMIN")
end
v.inCut = false
local function cutScene(me)
if v.inCut then return end
v.inCut = true
local dad = me
entity_stopInterpolating(me)
fadeOutMusic(4)
overrideZoom(0.5, 1)
entity_idle(v.n)
cam_toEntity(me)
entity_stopInterpolating(me)
entity_setPosition(me, entity_x(me), entity_y(me), 10)
setSceneColor(1,1,1,4)
watch(4)
changeForm(FORM_NORMAL)
--setFlag(FLAG_PET_ACTIVE, 0)
local e = getFirstEntity()
while e ~= 0 do
if entity_isName(e, "zygote") then
entity_delete(e)
end
e = getNextEntity()
end
cam_toEntity(dad)
entity_alpha(dad, 0, 3)
entity_flipToEntity(v.n, dad)
debugLog("creating father")
local gdad = createEntity("cc_father", "", entity_x(me), entity_y(me))
entity_alpha(gdad, 0)
entity_alpha(gdad, 1, 2)
entity_setPosition(gdad, entity_x(gdad), entity_y(gdad)-50, 3, 0, 0, 1)
watch(3)
local sx, sy = entity_getScale(gdad)
entity_scale(gdad, sx*1.5, sy*1.5, 2)
entity_alpha(gdad, 0, 2)
watch(2)
cam_toEntity(v.mom)
entity_flipToEntity(v.n, v.mom)
local gmom = createEntity("CC_Mother", "", entity_getPosition(v.mom))
entity_alpha(gmom, 0)
entity_alpha(gmom, 1, 2)
entity_alpha(v.mom, 0, 4)
entity_setPosition(gmom, entity_x(gmom), entity_y(gmom)-50, 3, 0, 0, 1)
watch(1)
voice("naija_likidnappedbefore")
watch(3)
sx,sy = entity_getScale(gmom)
entity_scale(gmom, sx*1.5, sy*1.5, 2)
entity_alpha(gmom, 0, 2)
watch(2)
entity_idle(v.n)
local li = getLi()
if li ~= 0 then
--cam_toEntity(li)
local door = entity_getNearestEntity(me, "EnergyDoor")
if not entity_isState(door, STATE_OPENED) then
entity_setState(door, STATE_OPEN)
end
--[[
local node = getNode("CREATORSHADOW")
local c = createEntity("CreatorShadow", "", node_x(node), node_y(node))
entity_setPosition(c, entity_x(li), entity_y(li), -1000)
while entity_isInterpolating(c) do
watch(FRAME_TIME)
end
]]--
cam_toNode(getNode("BOSSWAIT"))
fade(1, 2)
watch(2)
setOverrideVoiceFader(1.0)
local node = getNode("NAIJAPOS")
entity_setPosition(v.n, node_x(node), node_y(node))
local node = getNode("LIPOS")
entity_setPosition(li, node_x(node), node_y(node))
local node = getNode("CREATORSPAWN")
local c = createEntity("CreatorSunkenCity", "", node_x(node), node_y(node))
entity_alpha(c, 0)
entity_flipToEntity(c, v.n)
entity_flipToEntity(v.n, c)
entity_flipToEntity(li, c)
fade(0, 1)
watch(1)
cam_toEntity(c)
playSfx("mia-appear")
spawnParticleEffect("CreatorTransport", node_x(node), node_y(node))
watch(1)
playSfx("NaijaGasp")
watch(0.5)
entity_alpha(c, 1, 1)
voiceInterupt("laugh3")
watch(0.5)
watch(0.5)
watch(0.1)
--[[
entity_animate(c, "smack")
while entity_isAnimating(c) do
watch(FRAME_TIME)
end
]]--
entity_animate(c, "grab")
while entity_isAnimating(c) do
watch(FRAME_TIME)
end
emote(EMOTE_NAIJALI)
entity_setState(li, STATE_TRAPPEDINCREATOR)
entity_setState(c, STATE_GRAB)
entity_animate(c, "take")
while entity_isAnimating(c) do
watch(FRAME_TIME)
end
playSfx("mia-appear")
-- li!!
entity_swimToNode(v.n, getNode("NAIJACONCERN"))
entity_alpha(c, 0, 1)
entity_alpha(li, 0, 1)
spawnParticleEffect("CreatorTransport", node_x(node), node_y(node))
watch(1)
entity_setState(c, STATE_IDLE)
entity_setPosition(c, 0, 0)
entity_setPosition(li, 0, 0)
cam_toEntity(v.n)
--[[
local node = getNode("CREATORSHADOWEXIT")
--entity_swimToNode(c, node, SPEED_VERYFAST)
entity_setPosition(c, node_x(node), node_y(node), -1000)
cam_toEntity(v.n)
playMusic("SunkenCity")
while entity_isInterpolating(c) do
wait(FRAME_TIME)
entity_setPosition(li, entity_x(c), entity_y(c))
end
entity_setPosition(li, 0, 0)
entity_delete(c)
]]--
watch(4)
setOverrideVoiceFader(-1)
voice("naija_likidnapped")
setFlag(FLAG_LI, 200)
setFlag(FLAG_SUNKENCITY_PUZZLE, SUNKENCITY_BOSSDONE)
else
cam_toEntity(v.n)
end
overrideZoom(0, 1)
end
function update(me, dt)
if not v.started then
return
end
entity_clearTargetPoints(me)
local x, y = bone_getWorldPosition(v.body)
entity_addTargetPoint(me, x, y)
if v.enraged then
dt = dt * 2
end
if v.hitDelay > 0 then
v.hitDelay = v.hitDelay - dt
if v.hitDelay < 0 then
v.hitDelay = 0
end
end
-- note also has to be set to the same value in sunkenmom
if entity_getHealth(me) < 220 and entity_getHealth(me) > 0 then
v.enraged = true
if v.almostDone then
setSceneColor(1, 0.3, 0.3, 3)
else
setSceneColor(1, 0.7, 0.7, 3)
end
end
if not entity_isAnimating(me) and (entity_isState(me, STATE_ATTACK1) or entity_isState(me, STATE_ATTACK2)) then
entity_setState(me, STATE_IDLE)
end
if entity_isState(me, STATE_IDLE) then
v.attackTimer = v.attackTimer + dt
if (not v.enraged and v.attackTimer > 3) or (v.enraged and v.attackTimer > 2) then
--local hammerzone = entity_getNearestNode(v.n, "hammerzone")
local dadjumpzone = entity_getNearestNode(me, "dadjumpzone")
if node_isEntityIn(dadjumpzone, me) then
entity_setState(me, STATE_PREP2)
else
local xdist = entity_x(v.n)-entity_x(me)
if math.abs(xdist)<500 and entity_y(v.n) > entity_y(me)-100 then
if chance(50) then
entity_setState(me, STATE_PREP3)
else
entity_setState(me, STATE_ATTACK1)
end
else
if entity_y(v.n) > entity_y(me) - 400 then
if chance(40) then
entity_setState(me, STATE_PREP2)
else
entity_setState(me, STATE_PREP3)
end
else
entity_setState(me, STATE_PREP2)
end
end
end
v.attackTimer = 0
end
end
if entity_isState(me, STATE_ATTACK3) and not entity_isInterpolating(me) then
entity_setState(me, STATE_IDLE)
end
if entity_x(me) < node_x(v.dadMin) then
if entity_isState(me, STATE_ATTACK3) then
entity_setState(me, STATE_IDLE)
end
entity_setPositionX(me, node_x(v.dadMin))
end
if entity_x(me) > node_x(v.dadMax) then
if entity_isState(me, STATE_ATTACK3) then
entity_setState(me, STATE_IDLE)
end
entity_setPositionX(me, node_x(v.dadMax))
end
--entity_updateSkeletal(me, dt)
entity_handleShotCollisionsSkeletal(me)
local bone = entity_collideSkeletalVsCircle(me, v.n)
if bone ~= 0 then
avatar_fallOffWall()
local nx,ny = entity_getPosition(v.n)
local cx,cy = entity_getPosition(me)
local x = nx-cx
local y = 0
x,y = vector_setLength(x,y,2000)
entity_addVel(v.n, x, y)
local dmg = 0.5
if v.enraged then
if entity_getHealth(me) < 220 then
dmg = 1.5
else
dmg = 1
end
end
entity_damage(v.n, me, dmg)
end
end
function hitSurface(me)
end
function enterState(me)
if entity_isState(me, STATE_IDLE) then
entity_animate(me, "idle", -1)
entity_flipToEntity(me, v.n)
elseif entity_isState(me, STATE_PREP1) then
playSfx("sunkendad-roar")
entity_setStateTime(me, entity_animate(me, "prep1"))
elseif entity_isState(me, STATE_PREP2) then
playSfx("sunkendad-roar")
entity_flipToEntity(me, v.n)
entity_setStateTime(me, entity_animate(me, "prep2"))
elseif entity_isState(me, STATE_PREP3) then
playSfx("sunkendad-roar")
entity_setStateTime(me, entity_animate(me, "prep3"))
entity_flipToEntity(me, v.n)
elseif entity_isState(me, STATE_ATTACK1) then
entity_flipToEntity(me, v.n)
entity_animate(me, "attack")
elseif entity_isState(me, STATE_ATTACK2) then
entity_flipToEntity(me, v.n)
entity_animate(me, "attack2")
local minJumpLen = 100
local maxJumpLen = 600
local dist = entity_x(v.n) - entity_x(me)
if dist > maxJumpLen then
dist = maxJumpLen
end
if dist < minJumpLen then
dist = minJumpLen
end
if dist > -maxJumpLen then
dist = -maxJumpLen
end
if dist < -minJumpLen then
dist = -minJumpLen
end
entity_setPosition(me, entity_x(v.n) + dist, entity_y(me), 1)
entity_offset(me, 0, -650, 0.5, 1, 1)
elseif entity_isState(me, STATE_ATTACK3) then
entity_flipToEntity(me, v.n)
entity_animate(me, "attack3", -1)
local chargeDist = 2000
local spd = 1800
if entity_x(v.n) < entity_x(me) then
entity_setPosition(me, entity_x(me) - chargeDist, entity_y(me), -1 * spd)
else
entity_setPosition(me, entity_x(me) + chargeDist, entity_y(me), -1 * spd)
end
elseif entity_isState(me, STATE_WAITFORKISS) then
entity_animate(me, "idle", -1)
elseif entity_isState(me, STATE_KISS) then
entity_setStateTime(me, entity_animate(me, "kiss"))
elseif entity_isState(me, STATE_RAGE) then
entity_setStateTime(me, entity_animate(me, "rage"))
entity_color(me, 1, 0.5, 0.5, 3)
v.enraged = true
entity_setDamageTarget(me, DT_AVATAR_LIZAP, true)
elseif entity_isState(me, STATE_CALM) then
v.enraged = false
entity_setStateTime(me, entity_animate(me, "calm"))
entity_color(me, 1, 1, 1, 3)
entity_setDamageTarget(me, DT_AVATAR_LIZAP, false)
elseif entity_isState(me, STATE_DEATHSCENE) then
--entity_setStateTime(v.mom, 10)
entity_setAllDamageTargets(me, false)
debugLog("DEATH SCENE!")
pickupGem("Boss-SunkenDad")
v.deathScene = true
entity_animate(me, "die")
entity_setStateTime(me, -1)
entity_setState(v.mom, STATE_DEATHSCENE)
entity_color(me, 1, 1, 1, 5)
entity_stopInterpolating(me)
entity_setPosition(me, entity_x(me), entity_y(me), 0.1)
cutScene(me)
toggleSteam(false)
elseif entity_isState(me, STATE_START) then
v.started = true
entity_setStateTime(me, 0.1)
end
end
function exitState(me)
if entity_getEnqueuedState(me) == STATE_DEATHSCENE or entity_getEnqueuedState(me) == STATE_RAGE then
return
end
if entity_isState(me, STATE_KISS) then
entity_setState(me, STATE_IDLE)
v.attackTimer = -1
elseif entity_isState(me, STATE_RAGE) then
entity_setState(me, STATE_IDLE)
elseif entity_isState(me, STATE_PREP2) then
entity_setState(me, STATE_ATTACK2)
elseif entity_isState(me, STATE_PREP3) then
entity_setState(me, STATE_ATTACK3)
elseif entity_isState(me, STATE_START) then
entity_setState(me, STATE_IDLE)
end
end
function damage(me, attacker, bone, damageType, dmg)
-- for debug
--[[
entity_changeHealth(me, -999)
return true
]]--
if v.enraged then
if v.hitDelay == 0 then
playSfx("sunkendad-hit")
v.hitDelay = 0.5
end
if ((entity_getHealth(me) - dmg) < 220) and not v.lastPhase then
v.lastPhase = true
playMusic("mithalaanger")
fade2(1, 0, 1, 1, 1)
fade2(0, 0.5, 1, 1, 1)
if entity_isState(v.mom, STATE_WEAK) then
entity_setStateTime(v.mom, 4)
end
end
if ((entity_getHealth(me) - dmg) < 100) and not v.almostDone then
v.almostDone = true
playMusic("mithalapeace")
fade2(1, 0, 1, 1, 1)
fade2(0, 0.5, 1, 1, 1)
end
return true
end
playNoEffect()
return false
end