share/hedgewars/Data/Maps/Control/map.lua
author Wuzzy <Wuzzy2@mail.ru>
Fri, 17 May 2019 01:10:17 +0200
changeset 15004 89f6a1154f67
parent 15003 980a948a5dff
child 15005 6e17abf7b8ef
permissions -rw-r--r--
Control (style): Clean up whitespace and indentations
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
15003
980a948a5dff Control (style): Dump dead code and ancient changelog
Wuzzy <Wuzzy2@mail.ru>
parents: 13742
diff changeset
     1
-------------
980a948a5dff Control (style): Dump dead code and ancient changelog
Wuzzy <Wuzzy2@mail.ru>
parents: 13742
diff changeset
     2
-- CONTROL --
980a948a5dff Control (style): Dump dead code and ancient changelog
Wuzzy <Wuzzy2@mail.ru>
parents: 13742
diff changeset
     3
-------------
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
     4
15003
980a948a5dff Control (style): Dump dead code and ancient changelog
Wuzzy <Wuzzy2@mail.ru>
parents: 13742
diff changeset
     5
-- Goal: Stand on pillars to score points over time.
980a948a5dff Control (style): Dump dead code and ancient changelog
Wuzzy <Wuzzy2@mail.ru>
parents: 13742
diff changeset
     6
-- First clan to hit the score limit wins!
4953
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
     7
15003
980a948a5dff Control (style): Dump dead code and ancient changelog
Wuzzy <Wuzzy2@mail.ru>
parents: 13742
diff changeset
     8
-- Rules:
980a948a5dff Control (style): Dump dead code and ancient changelog
Wuzzy <Wuzzy2@mail.ru>
parents: 13742
diff changeset
     9
-- * You generate points while standing on a pillar during your turn.
980a948a5dff Control (style): Dump dead code and ancient changelog
Wuzzy <Wuzzy2@mail.ru>
parents: 13742
diff changeset
    10
-- * Control more pillars for more points
980a948a5dff Control (style): Dump dead code and ancient changelog
Wuzzy <Wuzzy2@mail.ru>
parents: 13742
diff changeset
    11
-- * If multiple clans compete for a pillar, no one generates points for this pillar.
980a948a5dff Control (style): Dump dead code and ancient changelog
Wuzzy <Wuzzy2@mail.ru>
parents: 13742
diff changeset
    12
-- * If you skip turn, you win the same points as if you would have just waited out the turn
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
    13
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    14
-----------------
15003
980a948a5dff Control (style): Dump dead code and ancient changelog
Wuzzy <Wuzzy2@mail.ru>
parents: 13742
diff changeset
    15
-- script begins
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    16
-----------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    17
9093
4114ce5d885d fix locale load
nemo
parents: 8349
diff changeset
    18
HedgewarsScriptLoad("/Scripts/Locale.lua")
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    19
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    20
---------------------------------------------------------------
15003
980a948a5dff Control (style): Dump dead code and ancient changelog
Wuzzy <Wuzzy2@mail.ru>
parents: 13742
diff changeset
    21
-- lots variables and things
980a948a5dff Control (style): Dump dead code and ancient changelog
Wuzzy <Wuzzy2@mail.ru>
parents: 13742
diff changeset
    22
---------------------------------------------------------------
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    23
4953
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
    24
local TimeCounter = 0
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
    25
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    26
local gameWon = false
4698
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
    27
local pointLimit = 300
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    28
12080
6c734d8defef Clean up strings in Control mission maps (more translator-friendly)
Wuzzy <almikes@aol.com>
parents: 12079
diff changeset
    29
local missionName = loc("Control")
6c734d8defef Clean up strings in Control mission maps (more translator-friendly)
Wuzzy <almikes@aol.com>
parents: 12079
diff changeset
    30
local missionCaption = loc("Domination game")
6c734d8defef Clean up strings in Control mission maps (more translator-friendly)
Wuzzy <almikes@aol.com>
parents: 12079
diff changeset
    31
local missionHelp
6c734d8defef Clean up strings in Control mission maps (more translator-friendly)
Wuzzy <almikes@aol.com>
parents: 12079
diff changeset
    32
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    33
local vCirc = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    34
local vCircCount = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    35
4953
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
    36
