diff -r 7dd85fe00de3 -r 1de4d6b35748 share/hedgewars/Data/Missions/Scenario/portal.lua --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/share/hedgewars/Data/Missions/Scenario/portal.lua Wed Apr 13 14:39:17 2016 +0200 @@ -0,0 +1,205 @@ +HedgewarsScriptLoad("/Scripts/Locale.lua") +HedgewarsScriptLoad("/Scripts/Utils.lua") + +local MineArray = {} +local player +local adviceGiven = false +local adviceGiven2 = false + +function onGameInit() + Seed = 0 -- The base number for the random number generator + GameFlags = gfInfAttack +gfBorder +gfDisableWind +gfSolidLand + TurnTime = 1500000 -- 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 + Delay = 10 -- The delay between each round + Map = "portal" -- The map to be played + Theme = "Hell" -- The theme to be used + -- Disable Sudden Death + HealthDecrease = 0 + WaterRise = 0 + + AddTeam(loc("Subjects"), 0xFFFF01, "Simple", "Island", "Default", "cm_test") + player = AddHog(loc("Subject 1"), 0, 10, "Terminator_Glasses") + + AddTeam(loc("Hell Army"), 0xFF0402, "skull", "Island", "Default", "cm_hellish") + enemy1 = AddHog(loc("Lucifer"), 1, 200, "InfernalHorns") + enemy2 = AddHog(loc("Voldemort"), 1, 150, "WizardHat") + enemy3 = AddHog(loc("Zombi"), 1, 100, "Zombi") + enemy4 = AddHog(loc("Predator"), 1, 14, "anzac") + enemy5 = AddHog(loc("Oneye"), 1, 50, "cyclops") + enemy6 = AddHog(loc("Razac"), 1, 50, "Evil") + enemy7 = AddHog(loc("C-2"), 1, 50, "cyborg1") + enemy8 = AddHog(loc("Rider"), 1, 50, "scif_SparkssHelmet") + + AddTeam(loc("Badmad"), 0xFF0402, "skull", "Island", "Default", "cm_pentagram") + enemy9 = AddHog(loc("C-1"), 1, 50, "cyborg2") + enemy10 = AddHog(loc("Hidden"), 1, 40, "bushhider") + enemy11 = AddHog(loc("Ronald"), 1, 70, "clown") + enemy12 = AddHog(loc("Phosphat"), 1, 50, "chef") + enemy13 = AddHog(loc("Lestat"), 1, 30, "vampirichog") + + SetGearPosition(player, 350, 1820) + SetGearPosition(enemy1, 2037, 1313) + SetGearPosition(enemy2, 1369, 1605) + SetGearPosition(enemy3, 1750, 1937) + SetGearPosition(enemy4, 3125, 89) + SetGearPosition(enemy5, 743, 900) + SetGearPosition(enemy6, 130, 360) + SetGearPosition(enemy7, 1333, 640) + SetGearPosition(enemy8, 1355, 200) + SetGearPosition(enemy9, 2680, 225) + SetGearPosition(enemy10, 2970, 800) + SetGearPosition(enemy11, 4050, 1964) + SetGearPosition(enemy12, 2666, 950) + SetGearPosition(enemy13, 3306, 1205) + +end + +function onAmmoStoreInit() + + SetAmmo(amFirePunch, 0,0,0,1) + SetAmmo(amParachute, 0, 0, 0, 2) + SetAmmo(amGirder, 0, 0, 0, 3) + SetAmmo(amTeleport, 0, 0, 0, 1) + SetAmmo(amLaserSight,0,0,0,1) + SetAmmo(amHellishBomb,0,0,0,1) + SetAmmo(amGrenade,0,0,0,1) + SetAmmo(amRope,0,0,0,1) + SetAmmo(amDEagle,0,0,0,1) + SetAmmo(amExtraTime,0,0,0,2) + SetAmmo(amSkip,9,0,0,0) + SetAmmo(amBlowTorch, 0, 0, 0, 1) + SetAmmo(amPickHammer, 0, 0, 0, 1) + SetAmmo(amSnowball, 0, 0, 0, 1) + +end + +function onGameStart() + + SetWind(100) + + MineArray[0] = AddGear(840, 1847, gtMine, 0, 0, 0, 0) + MineArray[1] = AddGear(900, 1847, gtMine, 0, 0, 0, 0) + MineArray[2] = AddGear(1000, 1847, gtMine, 0, 0, 0, 0) + MineArray[3] = AddGear(1100, 1847, gtMine, 0, 0, 0, 0) + MineArray[4] = AddGear(1140, 1847, gtMine, 0, 0, 0, 0) + MineArray[5] = AddGear(1170, 1847, gtMine, 0, 0, 0, 0) + MineArray[6] = AddGear(1200, 1847, gtMine, 0, 0, 0, 0) + MineArray[7] = AddGear(1200, 1847, gtMine, 0, 0, 0, 0) + MineArray[8] = AddGear(1230, 1847, gtMine, 0, 0, 0, 0) + MineArray[9] = AddGear(1280, 1847, gtMine, 0, 0, 0, 0) + MineArray[10] = AddGear(1302, 1847, gtMine, 0, 0, 0, 0) + MineArray[11] = AddGear(1350, 1847, gtMine, 0, 0, 0, 0) + MineArray[12] = AddGear(1383, 1847, gtMine, 0, 0, 0, 0) + MineArray[13] = AddGear(1400, 1847, gtMine, 0, 0, 0, 0) + MineArray[14] = AddGear(1423, 1847, gtMine, 0, 0, 0, 0) + MineArray[15] = AddGear(1470, 1847, gtMine, 0, 0, 0, 0) + MineArray[16] = AddGear(1480, 1847, gtMine, 0, 0, 0, 0) + MineArray[17] = AddGear(1311, 1847, gtMine, 0, 0, 0, 0) + + MineArray[18] = AddGear(840, 1785, gtMine, 0, 0, 0, 0) + MineArray[19] = AddGear(900, 1785, gtMine, 0, 0, 0, 0) + MineArray[20] = AddGear(1000, 1785, gtMine, 0, 0, 0, 0) + MineArray[21] = AddGear(1100, 1785, gtMine, 0, 0, 0, 0) + MineArray[22] = AddGear(1140, 1785, gtMine, 0, 0, 0, 0) + MineArray[23] = AddGear(1170, 1785, gtMine, 0, 0, 0, 0) + MineArray[24] = AddGear(1200, 1785, gtMine, 0, 0, 0, 0) + MineArray[25] = AddGear(1230, 1785, gtMine, 0, 0, 0, 0) + MineArray[26] = AddGear(1280, 1785, gtMine, 0, 0, 0, 0) + MineArray[27] = AddGear(1302, 1785, gtMine, 0, 0, 0, 0) + MineArray[28] = AddGear(1350, 1785, gtMine, 0, 0, 0, 0) + MineArray[29] = AddGear(1383, 1785, gtMine, 0, 0, 0, 0) + MineArray[30] = AddGear(1400, 1785, gtMine, 0, 0, 0, 0) + MineArray[31] = AddGear(1423, 1785, gtMine, 0, 0, 0, 0) + MineArray[32] = AddGear(1470, 1785, gtMine, 0, 0, 0, 0) + MineArray[33] = AddGear(1480, 1785, gtMine, 0, 0, 0, 0) + MineArray[34] = AddGear(1311, 1785, gtMine, 0, 0, 0, 0) + + MineArray[35] = AddGear(4029, 89, gtMine, 0, 0, 0, 120) + + for i = 0,#MineArray do + SetTimer(MineArray[i],050) + SetState(MineArray[i],544) + end + --needed this MineArray cause timer didn't work, its was always 3sec, i wanna instant mines + + --UTILITY CRATE-- + parachute = SpawnUtilityCrate(1670, 1165, amParachute) + girder = SpawnUtilityCrate(2101, 1297, amGirder) + SpawnUtilityCrate(3965, 625, amBlowTorch) + SpawnUtilityCrate(2249, 93, amBlowTorch) + SpawnUtilityCrate(2181, 829, amBlowTorch) + SpawnUtilityCrate(1820, 567, amBlowTorch) + SpawnUtilityCrate(1375, 900, amTeleport) + SpawnUtilityCrate(130, 600, amPickHammer) + SpawnUtilityCrate(1660,1820, amLaserSight) + SpawnUtilityCrate(4070,1840, amLaserSight) + + + --AMMO CRATE-- + portalgun = SpawnAmmoCrate(505, 1943, amPortalGun, 1000) + extratime = SpawnAmmoCrate(4020, 785, amExtraTime, 2) + SpawnAmmoCrate(425, 613, amSnowball) + SpawnAmmoCrate(861, 633, amHellishBomb) + SpawnAmmoCrate(2510, 623, amSnowball) + SpawnAmmoCrate(2900, 1600, amGrenade) + SpawnAmmoCrate(2680, 320, amGrenade) + SpawnAmmoCrate(2650, 80, amDEagle) + SpawnAmmoCrate(3000, 100, amDEagle) + SpawnAmmoCrate(2900, 1400, amRope) + SpawnAmmoCrate(4025, 1117, amFirePunch) + + --HEALTH CRATE-- + SpawnHealthCrate(2000, 780) + + --GIRDER-- + PlaceGirder(3363, 1323, 4) + + ShowMission (loc("Portal Mind Challenge"), loc("Mission"), + loc("Defeat all enemies!") .. "|" .. loc("In this mission you have infinite time."), + -amPortalGun, 5000) + HogSay(player, loc("I should get myself a portal device, maybe this crate has one."), SAY_THINK) + +end + +function onGameTick() + + if (player ~= nil) then + if (gearIsInBox(player, 1650, 1907, 200, 60) and (adviceGiven == false)) then + adviceGiven = true + HogSay(player, loc("Hmmm, I’ll have to find some way of moving him off this anti-portal surface."), SAY_THINK) + elseif (gearIsInBox(player, 2960, 790, 200, 60) and (adviceGiven2 == false)) then + adviceGiven2 = true + HogSay(player, loc("The anti-portal surface is all over the floor, and I have nothing to kill him. Dropping something could hurt him enough to kill him."), SAY_THINK) + end + end + +end + +function onGearDelete(gear) + -- Check gear collection + if CurrentHedgehog == player and (band(GetGearMessage(gear), gmDestroy) ~= 0) then + if gear == portalgun then + HogSay(player, loc("Great! Let’s kill all these enemies, using portals."), SAY_THINK) + end + + if gear == girder then + HogSay(player, loc("This will be useful when I need a new platform or if I want to rise."), SAY_THINK) + end + + if gear == parachute then + HogSay(player, loc("You can’t open a portal on the blue surface."), SAY_THINK) + end + + if gear == extratime then + HogSay(player, loc("What?! For all this struggle I just win some ... time? Oh dear!"), SAY_SHOUT) + end + end + + if gear == player then + player = nil + end +end +