share/hedgewars/Data/Maps/Control/map.lua
author Wuzzy <Wuzzy2@mail.ru>
Fri, 23 Mar 2018 03:17:01 +0100
changeset 13272 5984e8c6cbeb
parent 13103 cf2a58dccc4a
child 13630 fe7d2bbf5f3f
permissions -rw-r--r--
Add new game flag gfSwitchHog, enable hog switching at turn start
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
     1
--------------------------------
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
     2
-- CONTROL 0.6
4953
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
     3
--------------------------------
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
     4
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
     5
---------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
     6
-- 0.2
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
     7
---------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
     8
-- fixed score display errrors
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
     9
-- added missing resurrection effects
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    10
-- moved hogs off control points if thats where they started
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    11
-- added sanity limit for the above
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    12
-- added tint tags to display clan score on each point as it scors
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    13
-- added gameflags filter
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    14
-- changed scoring rate
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    15
-- hogs now only score point DURING THEIR TURN
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    16
-- map now accepts custom weaponsets and themes 
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    17
-- changed win limit
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    18
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
-- 0.3
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    21
---------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    22
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    23
-- added translation support
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    24
4698
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
    25
--------
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
    26
-- 0.4
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
    27
--------
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
    28
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
    29
-- added scaling scoring based on clans: 300 points to win - 25 per team in game
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
    30
4953
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
    31
--------
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
    32
-- 0.5
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
    33
--------
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
    34
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
    35
-- removed user branding
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
    36
-- fixed infinite attack time exploit
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
    37
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
    38
--------
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
    39
-- 0.6
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
    40
--------
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
    41
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
    42
-- timebox fix
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
    43
-- support for more players
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
    44
-- remove version numbers
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
    45
-- enable limited sudden death
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
    46
-- using skip go generates as many points as you would have gotten had you sat and waited
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
    47
4662
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
--script begins
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    50
-----------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    51
9093
4114ce5d885d fix locale load
nemo
parents: 8349
diff changeset
    52
HedgewarsScriptLoad("/Scripts/Locale.lua")
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    53
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    54
---------------------------------------------------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    55
----------lots of bad variables and things
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    56
----------because someone is too lazy
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    57
----------to read about tables properly
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    58
------------------ "Oh well, they probably have the memory"
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    59
4953
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
    60
local TimeCounter = 0
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
    61
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    62
local gameWon = false
4698
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
    63
local pointLimit = 300
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    64
12080
6c734d8defef Clean up strings in Control mission maps (more translator-friendly)
Wuzzy <almikes@aol.com>
parents: 12079
diff changeset
    65
local missionName = loc("Control")
6c734d8defef Clean up strings in Control mission maps (more translator-friendly)
Wuzzy <almikes@aol.com>
parents: 12079
diff changeset
    66
local missionCaption = loc("Domination game")
6c734d8defef Clean up strings in Control mission maps (more translator-friendly)
Wuzzy <almikes@aol.com>
parents: 12079
diff changeset
    67
local missionHelp
6c734d8defef Clean up strings in Control mission maps (more translator-friendly)
Wuzzy <almikes@aol.com>
parents: 12079
diff changeset
    68
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    69
local vCirc = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    70
local vCircCount = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    71
4953
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
    72
--local hGCount = 0
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    73
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    74
local vCircX = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    75
local vCircY = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    76
local vCircMinA = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    77
local vCircMaxA = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    78
local vCircType = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    79
local vCircPulse = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    80
local vCircFuckAll = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    81
local vCircRadius = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    82
local vCircWidth = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    83
local vCircCol = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    84
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
-- hog and team tracking variales
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    87
--------------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    88
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    89
local numhhs = 0 -- store number of hedgehogs
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    90
local hhs = {} -- store hedgehog gears
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    91
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    92
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
    93
local teamNameArr = {}	-- store the list of teams
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    94
local teamClan = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    95
local teamSize = {}	-- store how many hogs per team
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    96
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
    97
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    98
local teamComment = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
    99