--local hGCount = 0
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    37
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    38
local vCircX = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    39
local vCircY = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    40
local vCircMinA = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    41
local vCircMaxA = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    42
local vCircType = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    43
local vCircPulse = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    44
local vCircFuckAll = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    45
local vCircRadius = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    46
local vCircWidth = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    47
local vCircCol = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    48
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    49
--------------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    50
-- hog and team tracking variales
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    51
--------------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    52
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    53
local numhhs = 0 -- store number of hedgehogs
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    54
local hhs = {} -- store hedgehog gears
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    55
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    56
local numTeams --  store the number of teams in the game
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    57
local teamNameArr = {}	-- store the list of teams
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    58
local teamClan = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    59
local teamSize = {}	-- store how many hogs per team
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    60
local teamIndex = {} -- at what point in the hhs{} does each team begin
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    61
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    62
local teamComment = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    63
local teamScore = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    64
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    65
--------------------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    66
--zone and teleporter variables
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    67
--------------------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    68
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    69
local cPoint = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    70
local cOwnerClan = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    71
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    72
local zXMin = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    73
local zWidth = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    74
local zYMin = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    75
local zHeight = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    76
local zOccupied = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    77
local zCount = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    78
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    79
------------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    80
-- zone methods
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    81
------------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    82
-- see on gameTick also
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    83
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    84
function CreateZone(xMin, yMin, width, height)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    85
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    86
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    87
	zXMin[zCount] = xMin
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    88
	zYMin[zCount] = yMin
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    89
	zWidth[zCount] = width
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    90
	zHeight[zCount] = height
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    91
	zOccupied[zCount] = false
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    92
	zCount = zCount + 1
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    93
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    94
	return (zCount-1)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    95
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    96
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    97
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    98
function GearIsInZone(gear, zI)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    99
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   100
	if (GetX(gear) > zXMin[zI]) and (GetX(gear) < (zXMin[zI]+zWidth[zI])) and (GetY(gear) > zYMin[zI]) and (GetY(gear) < (zYMin[zI]+zHeight[zI])) then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   101
		zOccupied[zI] = true
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   102
	else
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   103
		zOccupied[zI] = false
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   104
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   105
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   106
	return zOccupied[zI]
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   107
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   108
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   109
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   110
function ZonesAreEmpty()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   111
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   112
	okay = true
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   113
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   114
	for i = 0,(zCount-1) do
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   115
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   116
		for k = 0, (numhhs-1) do
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   117
			if (hhs[k] ~= nil) then
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   118
				if (GearIsInZone(hhs[k],i)) == true then
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   119
					FindPlace(hhs[k], false, 0, LAND_WIDTH, true)
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   120
					okay = false
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   121
				end
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   122
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   123
		end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   124
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   125
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   126
	return(okay)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   127
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   128
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   129
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   130
function CheckZones()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   131
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   132
	for i = 0,(zCount-1) do
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   133
		SetVisualGearValues(vCirc[i], vCircX[i], vCircY[i], vCircMinA[i], vCircMaxA[i], vCircType[i], vCircPulse[i], vCircFuckAll[i], vCircRadius[i], vCircWidth[i], 0xffffffff)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   134
		cOwnerClan[i] = nil
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   135
		for k = 0, (numhhs-1) do
15003
980a948a5dff Control (style): Dump dead code and ancient changelog
Wuzzy <Wuzzy2@mail.ru>
parents: 13742
diff changeset
   136
			if (hhs[k] ~= nil) then
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   137
				if (GearIsInZone(hhs[k],i)) == true then
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   138
					if cOwnerClan[i] ~= nil then
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   139
						if cOwnerClan[i] ~= GetHogClan(hhs[k]) then
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   140
							--if the hog now being compared is different to one that is also here and was previously compared
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   141
							SetVisualGearValues(vCirc[i], vCircX[i], vCircY[i], vCircMinA[i], vCircMaxA[i], vCircType[i], vCircPulse[i], vCircFuckAll[i], vCircRadius[i], vCircWidth[i], 0xffffffff)
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   142
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   143
							cOwnerClan[i] = 10 -- this means conflicted
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   144
						end
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   145
					elseif cOwnerClan[i] == nil then
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   146
						cOwnerClan[i] = GetHogClan(hhs[k])
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   147
						SetVisualGearValues(vCirc[i], vCircX[i], vCircY[i], vCircMinA[i], vCircMaxA[i], vCircType[i], vCircPulse[i], vCircFuckAll[i], vCircRadius[i], vCircWidth[i], GetClanColor( GetHogClan(hhs[k])))
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   148
					end
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   149
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   150
				end
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   151
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   152
		end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   153
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   154
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   155
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   156
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   157
function AwardPoints()
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   158
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   159
	for i = 0,(zCount-1) do
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   160
		-- give score to all players controlling points
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   161
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   162
		-- only give score to the player currently in control
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   163
		if CurrentHedgehog ~= nil then
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   164
			if cOwnerClan[i] == GetHogClan(CurrentHedgehog) then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   165
				teamScore[cOwnerClan[i]] = teamScore[cOwnerClan[i]] + 1
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   166
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   167
		end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   168
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   169
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   170
	-- i want to show all the tags at once as having the SAME score not 1,2,3,4 so alas, repeating the loop seems needed
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   171
	for i = 0,(zCount-1) do
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   172
		if CurrentHedgehog ~= nil then
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   173
			if cOwnerClan[i] == GetHogClan(CurrentHedgehog) then
