HedgewarsScriptLoad("/Scripts/Locale.lua")
HedgewarsScriptLoad("/Scripts/Achievements.lua")
local player = nil -- This variable will point to the hog's gear
local instructor = nil
local enemy = nil
local speechStage = 0
local gameLost = false
local gameWon = false
local notListening = false
local endTimer = 0
function onGameInit()
-- Things we don't modify here will use their default values.
Seed = 0 -- The base number for the random number generator
GameFlags = gfInfAttack -- Game settings and rules
TurnTime = 60000 -- The time the player has to move each round (in ms)
CaseFreq = 0 -- The frequency of crate drops
MinesNum = 0 -- The number of mines being placed
Explosives = 0 -- The number of explosives being placed
Map = "Bath" -- The map to be played
Theme = "Bath" -- The theme to be used
-- Disable Sudden Death
HealthDecrease = 0
WaterRise = 0
AddTeam(loc("Bloody Rookies"), -1, "Rubberduck", "Island", "Default", "cm_duckhead")
player = AddHog(loc("Hunter"), 0, 1, "NoHat")
instructor = AddHog(loc("Instructor"), 0, 100, "sf_vega")
AddTeam(loc("Blue Team"), -2, "bubble", "Island", "Default", "somalia")
enemy = AddHog(loc("Filthy Blue"), 1, 100, "Skull")
SetGearPosition(player,146,902)
SetGearPosition(instructor,317,902)
SetGearPosition(enemy,1918,837)
HogSay(player, loc("..."), SAY_THINK)
HogTurnLeft(instructor, true)
end
function onGameStart()
SpawnSupplyCrate(475,476,amRope)
SpawnSupplyCrate(1729,476,amFirePunch)
FollowGear(player)
ShowMission(loc("Dangerous Ducklings"), loc("Scenario"), loc("Eliminate the Blue Team before the time runs out."), -amRope, 5000);
end
function onGameTick()
-- opening speech
if (notListening == false) and (gameLost == false) then
if (TurnTimeLeft == 58000) and (speechStage == 0) then
HogSay(instructor, loc("Listen up, maggot!"), SAY_SHOUT)
speechStage = 1
elseif (TurnTimeLeft == 57000) and (speechStage == 1) then
HogSay(player,loc("!"),SAY_SHOUT)
elseif (TurnTimeLeft == 55000) and (speechStage == 1) then
HogSay(instructor, loc("The enemy is hiding out on yonder ducky!"), SAY_SAY)
speechStage = 2
elseif (TurnTimeLeft == 49000) and (speechStage == 2) then
FollowGear(enemy)
elseif (TurnTimeLeft == 46500) and (speechStage == 2) then
FollowGear(instructor)
HogSay(instructor, loc("Get on over there and take him out!"), SAY_SAY)
speechStage = 3
elseif (TurnTimeLeft == 43500) and (speechStage == 3) then
HogSay(instructor, loc("GO! GO! GO!"), SAY_SHOUT)
speechStage = 4
givenSpeech = true
end
end
-- if player falls in water or if player ignores speech
if (CurrentHedgehog ~= nil) and (CurrentHedgehog == player) then
if (GetY(player) > WaterLine) and (gameLost == false) then
HogSay(instructor, loc("DAMMIT, ROOKIE!"), SAY_SHOUT)
gameLost = true
end
if (GetX(player) > 300) and (GetY(player) > 880) and (notListening == false) and (speechStage < 3) then
HogSay(instructor, loc("DAMMIT, ROOKIE! GET OFF MY HEAD!"), SAY_SHOUT)
notListening = true
end
end
--player out of time
if (TurnTimeLeft == 1) and (gameWon == false) then
SetHealth(player, 0)
end
-- meh
if gameLost == true then
endTimer = endTimer + 1
if (CurrentHedgehog ~= nil) and (CurrentHedgehog == instructor) then
if endTimer >= 3000 then
--SetHealth(instructor,0)
SetTurnTimeLeft(1)
DismissTeam(loc("Bloody Rookies"))
end
ShowMission(loc("Dangerous Ducklings"), loc("MISSION FAILED"), loc("You've failed. Try again."), -amRope, 5000);
end
end
end
function onAmmoStoreInit()
SetAmmo(amFirePunch, 0, 0, 0, 1)
SetAmmo(amParachute, 1, 0, 0, 0)
SetAmmo(amRope, 0, 0, 0, 1)
end
function onGearDelete(gear)
if GetGearType(gear) == gtHedgehog then
if gear == player then
gameLost = true
elseif (gear == instructor) and (GetY(gear) > WaterLine) then
HogSay(player, loc("See ya!"), SAY_THINK)
Retreat(3000)
awardAchievement(loc("Naughty Ninja"))
DismissTeam(loc("Blue Team"))
gameWon = true
SaveMissionVar("Won", "true")
elseif gear == enemy then
HogSay(player, loc("Enjoy the swim..."), SAY_THINK)
gameWon = true
SaveMissionVar("Won", "true")
Retreat(3000)
end
end
end