local teamScore = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   100
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   101
--------------------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   102
--zone and teleporter variables
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   103
--------------------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   104
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   105
local cPoint = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   106
local cOwnerClan = {}
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
local zXMin = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   109
local zWidth = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   110
local zYMin = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   111
local zHeight = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   112
local zOccupied = {}
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   113
local zCount = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   114
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   115
------------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   116
-- zone methods
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   117
------------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   118
-- see on gameTick also
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   119
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   120
function CreateZone(xMin, yMin, width, height)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   121
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   122
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   123
	zXMin[zCount] = xMin
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   124
	zYMin[zCount] = yMin
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   125
	zWidth[zCount] = width
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   126
	zHeight[zCount] = height
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   127
	zOccupied[zCount] = false
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   128
	zCount = zCount + 1
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
	return (zCount-1)
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
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   133
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   134
function GearIsInZone(gear, zI)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   135
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   136
	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
   137
		zOccupied[zI] = true
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   138
	else
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   139
		zOccupied[zI] = false
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   140
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   141
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   142
	return zOccupied[zI]
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   143
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   144
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   145
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   146
function ZonesAreEmpty()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   147
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   148
	okay = true
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   149
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   150
	for i = 0,(zCount-1) do
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   151
				
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   152
		for k = 0, (numhhs-1) do
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   153
			if (hhs[k] ~= nil) then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   154
			if (GearIsInZone(hhs[k],i)) == true then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   155
				FindPlace(hhs[k], false, 0, LAND_WIDTH, true)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   156
				okay = false
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   157
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   158
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   159
		end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   160
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   161
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   162
	return(okay)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   163
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   164
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   165
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   166
function CheckZones()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   167
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   168
	for i = 0,(zCount-1) do
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   169
		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
   170
		cOwnerClan[i] = nil
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   171
		for k = 0, (numhhs-1) do
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   172
			if (hhs[k] ~= nil) then --and (GetGearType(hhs[k]) ~= nil) then
5806
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   173
                if (GearIsInZone(hhs[k],i)) == true then
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   174
5806
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   175
                    if cOwnerClan[i] ~= nil then
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   176
                        if cOwnerClan[i] ~= GetHogClan(hhs[k]) then 
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   177
                            --if the hog now being compared is different to one that is also here and was previously compared
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   178
                            
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   179
                            SetVisualGearValues(vCirc[i], vCircX[i], vCircY[i], vCircMinA[i], vCircMaxA[i], vCircType[i], vCircPulse[i], vCircFuckAll[i], vCircRadius[i], vCircWidth[i], 0xffffffff)						
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   180
                            --SetVisualGearValues(vCirc[i], 2739, 1378, 20, 255, 1, 10, 0, 300, 5, 0xffffffff)
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   181
        
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   182
                            cOwnerClan[i] = 10 -- this means conflicted
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   183
                        end
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   184
                    elseif cOwnerClan[i] == nil then
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   185
                        cOwnerClan[i] = GetHogClan(hhs[k])
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   186
                        --SetVisualGearValues(vCirc[i], 2739, 1378, 20, 255, 1, 10, 0, 300, 5, GetClanColor( GetHogClan(hhs[k])) )
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   187
                        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])))
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   188
        
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   189
                    end
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   190
5806
6778f0a7d896 remove debug message, clear a couple of global gear references if appropriate, fix control script
nemo
parents: 5325
diff changeset
   191
                end
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   192
           -- else hhs[k] = nil
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   193
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   194
		end
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
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   197
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   198
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   199
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   200
function AwardPoints()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   201
		
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   202
	for i = 0,(zCount-1) do
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   203
		-- give score to all players controlling points		
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   204
		--if (cOwnerClan[i] ~= nil) and (cOwnerClan[i] ~= 10) then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   205
		--	teamScore[cOwnerClan[i]] = teamScore[cOwnerClan[i]] + 1
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   206
		--end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   207
		
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   208
		-- only give score to the player currently in control		
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   209
		if CurrentHedgehog ~= nil then		
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   210
			if cOwnerClan[i] == GetHogClan(CurrentHedgehog) then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   211
				teamScore[cOwnerClan[i]] = teamScore[cOwnerClan[i]] + 1
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   212
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   213
		end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   214
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   215
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   216
	-- 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	
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   217
	for i = 0,(zCount-1) do			
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   218
		if CurrentHedgehog ~= nil then		
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   219
			if cOwnerClan[i] == GetHogClan(CurrentHedgehog) then
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   220
				g = AddVisualGear(vCircX[i], vCircY[i]-100, vgtHealthTag, 100, False)