13687
a8b2a5e7e9db Clean up more visual gears stuff in scripts
Wuzzy <Wuzzy2@mail.ru>
parents: 13630
diff changeset
   174
				local g = AddVisualGear(vCircX[i], vCircY[i]-100, vgtHealthTag, 100, false)
a8b2a5e7e9db Clean up more visual gears stuff in scripts
Wuzzy <Wuzzy2@mail.ru>
parents: 13630
diff changeset
   175
				SetVisualGearValues(g, vCircX[i], vCircY[i]-100, 0, 0, 0, 0, 0, teamScore[cOwnerClan[i]], 1500, GetClanColor(cOwnerClan[i]))
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   176
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   177
		end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   178
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   179
13019
880662cf41ee Add team score next to team bars for CTF_Blizard, Control, CTF, Mutant, Space Invasion
Wuzzy <Wuzzy2@mail.ru>
parents: 12080
diff changeset
   180
	-- Update team labels
880662cf41ee Add team score next to team bars for CTF_Blizard, Control, CTF, Mutant, Space Invasion
Wuzzy <Wuzzy2@mail.ru>
parents: 12080
diff changeset
   181
	for i = 0,(TeamsCount-1) do
880662cf41ee Add team score next to team bars for CTF_Blizard, Control, CTF, Mutant, Space Invasion
Wuzzy <Wuzzy2@mail.ru>
parents: 12080
diff changeset
   182
		if teamNameArr[i] ~= " " then
880662cf41ee Add team score next to team bars for CTF_Blizard, Control, CTF, Mutant, Space Invasion
Wuzzy <Wuzzy2@mail.ru>
parents: 12080
diff changeset
   183
			SetTeamLabel(teamNameArr[i], teamScore[teamClan[i]])
880662cf41ee Add team score next to team bars for CTF_Blizard, Control, CTF, Mutant, Space Invasion
Wuzzy <Wuzzy2@mail.ru>
parents: 12080
diff changeset
   184
		end
880662cf41ee Add team score next to team bars for CTF_Blizard, Control, CTF, Mutant, Space Invasion
Wuzzy <Wuzzy2@mail.ru>
parents: 12080
diff changeset
   185
	end
880662cf41ee Add team score next to team bars for CTF_Blizard, Control, CTF, Mutant, Space Invasion
Wuzzy <Wuzzy2@mail.ru>
parents: 12080
diff changeset
   186
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   187
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   188
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   189
-----------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   190
-- general methods
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   191
------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   192
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   193
function RebuildTeamInfo()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   194
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   195
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   196
	-- make a list of individual team names
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   197
	for i = 0, (TeamsCount-1) do
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   198
		teamNameArr[i] = " " -- = i
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   199
		teamSize[i] = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   200
		teamIndex[i] = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   201
		teamScore[i] = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   202
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   203
	numTeams = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   204
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   205
	for i = 0, (numhhs-1) do
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   206
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   207
		z = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   208
		unfinished = true
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   209
		while(unfinished == true) do
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   210
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   211
			newTeam = true
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   212
			tempHogTeamName = GetHogTeamName(hhs[i]) -- this is the new name
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   213
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   214
			if tempHogTeamName == teamNameArr[z] then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   215
				newTeam = false
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   216
				unfinished = false
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   217
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   218
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   219
			z = z + 1
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   220
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   221
			if z == TeamsCount then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   222
				unfinished = false
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   223
				if newTeam == true then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   224
					teamNameArr[numTeams] = tempHogTeamName
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   225
					numTeams = numTeams + 1
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   226
				end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   227
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   228
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   229
		end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   230
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   231
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   232
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   233
	-- find out how many hogs per team, and the index of the first hog in hhs
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   234
	for i = 0, (numTeams-1) do
