--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/share/hedgewars/Data/Missions/Campaign/A Classic Fairytale/family.lua Tue Jul 31 21:21:27 2012 +0300
@@ -0,0 +1,506 @@
+loadfile(GetDataPath() .. "Scripts/Locale.lua")()
+loadfile(GetDataPath() .. "Scripts/Animate.lua")()
+
+-----------------------------Map--------------------------------------
+local map =
+{
+ "\255\242\4\218\132\0\53\4\253\0\0\53\4\253\132\0\102\5\92\0\0\102\5\92\132\0\106\5\205\0\0\106\5\205\132\1\1\6\37\0",
+ "\1\1\6\37\132\1\124\6\160\0\1\113\6\160\132\2\157\6\111\0\2\164\6\107\132\2\252\6\178\0\2\252\6\178\132\3\224\4\179\0",
+ "\3\224\4\179\132\3\38\2\209\0\3\38\2\209\132\4\109\3\179\0\4\109\3\179\132\5\124\3\172\0\5\128\3\172\132\6\69\4\239\0",
+ "\6\69\4\239\132\7\175\4\32\0\7\172\4\46\132\8\116\5\18\0\3\38\2\213\132\3\41\1\244\0\3\41\1\244\132\3\94\2\245\0",
+ "\8\127\5\8\132\8\127\0\14\0\8\127\0\14\132\8\194\5\29\0\8\194\5\29\132\9\36\5\82\0\9\29\5\75\132\9\180\5\103\0",
+ "\9\194\5\92\132\10\51\6\5\0\10\51\6\5\132\10\216\5\152\0\10\227\5\145\132\11\189\5\212\0\11\189\5\212\132\12\91\5\131\0",
+ "\12\91\5\131\132\12\253\5\191\0\12\253\5\191\132\13\149\5\106\0\13\149\5\106\132\16\11\5\106\0\14\19\5\110\132\14\16\4\236\0",
+ "\14\16\4\236\132\15\66\4\236\0\15\66\4\236\132\15\66\5\110\0\14\79\4\194\132\15\6\4\194\0\14\255\4\176\132\14\255\4\49\0",
+ "\14\255\4\49\132\14\76\4\53\0\14\76\4\53\132\14\76\4\201\0\14\125\4\74\128\14\128\4\187\0\14\188\4\77\128\14\185\4\179\0",
+ "\14\111\4\39\129\14\76\3\252\0\14\72\3\249\129\14\72\3\147\0\14\72\3\147\129\14\97\3\235\0\14\97\3\235\129\14\146\4\28\0",
+ "\14\202\4\28\129\14\248\3\238\0\14\248\3\238\129\15\17\3\133\0\15\17\3\133\129\15\27\3\235\0\15\27\3\235\129\14\230\4\49\0",
+ "\1\124\6\220\130\1\244\7\13\0\1\244\7\13\130\2\104\6\206\0\2\100\6\206\130\2\30\6\178\0\2\12\6\181\130\1\135\6\213\0",
+ "\3\172\7\136\130\15\41\7\136\0\15\41\7\136\130\15\41\7\62\0\15\41\7\62\130\3\175\7\52\0\3\175\7\52\130\3\126\6\206\0",
+ "\3\126\6\206\130\3\122\7\133\0\3\122\7\133\130\3\186\7\136\0\8\123\7\94\136\9\173\7\101\0\8\88\7\66\130\8\88\7\119\0",
+ "\9\212\7\69\130\9\212\7\126\0\8\155\0\14\133\8\151\5\11\0\8\190\2\160\131\8\194\5\1\0\14\83\3\235\131\14\114\4\21\0",
+ "\15\10\3\196\131\15\10\3\235\0\15\10\3\235\131\14\220\4\32\0\14\65\5\47\137\15\20\5\36\0\15\41\5\82\132\15\41\5\82\0",
+ "\3\94\3\17\138\4\137\5\124\0\3\221\3\119\138\5\57\4\250\0\4\102\4\67\160\5\26\4\74\0\4\113\5\36\161\5\142\4\222\0",
+ "\4\42\5\216\169\9\89\6\26\0\6\100\5\22\145\8\134\5\64\0\6\255\4\197\140\7\161\4\120\0\7\214\4\204\146\7\214\4\204\0",
+ "\10\55\6\97\147\11\13\5\247\0\11\59\6\26\146\11\224\6\30\0\12\95\6\16\153\14\55\6\90\0\13\173\5\226\153\15\196\5\212\0",
+ "\15\172\7\91\152\15\165\5\230\0\15\235\7\221\142\255\238\7\207\0\14\248\6\188\152\3\217\6\178\0\3\112\6\83\143\3\31\7\101\0",
+ "\3\73\7\143\140\3\73\7\143\0\15\62\7\13\140\15\62\7\13\0\15\101\7\157\140\15\101\7\157\0\2\181\6\220\141\1\205\7\108\0",
+ "\2\86\6\160\137\2\150\6\128\0\2\26\6\153\134\1\96\6\195\0\1\82\6\241\136\1\226\7\59\0\2\157\7\98\155\2\157\7\98\0",
+ "\1\64\7\80\149\255\249\7\27\0\1\4\6\174\148\0\25\6\86\0\0\211\6\58\139\0\7\5\219\0\0\35\5\159\142\0\4\5\47\0",
+ "\8\123\0\14\199\8\187\0\11\0\16\14\5\99\199\16\14\7\245\0\255\235\4\218\199\255\238\8\25\0\8\67\2\72\202\8\208\2\72\0",
+ "\8\141\1\251\202\8\141\0\74\0\8\201\2\143\195\8\204\4\49\0\8\84\2\185\205\8\204\2\188\0\8\99\2\230\205\8\187\2\230\0",
+ "\8\165\3\41\131\8\144\3\3\0\8\144\3\3\131\8\60\2\248\0\8\60\2\248\131\7\252\3\59\0\7\252\3\59\131\8\137\3\31\0",
+ "\8\56\3\20\131\8\102\3\20\0\8\60\3\13\194\8\60\3\13\0\8\60\3\3\128\8\60\3\31\0\7\238\3\66\128\7\214\3\84\0",
+ "\7\217\3\87\128\7\217\3\98\0\7\217\3\87\128\7\200\3\91\0\6\209\4\70\208\8\18\4\95\0\0\11\4\225\131\0\0\8\21\0",
+ "\15\224\5\99\131\15\245\7\252\0\15\242\5\191\192\15\196\6\33\0\15\196\6\33\192\15\245\6\209\0\15\245\6\209\192\15\193\7\115\0",
+ "\15\193\7\115\192\15\235\8\18\0\15\249\5\223\196\15\217\6\40\0\15\217\6\40\196\16\4\6\188\0\15\245\6\16\196\16\21\7\77\0",
+ "\16\0\6\245\196\15\214\7\112\0\15\207\7\129\196\16\0\8\4\0\15\245\7\80\196\16\4\7\207\0\15\221\5\85\196\16\11\5\184\0",
+}
+--------------------------------------------Constants------------------------------------
+choiceAccepted = 1
+choiceRefused = 2
+choiceAttacked = 3
+
+choiceEliminate = 1
+choiceSpare = 2
+
+leaksNum = 1
+denseNum = 2
+waterNum = 3
+buffaloNum = 4
+chiefNum = 5
+girlNum = 6
+wiseNum = 7
+
+nativeNames = {loc("Leaks A Lot"), loc("Dense Cloud"), loc("Fiery Water"),
+ loc("Raging Buffalo"), loc("Righteous Beard"), loc("Fell From Grace"),
+ loc("Wise Oak"), loc("Ramon"), loc("Spiky Cheese")
+ }
+
+nativeUnNames = {loc("Zork"), loc("Steve"), loc("Jack"),
+ loc("Lee"), loc("Elmo"), loc("Rachel"),
+ loc("Muriel")}
+
+nativeHats = {"Rambo", "RobinHood", "pirate_jack", "zoo_Bunny", "IndianChief",
+ "tiara", "AkuAku", "rasta", "hair_yellow"}
+
+nativePos = {{110, 1310}, {984, 1907}, {1040, 1907}}
+nativePos2 = {196, 1499}
+
+cyborgNames = {loc("Unit 0x0007"), loc("Hogminator"), loc("Carol"),
+ loc("Blender"), loc("Elderbot"), loc("Fiery Water")}
+cyborgsDif = {2, 2, 2, 2, 2, 1}
+cyborgsHealth = {90, 90, 90, 80, 80, 20}
+cyborgPos = {945, 1216}
+cyborgsNum = 6
+cyborgsPos = {{2243, 1043}, {3588, 1227}, {2781, 1388},
+ {3749, 1040}, {2475, 1338}, {3853, 881}}
+cyborgsDir = {"Left", "Left", "Left", "Left", "Left", "Right"}
+
+princessPos = {3737, 1181}
+crateConsts = {}
+reactions = {}
+
+nativeMidPos = {1991, 841}
+cyborgMidPos = {2109, 726}
+nativeMidPos2 = {2250, 1071}
+-----------------------------Variables---------------------------------
+natives = {}
+native = nil
+
+cyborgs = {}
+cyborg = nil
+
+gearDead = {}
+hedgeHidden = {}
+
+startAnim = {}
+midAnim = {}
+
+freshDead = nil
+crates = {}
+cratesNum = 0
+-----------------------------Animations--------------------------------
+function EmitDenseClouds(dir)
+ local dif
+ if dir == "Left" then
+ dif = 10
+ else
+ dif = -10
+ end
+ AnimInsertStepNext({func = AnimVisualGear, args = {native, GetX(native) + dif, GetY(native) + dif, vgtSteam, 0, true}, swh = false})
+ AnimInsertStepNext({func = AnimVisualGear, args = {native, GetX(native) + dif, GetY(native) + dif, vgtSteam, 0, true}, swh = false})
+ AnimInsertStepNext({func = AnimVisualGear, args = {native, GetX(native) + dif, GetY(native) + dif, vgtSteam, 0, true}, swh = false})
+ AnimInsertStepNext({func = AnimWait, args = {native, 800}})
+ AnimInsertStepNext({func = AnimVisualGear, args = {native, GetX(native) + dif, GetY(native) + dif, vgtSteam, 0, true}, swh = false})
+ AnimInsertStepNext({func = AnimVisualGear, args = {native, GetX(native) + dif, GetY(native) + dif, vgtSteam, 0, true}, swh = false})
+ AnimInsertStepNext({func = AnimWait, args = {native, 800}})
+ AnimInsertStepNext({func = AnimVisualGear, args = {native, GetX(native) + dif, GetY(native) + dif, vgtSteam, 0, true}, swh = false})
+end
+
+function AnimationSetup()
+ table.insert(startAnim, {func = AnimWait, args = {natives[1], 4000}})
+ table.insert(startAnim, {func = AnimMove, args = {natives[1], "Right", unpack(nativePos2)}})
+ if m5DeployedNum == leaksNum then
+ table.insert(startAnim, {func = AnimSay, args = {natives[1], loc("Those aliens are destroying the island!"), SAY_THINK, 5000}})
+ elseif m5DeployedNum == denseNum then
+ table.insert(startAnim, {func = AnimSay, args = {natives[1], loc("Dude, all the plants are gone!"), SAY_THINK, 3500}})
+ table.insert(startAnim, {func = AnimSay, args = {natives[1], loc("What am I gonna...eat, yo?"), SAY_THINK, 3500}})
+ elseif m5DeployedNum == girlNum then
+ table.insert(startAnim, {func = AnimSay, args = {natives[1], loc("Fell From Heaven is the best! Fell From Heaven is the greatest!"), SAY_THINK, 7000}})
+ table.insert(startAnim, {func = AnimSay, args = {natives[1], loc("Yuck! I bet they'll keep worshipping her even after I save the village!"), SAY_THINK, 7500}})
+ elseif m5DeployedNum == chiefNum then
+ table.insert(startAnim, {func = AnimSay, args = {natives[1], loc("I'm getting old for this!"), SAY_THINK, 4000}})
+ elseif m5DeployedNum == waterNum then
+ table.insert(startAnim, {func = AnimSay, args = {natives[1], loc("I'm getting thirsty..."), SAY_THINK, 3000}})
+ elseif m5DeployedNum == buffaloNum then
+ table.insert(startAnim, {func = AnimSay, args = {natives[1], loc("I wonder why I'm so angry all the time..."), SAY_THINK, 6000}})
+ table.insert(startAnim, {func = AnimSay, args = {natives[1], loc("It must be a childhood trauma..."), SAY_THINK, 4000}})
+ table.insert(startAnim, {func = AnimSay, args = {natives[1], loc("Just wait till I get my hands on that trauma! ARGH!"), SAY_THINK, 6500}})
+ elseif m5DeployedNum == wiseNum then
+ table.insert(startAnim, {func = AnimSay, args = {natives[1], loc("I could just teleport myself there..."), SAY_THINK, 4500}})
+ table.insert(startAnim, {func = AnimSay, args = {natives[1], loc("It's a shame, I forgot how to do that!"), SAY_THINK, 4500}})
+ end
+ table.insert(startAnim, {func = AnimCustomFunction, args = {natives[1], RestoreHedge, {cyborg}}})
+ table.insert(startAnim, {func = AnimOutOfNowhere, args = {cyborg, unpack(cyborgPos)}})
+ table.insert(startAnim, {func = AnimTurn, args = {cyborg, "Left"}})
+ table.insert(startAnim, {func = AnimTurn, args = {natives[2], "Left"}})
+ table.insert(startAnim, {func = AnimTurn, args = {natives[3], "Left"}})
+ table.insert(startAnim, {func = AnimSay, args = {cyborg, loc("Hello again, ") .. nativeUnNames[m5DeployedNum] .. "!", SAY_SAY, 2500}})
+ table.insert(startAnim, {func = AnimSay, args = {cyborg, loc("I just found out that they have captured your princess!"), SAY_SAY, 7000}})
+ if m5DeployedNum == girlNum then
+ table.insert(startAnim, {func = AnimSay, args = {natives[1], loc("Of course I have to save her. What did I expect?!"), SAY_SAY, 7000}})
+ elseif m5DeployedNum == denseNum then
+ table.insert(startAnim, {func = AnimCustomFunction, args = {natives[1], EmitDenseClouds, {"Right"}}})
+ end
+ table.insert(startAnim, {func = AnimSay, args = {cyborg, loc("She's behind that tall thingy."), SAY_SAY, 5000}})
+ table.insert(startAnim, {func = FollowGear, swh = false, args = {princess}})
+ table.insert(startAnim, {func = AnimWait, swh = false, args = {princess, 1000}})
+ table.insert(startAnim, {func = FollowGear, swh = false, args = {cyborg}})
+ table.insert(startAnim, {func = AnimSay, args = {cyborg, loc("I'm here to help you rescue her."), SAY_SAY, 5000}})
+ table.insert(startAnim, {func = AnimSay, args = {natives[2], loc("Yo, dude, we're here, too!"), SAY_SHOUT, 4000}})
+ table.insert(startAnim, {func = AnimSay, args = {natives[3], loc("We were trying to save her and we got lost."), SAY_SHOUT, 6000}})
+ table.insert(startAnim, {func = AnimSay, args = {natives[1], loc("That's typical of you!"), SAY_SAY, 3000}})
+ table.insert(startAnim, {func = AnimSay, args = {natives[1], loc("Why are you helping us, uhm...?"), SAY_SAY, 3000}})
+ table.insert(startAnim, {func = AnimSay, args = {cyborg, loc("Call me Beep! Well, 'cause I'm such a nice...person!"), SAY_SAY, 2500}})
+ table.insert(startAnim, {func = AnimDisappear, args = {cyborg, unpack(cyborgPos)}})
+ table.insert(startAnim, {func = AnimSwitchHog, args = {natives[1]}})
+ table.insert(startAnim, {func = AnimWait, args = {natives[1], 1}})
+ AddSkipFunction(startAnim, SkipStartAnim, {})
+
+ table.insert(midAnim, {func = AnimCustomFunction, args = {natives[1], RestoreHedge, {cyborg}}})
+ table.insert(midAnim, {func = AnimOutOfNowhere, args = {cyborg, unpack(cyborgMidPos)}})
+ table.insert(midAnim, {func = AnimTurn, args = {cyborg, "Left"}})
+ table.insert(midAnim, {func = AnimTeleportGear, args = {natives[1], unpack(nativeMidPos)}})
+ table.insert(midAnim, {func = AnimSay, args = {cyborg, loc("Here, let me help you save her!"), SAY_SAY, 5000}})
+ table.insert(midAnim, {func = AnimSay, args = {natives[1], loc("Thanks!"), SAY_SAY, 2000}})
+ table.insert(midAnim, {func = AnimTeleportGear, args = {natives[1], unpack(nativeMidPos2)}})
+ table.insert(midAnim, {func = AnimSay, args = {natives[1], loc("Why can't he just let her go?!"), SAY_THINK, 5000}})
+ AddSkipFunction(midAnim, SkipStartAnim, {})
+end
+
+--------------------------Anim skip functions--------------------------
+function AfterMidAnim()
+ HideHedge(cyborg)
+ SetupPlace3()
+ SetGearMessage(natives[1], 0)
+ AddNewEvent(CheckPrincessFreed, {}, DoPrincessFreed, {}, 0)
+ TurnTimeLeft = TurnTime
+ ShowMission(loc("Family Reunion"), loc("Salvation"), loc("Get your teammates out of their natural prison and save the princess!|Hint: Drilling holes should solve everything."), 1, 7000)
+end
+
+function SetupPlace3()
+ SpawnUtilityCrate(2086, 1887, amRope, 1)
+ SpawnUtilityCrate(2147, 728, amBlowTorch, 2)
+ SpawnUtilityCrate(2778, 1372, amPickHammer, 2)
+ SpawnUtilityCrate(2579, 1886, amPickHammer, 2)
+ SpawnUtilityCrate(2622, 1893, amGirder, 1)
+ SpawnUtilityCrate(2671, 1883, amPortalGun, 3)
+ SpawnUtilityCrate(2831, 1384, amGirder, 3)
+
+ SetTimer(AddGear(2725, 1387, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2760, 1351, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2805, 1287, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2831, 1376, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2684, 1409, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2637, 1428, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2278, 1280, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2311, 1160, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2339, 1162, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2362, 1184, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2407, 1117, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2437, 1143, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2472, 1309, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2495, 1331, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2536, 1340, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2569, 1360, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2619, 1379, gtMine, 0, 0, 0, 0), 5000)
+ SetTimer(AddGear(2596, 1246, gtMine, 0, 0, 0, 0), 5000)
+end
+
+function SkipStartAnim()
+ AnimSwitchHog(natives[1])
+ AnimWait(natives[1], 1)
+end
+
+function AfterStartAnim()
+ HideHedge(cyborg)
+ SetupPlace2()
+ SetGearMessage(natives[1], 0)
+ AddNewEvent(CheckGearDead, {natives[1]}, EndMission, {}, 0)
+ AddNewEvent(CheckGearDead, {natives[2]}, EndMission, {}, 0)
+ AddNewEvent(CheckGearDead, {natives[3]}, EndMission, {}, 0)
+ AddNewEvent(CheckGearDead, {princess}, EndMission, {}, 0)
+ AddNewEvent(CheckCyborgsDead, {}, DoCyborgsDead, {}, 0)
+ for i = 1, cyborgsNum do
+ AddNewEvent(CheckGearDead, {cyborgs[i]}, DoCyborgDead, {i}, 0)
+ end
+ TurnTimeLeft = TurnTime
+ ShowMission(loc("Family Reunion"), loc("Hostage Situation"), loc("Save the princess! All your hogs must survive!|Hint: Kill the cyborgs first! Use the ammo very carefully!"), 1, 7000)
+end
+
+function SetupPlace2()
+ PlaceGirder(709, 564, 7)
+ PlaceGirder(591, 677, 7)
+ PlaceGirder(473, 794, 7)
+ PlaceGirder(433, 933, 5)
+ PlaceGirder(553, 1052, 5)
+ PlaceGirder(674, 1170, 5)
+ PlaceGirder(710, 1310, 7)
+ PlaceGirder(648, 1427, 5)
+ PlaceGirder(2110, 980, 0)
+
+ SpawnAmmoCrate(814, 407, amBazooka, 8)
+ SpawnAmmoCrate(862, 494, amClusterBomb, 8)
+ SpawnAmmoCrate(855, 486, amBee, 5)
+ SpawnAmmoCrate(849, 459, amGrenade, 8)
+ SpawnAmmoCrate(2077, 847, amWatermelon, 3)
+ SpawnAmmoCrate(2122, 847, amGrenade, 8)
+
+ SpawnUtilityCrate(747, 1577, amPickHammer, 1)
+ SpawnUtilityCrate(496, 1757, amGirder, 2)
+ SpawnUtilityCrate(1809, 1880, amGirder, 1)
+ SpawnUtilityCrate(530, 1747, amPortalGun, 1)
+end
+
+-----------------------------Events------------------------------------
+function CheckPrincessFreed()
+ return math.abs(GetX(natives[1]) - GetX(princess)) <= 10 and math.abs(GetX(natives[1]) - GetX(princess)) <= 10 and StoppedGear(natives[1])
+ and GetY(natives[2]) < 1500 and GetY(natives[3]) < 1500 and StoppedGear(natives[2]) and StoppedGear(natives[3])
+end
+
+function DoPrincessFreed()
+ AnimSay(princess, loc("Thank you, my hero!"), SAY_SAY, 0)
+ SaveCampaignVar("Progress", "7")
+ ParseCommand("teamgone " .. loc("011101001"))
+ TurnTimeLeft = 0
+end
+
+function CheckCyborgsDead()
+ return cyborgsLeft == 0
+end
+
+function DoCyborgsDead()
+ AddAnim(midAnim)
+ AddFunction({func = AfterMidAnim, args = {}})
+end
+
+function DoCyborgDead(index)
+ if cyborgsLeft == 0 then
+ return
+ end
+ if index == 1 then
+ SpawnAmmoCrate(1700, 407, amBazooka, 3)
+ elseif index == 2 then
+ SpawnAmmoCrate(1862, 494, amClusterBomb, 3)
+ elseif index == 3 then
+ SpawnAmmoCrate(1855, 486, amBee, 1)
+ elseif index == 4 then
+ SpawnAmmoCrate(1849, 459, amGrenade, 3)
+ elseif index == 5 then
+ SpawnAmmoCrate(2122, 847, amGrenade, 3)
+ elseif index == 6 then
+ SpawnAmmoCrate(2077, 847, amWatermelon, 1)
+ end
+end
+
+function CheckGearsDead(gearList)
+ for i = 1, # gearList do
+ if gearDead[gearList[i]] ~= true then
+ return false
+ end
+ end
+ return true
+end
+
+
+function CheckGearDead(gear)
+ return gearDead[gear] and retry == false
+end
+
+function EndMission()
+ AddCaption("So the princess was never heard of again...")
+ ParseCommand("teamgone " .. loc("Natives"))
+ ParseCommand("teamgone " .. loc("011101001"))
+ TurnTimeLeft = 0
+end
+
+-----------------------------Misc--------------------------------------
+function HideHedge(hedge)
+ if hedgeHidden[hedge] ~= true then
+ HideHog(hedge)
+ hedgeHidden[hedge] = true
+ end
+end
+
+function RestoreHedge(hedge)
+ if hedgeHidden[hedge] == true then
+ RestoreHog(hedge)
+ hedgeHidden[hedge] = false
+ end
+end
+
+function GetVariables()
+ m5DeployedNum = tonumber(GetCampaignVar("M5DeployedNum"))
+ m2Choice = tonumber(GetCampaignVar("M2Choice"))
+ m5Choice = tonumber(GetCampaignVar("M5Choice"))
+end
+
+function SetupPlace()
+ SetHogHat(natives[1], nativeHats[m5DeployedNum])
+ SetHogName(natives[1], nativeNames[m5DeployedNum])
+ if m2Choice ~= choiceAccepted or m5Choice ~= choiceEliminate then
+ DeleteGear(cyborgs[cyborgsNum])
+ cyborgsNum = cyborgsNum - 1
+ end
+ HideHedge(cyborg)
+ AddGear(princessPos[1], princessPos[2], gtCase, 0, 0, 0, 0)
+end
+
+function SetupEvents()
+end
+
+function SetupAmmo()
+ AddAmmo(cyborgs[1], amBazooka, 100)
+ AddAmmo(cyborgs[1], amGrenade, 100)
+ AddAmmo(cyborgs[1], amClusterBomb, 100)
+ AddAmmo(cyborgs[1], amSniperRifle, 1)
+ AddAmmo(cyborgs[1], amDynamite, 100)
+ AddAmmo(cyborgs[1], amBaseballBat, 100)
+ AddAmmo(cyborgs[1], amMolotov, 100)
+end
+
+function AddHogs()
+ AddTeam(loc("Natives"), 29439, "Bone", "Island", "HillBilly", "cm_birdy")
+ for i = 7, 9 do
+ natives[i-6] = AddHog(nativeNames[i], 0, 100, nativeHats[i])
+ gearDead[natives[i-6]] = false
+ end
+
+ AddTeam(loc("011101001"), 14483456, "ring", "UFO", "Robot", "cm_star")
+ cyborg = AddHog(loc("Unit 334a$7%;.*"), 0, 200, "cyborg1")
+ princess = AddHog(loc("Fell From Heaven"), 0, 133, "tiara")
+ gearDead[cyborg] = false
+ gearDead[princess] = false
+
+ AddTeam(loc("Biomechanic Team"), 14483457, "ring", "UFO", "Robot", "cm_star")
+ for i = 1, cyborgsNum do
+ cyborgs[i] = AddHog(cyborgNames[i], cyborgsDif[i], cyborgsHealth[i], "cyborg2")
+ gearDead[cyborgs[i]] = false
+ end
+ cyborgsLeft = cyborgsNum
+
+ for i = 1, 3 do
+ SetGearPosition(natives[i], unpack(nativePos[i]))
+ end
+
+ SetGearPosition(cyborg, unpack(cyborgPos))
+ SetGearPosition(princess, unpack(princessPos))
+
+ for i = 1, cyborgsNum do
+ SetGearPosition(cyborgs[i], unpack(cyborgsPos[i]))
+ AnimTurn(cyborgs[i], cyborgsDir[i])
+ end
+end
+
+function CondNeedToTurn(hog1, hog2)
+ xl, xd = GetX(hog1), GetX(hog2)
+ if xl > xd then
+ AnimInsertStepNext({func = AnimTurn, args = {hog1, "Left"}})
+ AnimInsertStepNext({func = AnimTurn, args = {hog2, "Right"}})
+ elseif xl < xd then
+ AnimInsertStepNext({func = AnimTurn, args = {hog2, "Left"}})
+ AnimInsertStepNext({func = AnimTurn, args = {hog1, "Right"}})
+ end
+end
+
+-----------------------------Main Functions----------------------------
+
+function onGameInit()
+ Seed = 0
+ GameFlags = gfOneClanMode + gfSolidLand + gfDisableLandObjects + gfDisableGirders
+ TurnTime = 60000
+ CaseFreq = 0
+ MinesNum = 0
+ MinesTime = 3000
+ Explosives = 0
+ Delay = 10
+ MapGen = 2
+ Theme = "Hell"
+ SuddenDeathTurns = 25
+
+ for i = 1, #map do
+ ParseCommand('draw ' .. map[i])
+ end
+
+ AddHogs()
+ AnimInit()
+end
+
+function onGameStart()
+ GetVariables()
+ SetupAmmo()
+ SetupPlace()
+ AnimationSetup()
+ SetupEvents()
+ AddAnim(startAnim)
+ AddFunction({func = AfterStartAnim, args = {}})
+end
+
+function onGameTick()
+ AnimUnWait()
+ if ShowAnimation() == false then
+ return
+ end
+ ExecuteAfterAnimations()
+ CheckEvents()
+end
+
+function onGearDelete(gear)
+ gearDead[gear] = true
+ if GetGearType(gear) == gtHedgehog then
+ if GetHogTeamName(gear) == loc("Biomechanic Team") then
+ cyborgsLeft = cyborgsLeft - 1
+ end
+ end
+end
+
+function onGearAdd(gear)
+end
+
+function onAmmoStoreInit()
+ SetAmmo(amSkip, 9, 0, 0, 0)
+ SetAmmo(amSwitch, 9, 0, 0, 0)
+ SetAmmo(amBazooka, 0, 0, 0, 8)
+ SetAmmo(amClusterBomb,0, 0, 0, 8)
+ SetAmmo(amBee, 0, 0, 0, 3)
+ SetAmmo(amGrenade, 0, 0, 0, 8)
+ SetAmmo(amWatermelon, 0, 0, 0, 2)
+ SetAmmo(amSniperRifle, 0, 0, 0, 3)
+ SetAmmo(amPickHammer, 0, 0, 0, 1)
+ SetAmmo(amGirder, 0, 0, 0, 3)
+ SetAmmo(amPortalGun, 0, 0, 0, 1)
+end
+
+function onNewTurn()
+ if AnimInProgress() then
+ TurnTimeLeft = -1
+ return
+ end
+ if GetHogTeamName(CurrentHedgehog) == loc("011101001") then
+ TurnTimeLeft = 0
+ elseif GetHogTeamName(CurrentHedgehog) == loc("Biomechanic Team") then
+ HideHedge(princess)
+ else
+ RestoreHedge(princess)
+ end
+end
+
+function onGearDamage(gear, damage)
+end
+
+function onPrecise()
+ if GameTime > 2500 and AnimInProgress() then
+ SetAnimSkip(true)
+ end
+end