4767
4ee4a49549e2 return nil values if an invalid visual gear is passed to the get, add a check in Control map lua
nemo
parents: 4698
diff changeset
   221
                if g ~= 0 then
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   222
				    SetVisualGearValues(g, vCircX[i], vCircY[i]-100, 0, 0, 0, 0, 0, teamScore[cOwnerClan[i]], 1500, GetClanColor(cOwnerClan[i]))
4767
4ee4a49549e2 return nil values if an invalid visual gear is passed to the get, add a check in Control map lua
nemo
parents: 4698
diff changeset
   223
                end
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   224
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   225
		end
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
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
   228
	-- 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
   229
	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
   230
		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
   231
			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
   232
		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
   233
	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
   234
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   235
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   236
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   237
-----------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   238
-- general methods
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   239
------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   240
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   241
function RebuildTeamInfo()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   242
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   243
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   244
	-- make a list of individual team names
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   245
	for i = 0, (TeamsCount-1) do
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   246
		teamNameArr[i] = " " -- = i
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   247
		teamSize[i] = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   248
		teamIndex[i] = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   249
		teamScore[i] = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   250
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   251
	numTeams = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   252
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   253
	for i = 0, (numhhs-1) do
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   254
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   255
		z = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   256
		unfinished = true
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   257
		while(unfinished == true) do
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   258
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   259
			newTeam = true
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   260
			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
   261
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   262
			if tempHogTeamName == teamNameArr[z] then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   263
				newTeam = false
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   264
				unfinished = false
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   265
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   266
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   267
			z = z + 1
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   268
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   269
			if z == TeamsCount then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   270
				unfinished = false
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   271
				if newTeam == true then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   272
					teamNameArr[numTeams] = tempHogTeamName
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   273
					numTeams = numTeams + 1
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   274
				end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   275
			end
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
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   280
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   281
	-- 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
   282
	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
   283
		SetTeamLabel(GetTeamName(i), "0")
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   284
		for z = 0, (numhhs-1) do
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   285
			if GetHogTeamName(hhs[z]) == teamNameArr[i] then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   286
				teamClan[i] = GetHogClan(hhs[z])				
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   287
				if teamSize[i] == 0 then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   288
					teamIndex[i] = z -- should give starting index
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   289
				end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   290
				teamSize[i] = teamSize[i] + 1
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   291
				--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
   292
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   293
		end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   294
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   295
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   296
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   297
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   298
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   299
------------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   300
-- game methods
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   301
------------------------
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   302
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   303
function onAttack()
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   304
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   305
	if CurrentHedgehog ~= nil then
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   306
		if GetCurAmmoType() == amSkip then
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   307
			z = (TurnTimeLeft / 2000) - (TurnTimeLeft / 2000)%2 
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   308
			--AddCaption("scored: " .. z,GetClanColor(GetHogClan(CurrentHedgehog)),capgrpMessage2)
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   309
			for i = 0, z do
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   310
				AwardPoints()
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   311
			end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   312
		end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   313
	end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   314
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   315
end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   316
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   317
function onGameInit()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   318
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   319
	-- Things we don't modify here will use their default values.
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   320
	
13102
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   321
	EnableGameFlags(gfInfAttack, gfSolidLand)
13272
5984e8c6cbeb Add new game flag gfSwitchHog, enable hog switching at turn start
Wuzzy <Wuzzy2@mail.ru>
parents: 13103
diff changeset
   322
	DisableGameFlags(gfKing, gfAISurvival)
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   323
	WaterRise = 0