13019
880662cf41ee Add team score next to team bars for CTF_Blizard, Control, CTF, Mutant, Space Invasion
Wuzzy <Wuzzy2@mail.ru>
parents: 12080
diff changeset
   235
		SetTeamLabel(GetTeamName(i), "0")
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   236
		for z = 0, (numhhs-1) do
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   237
			if GetHogTeamName(hhs[z]) == teamNameArr[i] then
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   238
				teamClan[i] = GetHogClan(hhs[z])
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   239
				if teamSize[i] == 0 then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   240
					teamIndex[i] = z -- should give starting index
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   241
				end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   242
				teamSize[i] = teamSize[i] + 1
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   243
				--add a pointer so this hog appears at i in hhs
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   244
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   245
		end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   246
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   247
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   248
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   249
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   250
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   251
------------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   252
-- game methods
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   253
------------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   254
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   255
function onAttack()
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   256
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   257
	if CurrentHedgehog ~= nil then
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   258
		if GetCurAmmoType() == amSkip then
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   259
			z = (TurnTimeLeft / 2000) - (TurnTimeLeft / 2000)%2
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   260
			for i = 0, z do
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   261
				AwardPoints()
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   262
			end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   263
		end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   264
	end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   265
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   266
end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   267
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   268
function onGameInit()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   269
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   270
	-- Things we don't modify here will use their default values.
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   271
13102
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   272
	EnableGameFlags(gfInfAttack, gfSolidLand)
13272
5984e8c6cbeb Add new game flag gfSwitchHog, enable hog switching at turn start
Wuzzy <Wuzzy2@mail.ru>
parents: 13103
diff changeset
   273
	DisableGameFlags(gfKing, gfAISurvival)
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   274
	WaterRise = 0
12079
8f222872d432 Disable SD for a couple of scripts and mission maps
Wuzzy <almikes@aol.com>
parents: 12077
diff changeset
   275
	HealthDecrease = 0
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   276
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   277
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   278
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   279
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   280
function onGameStart()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   281
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   282
	-- build zones
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   283
	cPoint[0] = CreateZone(571,47,120,80)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   284
	cPoint[1] = CreateZone(1029,643,120,80)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   285
	cPoint[2] = CreateZone(322,1524,120,80)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   286
	cPoint[3] = CreateZone(1883,38,120,80)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   287
	cPoint[4] = CreateZone(3821,46,120,80)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   288
	cPoint[5] = CreateZone(2679,1338,120,80)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   289
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   290
	vCircX[0], vCircY[0] = 631, 82
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   291
	vCircX[1], vCircY[1] = 1088, 684
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   292
	vCircX[2], vCircY[2] = 381, 1569
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   293
	vCircX[3], vCircY[3] = 1942, 77
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   294
	vCircX[4], vCircY[4] = 3883, 89
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   295
	vCircX[5], vCircY[5] = 2739, 1378
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   296
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   297
	for i = 0, 5 do
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   298
		vCirc[i] = AddVisualGear(0,0,vgtCircle,0,true)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   299
		vCircMinA[i] = 20
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   300
		vCircMaxA[i] = 255
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   301
		vCircType[i] = 1
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   302
		vCircPulse[i] = 10
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   303
		vCircFuckAll[i] = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   304
		vCircRadius[i] = 300
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   305
		vCircWidth[i] = 5
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   306
		vCircCol[i] = 0xffffffff
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   307
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   308
		SetVisualGearValues(vCirc[i], vCircX[i], vCircY[i], vCircMinA[i], vCircMaxA[i], vCircType[i], vCircPulse[i], vCircFuckAll[i], vCircRadius[i], vCircWidth[i], vCircCol[i])
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   309
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   310
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   311
	--new improved placement schematics aw yeah
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   312
	RebuildTeamInfo()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   313
4698
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
   314
	for i = 0, (numTeams-1) do
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
   315
		pointLimit = pointLimit - 25
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
   316
	end
12080
6c734d8defef Clean up strings in Control mission maps (more translator-friendly)
Wuzzy <almikes@aol.com>
parents: 12079
diff changeset
   317
6c734d8defef Clean up strings in Control mission maps (more translator-friendly)
Wuzzy <almikes@aol.com>
parents: 12079
diff changeset
   318
	missionHelp = loc("Control pillars to score points.") .. "|" ..
