diff -r 8e5140875ab5 -r c9978ada9a3d share/hedgewars/Data/Missions/Campaign/A Classic Fairytale/family.lua --- a/share/hedgewars/Data/Missions/Campaign/A Classic Fairytale/family.lua Sun Jun 30 21:37:29 2013 -0400 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,569 +0,0 @@ -HedgewarsScriptLoad("/Scripts/Locale.lua") -HedgewarsScriptLoad("/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 = {45, 45, 45, 40, 40, 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 = {natives[1], GetX(natives[1]) + dif, GetY(natives[1]) + dif, vgtSteam, 0, true}, swh = false}) - AnimInsertStepNext({func = AnimVisualGear, args = {natives[1], GetX(natives[1]) + dif, GetY(natives[1]) + dif, vgtSteam, 0, true}, swh = false}) - AnimInsertStepNext({func = AnimVisualGear, args = {natives[1], GetX(natives[1]) + dif, GetY(natives[1]) + dif, vgtSteam, 0, true}, swh = false}) - AnimInsertStepNext({func = AnimWait, args = {natives[1], 800}}) - AnimInsertStepNext({func = AnimVisualGear, args = {natives[1], GetX(natives[1]) + dif, GetY(natives[1]) + dif, vgtSteam, 0, true}, swh = false}) - AnimInsertStepNext({func = AnimVisualGear, args = {natives[1], GetX(natives[1]) + dif, GetY(natives[1]) + dif, vgtSteam, 0, true}, swh = false}) - AnimInsertStepNext({func = AnimWait, args = {natives[1], 800}}) - AnimInsertStepNext({func = AnimVisualGear, args = {natives[1], GetX(natives[1]) + dif, GetY(natives[1]) + 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, SkipMidAnim, {}) -end - ---------------------------Anim skip functions-------------------------- -function AfterMidAnim() - HideHedge(cyborg) - SetupPlace3() - SetGearMessage(natives[1], 0) - AddNewEvent(CheckPrincessFreed, {}, DoPrincessFreed, {}, 0) - TurnTimeLeft = 0 - 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.|Hint: It might be a good idea to place a girder before starting to drill. Just saying.|Hint: All your hedgehogs need to be above the marked height!|Hint: Leaks A Lot needs to get really close to the princess!"), 1, 7000) - vCirc = AddVisualGear(0,0,vgtCircle,0,true) - SetVisualGearValues(vCirc, 2625, 1500, 100, 255, 1, 10, 0, 120, 3, 0xff00ffff) -end - -function SkipMidAnim() - AnimTeleportGear(natives[1], unpack(nativeMidPos2)) - SkipStartAnim() -end - -function SetupPlace3() - SpawnUtilityCrate(2086, 1887, amRope, 1) - SpawnUtilityCrate(2147, 728, amBlowTorch, 2) - SpawnUtilityCrate(2778, 1372, amPickHammer, 3) - SpawnUtilityCrate(2579, 1886, amPickHammer, 3) - 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 - AddNewEvent(CheckOutOfCluster, {}, DoOutOfCluster, {}, 1) - AddNewEvent(CheckOutOfGrenade, {}, DoOutOfGrenade, {}, 1) --- AddNewEvent(CheckNeedToHide, {}, DoNeedToHide, {}, 1) - 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!|Hint: You might want to spare a girder for cover!"), 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, 4) - clusterCrate = SpawnAmmoCrate(862, 494, amClusterBomb, 4) - SpawnAmmoCrate(855, 486, amBee, 3) - grenadeCrate1 = SpawnAmmoCrate(849, 459, amGrenade, 4) - SpawnAmmoCrate(2077, 847, amWatermelon, 3) - grenadeCrate2 = SpawnAmmoCrate(2122, 847, amGrenade, 3) - - SpawnUtilityCrate(747, 1577, amPickHammer, 1) - SpawnUtilityCrate(496, 1757, amGirder, 2) - SpawnUtilityCrate(1809, 1880, amGirder, 1) - SpawnUtilityCrate(530, 1747, amPortalGun, 1) -end - ------------------------------Events------------------------------------ -function CheckPrincessFreed() - if GetX(natives[1]) == nil or GetX(natives[2]) == nil or GetX(natives[3]) == nil or GetX(princess) == nil then - return false - end - return math.abs(GetX(natives[1]) - GetX(princess)) <= 15 and math.abs(GetY(natives[1]) - GetY(princess)) <= 15 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) - if progress and progress<7 then - SaveCampaignVar("Progress", "7") - end - ParseCommand("teamgone " .. loc("011101001")) - TurnTimeLeft = 0 -end - -function CheckCyborgsDead() - return cyborgsLeft == 0 -end - -function DoCyborgsDead() - SetGearMessage(CurrentHedgehog, 0) - RestoreHedge(princess) --- RemoveEventFunc(CheckNeedToHide) - 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] -end - -function EndMission() - RemoveEventFunc(CheckPrincessFreed) - AddCaption("So the princess was never heard of again...") - ParseCommand("teamgone " .. loc("Natives")) - ParseCommand("teamgone " .. loc("011101001")) - TurnTimeLeft = 0 -end - -function CheckOutOfCluster() - return CheckGearDead(clusterCrate) and GetAmmoCount(natives[1], amClusterBomb) == 0 -end - -function CheckOutOfGrenade() - return CheckGearDead(grenadeCrate1) and CheckGearDead(grenadeCrate2) and GetAmmoCount(natives[1], amGrenade) == 0 -end - -function DoOutOfCluster() - if (GetX(natives[1]) == nil) then - return - end - clusterCrate = SpawnAmmoCrate(GetX(natives[1]) - 50, GetY(natives[1]) - 50, amClusterBomb, 3) -end - -function DoOutOfGrenade() - if (GetX(natives[1]) == nil) then - return - end - grenadeCrate2 = SpawnAmmoCrate(GetX(natives[1]) - 50, GetY(natives[1]) - 50, amGrenade, 3) -end - -function CheckNeedToHide() - if gearDead[princess] == true then - return false - end - return TurnTimeLeft == 0 -end - -function DoNeedToHide() - HideHedge(princess) -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() - progress = tonumber(GetCampaignVar("Progress")) - 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) -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) - AddAmmo(cyborgs[1], amWatermelon, 1) - AddAmmo(cyborgs[1], amAirStrike, 2) - AddAmmo(cyborgs[1], amDrillStrike, 1) -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, 333, "tiara") - gearDead[cyborg] = false - gearDead[princess] = false - - AddTeam(loc("Biomechanic Team"), 14483456, "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 - AnimSetGearPosition(natives[i], unpack(nativePos[i])) - end - - AnimSetGearPosition(cyborg, unpack(cyborgPos)) - AnimSetGearPosition(princess, unpack(princessPos)) - AnimTurn(princess, "Left") - - for i = 1, cyborgsNum do - AnimSetGearPosition(cyborgs[i], unpack(cyborgsPos[i])) - AnimTurn(cyborgs[i], cyborgsDir[i]) - end -end - -function CondNeedToTurn(hog1, hog2) - xl, xd = GetX(hog1), GetX(hog2) - if xl == nil or xd == nil then - return - end - 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 = gfSolidLand + gfDisableLandObjects + gfDisableGirders - TurnTime = 60000 - CaseFreq = 0 - MinesNum = 0 - MinesTime = 3000 - Explosives = 0 - Delay = 10 - MapGen = 2 - Theme = "Hell" - SuddenDeathTurns = 35 - - for i = 1, #map do - ParseCommand('draw ' .. map[i]) - end - - AddHogs() - AnimInit() -end - -function onGameStart() - GetVariables() - SetupAmmo() - SetupPlace() - AnimationSetup() - 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 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 - if CheckCyborgsDead() ~= true then - for i = 1, 3 do - if gearDead[natives[i]] ~= true then - HideHedge(natives[i]) - end - end - end - TurnTimeLeft = 0 - else - for i = 1, 3 do - if gearDead[natives[i]] ~= true then - RestoreHedge(natives[i]) - end - end - end -end - -function onPrecise() - if GameTime > 2500 and AnimInProgress() then - SetAnimSkip(true) - return - end --- HideHedge(princess) --- for i = 1, 5 do --- DeleteGear(cyborgs[i]) --- end --- AddAmmo(natives[1], amTeleport, 100) -end