share/hedgewars/Data/Missions/Scenario/User_Mission_-_Dangerous_Ducklings.lua
changeset 14494 cc358e997e32
parent 14482 d4aa64f51c9f
child 14932 ff4003a90ff8
equal deleted inserted replaced
14493:e78c44ae94da 14494:cc358e997e32
     1 
     1 
     2 HedgewarsScriptLoad("/Scripts/Locale.lua")
     2 HedgewarsScriptLoad("/Scripts/Locale.lua")
     3 HedgewarsScriptLoad("/Scripts/Achievements.lua")
     3 HedgewarsScriptLoad("/Scripts/Achievements.lua")
     4 
     4 
     5 local player = nil -- This variable will point to the hog's gear
     5 local player = nil -- This variable will point to the hog's gear
       
     6 local playerTeamName, enemyTeamName = nil, nil
     6 local instructor = nil
     7 local instructor = nil
     7 local enemy = nil
     8 local enemy = nil
     8 
     9 
     9 local speechStage = 0
    10 local speechStage = 0
    10 
    11 
    28 	Theme = "Bath" -- The theme to be used
    29 	Theme = "Bath" -- The theme to be used
    29 	-- Disable Sudden Death
    30 	-- Disable Sudden Death
    30 	HealthDecrease = 0
    31 	HealthDecrease = 0
    31 	WaterRise = 0
    32 	WaterRise = 0
    32 
    33 
    33 	AddMissionTeam(-1)
    34 	playerTeamName = AddMissionTeam(-1)
    34 	player = AddMissionHog(1)
    35 	player = AddMissionHog(1)
    35 	instructor = AddHog(loc("Instructor"), 0, 100, "sf_vega")
    36 	instructor = AddHog(loc("Instructor"), 0, 100, "sf_vega")
    36 
    37 
    37 	AddTeam(loc("Blue Team"), -2, "bubble", "Island", "Default", "somalia")
    38 	enemyTeamName = AddTeam(loc("Blue Team"), -2, "bubble", "Island", "Default", "somalia")
    38 	enemy = AddHog(loc("Filthy Blue"), 1, 100, "Skull")
    39 	enemy = AddHog(loc("Filthy Blue"), 1, 100, "Skull")
    39 
    40 
    40 	SetGearPosition(player,146,902)
    41 	SetGearPosition(player,146,902)
    41 	SetGearPosition(instructor,317,902)
    42 	SetGearPosition(instructor,317,902)
    42 	SetGearPosition(enemy,1918,837)
    43 	SetGearPosition(enemy,1918,837)
   110 	-- meh
   111 	-- meh
   111 	if gameLost == true then
   112 	if gameLost == true then
   112 		endTimer = endTimer + 1
   113 		endTimer = endTimer + 1
   113 		if (CurrentHedgehog ~= nil) and (CurrentHedgehog == instructor) then
   114 		if (CurrentHedgehog ~= nil) and (CurrentHedgehog == instructor) then
   114 			if endTimer >= 3000 then
   115 			if endTimer >= 3000 then
   115 				--SetHealth(instructor,0)
       
   116 				SetTurnTimeLeft(1)
   116 				SetTurnTimeLeft(1)
   117 				DismissTeam(GetHogTeamName(player))
   117 				DismissTeam(playerTeamName)
   118 			end
   118 			end
   119 			ShowMission(loc("Dangerous Ducklings"), loc("MISSION FAILED"), loc("You've failed. Try again."), -amRope, 5000);
   119 			ShowMission(loc("Dangerous Ducklings"), loc("MISSION FAILED"), loc("You've failed. Try again."), -amRope, 5000);
   120 		end
   120 		end
   121 	end
   121 	end
   122 
   122 
   135 			gameLost = true
   135 			gameLost = true
   136 		elseif (gear == instructor) and (GetY(gear) > WaterLine) then
   136 		elseif (gear == instructor) and (GetY(gear) > WaterLine) then
   137 			HogSay(player, loc("See ya!"), SAY_THINK)
   137 			HogSay(player, loc("See ya!"), SAY_THINK)
   138 			Retreat(3000)
   138 			Retreat(3000)
   139 			awardAchievement(loc("Naughty Ninja"))
   139 			awardAchievement(loc("Naughty Ninja"))
   140 			DismissTeam(GetHogTeamName(enemy))
   140 			DismissTeam(enemyTeamName)
   141 			gameWon = true
   141 			gameWon = true
   142 			SaveMissionVar("Won", "true")
   142 			SaveMissionVar("Won", "true")
   143 		elseif gear == enemy then
   143 		elseif gear == enemy then
   144 			HogSay(player, loc("Enjoy the swim..."), SAY_THINK)
   144 			HogSay(player, loc("Enjoy the swim..."), SAY_THINK)
   145 			gameWon = true
   145 			gameWon = true