12079
8f222872d432 Disable SD for a couple of scripts and mission maps
Wuzzy <almikes@aol.com>
parents: 12077
diff changeset
   324
	HealthDecrease = 0
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   325
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   326
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   327
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   328
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   329
function onGameStart()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   330
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   331
	-- build zones
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   332
	cPoint[0] = CreateZone(571,47,120,80)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   333
	cPoint[1] = CreateZone(1029,643,120,80)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   334
	cPoint[2] = CreateZone(322,1524,120,80)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   335
	cPoint[3] = CreateZone(1883,38,120,80)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   336
	cPoint[4] = CreateZone(3821,46,120,80)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   337
	cPoint[5] = CreateZone(2679,1338,120,80)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   338
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   339
	vCircX[0], vCircY[0] = 631, 82
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   340
	vCircX[1], vCircY[1] = 1088, 684
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   341
	vCircX[2], vCircY[2] = 381, 1569
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   342
	vCircX[3], vCircY[3] = 1942, 77
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   343
	vCircX[4], vCircY[4] = 3883, 89
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   344
	vCircX[5], vCircY[5] = 2739, 1378
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   345
	
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   346
	for i = 0, 5 do	
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   347
		vCirc[i] = AddVisualGear(0,0,vgtCircle,0,true)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   348
		vCircMinA[i] = 20
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   349
		vCircMaxA[i] = 255
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   350
		vCircType[i] = 1
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   351
		vCircPulse[i] = 10
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   352
		vCircFuckAll[i] = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   353
		vCircRadius[i] = 300
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   354
		vCircWidth[i] = 5
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   355
		vCircCol[i] = 0xffffffff
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   356
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   357
		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
   358
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   359
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   360
	--zxc = AddVisualGear(fSpawnX[i],fSpawnY[i],vgtCircle,0,true)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   361
	--SetVisualGearValues(zxc, 1000,1000, 20, 255, 1,    10,                     0,         100,        1,      GetClanColor(0))
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   362
					--minO,max0 -glowyornot	--pulsate timer	 -- fuckall      -- radius -- width  -- colour
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   363
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   364
	--new improved placement schematics aw yeah
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   365
	RebuildTeamInfo()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   366
4698
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
   367
	for i = 0, (numTeams-1) do
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
   368
		pointLimit = pointLimit - 25
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
   369
	end
12080
6c734d8defef Clean up strings in Control mission maps (more translator-friendly)
Wuzzy <almikes@aol.com>
parents: 12079
diff changeset
   370
6c734d8defef Clean up strings in Control mission maps (more translator-friendly)
Wuzzy <almikes@aol.com>
parents: 12079
diff changeset
   371
	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
   372
		string.format(loc("Score goal: %d"), pointLimit)
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   373
	
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   374
	-- 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
   375
	reN = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   376
	--zz = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   377
	while (reN < 10) do
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   378
		if ZonesAreEmpty() == false then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   379
			reN = reN + 1	
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   380
			--zz = zz + 1	
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   381
			--SetGearPosition(hhs[0], 631, 82) -- put this in here to thwart attempts at repositioning and test sanity limit	
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   382
		else
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   383
			reN = 15		
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   384
		end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   385
		--AddCaption(zz) -- number of times it took to work
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   386
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   387
13102
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   388
	for h=1, numhhs do
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   389
		-- 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
   390
		-- if a hog is still in time-travel.
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   391
		-- 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
   392
		AddAmmo(hhs[h], amTardis, 0)
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   393
		-- Resurrector is pointless, all hogs are already automatically resurrected.
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   394
		AddAmmo(hhs[h], amResurrector, 0)
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   395
	end
a4872ca7f17c Control: Remove tardis and resurrector
Wuzzy <Wuzzy2@mail.ru>
parents: 13019
diff changeset
   396
12080
6c734d8defef Clean up strings in Control mission maps (more translator-friendly)
Wuzzy <almikes@aol.com>
parents: 12079
diff changeset
   397
	ShowMission(missionName, missionCaption, missionHelp, 0, 0)
4698
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
   398
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   399
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   400
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   401
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   402
function onNewTurn()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   403
4953
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   404
	-- reset the time counter so that it will get set to TurnTimeLeft in onGameTick	
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   405
	TimeCounter = 0
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   406
		
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   407
	if lastTeam ~= GetHogTeamName(CurrentHedgehog) then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   408
		lastTeam = GetHogTeamName(CurrentHedgehog)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   409
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   410
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   411
	if gameWon == false then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   412
	
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   413
		for i = 0, (numTeams-1) do
4698
6f14ef3e40ae Updated maps CTF, Control and new unscripted map Blizzard
mikade
parents: 4662
diff changeset
   414
			if teamScore[i] >= pointLimit then --150
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   415
				gameWon = true
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   416
				winnerClan = i			
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   417
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   418
		end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   419
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   420
		if gameWon == true then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   421
			for i = 0, (numhhs-1) do
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   422
				if hhs[i] ~= nil then				
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   423
					if GetHogClan(hhs[i]) ~= winnerClan then