6c734d8defef Clean up strings in Control mission maps (more translator-friendly)
Wuzzy <almikes@aol.com>
parents: 12079
diff changeset
   319
		string.format(loc("Score goal: %d"), pointLimit)
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   320
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   321
	-- reposition hogs if they are on control points until they are not or sanity limit kicks in
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   322
	reN = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   323
	while (reN < 10) do
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   324
		if ZonesAreEmpty() == false then
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   325
			reN = reN + 1
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   326
		else
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   327
			reN = 15
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   328
		end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   329
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   330
13102
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   331
	for h=1, numhhs do
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   332
		-- Tardis screws up the game too much, teams might not get killed correctly after victory
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   333
		-- if a hog is still in time-travel.
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   334
		-- This could be fixed, removing the Tardis is just a simple and lazy fix.
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   335
		AddAmmo(hhs[h], amTardis, 0)
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   336
		-- Resurrector is pointless, all hogs are already automatically resurrected.
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   337
		AddAmmo(hhs[h], amResurrector, 0)
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   338
	end
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   339
12080
6c734d8defef Clean up strings in Control mission maps (more translator-friendly)
Wuzzy <almikes@aol.com>
parents: 12079
diff changeset
   340
	ShowMission(missionName, missionCaption, missionHelp, 0, 0)
4698
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
   341
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   342
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   343
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   344
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   345
function onNewTurn()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   346
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   347
	-- reset the time counter so that it will get set to TurnTimeLeft in onGameTick
4953
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   348
	TimeCounter = 0
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   349
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   350
	if lastTeam ~= GetHogTeamName(CurrentHedgehog) then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   351
		lastTeam = GetHogTeamName(CurrentHedgehog)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   352
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   353
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   354
	if gameWon == false then
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   355
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   356
		for i = 0, (numTeams-1) do
4698
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
   357
			if teamScore[i] >= pointLimit then --150
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   358
				gameWon = true
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   359
				winnerClan = i
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   360
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   361
		end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   362
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   363
		if gameWon == true then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   364
			for i = 0, (numhhs-1) do
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   365
				if hhs[i] ~= nil then
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   366
					if GetHogClan(hhs[i]) ~= winnerClan then
7838
5c2337f8dbb2 Issue #443 - change in syntax for effects
nemo
parents: 5842
diff changeset
   367
						SetEffect(hhs[i], heResurrectable, 0)
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   368
						SetHealth(hhs[i],0)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   369
					end
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   370
				end
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   371
			end
13742
2bb7141496a9 Use SetTurnTimeLeft and SetReadyTimeLeft in all scripts
Wuzzy <Wuzzy2@mail.ru>
parents: 13687
diff changeset
   372
			SetTurnTimeLeft(1)
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   373
		end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   374
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   375
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   376
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   377
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   378
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   379
function onGameTick()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   380
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   381
	vCircCount = vCircCount + 1
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   382
	if (vCircCount >= 500) and (gameWon == false) then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   383
		vCircCount = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   384
		CheckZones()
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   385
	end
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   386
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   387
	-- set TimeCounter to starting time if it is uninitialised (from onNewTurn)
4953
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   388
	if (TimeCounter == 0) and (TurnTimeLeft > 0) then
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   389
		TimeCounter = TurnTimeLeft
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   390
	end
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   391
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   392
	-- has it ACTUALLY been 2 seconds since we last did this?
4953
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   393
	if (TimeCounter - TurnTimeLeft) >= 2000 then
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   394
		TimeCounter = TurnTimeLeft
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   395
4953
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   396
		if (gameWon == false) then
15004
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   397
			AwardPoints()
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   398
		end
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   399
	end
89f6a1154f67 Control (style): Clean up whitespace and indentations
Wuzzy <Wuzzy2@mail.ru>
parents: 15003
diff changeset
   400
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   401
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   402
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   403
function InABetterPlaceNow(gear)
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   404
	for i = 0, (numhhs-1) do
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   405
		if gear == hhs[i] then
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   406
			hhs[i] = nil
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   407
		end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   408
	end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   409
end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   410
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   411
function onHogHide(gear)
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   412
	 InABetterPlaceNow(gear)
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   413
end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   414
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   415
function onHogRestore(gear)
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   416
	match = false
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   417
	for i = 0, (numhhs-1) do
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   418
		if (hhs[i] == nil) and (match == false) then
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   419
			hhs[i] = gear
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   420
			match = true
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   421
		end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   422
	end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   423
end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   424
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   425
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   426
function onGearAdd(gear)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   427
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   428
	if GetGearType(gear) == gtHedgehog then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   429
		hhs[numhhs] = gear
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   430
		numhhs = numhhs + 1
7838
5c2337f8dbb2 Issue #443 - change in syntax for effects
nemo
parents: 5842
diff changeset
   431
		SetEffect(gear, heResurrectable, 1)
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   432
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   433
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   434
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   435
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   436
function onGearDelete(gear)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   437
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   438
	if GetGearType(gear) == gtHedgehog then
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   439
		InABetterPlaceNow(gear)
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   440
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   441
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   442
end