7838
5c2337f8dbb2 Issue #443 - change in syntax for effects
nemo
parents: 5842
diff changeset
   424
						SetEffect(hhs[i], heResurrectable, 0)
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   425
						SetHealth(hhs[i],0)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   426
					end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   427
				end			
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   428
			end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   429
			TurnTimeLeft = 1
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   430
		end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   431
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 onGameTick()
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
	vCircCount = vCircCount + 1
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   439
	if (vCircCount >= 500) and (gameWon == false) then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   440
		vCircCount = 0
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   441
		CheckZones()
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   442
	end	
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   443
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   444
	-- things we wanna check often
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   445
	if (CurrentHedgehog ~= nil) then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   446
	--	AddCaption(GetX(CurrentHedgehog) .. "; " .. GetY(CurrentHedgehog))
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   447
		--AddCaption(teamNameArr[0] .. " : " .. teamScore[0])
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   448
		--AddCaption(GetHogTeamName(CurrentHedgehog) .. " : " .. teamScore[GetHogClan(CurrentHedgehog)]) -- this end up 1?
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   449
		
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   450
		-- huh? the first clan added seems to be clan 1, not 0 ??
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   451
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   452
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   453
4953
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   454
	-- set TimeCounter to starting time if it is uninitialised (from onNewTurn)	
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   455
	if (TimeCounter == 0) and (TurnTimeLeft > 0) then
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   456
		TimeCounter = TurnTimeLeft	
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   457
	end	
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   458
	
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   459
	-- has it ACTUALLY been 2 seconds since we last did this?	
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   460
	if (TimeCounter - TurnTimeLeft) >= 2000 then
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   461
		TimeCounter = TurnTimeLeft
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   462
		
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   463
		if (gameWon == false) then
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   464
			AwardPoints()		
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   465
		end	
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   466
	end	
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   467
	
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   468
	--AddCaption(TimeCounter)	
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   469
	--hGCount = hGCount + 1
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   470
	--if (hGCount >= 2000) and (gameWon == false) then
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   471
	--	hGCount = 0
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   472
	--	AwardPoints()
ebd3dae634ca Fixed scoring exploit on Control and removed user branding from the map
mikade
parents: 4767
diff changeset
   473
	--end
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   474
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   475
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   476
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   477
function onGearResurrect(gear)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   478
	AddVisualGear(GetX(gear), GetY(gear), vgtBigExplosion, 0, false)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   479
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   480
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   481
function InABetterPlaceNow(gear)
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   482
	for i = 0, (numhhs-1) do
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   483
		if gear == hhs[i] then
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   484
			hhs[i] = nil
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   485
		end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   486
	end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   487
end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   488
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   489
function onHogHide(gear)
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   490
	 InABetterPlaceNow(gear)
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   491
end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   492
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   493
function onHogRestore(gear)
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   494
	match = false
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   495
	for i = 0, (numhhs-1) do
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   496
		if (hhs[i] == nil) and (match == false) then
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   497
			hhs[i] = gear
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   498
			--AddCaption(GetHogName(gear) .. " has reappeared it seems!")
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   499
			--FollowGear(gear)
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   500
			match = true
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   501
		end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   502
	end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   503
end
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   504
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   505
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   506
function onGearAdd(gear)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   507
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   508
	if GetGearType(gear) == gtHedgehog then
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   509
		hhs[numhhs] = gear
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   510
		numhhs = numhhs + 1
7838
5c2337f8dbb2 Issue #443 - change in syntax for effects
nemo
parents: 5842
diff changeset
   511
		SetEffect(gear, heResurrectable, 1)
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   512
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   513
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   514
end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   515
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   516
function onGearDelete(gear)
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   517
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   518
	if GetGearType(gear) == gtHedgehog then
5842
30e374a27269 fix timebox (differently), support for more players, remove version numbers,
mikade
parents: 5806
diff changeset
   519
		InABetterPlaceNow(gear)
4662
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   520
	end
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   521
63aafc9c2a81 Add a bunch of lua from mikade, update translation files
mikade+nemo
parents:
diff changeset
   522
end