author | Vatten |
Thu, 03 May 2018 11:58:07 +0200 | |
changeset 13364 | 7d772358dc22 |
parent 12945 | 39b7b3ed619e |
child 13365 | e27540ad33bd |
permissions | -rw-r--r-- |
7893 | 1 |
--[[ |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
2 |
Copyright (C) 2012 Vatten |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
3 |
|
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
4 |
Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the following conditions: |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
5 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
6 |
The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software. |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
7 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
8 |
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. |
7893 | 9 |
]] |
13364 | 10 |
-- fix selection increase delay (weapons to compesate) |
7893 | 11 |
|
8043 | 12 |
HedgewarsScriptLoad("/Scripts/Locale.lua") |
13 |
HedgewarsScriptLoad("/Scripts/Utils.lua") |
|
14 |
HedgewarsScriptLoad("/Scripts/Tracker.lua") |
|
7893 | 15 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
16 |
--approximative version of square root. This function follows the babylonian method. |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
17 |
function IntegerSqrt(num) |
8618 | 18 |
local temp=num |
7893 | 19 |
while(temp*temp-div(temp,2)>num) |
20 |
do |
|
21 |
temp=div((temp+div(num,temp)),2) |
|
22 |
end |
|
10965 | 23 |
|
7893 | 24 |
return math.abs(temp) |
25 |
end |
|
26 |
||
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
27 |
-- sqrt(x^2,y^2), work without desyncs. is approximative |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
28 |
function Norm(xx,yy) |
8618 | 29 |
--to fix overflows |
30 |
if(((math.abs(xx)^2)+(math.abs(yy)^2))>2^26) |
|
31 |
then |
|
32 |
local bitr=2^13 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
33 |
return IntegerSqrt((div(math.abs(xx),bitr)^2)+(div(math.abs(yy),bitr)^2))*bitr |
8618 | 34 |
else |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
35 |
return IntegerSqrt((math.abs(xx)^2)+(math.abs(yy)^2)) |
8618 | 36 |
end |
7893 | 37 |
end |
38 |
||
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
39 |
-- returns 1 or -1 depending on where it is |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
40 |
function GetIfNegative(num) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
41 |
if(num<0) |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
42 |
then |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
43 |
return -1 |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
44 |
else |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
45 |
return 1 |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
46 |
end |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
47 |
end |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
48 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
49 |
--Will end the turn + give escape time |
13364 | 50 |
function EndTurn(seconds) |
9805 | 51 |
SetState(CurrentHedgehog,bor(GetState(CurrentHedgehog),gstAttacked)) |
13364 | 52 |
--set espace time |
53 |
TurnTimeLeft = GetAwayTime*10*seconds |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
54 |
end |
10965 | 55 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
56 |
--show health tag (will mostly be used when a hog is damaged) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
57 |
function ShowDamageTag(hog,damage) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
58 |
healthtag=AddVisualGear(GetX(hog), GetY(hog), vgtHealthTag, damage, false) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
59 |
v1, v2, v3, v4, v5, v6, v7, v8, v9, v10 = GetVisualGearValues(healthtag) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
60 |
SetVisualGearValues(healthtag, v1, v2, v3, v4, v5, v6, v7, v8, v9, GetClanColor(GetHogClan(hog))) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
61 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
62 |
|
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
63 |
--will use IntegerSqrt |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
64 |
function FireGear(hedgehog,geartype,vx,vy,timer) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
65 |
local hypo=Norm(vx,vy) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
66 |
return AddGear(div((GetGearRadius(hedgehog)*2*vx),hypo)+GetX(hedgehog), div((GetGearRadius(hedgehog)*2*vy),hypo)+GetY(hedgehog), geartype, 0, vx, vy, timer) |
10527 | 67 |
end |
9805 | 68 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
69 |
--====MISC GLOBALS==== |
10965 | 70 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
71 |
--for selecting continent |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
72 |
local GLOBAL_INIT_TEAMS = {} |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
73 |
local GLOBAL_SELECT_CONTINENT_CHECK=false |
13364 | 74 |
local GLOBAL_START_TIME=0 |
75 |
local GLOBAL_HOG_HEALTH=100 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
76 |
local GLOBAL_TEAM_CONTINENT = {} |
7893 | 77 |
|
8618 | 78 |
--variables for seeing if you have swaped around on a weapon |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
79 |
local GLOBAL_AUSTRALIAN_SPECIAL=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
80 |
local GLOBAL_AFRICAN_SPECIAL_SEDUCTION=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
81 |
local GLOBAL_AFRICAN_SPECIAL_STICKY=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
82 |
local GLOBAL_SOUTH_AMERICAN_SPECIAL=false |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
83 |
local GLOBAL_NORTH_AMERICAN_SPECIAL_SNIPER=1 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
84 |
local GLOBAL_NORTH_AMERICAN_SPECIAL_SNIPER_IS_ON=false |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
85 |
local GLOBAL_KERGUELEN_SPECIAL=1 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
86 |
local GLOBAL_NORTH_AMERICAN_SPECIAL_SHOTGUN=false |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
87 |
local GLOBAL_EUROPE_SPECIAL=0 |
13364 | 88 |
local GLOBAL_ANTARCTICA_SPECIAL=0 |
89 |
local GLOBAL_SEDUCTION_INCREASER=0 |
|
7893 | 90 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
91 |
--detection if something is activated |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
92 |
local GLOBAL_SWITCH_HOG_IS_ON=false |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
93 |
local GLOBAL_VAMPIRIC_IS_ON=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
94 |
local GLOBAL_EXTRA_DAMAGE_IS_ON=100 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
95 |
local GLOBAL_PARACHUTE_IS_ON=false |
7893 | 96 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
97 |
--the visual circle for kerguelen |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
98 |
local GLOBAL_VISUAL_CIRCLE=nil |
8618 | 99 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
100 |
--the global temp value |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
101 |
local GLOBAL_TEMP_VALUE=0 |
7893 | 102 |
|
8618 | 103 |
--for sabotage |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
104 |
local GLOBAL_SABOTAGE_COUNTER=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
105 |
local GLOBAL_SABOTAGE_HOGS={} |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
106 |
local GLOBAL_SABOTAGE_FREQUENCY=0 |
13364 | 107 |
|
108 |
local GLOBAL_CRATE_TEST=-1 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
109 |
|
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
110 |
--for sundaland |
13364 | 111 |
local GLOBAL_SUNDALAND_END_HOG_CONTINENT_NAME |
112 |
||
113 |
local OPTION_NO_SPECIALS=false |
|
7893 | 114 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
115 |
--====GENERAL GLOBALS (useful for handling continents)==== |
7893 | 116 |
|
13364 | 117 |
local GLOBAL_SNIPER_SPECIAL_INFO = loc("Green lipstick bullet: [Poisonous, deals no damage]") |
118 |
local GLOBAL_BASEBALLBAT_BOOMERANG_INFO = loc("Bouncy boomerang: [Launch your bouncy boomerang ~ Turns into a present on explosion]") |
|
119 |
local GLOBAL_CHEESE_SPECIAL_INFO = loc("Anno 1032: [The explosion will make a strong push ~ No poison]") |
|
120 |
local GLOBAL_SEDUCTION_SPECIAL_INFO = loc("Dust storm: [Deals 15 + %s damage to all enemies in the circle]") |
|
121 |
local GLOBAL_INVULNERABLE_SPECIAL_INFO = loc("Temporarily increase the damage of duststorm with +7%s, Removes 1 Invurnurable%s") |
|
122 |
local GLOBAL_BASEBALLBAT_CRICKET_INFO = loc("Cricket time: [Fire away a 1 sec mine! ~ Cannot be fired close to another hog]") |
|
123 |
local GLOBAL_PARACHUTE_SPECIAL_INFO = loc("Drop a bomb: [Drop some heroic wind that will turn into a bomb on impact ~ wont end turn]") |
|
124 |
local GLOBAL_HAMMER_ROAR_INFO = loc("Penguin roar: [Deal 15 damage + 10% of your hog’s health to all hogs around you and get 2/3 back]") |
|
125 |
local GLOBAL_HAMMER_SWAP_INFO = loc("Disguise as a Rockhopper Penguin: [Swap place with a random enemy hog in the circle]") |
|
126 |
local GLOBAL_HAMMER_LONELY_INFO = loc("Lonely Cries: [Rise the water if no hog is in the circle and deal 6 damage to all enemy hogs.]") |
|
127 |
local GLOBAL_STICKY_PROJECTILE_INFO = loc("Hedgehog projectile: [Fire your hog like a Sticky Bomb]") |
|
128 |
local GLOBAL_STICKY_NAPALM_INFO = loc("Napalm rocket: [Fire a bomb with napalm!]") |
|
129 |
local GLOBAL_SHOTGUN_SPECIAL_INFO = loc("Eagle Eye: [Blink to the impact ~ One shot]") |
|
130 |
local GLOBAL_MOLOTOV_SPECIAL_INFO = loc("Medicine: [Fire some exploding medicine that will heal 15 hp to all hogs effected by the explosion]") |
|
131 |
local GLOBAL_HAMMER_SABOTAGE_INFO = loc("Flare: [Sabotage all hogs in the circle (dmg over time and high gravity) and fire one cluster above you]") |
|
132 |
local GLOBAL_PICKHAMMER_SPECIAL_INFO = loc("World wrap: [Will teleport you to the top of the map, expect fall damage]") |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
133 |
|
13364 | 134 |
local GLOBAL_ALL_SPECIALS_INFO = loc("Weapons with specials: ")..loc("Shotgun")..", "..loc("Sniper Rifle")..", "..loc("GasBomb")..", "..loc("Molotov")..", "..loc("Parachute")..", "..loc("Seduction")..", "..loc("Sticky Mine").." (2),"..loc("Baseballbat (2)")..", "..loc("Hammer (4)") |
135 |
||
136 |
local GLOBAL_SELECT_WEP_INFORMATION=loc("Select your continent with: the \"Up\" or \"Down\" keys, or by selecting a representative weapon.") |
|
137 |
local GLOBAL_GENERAL_INFORMATION="- "..loc("Per team weapons").."|- "..loc("10 weapon schemes").."|- "..loc("Unique new weapons").."| |"..GLOBAL_SELECT_WEP_INFORMATION.."|"..loc("Note: Some weapons have a second option (See continent information). Find and use them with the \"")..loc("switch").."\" "..loc("key").." (↹).|"..GLOBAL_ALL_SPECIALS_INFO.."|"..loc("Tip: See the \"esc\" key (this menu) if you want to see the currently playing teams continent, or that continents specials." .. "|") |
|
7893 | 138 |
|
10965 | 139 |
local GLOBAL_CONTINENT_INFORMATION = |
7893 | 140 |
{ |
13364 | 141 |
{loc("North America"),"["..loc("Difficulty: ")..loc("EASY").."] ",loc("- You can switch between hogs at the start of your turns. (Not first one)").."|"..loc("Special Weapons:").."|"..loc("Shotgun")..": "..GLOBAL_SHOTGUN_SPECIAL_INFO.."|"..loc("Sniper Rifle")..": "..GLOBAL_SNIPER_SPECIAL_INFO,{amSniperRifle,1}, |
142 |
{{amShotgun,100},{amDEagle,100},{amLaserSight,2},{amSniperRifle,100},{amCake,1},{amAirAttack,2},{amSwitch,2}}, |
|
143 |
}, |
|
144 |
--{sndShotgunFire,sndCover},100}, |
|
7893 | 145 |
|
13364 | 146 |
{loc("South America"),"["..loc("Difficulty: ")..loc("MEDIUM").."] ",loc("Special Weapons:").."|"..loc("GasBomb")..": "..GLOBAL_CHEESE_SPECIAL_INFO,{amGasBomb,2}, |
147 |
{{amBirdy,100},{amHellishBomb,1},{amBee,100},{amGasBomb,100},{amFlamethrower,100},{amNapalm,2},{amExtraDamage,3}}, |
|
148 |
{sndEggBreak,sndLaugh},125}, |
|
7893 | 149 |
|
13364 | 150 |
{loc("Europe"),"["..loc("Difficulty: ")..loc("EASY").."] ",loc("Special Weapons:").."|"..loc("Molotov")..": "..GLOBAL_MOLOTOV_SPECIAL_INFO,{amBazooka,3}, |
151 |
{{amBazooka,100},{amGrenade,100},{amMortar,100},{amMolotov,100},{amVampiric,4},{amPiano,1},{amResurrector,2},{amJetpack,4}}, |
|
152 |
{sndExplosion,sndEnemyDown},100}, |
|
9805 | 153 |
|
13364 | 154 |
{loc("Africa"),"["..loc("Difficulty: ")..loc("MEDIUM").."] ",loc("Special Weapons:").."|"..loc("Seduction")..": "..string.format(GLOBAL_SEDUCTION_SPECIAL_INFO,loc("(*see below)")).."|- "..string.format(GLOBAL_INVULNERABLE_SPECIAL_INFO,"","").."|- "..loc("You can modify the damage/invulnerables with the up/down keys on dust storm.").."|"..loc("Sticky Mine")..": "..GLOBAL_STICKY_PROJECTILE_INFO.."|"..loc("Sticky Mine")..": "..GLOBAL_STICKY_NAPALM_INFO,{amSMine,4}, |
155 |
{{amSMine,100},{amWatermelon,1},{amDrillStrike,1},{amDrill,100},{amInvulnerable,7},{amSeduction,100},{amLandGun,3}}, |
|
156 |
{sndMelonImpact,sndCoward},125}, |
|
7893 | 157 |
|
13364 | 158 |
{loc("Asia"),"["..loc("Difficulty: ")..loc("MEDIUM").."] ",loc("- Will give you a parachute every third turn.").."|"..loc("Special Weapons:").."|"..loc("Parachute")..": "..GLOBAL_PARACHUTE_SPECIAL_INFO,{amRope,5}, |
159 |
{{amRope,100},{amFirePunch,100},{amParachute,1},{amKnife,2},{amDynamite,1}}, |
|
160 |
{sndRopeAttach,sndComeonthen},50}, |
|
7893 | 161 |
|
13364 | 162 |
{loc("Australia"),"["..loc("Difficulty: ")..loc("EASY").."] ",loc("Special Weapons:").."|"..loc("Baseballbat")..": "..GLOBAL_BASEBALLBAT_CRICKET_INFO.."|"..loc("Baseballbat")..": "..GLOBAL_BASEBALLBAT_BOOMERANG_INFO,{amBaseballBat,6}, |
163 |
{{amBaseballBat,100},{amMine,100},{amLowGravity,4},{amBlowTorch,100},{amRCPlane,2},{amRubber,4}}, |
|
164 |
{sndBaseballBat,sndNooo},100}, |
|
165 |
||
166 |
{loc("Antarctica"),"["..loc("Difficulty: ")..loc("HARD").."] ",loc("Antarctic summer: - Will give you girders=1,mudballs=1,sineguns=2,portals=1 every fourth turn.").."|"..loc("Special Weapons:").."|"..loc("Pick hammer")..": "..GLOBAL_PICKHAMMER_SPECIAL_INFO,{amIceGun,7}, |
|
167 |
{{amSnowball,2},{amPickHammer,100},{amSineGun,4},{amGirder,1},{amExtraTime,1},{amIceGun,1},{amPortalGun,2}}, |
|
168 |
{sndSineGun,sndOops},75}, |
|
7893 | 169 |
|
13364 | 170 |
{loc("Kerguelen"),"["..loc("Difficulty: ")..loc("EASY").."] ",loc("Special Weapons:").."|"..loc("Hammer")..": "..GLOBAL_HAMMER_ROAR_INFO.."|"..loc("Hammer")..": "..GLOBAL_HAMMER_SWAP_INFO.."|"..loc("Hammer")..": "..GLOBAL_HAMMER_LONELY_INFO.."|"..loc("Hammer")..": "..GLOBAL_HAMMER_SABOTAGE_INFO,{amHammer,8}, |
171 |
{{amHammer,100},{amMineStrike,1},{amBallgun,1},{amTeleport,1}}, |
|
172 |
{sndPiano5,sndStupid},75}, |
|
7893 | 173 |
|
13364 | 174 |
{loc("Zealandia"),"["..loc("Difficulty: ")..loc("MEDIUM").."] ",loc("- Will Get 1-3 random weapons") .. "|" .. loc("- Massive weapon bonus on first turn|You will lose all your weapons each turn."),{amInvulnerable,9}, |
175 |
{{amBazooka,1},{amGrenade,1},{amBlowTorch,1},{amSwitch,1},{amRope,1},{amDrill,1},{amDEagle,1},{amPickHammer,1},{amFirePunch,1},{amWhip,1},{amMortar,1},{amSnowball,1},{amExtraTime,1},{amInvulnerable,1},{amVampiric,1},{amFlamethrower,1},{amBee,1},{amClusterBomb,1},{amTeleport,1},{amLowGravity,1},{amJetpack,1},{amGirder,1},{amLandGun,1},{amBirdy,1},{amAirMine,1},{amTardis,1},{amLaserSight,1},{amAirMine,1}}, |
|
176 |
{sndSplash,sndFirstBlood},100}, |
|
7893 | 177 |
|
13364 | 178 |
{loc("Sundaland"),"["..loc("Difficulty: ")..loc("HARD").."] ",loc("- You will recieve 6 weapons on each kill! (Even on own hogs)"),{amTardis,10}, |
179 |
{{amClusterBomb,5},{amTardis,100},{amWhip,100},{amKamikaze,100},{amAirMine,2},{amDuck,2}}, |
|
180 |
{sndWarp,sndSameTeam},100} |
|
9805 | 181 |
|
7893 | 182 |
} |
183 |
||
13364 | 184 |
--very strange bug |
185 |
GLOBAL_CONTINENT_INFORMATION[1][7]=100 |
|
186 |
GLOBAL_CONTINENT_INFORMATION[1][6]={sndShotgunFire,sndCover} |
|
8618 | 187 |
|
7893 | 188 |
--weapontype,ammo,?,duration,*times your choice,affect on random team (should be placed with 1,0,1,0,1 on the 6th option for better randomness) |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
189 |
local GLOBAL_WEAPONS_DAMAGE = { |
13364 | 190 |
{amKamikaze, 0, 1, 0, 1, 0}, |
191 |
{amSineGun, 0, 1, 0, 1, 0}, |
|
192 |
{amMineStrike, 0, 1, 6, 1, 1}, |
|
193 |
{amGrenade, 0, 1, 0, 1, 0}, |
|
194 |
{amPiano, 0, 1, 7, 1, 0}, |
|
7893 | 195 |
{amClusterBomb, 0, 1, 0, 1, 0}, |
13364 | 196 |
{amBee, 0, 1, 0, 1, 0}, |
197 |
{amShotgun, 0, 1, 0, 1, 0}, |
|
198 |
{amSniperRifle, 0, 1, 0, 1, 0}, |
|
199 |
{amDynamite, 0, 1, 6, 1, 1}, |
|
200 |
{amFirePunch, 0, 1, 0, 1, 0}, |
|
201 |
{amHellishBomb, 0, 1, 6, 1, 2}, |
|
202 |
{amWhip, 0, 1, 0, 1, 0}, |
|
203 |
{amNapalm, 0, 1, 6, 1, 1}, |
|
204 |
{amPickHammer, 0, 1, 0, 1, 0}, |
|
7893 | 205 |
{amBaseballBat, 0, 1, 0, 1, 1}, |
13364 | 206 |
{amMortar, 0, 1, 0, 1, 0}, |
207 |
{amCake, 0, 1, 5, 1, 2}, |
|
208 |
{amSeduction, 0, 1, 0, 1, 0}, |
|
209 |
{amWatermelon, 0, 1, 6, 1, 2}, |
|
210 |
{amDrill, 0, 1, 0, 1, 0}, |
|
211 |
{amBallgun, 0, 1, 8, 1, 2}, |
|
212 |
{amDEagle, 0, 1, 0, 1, 0}, |
|
213 |
{amMolotov, 0, 1, 0, 1, 0}, |
|
214 |
{amHammer, 0, 1, 0, 1, 1}, |
|
215 |
{amBirdy, 0, 1, 0, 1, 0}, |
|
216 |
{amRCPlane, 0, 1, 6, 1, 2}, |
|
217 |
{amMine, 0, 1, 0, 1, 0}, |
|
218 |
{amGasBomb, 0, 1, 0, 1, 0}, |
|
219 |
{amAirAttack, 0, 1, 5, 1, 1}, |
|
220 |
{amBlowTorch, 0, 1, 0, 1, 0}, |
|
221 |
{amFlamethrower,0, 1, 0, 1, 0}, |
|
222 |
{amSMine, 0, 1, 0, 1, 0}, |
|
223 |
{amSnowball, 0, 1, 0, 1, 0}, |
|
224 |
{amKnife, 0, 1, 0, 1, 0}, |
|
225 |
{amDrillStrike, 0, 1, 5, 1, 1}, |
|
226 |
{amBazooka, 0, 1, 0, 1, 0}, |
|
227 |
{amAirMine, 0, 1, 0, 1, 0}, |
|
228 |
{amDuck, 0, 1, 0, 1, 0} |
|
7893 | 229 |
} |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
230 |
local GLOBAL_WEAPONS_SUPPORT = { |
13364 | 231 |
{amParachute, 0, 1, 0, 1, 0}, |
232 |
{amGirder, 0, 1, 0, 1, 0}, |
|
233 |
{amSwitch, 0, 1, 0, 1, 0}, |
|
234 |
{amLowGravity, 0, 1, 0, 1, 0}, |
|
7893 | 235 |
{amExtraDamage, 0, 1, 2, 1, 0}, |
13364 | 236 |
{amRope, 0, 1, 0, 1, 0}, |
237 |
{amInvulnerable,0, 1, 0, 1, 0}, |
|
238 |
{amExtraTime, 0, 1, 0, 1, 0}, |
|
239 |
{amLaserSight, 0, 1, 0, 1, 0}, |
|
240 |
{amVampiric, 0, 1, 0, 1, 0}, |
|
241 |
{amJetpack, 0, 1, 0, 1, 0}, |
|
242 |
{amPortalGun, 0, 1, 3, 1, 1}, |
|
243 |
{amResurrector, 0, 1, 2, 1, 0}, |
|
244 |
{amTeleport, 0, 1, 0, 1, 0}, |
|
245 |
{amLandGun, 0, 1, 0, 1, 0}, |
|
246 |
{amTardis, 0, 1, 0, 1, 0}, |
|
247 |
{amIceGun, 0, 1, 0, 1, 0}, |
|
248 |
{amRubber, 0, 1, 0, 1, 0} |
|
10965 | 249 |
|
7893 | 250 |
} |
8618 | 251 |
|
13364 | 252 |
--check if weps valid |
253 |
function wepNotValidBorder(weapon) |
|
254 |
if(MapHasBorder() == false or (weapon ~= amAirAttack and weapon ~= amMineStrike and weapon ~= amNapalm and weapon ~= amDrillStrike and weapon ~= amPiano)) |
|
255 |
then |
|
256 |
return true |
|
257 |
end |
|
258 |
||
259 |
return false |
|
260 |
end |
|
261 |
||
8618 | 262 |
--will check after borders and stuff |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
263 |
function ValidateWeapon(hog,weapon,amount) |
13364 | 264 |
if(wepNotValidBorder(weapon)) |
7893 | 265 |
then |
9805 | 266 |
if(amount==1) |
267 |
then |
|
268 |
AddAmmo(hog, weapon) |
|
269 |
else |
|
270 |
AddAmmo(hog, weapon,amount) |
|
271 |
end |
|
272 |
end |
|
273 |
end |
|
274 |
||
13364 | 275 |
function SpawnRandomCrate(x,y,strength) |
276 |
local tot=table.maxn(GLOBAL_WEAPONS_SUPPORT)+table.maxn(GLOBAL_WEAPONS_DAMAGE) |
|
277 |
local rand=GetRandom(tot)+1 |
|
278 |
||
279 |
if(rand>table.maxn(GLOBAL_WEAPONS_SUPPORT)) |
|
280 |
then |
|
281 |
local weapon=rand-table.maxn(GLOBAL_WEAPONS_SUPPORT) |
|
282 |
||
283 |
while(wepNotValidBorder(GLOBAL_WEAPONS_DAMAGE[weapon][1])==false) |
|
284 |
do |
|
285 |
if(weapon>=table.maxn(GLOBAL_WEAPONS_DAMAGE)) |
|
286 |
then |
|
287 |
weapon=0 |
|
288 |
end |
|
289 |
weapon = weapon+1 |
|
290 |
end |
|
291 |
||
292 |
SpawnAmmoCrate(x, y, GLOBAL_WEAPONS_DAMAGE[weapon][1]) |
|
293 |
else |
|
294 |
SpawnUtilityCrate(x, y, GLOBAL_WEAPONS_SUPPORT[rand][1]) |
|
295 |
end |
|
296 |
end |
|
297 |
||
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
298 |
--removes one weapon |
9805 | 299 |
function RemoveWeapon(hog,weapon) |
300 |
||
301 |
if(GetAmmoCount(hog, weapon)<100) |
|
302 |
then |
|
303 |
AddAmmo(hog,weapon,GetAmmoCount(hog, weapon)-1) |
|
7893 | 304 |
end |
305 |
end |
|
306 |
||
307 |
--reset all weapons for a team |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
308 |
function CleanWeapons(hog) |
7893 | 309 |
|
310 |
local i=1 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
311 |
--+1 for skip |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
312 |
while(i<=table.maxn(GLOBAL_WEAPONS_SUPPORT)+table.maxn(GLOBAL_WEAPONS_DAMAGE)+1) |
7893 | 313 |
do |
314 |
AddAmmo(hog,i,0) |
|
315 |
i=i+1 |
|
316 |
end |
|
10965 | 317 |
|
7893 | 318 |
AddAmmo(hog,amSkip,100) |
319 |
end |
|
320 |
||
8618 | 321 |
--get the weapons from a weaponset |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
322 |
function LoadWeaponset(hog, num) |
10965 | 323 |
for v,w in pairs(GLOBAL_CONTINENT_INFORMATION[num][5]) |
7893 | 324 |
do |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
325 |
ValidateWeapon(hog, w[1],w[2]) |
7893 | 326 |
end |
13364 | 327 |
|
328 |
GLOBAL_TEMP_VALUE=GLOBAL_CONTINENT_INFORMATION[num][7] |
|
329 |
runOnGears(SetHogHealth) |
|
7893 | 330 |
end |
331 |
||
8618 | 332 |
--list up all weapons from the icons for each continent |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
333 |
function InitWeaponsMenu(hog) |
9805 | 334 |
|
13364 | 335 |
if(GetHogLevel(hog)==0 or GLOBAL_CONTINENT_INFORMATION[1][6][1]==sndFrozenHogImpact) |
9805 | 336 |
then |
10965 | 337 |
for v,w in pairs(GLOBAL_CONTINENT_INFORMATION) |
9805 | 338 |
do |
13364 | 339 |
ValidateWeapon(hog, GLOBAL_CONTINENT_INFORMATION[v][4][1],1) |
9805 | 340 |
end |
341 |
AddAmmo(hog,amSwitch) --random continent |
|
10965 | 342 |
|
9805 | 343 |
--for the computers |
344 |
else |
|
345 |
--europe |
|
13364 | 346 |
ValidateWeapon(hog, GLOBAL_CONTINENT_INFORMATION[3][4][1],1) |
9805 | 347 |
--north america |
13364 | 348 |
ValidateWeapon(hog, GLOBAL_CONTINENT_INFORMATION[1][4][1],1) |
7893 | 349 |
end |
350 |
end |
|
351 |
||
8618 | 352 |
--shows the continent info |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
353 |
function ShowContinentInfo(continent,time,generalinf) |
8618 | 354 |
local geninftext="" |
7893 | 355 |
local ns=false |
356 |
if(time==-1) |
|
357 |
then |
|
358 |
time=0 |
|
359 |
ns=true |
|
360 |
end |
|
8618 | 361 |
if(generalinf) |
362 |
then |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
363 |
geninftext="| |"..loc("General information")..": |"..GLOBAL_GENERAL_INFORMATION |
8618 | 364 |
end |
10965 | 365 |
|
13364 | 366 |
ShowMission(GLOBAL_CONTINENT_INFORMATION[continent][1],GLOBAL_CONTINENT_INFORMATION[continent][2]..loc(" Starting HP: ")..GLOBAL_CONTINENT_INFORMATION[continent][7],GLOBAL_CONTINENT_INFORMATION[continent][3]..geninftext, GLOBAL_CONTINENT_INFORMATION[continent][4][2], time) |
7893 | 367 |
if(ns) |
368 |
then |
|
369 |
HideMission() |
|
370 |
end |
|
371 |
end |
|
372 |
||
8618 | 373 |
--will show a circle of gears (eye candy) |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
374 |
function VisualExplosion(range,xpos,ypos,gear1,gear2) |
7893 | 375 |
local degr=0 |
376 |
local lap=30 |
|
377 |
while(lap<range) |
|
378 |
do |
|
379 |
while(degr < 6.2831) |
|
380 |
do |
|
381 |
AddVisualGear(xpos+math.cos(degr+0.1)*(lap+5), ypos+math.sin(degr+0.1)*(lap+5), gear1, 0, false) |
|
382 |
if(gear2~=false) |
|
383 |
then |
|
384 |
AddVisualGear(xpos+math.cos(degr)*lap, ypos+math.sin(degr)*lap, gear2, 0, false) |
|
385 |
end |
|
386 |
degr=degr+((3.1415*3)*0.125) --1/8 = 0.125 |
|
387 |
end |
|
388 |
lap=lap+30 |
|
389 |
degr=degr-6.2831 |
|
390 |
end |
|
391 |
end |
|
392 |
||
13364 | 393 |
--give one random weapon |
394 |
function GetRandomWeapon(hog, weptype, power, onlyonewep, getdelayedweps, mypower) |
|
10965 | 395 |
|
13364 | 396 |
local wepout=nil |
397 |
local rand_weaponset_power=mypower |
|
10965 | 398 |
|
13364 | 399 |
if(rand_weaponset_power < power) |
400 |
then |
|
401 |
local numberofweapons=table.maxn(weptype) |
|
10965 | 402 |
|
13364 | 403 |
local random_weapon = math.abs(GetRandom(numberofweapons)+1) |
10965 | 404 |
|
13364 | 405 |
while((weptype[random_weapon][4]>TotalRounds and getdelayedweps==false) or rand_weaponset_power+weptype[random_weapon][6]>power |
406 |
or (wepNotValidBorder(weptype[random_weapon][1])==false) or GetAmmoCount(hog,weptype[random_weapon][1])>=100 |
|
407 |
or (GetAmmoCount(hog,weptype[random_weapon][1])>=1 and onlyonewep==true)) |
|
8618 | 408 |
do |
13364 | 409 |
if(random_weapon>=numberofweapons) |
8618 | 410 |
then |
411 |
random_weapon=0 |
|
412 |
end |
|
413 |
random_weapon = random_weapon+1 |
|
414 |
end |
|
13364 | 415 |
|
416 |
wepout=weptype[random_weapon][1] |
|
10965 | 417 |
|
13364 | 418 |
ValidateWeapon(hog, wepout,1) |
419 |
rand_weaponset_power=mypower+weptype[random_weapon][6] |
|
420 |
end |
|
10965 | 421 |
|
13364 | 422 |
return rand_weaponset_power , wepout |
7893 | 423 |
end |
424 |
||
13364 | 425 |
--zealandia (generates weapons from the weaponinfo above) and sundaland |
426 |
function RandomContinentsGetWeapons(hog) |
|
427 |
if(GetGearType(hog) == gtHedgehog) |
|
428 |
then |
|
429 |
local currCont=GLOBAL_TEAM_CONTINENT[GetHogTeamName(hog)] |
|
10965 | 430 |
|
13364 | 431 |
if(currCont~=0) |
9805 | 432 |
then |
13364 | 433 |
local checkDefCont=GLOBAL_CONTINENT_INFORMATION[currCont][4][2] |
10965 | 434 |
|
13364 | 435 |
--for sunda |
436 |
local wepamount=getTeamValue(GetHogTeamName(hog), "sundaland-count") |
|
10965 | 437 |
|
13364 | 438 |
if(checkDefCont==9 and getTeamValue(GetHogTeamName(hog), "rand-done-turn")==false) |
9805 | 439 |
then |
13364 | 440 |
CleanWeapons(hog) |
441 |
||
442 |
local rand_weaponset_power = 0 |
|
443 |
local currwep |
|
444 |
||
445 |
rand_weaponset_power, currwep=GetRandomWeapon(hog,GLOBAL_WEAPONS_DAMAGE,100,true,false,rand_weaponset_power) |
|
446 |
rand_weaponset_power, currwep=GetRandomWeapon(hog,GLOBAL_WEAPONS_SUPPORT,2,true,false,rand_weaponset_power) |
|
447 |
rand_weaponset_power, currwep=GetRandomWeapon(hog,GLOBAL_WEAPONS_DAMAGE,1,true,false,rand_weaponset_power) |
|
448 |
||
449 |
setTeamValue(GetHogTeamName(hog), "rand-done-turn", true) |
|
450 |
||
451 |
elseif(checkDefCont==10 and wepamount~=nil) |
|
452 |
then |
|
453 |
local loci=0 |
|
10965 | 454 |
|
13364 | 455 |
while(loci<wepamount) |
456 |
do |
|
457 |
--6 random weapons |
|
458 |
GetRandomWeapon(hog,GLOBAL_WEAPONS_DAMAGE,100,false,true,0) |
|
459 |
GetRandomWeapon(hog,GLOBAL_WEAPONS_DAMAGE,100,false,true,0) |
|
460 |
GetRandomWeapon(hog,GLOBAL_WEAPONS_DAMAGE,2,false,true,1) |
|
461 |
||
462 |
GetRandomWeapon(hog,GLOBAL_WEAPONS_SUPPORT,100,false,true,0) |
|
463 |
GetRandomWeapon(hog,GLOBAL_WEAPONS_SUPPORT,100,false,true,0) |
|
464 |
GetRandomWeapon(hog,GLOBAL_WEAPONS_SUPPORT,100,false,true,0) |
|
465 |
||
466 |
loci=loci+1 |
|
9805 | 467 |
end |
13364 | 468 |
|
469 |
setTeamValue(GetHogTeamName(hog), "sundaland-count",nil) |
|
9805 | 470 |
end |
471 |
end |
|
13364 | 472 |
end |
9805 | 473 |
end |
474 |
||
8618 | 475 |
--this will take that hogs settings for the weapons and add them |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
476 |
function SetContinentWeapons() |
7893 | 477 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
478 |
CleanWeapons(CurrentHedgehog) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
479 |
LoadWeaponset(CurrentHedgehog,GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]) |
10965 | 480 |
|
8618 | 481 |
visualstuff=AddVisualGear(GetX(CurrentHedgehog), GetY(CurrentHedgehog)-5, vgtDust,0, false) |
482 |
v1, v2, v3, v4, v5, v6, v7, v8, v9, v10 = GetVisualGearValues(visualstuff) |
|
483 |
SetVisualGearValues(visualstuff, v1, v2, v3, v4, v5, v6, v7, 2, v9, GetClanColor(GetHogClan(CurrentHedgehog))) |
|
10965 | 484 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
485 |
ShowContinentInfo(GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)],3000,false) |
7893 | 486 |
end |
487 |
||
13364 | 488 |
--count hogs in team |
489 |
function CountHogsInTeam(hog) |
|
490 |
if(GetHogTeamName(hog)==GetHogTeamName(CurrentHedgehog)) |
|
491 |
then |
|
492 |
GLOBAL_TEMP_VALUE=GLOBAL_TEMP_VALUE+1 |
|
493 |
end |
|
494 |
end |
|
495 |
||
7893 | 496 |
--==========================run throw all hog/gear weapons ========================== |
13364 | 497 |
|
498 |
function SetHogHealth(hog) |
|
499 |
if(GetGearType(hog) == gtHedgehog and GetHogClan(hog) == GetHogClan(CurrentHedgehog)) |
|
500 |
then |
|
501 |
SetHealth(hog, div(GLOBAL_TEMP_VALUE*GLOBAL_HOG_HEALTH,100)) |
|
502 |
end |
|
503 |
end |
|
504 |
||
10965 | 505 |
--will check if the mine is nicely placed |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
506 |
function AustraliaSpecialCheckHogs(hog) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
507 |
if(GetGearType(hog) == gtHedgehog) |
7893 | 508 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
509 |
if(gearIsInCircle(hog,GetX(CurrentHedgehog), GetY(CurrentHedgehog), 40, false)==true and hog ~= CurrentHedgehog) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
510 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
511 |
GLOBAL_TEMP_VALUE=1 |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
512 |
end |
7893 | 513 |
end |
514 |
end |
|
515 |
||
8618 | 516 |
--african special on sedunction |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
517 |
function AfricaSpecialSeduction(hog) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
518 |
if(GetGearType(hog) == gtHedgehog) |
7893 | 519 |
then |
13364 | 520 |
local dmg=div((15+GLOBAL_SEDUCTION_INCREASER)*GLOBAL_EXTRA_DAMAGE_IS_ON,100) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
521 |
if(gearIsInCircle(hog,GetX(CurrentHedgehog), GetY(CurrentHedgehog), 250, false)==true and GetHogClan(hog) ~= GetHogClan(CurrentHedgehog)) |
7893 | 522 |
then |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
523 |
if(GetHealth(hog) > dmg) |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
524 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
525 |
GLOBAL_TEMP_VALUE=GLOBAL_TEMP_VALUE+div(dmg*GLOBAL_VAMPIRIC_IS_ON,100) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
526 |
SetHealth(hog, GetHealth(hog)-dmg) |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
527 |
else |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
528 |
GLOBAL_TEMP_VALUE=GLOBAL_TEMP_VALUE+div(GetHealth(hog)*GLOBAL_VAMPIRIC_IS_ON,100) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
529 |
SetHealth(hog, 0) |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
530 |
end |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
531 |
ShowDamageTag(hog,dmg) |
7893 | 532 |
end |
533 |
end |
|
534 |
end |
|
535 |
||
10965 | 536 |
--kerguelen special on structure |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
537 |
function KerguelenSpecialRed(hog) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
538 |
if(GetGearType(hog) == gtHedgehog) |
7893 | 539 |
then |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
540 |
if(gearIsInCircle(hog,GetX(CurrentHedgehog), GetY(CurrentHedgehog), 120, false)==true and GetHogClan(hog) ~= GetHogClan(CurrentHedgehog)) |
7893 | 541 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
542 |
local dmg=div((15+div(GetHealth(CurrentHedgehog)*10,100))*GLOBAL_EXTRA_DAMAGE_IS_ON,100) |
10965 | 543 |
|
9805 | 544 |
if(GetHealth(hog)>dmg) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
545 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
546 |
GLOBAL_TEMP_VALUE=GLOBAL_TEMP_VALUE+div(dmg*2,3)+div(dmg*GLOBAL_VAMPIRIC_IS_ON*2,100*3) |
9805 | 547 |
SetHealth(hog, GetHealth(hog)-dmg) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
548 |
else |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
549 |
GLOBAL_TEMP_VALUE=GLOBAL_TEMP_VALUE+(div(GetHealth(hog)*75,100))+(div(GetHealth(CurrentHedgehog)*10,100))+div((GetHealth(hog)+div(GetHealth(CurrentHedgehog)*10,100))*GLOBAL_VAMPIRIC_IS_ON,100) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
550 |
SetHealth(hog, 0) |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
551 |
end |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
552 |
ShowDamageTag(hog,dmg) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
553 |
AddVisualGear(GetX(hog), GetY(hog), vgtExplosion, 0, false) |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
554 |
AddVisualGear(GetX(CurrentHedgehog), GetY(CurrentHedgehog), vgtSmokeWhite, 0, false) |
7893 | 555 |
end |
556 |
end |
|
557 |
end |
|
558 |
||
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
559 |
--will count the hogs, used to get one random hog. |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
560 |
function KerguelenSpecialYellowCountHogs(hog) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
561 |
if(GetGearType(hog) == gtHedgehog) |
7893 | 562 |
then |
13364 | 563 |
if(GetHogClan(hog) ~= GetHogClan(CurrentHedgehog) and gearIsInCircle(hog,GetX(CurrentHedgehog), GetY(CurrentHedgehog), 390, false)) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
564 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
565 |
GLOBAL_TEMP_VALUE=GLOBAL_TEMP_VALUE+1 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
566 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
567 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
568 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
569 |
--kerguelen special swap hog |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
570 |
function KerguelenSpecialYellowSwap(hog) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
571 |
if(GetGearType(hog) == gtHedgehog) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
572 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
573 |
if(GLOBAL_KERGUELEN_SPECIAL ~= -1 and GetHogClan(hog) ~= GetHogClan(CurrentHedgehog) and gearIsInCircle(hog,GetX(CurrentHedgehog), GetY(CurrentHedgehog), 420, false)) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
574 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
575 |
if(GLOBAL_TEMP_VALUE==0) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
576 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
577 |
local thisX=GetX(CurrentHedgehog) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
578 |
local thisY=GetY(CurrentHedgehog) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
579 |
SetGearPosition(CurrentHedgehog, GetX(hog), GetY(hog)) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
580 |
SetGearPosition(hog, thisX, thisY) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
581 |
GLOBAL_KERGUELEN_SPECIAL=-1 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
582 |
else |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
583 |
GLOBAL_TEMP_VALUE=GLOBAL_TEMP_VALUE-1 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
584 |
end |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
585 |
end |
7893 | 586 |
end |
587 |
end |
|
588 |
||
8618 | 589 |
--kerguelen special will apply sabotage |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
590 |
function KerguelenSpecialGreen(hog) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
591 |
if(GetGearType(hog) == gtHedgehog) |
7893 | 592 |
then |
9805 | 593 |
if(CurrentHedgehog~=hog and gearIsInCircle(hog,GetX(CurrentHedgehog), GetY(CurrentHedgehog), 80, false)) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
594 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
595 |
GLOBAL_TEMP_VALUE=1 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
596 |
GLOBAL_SABOTAGE_HOGS[hog]=1 |
9805 | 597 |
AddGear(GetX(hog), GetY(hog), gtCluster, 0, 0, 0, 1) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
598 |
PlaySound(sndNooo,hog) |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
599 |
end |
7893 | 600 |
end |
601 |
end |
|
602 |
||
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
603 |
--first part on kerguelen special (lonely cries) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
604 |
function KerguelenSpecialBlueCheck(hog) |
13364 | 605 |
if(GetGearType(hog) == gtHedgehog and hog ~= CurrentHedgehog and gearIsInCircle(hog,GetX(CurrentHedgehog), GetY(CurrentHedgehog), 500, false)) |
7893 | 606 |
then |
13364 | 607 |
GLOBAL_TEMP_VALUE=1 |
7893 | 608 |
end |
609 |
end |
|
610 |
||
8618 | 611 |
--second part on kerguelen special (lonely cries) |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
612 |
function KerguelenSpecialBlueActivate(hog) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
613 |
if(GetGearType(hog) == gtHedgehog) |
7893 | 614 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
615 |
local dmg=div(6*GLOBAL_EXTRA_DAMAGE_IS_ON,100) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
616 |
if(GetHogClan(hog) ~= GetHogClan(CurrentHedgehog)) |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
617 |
then |
8618 | 618 |
if(GetHealth(hog) > dmg) |
619 |
then |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
620 |
GLOBAL_TEMP_VALUE=GLOBAL_TEMP_VALUE+div(dmg*GLOBAL_VAMPIRIC_IS_ON,100) |
8618 | 621 |
SetHealth(hog, GetHealth(hog)-dmg) |
622 |
else |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
623 |
GLOBAL_TEMP_VALUE=GLOBAL_TEMP_VALUE+div(GetHealth(hog)*GLOBAL_VAMPIRIC_IS_ON,100) |
8618 | 624 |
SetHealth(hog, 0) |
625 |
end |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
626 |
ShowDamageTag(hog,dmg) |
10965 | 627 |
|
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
628 |
AddVisualGear(GetX(hog), GetY(hog)-30, vgtEvilTrace, 0, false) |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
629 |
end |
7893 | 630 |
end |
631 |
end |
|
632 |
||
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
633 |
--south american special (used fire gear) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
634 |
function SouthAmericaSpecialCheeseExplosion(hog) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
635 |
if(GetGearType(hog) == gtHedgehog or GetGearType(hog) == gtMine or GetGearType(hog) == gtExplosives) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
636 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
637 |
local power_radius_outer=230 |
13364 | 638 |
local power_sa=700000 |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
639 |
local hypo=0 |
13364 | 640 |
if(gearIsInCircle(hog,GetX(GLOBAL_TEMP_VALUE), GetY(GLOBAL_TEMP_VALUE), power_radius_outer, false)) |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
641 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
642 |
if(hog == CurrentHedgehog) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
643 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
644 |
SetState(CurrentHedgehog, gstMoving) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
645 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
646 |
SetGearPosition(hog, GetX(hog),GetY(hog)-3) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
647 |
hypo=Norm(math.abs(GetX(hog)-GetX(GLOBAL_TEMP_VALUE)),math.abs(GetY(hog)-GetY(GLOBAL_TEMP_VALUE))) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
648 |
SetGearVelocity(hog, div((power_radius_outer-hypo)*power_sa*GetIfNegative(GetX(hog)-GetX(GLOBAL_TEMP_VALUE)),power_radius_outer), div((power_radius_outer-hypo)*power_sa*GetIfNegative(GetY(hog)-GetY(GLOBAL_TEMP_VALUE)),power_radius_outer)) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
649 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
650 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
651 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
652 |
|
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
653 |
--north american special on sniper |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
654 |
function NorthAmericaSpecialSniper(hog) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
655 |
if(GetGearType(hog) == gtHedgehog) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
656 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
657 |
if(gearIsInCircle(GLOBAL_TEMP_VALUE,GetX(hog), GetY(hog), 20, false)) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
658 |
then |
13364 | 659 |
SetEffect(hog, hePoisoned, 5) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
660 |
PlaySound(sndBump) |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
661 |
end |
7893 | 662 |
end |
663 |
end |
|
664 |
||
8618 | 665 |
--european special on molotov (used fire gear) |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
666 |
function EuropeSpecialMolotovHit(hog) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
667 |
if(GetGearType(hog) == gtHedgehog) |
7893 | 668 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
669 |
if(gearIsInCircle(GLOBAL_TEMP_VALUE,GetX(hog), GetY(hog), 100, false)) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
670 |
then |
13364 | 671 |
local healthadd=15 |
672 |
HealHog(hog, healthadd+(div(healthadd*GLOBAL_VAMPIRIC_IS_ON,100)), hog == CurrentHedgehog) |
|
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
673 |
SetEffect(hog, hePoisoned, false) |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
674 |
GLOBAL_SABOTAGE_HOGS[hog]=0 |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
675 |
end |
7893 | 676 |
end |
677 |
end |
|
9805 | 678 |
|
13364 | 679 |
--a weaponset string to something readable by the script |
680 |
function transferableParamToWeaponSet(string,icon) |
|
681 |
local continentinfo={} |
|
682 |
local numb=0 |
|
683 |
local wepcodes=0 |
|
684 |
local where=0 |
|
685 |
||
686 |
local x=0 |
|
687 |
local i=1 |
|
688 |
||
689 |
--default icon |
|
690 |
continentinfo[4]={} |
|
691 |
if(icon==1000) |
|
692 |
then |
|
693 |
local mid=table.maxn(GLOBAL_WEAPONS_DAMAGE) |
|
694 |
local max=mid+table.maxn(GLOBAL_WEAPONS_SUPPORT) |
|
695 |
local ic=(string.byte(string) % max)+1 |
|
696 |
||
697 |
if(ic>mid) |
|
698 |
then |
|
699 |
ic=GLOBAL_WEAPONS_SUPPORT[ic-mid][1] |
|
700 |
else |
|
701 |
ic=GLOBAL_WEAPONS_DAMAGE[ic][1] |
|
702 |
end |
|
703 |
||
704 |
continentinfo[4][1]=ic |
|
705 |
continentinfo[4][2]=-ic |
|
706 |
else |
|
707 |
continentinfo[4][1]=icon |
|
708 |
continentinfo[4][2]=-icon |
|
709 |
end |
|
710 |
||
711 |
continentinfo[6]={sndFrozenHogImpact,sndUhOh} |
|
712 |
continentinfo[7]=100 |
|
713 |
||
714 |
for c in string:gmatch"." |
|
715 |
do |
|
716 |
--first part, eg name of the weaponset |
|
717 |
if(where==0) |
|
718 |
then |
|
719 |
if(string.byte(c)==126) |
|
720 |
then |
|
721 |
continentinfo[1]=string.sub(string,0,numb) |
|
722 |
wepcodes=numb |
|
723 |
where=1 |
|
724 |
end |
|
725 |
--second part, subname of the weaponset |
|
726 |
elseif(where==1) |
|
727 |
then |
|
728 |
if(string.byte(c)==126) |
|
729 |
then |
|
730 |
continentinfo[2]=string.sub(string,wepcodes+2,numb) |
|
731 |
continentinfo[5]={} |
|
732 |
wepcodes=numb |
|
733 |
where=2 |
|
734 |
end |
|
735 |
--insert all weapons |
|
736 |
elseif(where==2) |
|
737 |
then |
|
738 |
x=string.byte(c)-35 |
|
739 |
if(x>90) |
|
740 |
then |
|
741 |
break |
|
742 |
elseif(x>80) |
|
743 |
then |
|
744 |
if(x-80<10) |
|
745 |
then |
|
746 |
i=x-80 |
|
747 |
else |
|
748 |
i=100 |
|
749 |
end |
|
750 |
else |
|
751 |
table.insert(continentinfo[5],{x,i}) |
|
752 |
end |
|
753 |
end |
|
754 |
numb=numb+1 |
|
755 |
end |
|
756 |
||
757 |
if(continentinfo[5]~=nil and continentinfo[5][1]~=nil) |
|
758 |
then |
|
759 |
continentinfo[3]="- "..continentinfo[1]..loc(" was extracted from the scheme|- This continent will be able to use the specials from the other continents!") |
|
760 |
||
761 |
table.insert(GLOBAL_CONTINENT_INFORMATION, continentinfo) |
|
762 |
end |
|
763 |
||
764 |
return nil |
|
765 |
end |
|
766 |
||
767 |
--add a weaponset from a hogname |
|
768 |
function HogNameToWeaponset(hog) |
|
9805 | 769 |
if(GetGearType(hog) == gtHedgehog) |
770 |
then |
|
13364 | 771 |
local string=GetHogName(hog) |
772 |
local numb=0 |
|
773 |
||
774 |
for c in string:gmatch"." |
|
775 |
do |
|
776 |
if(string.byte(c)==126) |
|
777 |
then |
|
778 |
local name=string.sub(string,0,numb) |
|
779 |
SetHogName(hog,name) |
|
780 |
local weaponcode=string.sub(string,numb+2) |
|
781 |
local continentinfo=transferableParamToWeaponSet(weaponcode,1000) |
|
782 |
||
783 |
if(continentinfo~=nil) |
|
784 |
then |
|
785 |
table.insert(GLOBAL_CONTINENT_INFORMATION, continentinfo) |
|
786 |
end |
|
787 |
return |
|
788 |
end |
|
789 |
numb=numb+1 |
|
9805 | 790 |
end |
791 |
end |
|
792 |
end |
|
13364 | 793 |
|
7893 | 794 |
--============================================================================ |
795 |
||
13364 | 796 |
--Parameters -> [options],[global-continent] |
797 |
--wt=yes allow to search for weaponsets on hog names |
|
798 |
--spec=off disable specials (will make stuff unbalanced) |
|
799 |
--cont=no remove the pre-defined continents |
|
800 |
||
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
801 |
--for custom made continent, follows the same standards as the globalism one. You can make your continent with <Name>~<Information>~<Weapons>. Take the weapons generated from globalism, if you want a GUI :P |
11520
4dd77731453b
update some old google code links in the code/etc. thanks Wuzzy for the heads-up
sheepluva
parents:
10965
diff
changeset
|
802 |
--weapons=<ammo><types>, ammo = ascii[116(1 ammo) to 125(inf ammo)] types = ascii[36(Grenade), 37(Clusterbomb) to 90(knife)] see http://hedgewars.org/kb/AmmoTypes |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
803 |
--ex "Own continent~this continent rocks!~tZ}$" will get 1 knife and inf grenades |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
804 |
function onParameters() |
10965 | 805 |
|
13364 | 806 |
local searchfor="wt=yes" |
807 |
local match=string.find(ScriptParam,searchfor, 1) |
|
808 |
||
809 |
if(match~=nil) |
|
810 |
then |
|
811 |
GLOBAL_TEMP_VALUE=1 |
|
812 |
||
813 |
ScriptParam=string.gsub(ScriptParam,"(,?)"..searchfor.."(,?)","") |
|
814 |
end |
|
815 |
||
816 |
searchfor="spec=off" |
|
817 |
match=string.find(ScriptParam,searchfor, 1) |
|
818 |
||
819 |
if(match~=nil) |
|
820 |
then |
|
821 |
OPTION_NO_SPECIALS=true |
|
822 |
||
823 |
ScriptParam=string.gsub(ScriptParam,"(,?)"..searchfor.."(,?)","") |
|
824 |
end |
|
825 |
||
826 |
searchfor="cont=no" |
|
827 |
match=string.find(ScriptParam,searchfor, 1) |
|
828 |
||
829 |
if(match~=nil) |
|
830 |
then |
|
831 |
GLOBAL_CONTINENT_INFORMATION={} |
|
832 |
||
833 |
ScriptParam=string.gsub(ScriptParam,"(,?)"..searchfor.."(,?)","") |
|
834 |
end |
|
835 |
||
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
836 |
if(ScriptParam~=nil) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
837 |
then |
13364 | 838 |
local continentinfo=transferableParamToWeaponSet(ScriptParam,amLowGravity) |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
839 |
|
13364 | 840 |
if(continentinfo~=nil) |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
841 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
842 |
table.insert(GLOBAL_CONTINENT_INFORMATION, continentinfo) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
843 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
844 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
845 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
846 |
|
7893 | 847 |
--set each weapons settings |
848 |
function onAmmoStoreInit() |
|
849 |
||
850 |
SetAmmo(amSkip, 9, 0, 0, 0) |
|
10965 | 851 |
|
852 |
for v,w in pairs(GLOBAL_WEAPONS_DAMAGE) |
|
7893 | 853 |
do |
854 |
SetAmmo(w[1], w[2], w[3], w[4], w[5]) |
|
855 |
end |
|
10965 | 856 |
|
857 |
for v,w in pairs(GLOBAL_WEAPONS_SUPPORT) |
|
7893 | 858 |
do |
859 |
SetAmmo(w[1], w[2], w[3], w[4], w[5]) |
|
860 |
end |
|
861 |
end |
|
862 |
||
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
863 |
--on game start |
7893 | 864 |
function onGameStart() |
13364 | 865 |
ShowMission(loc("Continental supplies"),loc("Let a continent provide your weapons!"),GLOBAL_GENERAL_INFORMATION, -amLowGravity, 0) |
866 |
||
867 |
local specText="| |"..loc("Additional feautures for this weapon: (Switch/Tab)").."|" |
|
868 |
||
869 |
SetAmmoDescriptionAppendix(amSniperRifle,specText..GLOBAL_SNIPER_SPECIAL_INFO) |
|
870 |
SetAmmoDescriptionAppendix(amBaseballBat,specText..GLOBAL_BASEBALLBAT_BOOMERANG_INFO .. "|" .. GLOBAL_BASEBALLBAT_CRICKET_INFO) |
|
871 |
SetAmmoDescriptionAppendix(amGasBomb,specText..GLOBAL_CHEESE_SPECIAL_INFO) |
|
872 |
SetAmmoDescriptionAppendix(amSeduction,specText..GLOBAL_SEDUCTION_SPECIAL_INFO) |
|
873 |
SetAmmoDescriptionAppendix(amInvulnerable,specText..GLOBAL_INVULNERABLE_SPECIAL_INFO) |
|
874 |
SetAmmoDescriptionAppendix(amParachute,specText..GLOBAL_PARACHUTE_SPECIAL_INFO) |
|
875 |
SetAmmoDescriptionAppendix(amHammer,specText..GLOBAL_HAMMER_ROAR_INFO .. "|" .. GLOBAL_HAMMER_SWAP_INFO .. "|" .. GLOBAL_HAMMER_LONELY_INFO .. "|" .. GLOBAL_HAMMER_SABOTAGE_INFO) |
|
876 |
SetAmmoDescriptionAppendix(amSMine,specText..GLOBAL_STICKY_PROJECTILE_INFO .. "|" .. GLOBAL_STICKY_NAPALM_INFO) |
|
877 |
SetAmmoDescriptionAppendix(amShotgun,specText..GLOBAL_SHOTGUN_SPECIAL_INFO) |
|
878 |
SetAmmoDescriptionAppendix(amMolotov,specText..GLOBAL_MOLOTOV_SPECIAL_INFO) |
|
879 |
SetAmmoDescriptionAppendix(amPickHammer,specText..GLOBAL_PICKHAMMER_SPECIAL_INFO) |
|
880 |
||
881 |
if(GLOBAL_TEMP_VALUE==1) |
|
882 |
then |
|
883 |
runOnGears(HogNameToWeaponset) |
|
884 |
end |
|
885 |
end |
|
886 |
||
887 |
function onGameInit() |
|
888 |
SuddenDeathTurns= SuddenDeathTurns+1 |
|
7893 | 889 |
end |
890 |
||
891 |
--what happen when a turn starts |
|
892 |
function onNewTurn() |
|
10965 | 893 |
|
8618 | 894 |
--will refresh the info on each tab weapon |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
895 |
GLOBAL_AUSTRALIAN_SPECIAL=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
896 |
GLOBAL_AFRICAN_SPECIAL_SEDUCTION=0 |
13364 | 897 |
GLOBAL_SEDUCTION_INCREASER=0 |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
898 |
GLOBAL_SOUTH_AMERICAN_SPECIAL=false |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
899 |
GLOBAL_AFRICAN_SPECIAL_STICKY=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
900 |
GLOBAL_KERGUELEN_SPECIAL=1 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
901 |
GLOBAL_NORTH_AMERICAN_SPECIAL_SNIPER=1 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
902 |
GLOBAL_NORTH_AMERICAN_SPECIAL_SHOTGUN=false |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
903 |
GLOBAL_NORTH_AMERICAN_SPECIAL_SNIPER_IS_ON=false |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
904 |
GLOBAL_EUROPE_SPECIAL=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
905 |
GLOBAL_VAMPIRIC_IS_ON=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
906 |
GLOBAL_EXTRA_DAMAGE_IS_ON=100 |
13364 | 907 |
GLOBAL_CRATE_TEST=-1 |
908 |
GLOBAL_SABOTAGE_COUNTER=0 |
|
909 |
GLOBAL_ANTARCTICA_SPECIAL=0 |
|
10965 | 910 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
911 |
GLOBAL_TEMP_VALUE=0 |
10965 | 912 |
|
13364 | 913 |
GLOBAL_SUNDALAND_END_HOG_CONTINENT_NAME=GetHogTeamName(CurrentHedgehog) |
10965 | 914 |
|
7893 | 915 |
--when all hogs are "placed" |
916 |
if(GetCurAmmoType()~=amTeleport) |
|
917 |
then |
|
918 |
--will run once when the game really starts (after placing hogs and so on |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
919 |
if(GLOBAL_INIT_TEAMS[GetHogTeamName(CurrentHedgehog)] == nil) |
7893 | 920 |
then |
13364 | 921 |
SetInputMask(band(0xFFFFFFFF,gmWeapon)) |
922 |
||
923 |
if(GLOBAL_START_TIME==0) |
|
924 |
then |
|
925 |
GLOBAL_START_TIME=TurnTimeLeft |
|
926 |
GLOBAL_HOG_HEALTH=GetHealth(CurrentHedgehog) |
|
927 |
end |
|
928 |
||
929 |
TurnTimeLeft=100000 |
|
930 |
||
931 |
AddCaption(GLOBAL_SELECT_WEP_INFORMATION, GetClanColor(GetHogClan(CurrentHedgehog)), capgrpMessage) |
|
932 |
ShowMission(loc("Continental supplies"),loc("Let a continent provide your weapons!"),GLOBAL_GENERAL_INFORMATION, -amLowGravity, 0) |
|
933 |
HideMission() |
|
934 |
||
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
935 |
InitWeaponsMenu(CurrentHedgehog) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
936 |
GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
937 |
GLOBAL_SELECT_CONTINENT_CHECK=true |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
938 |
GLOBAL_INIT_TEAMS[GetHogTeamName(CurrentHedgehog)] = 2 |
10965 | 939 |
|
13364 | 940 |
-- if(GLOBAL_SABOTAGE_HOGS[CurrentHedgehog]==1) |
941 |
-- then |
|
942 |
-- GLOBAL_SABOTAGE_COUNTER=-750 |
|
943 |
-- end |
|
7893 | 944 |
else |
8618 | 945 |
--if its not the initialization turn |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
946 |
GLOBAL_SELECT_CONTINENT_CHECK=false |
13364 | 947 |
SetInputMask(0xFFFFFFFF) |
948 |
||
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
949 |
if(GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]==0) |
7893 | 950 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
951 |
GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]=GetRandom(table.maxn(GLOBAL_CONTINENT_INFORMATION))+1 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
952 |
SetContinentWeapons() |
7893 | 953 |
end |
13364 | 954 |
local currCont=GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)] |
955 |
local checkDefCont=GLOBAL_CONTINENT_INFORMATION[currCont][4][2] |
|
10965 | 956 |
|
8618 | 957 |
--give zeelandia-teams new weapons so they can plan for the next turn |
13364 | 958 |
runOnGears(RandomContinentsGetWeapons) |
10965 | 959 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
960 |
--some specials for some continents (GLOBAL_TEMP_VALUE is from get random weapons) |
13364 | 961 |
if(checkDefCont==9) |
8618 | 962 |
then |
13364 | 963 |
setTeamValue(GetHogTeamName(CurrentHedgehog), "rand-done-turn", false) |
964 |
elseif(checkDefCont==7) |
|
8618 | 965 |
then |
13364 | 966 |
--this will be set on the second turn |
9805 | 967 |
if(getTeamValue(GetHogTeamName(CurrentHedgehog), "Antarctica2-turntick")==nil) |
8618 | 968 |
then |
9805 | 969 |
setTeamValue(GetHogTeamName(CurrentHedgehog), "Antarctica2-turntick", 1) |
8618 | 970 |
end |
10965 | 971 |
|
9805 | 972 |
if(getTeamValue(GetHogTeamName(CurrentHedgehog), "Antarctica2-turntick")>=4) |
8618 | 973 |
then |
974 |
AddAmmo(CurrentHedgehog,amPortalGun) |
|
9805 | 975 |
AddAmmo(CurrentHedgehog,amSineGun) |
976 |
AddAmmo(CurrentHedgehog,amSineGun) |
|
977 |
AddAmmo(CurrentHedgehog,amGirder) |
|
978 |
AddAmmo(CurrentHedgehog,amSnowball) |
|
979 |
setTeamValue(GetHogTeamName(CurrentHedgehog), "Antarctica2-turntick", 0) |
|
8618 | 980 |
end |
9805 | 981 |
setTeamValue(GetHogTeamName(CurrentHedgehog), "Antarctica2-turntick", getTeamValue(GetHogTeamName(CurrentHedgehog), "Antarctica2-turntick")+1) |
10965 | 982 |
|
13364 | 983 |
elseif(checkDefCont==5) |
8618 | 984 |
then |
13364 | 985 |
--this will be set on the second turn |
9805 | 986 |
if(getTeamValue(GetHogTeamName(CurrentHedgehog), "Asia-turntick")==nil) |
987 |
then |
|
988 |
setTeamValue(GetHogTeamName(CurrentHedgehog), "Asia-turntick", 1) |
|
989 |
end |
|
10965 | 990 |
|
9805 | 991 |
if(getTeamValue(GetHogTeamName(CurrentHedgehog), "Asia-turntick")>=2) |
992 |
then |
|
993 |
AddAmmo(CurrentHedgehog,amParachute) |
|
994 |
setTeamValue(GetHogTeamName(CurrentHedgehog), "Asia-turntick", 0) |
|
995 |
end |
|
996 |
setTeamValue(GetHogTeamName(CurrentHedgehog), "Asia-turntick", getTeamValue(GetHogTeamName(CurrentHedgehog), "Asia-turntick")+1) |
|
13364 | 997 |
elseif(checkDefCont==1) |
9805 | 998 |
then |
13364 | 999 |
GLOBAL_TEMP_VALUE=0 |
1000 |
runOnGears(CountHogsInTeam) |
|
10965 | 1001 |
|
13364 | 1002 |
if(GLOBAL_TEMP_VALUE>1) |
1003 |
then |
|
1004 |
AddAmmo(CurrentHedgehog,amSwitch,GetAmmoCount(CurrentHedgehog, amSwitch)+1) |
|
1005 |
||
1006 |
SetWeapon(amSwitch) |
|
1007 |
GLOBAL_TEMP_VALUE=87 |
|
1008 |
end |
|
8618 | 1009 |
end |
13364 | 1010 |
|
1011 |
ShowContinentInfo(currCont,-1,true) |
|
7893 | 1012 |
end |
1013 |
end |
|
1014 |
end |
|
1015 |
||
1016 |
--what happens when you press "tab" (common button) |
|
1017 |
function onSwitch() |
|
10965 | 1018 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1019 |
if(GLOBAL_SWITCH_HOG_IS_ON==false) |
7893 | 1020 |
then |
13364 | 1021 |
if(OPTION_NO_SPECIALS==false and GLOBAL_SELECT_CONTINENT_CHECK==false) |
7893 | 1022 |
then |
13364 | 1023 |
--place mine (australia) |
1024 |
if(GetCurAmmoType() == amBaseballBat) |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1025 |
then |
13364 | 1026 |
if(GLOBAL_AUSTRALIAN_SPECIAL==0) |
1027 |
then |
|
1028 |
GLOBAL_AUSTRALIAN_SPECIAL = 1 |
|
1029 |
AddCaption(GLOBAL_BASEBALLBAT_CRICKET_INFO) |
|
1030 |
elseif(GLOBAL_AUSTRALIAN_SPECIAL==1) |
|
1031 |
then |
|
1032 |
GLOBAL_AUSTRALIAN_SPECIAL = 2 |
|
1033 |
AddCaption(GLOBAL_BASEBALLBAT_BOOMERANG_INFO) |
|
1034 |
else |
|
1035 |
GLOBAL_AUSTRALIAN_SPECIAL = 0 |
|
1036 |
AddCaption(loc("DEFAULT")) |
|
1037 |
end |
|
1038 |
||
1039 |
--Asian special |
|
1040 |
elseif(GLOBAL_PARACHUTE_IS_ON==1) |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1041 |
then |
13364 | 1042 |
asiabomb=AddGear(GetX(CurrentHedgehog), GetY(CurrentHedgehog)+3, gtSnowball, 0, 0, 0, 0) |
1043 |
SetGearMessage(asiabomb, 1) |
|
1044 |
||
1045 |
GLOBAL_PARACHUTE_IS_ON=2 |
|
1046 |
GLOBAL_SELECT_CONTINENT_CHECK=false |
|
1047 |
||
1048 |
--africa |
|
1049 |
elseif(GetCurAmmoType() == amSeduction) |
|
1050 |
then |
|
1051 |
if(GLOBAL_AFRICAN_SPECIAL_SEDUCTION==0) |
|
1052 |
then |
|
1053 |
GLOBAL_AFRICAN_SPECIAL_SEDUCTION = 1 |
|
9805 | 1054 |
|
13364 | 1055 |
AddCaption(string.format(GLOBAL_SEDUCTION_SPECIAL_INFO,GLOBAL_SEDUCTION_INCREASER)) |
1056 |
else |
|
1057 |
GLOBAL_AFRICAN_SPECIAL_SEDUCTION = 0 |
|
1058 |
AddCaption(loc("DEFAULT")) |
|
1059 |
end |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1060 |
|
13364 | 1061 |
--south america |
1062 |
elseif(GetCurAmmoType() == amGasBomb) |
|
1063 |
then |
|
1064 |
if(GLOBAL_SOUTH_AMERICAN_SPECIAL==false) |
|
1065 |
then |
|
1066 |
GLOBAL_SOUTH_AMERICAN_SPECIAL = true |
|
1067 |
AddCaption(GLOBAL_CHEESE_SPECIAL_INFO) |
|
1068 |
else |
|
1069 |
GLOBAL_SOUTH_AMERICAN_SPECIAL = false |
|
1070 |
AddCaption(loc("DEFAULT")) |
|
1071 |
end |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1072 |
|
13364 | 1073 |
--africa |
1074 |
elseif(GetCurAmmoType() == amSMine) |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1075 |
then |
13364 | 1076 |
if(GLOBAL_AFRICAN_SPECIAL_STICKY==0) |
1077 |
then |
|
1078 |
GLOBAL_AFRICAN_SPECIAL_STICKY = 1 |
|
1079 |
AddCaption(GLOBAL_STICKY_PROJECTILE_INFO) |
|
1080 |
elseif(GLOBAL_AFRICAN_SPECIAL_STICKY == 1) |
|
1081 |
then |
|
1082 |
GLOBAL_AFRICAN_SPECIAL_STICKY = 2 |
|
1083 |
AddCaption(GLOBAL_STICKY_NAPALM_INFO) |
|
1084 |
elseif(GLOBAL_AFRICAN_SPECIAL_STICKY == 2) |
|
1085 |
then |
|
1086 |
GLOBAL_AFRICAN_SPECIAL_STICKY = 0 |
|
1087 |
AddCaption(loc("DEFAULT")) |
|
1088 |
end |
|
9805 | 1089 |
|
13364 | 1090 |
--north america (sniper) |
1091 |
elseif(GetCurAmmoType() == amSniperRifle and GLOBAL_NORTH_AMERICAN_SPECIAL_SNIPER_IS_ON==false) |
|
1092 |
then |
|
1093 |
if(GLOBAL_NORTH_AMERICAN_SPECIAL_SNIPER==2) |
|
1094 |
then |
|
1095 |
GLOBAL_NORTH_AMERICAN_SPECIAL_SNIPER = 1 |
|
1096 |
AddCaption(loc("DEFAULT")) |
|
1097 |
elseif(GLOBAL_NORTH_AMERICAN_SPECIAL_SNIPER==1) |
|
1098 |
then |
|
1099 |
GLOBAL_NORTH_AMERICAN_SPECIAL_SNIPER = 2 |
|
1100 |
AddCaption(GLOBAL_SNIPER_SPECIAL_INFO) |
|
1101 |
end |
|
1102 |
||
1103 |
--north america (shotgun) |
|
1104 |
elseif(GetCurAmmoType() == amShotgun) |
|
1105 |
then |
|
1106 |
if(GLOBAL_NORTH_AMERICAN_SPECIAL_SHOTGUN==false) |
|
1107 |
then |
|
1108 |
GLOBAL_NORTH_AMERICAN_SPECIAL_SHOTGUN = true |
|
1109 |
AddCaption(GLOBAL_SHOTGUN_SPECIAL_INFO) |
|
1110 |
else |
|
1111 |
GLOBAL_NORTH_AMERICAN_SPECIAL_SHOTGUN = false |
|
1112 |
AddCaption(loc("DEFAULT")) |
|
1113 |
end |
|
1114 |
||
1115 |
--europe |
|
1116 |
elseif(GetCurAmmoType() == amMolotov) |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1117 |
then |
13364 | 1118 |
if(GLOBAL_EUROPE_SPECIAL==0) |
1119 |
then |
|
1120 |
GLOBAL_EUROPE_SPECIAL = 1 |
|
1121 |
AddCaption(GLOBAL_MOLOTOV_SPECIAL_INFO) |
|
1122 |
else |
|
1123 |
GLOBAL_EUROPE_SPECIAL = 0 |
|
1124 |
AddCaption(loc("DEFAULT")) |
|
1125 |
end |
|
1126 |
||
1127 |
--antarctica |
|
1128 |
elseif(GetCurAmmoType() == amPickHammer) |
|
1129 |
then |
|
1130 |
if(GLOBAL_ANTARCTICA_SPECIAL==0) |
|
1131 |
then |
|
1132 |
GLOBAL_ANTARCTICA_SPECIAL = 1 |
|
1133 |
AddCaption(GLOBAL_PICKHAMMER_SPECIAL_INFO) |
|
1134 |
else |
|
1135 |
GLOBAL_ANTARCTICA_SPECIAL = 0 |
|
1136 |
AddCaption(loc("DEFAULT")) |
|
1137 |
end |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1138 |
|
13364 | 1139 |
--kerguelen |
1140 |
elseif(GetCurAmmoType() == amHammer) |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1141 |
then |
13364 | 1142 |
if(GLOBAL_KERGUELEN_SPECIAL==6) |
1143 |
then |
|
1144 |
GLOBAL_KERGUELEN_SPECIAL = 1 |
|
1145 |
AddCaption("DEFAULT") |
|
1146 |
elseif(GLOBAL_KERGUELEN_SPECIAL==1) |
|
1147 |
then |
|
1148 |
GLOBAL_KERGUELEN_SPECIAL = 2 |
|
1149 |
AddCaption("#"..GLOBAL_HAMMER_ROAR_INFO) |
|
1150 |
elseif(GLOBAL_KERGUELEN_SPECIAL==2) |
|
1151 |
then |
|
1152 |
GLOBAL_KERGUELEN_SPECIAL = 3 |
|
1153 |
AddCaption("##"..GLOBAL_HAMMER_SWAP_INFO) |
|
1154 |
elseif(GLOBAL_KERGUELEN_SPECIAL==3) |
|
1155 |
then |
|
1156 |
GLOBAL_KERGUELEN_SPECIAL = 5 |
|
1157 |
AddCaption("###"..GLOBAL_HAMMER_LONELY_INFO) |
|
1158 |
elseif(GLOBAL_KERGUELEN_SPECIAL==5) |
|
1159 |
then |
|
1160 |
GLOBAL_KERGUELEN_SPECIAL = 6 |
|
1161 |
AddCaption("####"..GLOBAL_HAMMER_SABOTAGE_INFO) |
|
1162 |
end |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1163 |
end |
13364 | 1164 |
end |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1165 |
--for selecting weaponset, this is mostly for old players. |
13364 | 1166 |
if(GetHogLevel(CurrentHedgehog)==0 and GLOBAL_SELECT_CONTINENT_CHECK==true and (GetCurAmmoType() == amSkip or GetCurAmmoType() == amNothing)) |
7893 | 1167 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1168 |
GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]=GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]+1 |
10965 | 1169 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1170 |
if(GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]> table.maxn(GLOBAL_CONTINENT_INFORMATION)) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1171 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1172 |
GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]=1 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1173 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1174 |
SetContinentWeapons() |
7893 | 1175 |
end |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1176 |
--if switching out from sabotage. |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1177 |
elseif(GLOBAL_SABOTAGE_HOGS[CurrentHedgehog]~=nil and GLOBAL_SABOTAGE_HOGS[CurrentHedgehog]==2) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1178 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1179 |
GLOBAL_SABOTAGE_HOGS[CurrentHedgehog]=1 |
7893 | 1180 |
end |
1181 |
end |
|
1182 |
||
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1183 |
function onUp() |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1184 |
--swap forward in the weaponmenu (1.0 style) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1185 |
if(GetHogLevel(CurrentHedgehog)==0 and GLOBAL_SELECT_CONTINENT_CHECK==true and (GetCurAmmoType() == amSkip or GetCurAmmoType() == amNothing)) |
7893 | 1186 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1187 |
GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]=GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]+1 |
10965 | 1188 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1189 |
if(GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]> table.maxn(GLOBAL_CONTINENT_INFORMATION)) |
7893 | 1190 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1191 |
GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]=1 |
7893 | 1192 |
end |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1193 |
SetContinentWeapons() |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1194 |
end |
13364 | 1195 |
|
1196 |
if(GetCurAmmoType() == amSeduction and GLOBAL_AFRICAN_SPECIAL_SEDUCTION == 1 and GetAmmoCount(CurrentHedgehog,amInvulnerable)>0) |
|
1197 |
then |
|
1198 |
GLOBAL_SEDUCTION_INCREASER=GLOBAL_SEDUCTION_INCREASER+7 |
|
1199 |
||
1200 |
RemoveWeapon(CurrentHedgehog,amInvulnerable) |
|
1201 |
||
1202 |
AddCaption(string.format(GLOBAL_INVULNERABLE_SPECIAL_INFO," ("..(GLOBAL_SEDUCTION_INCREASER+15)..")"," ("..GetAmmoCount(CurrentHedgehog,amInvulnerable)..")")) |
|
1203 |
end |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1204 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1205 |
|
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1206 |
function onDown() |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1207 |
--swap backwards in the weaponmenu (1.0 style) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1208 |
if(GetHogLevel(CurrentHedgehog)==0 and GLOBAL_SELECT_CONTINENT_CHECK==true and (GetCurAmmoType() == amSkip or GetCurAmmoType() == amNothing)) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1209 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1210 |
GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]=GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]-1 |
10965 | 1211 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1212 |
if(GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]<=0) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1213 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1214 |
GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]=table.maxn(GLOBAL_CONTINENT_INFORMATION) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1215 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1216 |
SetContinentWeapons() |
7893 | 1217 |
end |
13364 | 1218 |
|
1219 |
if(GetCurAmmoType() == amSeduction and GLOBAL_AFRICAN_SPECIAL_SEDUCTION == 1 and GLOBAL_SEDUCTION_INCREASER>0) |
|
1220 |
then |
|
1221 |
GLOBAL_SEDUCTION_INCREASER=GLOBAL_SEDUCTION_INCREASER-7 |
|
1222 |
||
1223 |
AddAmmo(CurrentHedgehog,amInvulnerable,GetAmmoCount(CurrentHedgehog, amInvulnerable)+1) |
|
1224 |
||
1225 |
AddCaption(string.format(GLOBAL_INVULNERABLE_SPECIAL_INFO," ("..(GLOBAL_SEDUCTION_INCREASER+15)..")"," ("..GetAmmoCount(CurrentHedgehog,amInvulnerable)..")")) |
|
1226 |
end |
|
7893 | 1227 |
end |
1228 |
||
1229 |
function onGameTick20() |
|
8618 | 1230 |
--if you picked a weaponset from the weaponmenu (icon) |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1231 |
if(GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]==0) |
7893 | 1232 |
then |
8618 | 1233 |
if(GetCurAmmoType()==amSwitch) |
7893 | 1234 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1235 |
GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]=GetRandom(table.maxn(GLOBAL_CONTINENT_INFORMATION))+1 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1236 |
SetContinentWeapons() |
8618 | 1237 |
PlaySound(sndMineTick) |
1238 |
else |
|
10965 | 1239 |
for v,w in pairs(GLOBAL_CONTINENT_INFORMATION) |
8618 | 1240 |
do |
13364 | 1241 |
if(GetCurAmmoType()==GLOBAL_CONTINENT_INFORMATION[v][4][1]) |
8618 | 1242 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1243 |
GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]=v |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1244 |
SetContinentWeapons() |
13364 | 1245 |
PlaySound(GLOBAL_CONTINENT_INFORMATION[v][6][1]) |
1246 |
PlaySound(GLOBAL_CONTINENT_INFORMATION[v][6][2],CurrentHedgehog) |
|
8618 | 1247 |
end |
1248 |
end |
|
7893 | 1249 |
end |
1250 |
end |
|
10965 | 1251 |
|
8618 | 1252 |
--show the kerguelen ring |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1253 |
if(GLOBAL_KERGUELEN_SPECIAL > 1 and GetCurAmmoType() == amHammer) |
7893 | 1254 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1255 |
if(GLOBAL_VISUAL_CIRCLE==nil) |
8618 | 1256 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1257 |
GLOBAL_VISUAL_CIRCLE=AddVisualGear(GetX(CurrentHedgehog), GetY(CurrentHedgehog), vgtCircle, 0, true) |
7893 | 1258 |
end |
10965 | 1259 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1260 |
if(GLOBAL_KERGUELEN_SPECIAL == 2) --walrus scream |
7893 | 1261 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1262 |
SetVisualGearValues(GLOBAL_VISUAL_CIRCLE, GetX(CurrentHedgehog), GetY(CurrentHedgehog),20, 200, 0, 0, 100, 120, 4, 0xff0000ee) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1263 |
elseif(GLOBAL_KERGUELEN_SPECIAL == 3) --swap hog |
7893 | 1264 |
then |
13364 | 1265 |
SetVisualGearValues(GLOBAL_VISUAL_CIRCLE, GetX(CurrentHedgehog), GetY(CurrentHedgehog),20, 200, 0, 0, 100, 390, 3, 0xffff00ee) |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1266 |
elseif(GLOBAL_KERGUELEN_SPECIAL == 5) --cries |
8618 | 1267 |
then |
13364 | 1268 |
|
1269 |
GLOBAL_TEMP_VALUE=0 |
|
1270 |
runOnGears(KerguelenSpecialBlueCheck) |
|
1271 |
if(GLOBAL_TEMP_VALUE==0) |
|
1272 |
then |
|
1273 |
SetVisualGearValues(GLOBAL_VISUAL_CIRCLE, GetX(CurrentHedgehog), GetY(CurrentHedgehog),20, 200, 0, 0, 100, 500, 1, 0x0000ffee) |
|
1274 |
else |
|
1275 |
SetVisualGearValues(GLOBAL_VISUAL_CIRCLE, GetX(CurrentHedgehog), GetY(CurrentHedgehog),20, 200, 0, 0, 100, 500, 10, 0x0000ffee) |
|
1276 |
end |
|
1277 |
||
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1278 |
elseif(GLOBAL_KERGUELEN_SPECIAL == 6) --sabotage |
7893 | 1279 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1280 |
SetVisualGearValues(GLOBAL_VISUAL_CIRCLE, GetX(CurrentHedgehog), GetY(CurrentHedgehog),20, 200, 0, 0, 100, 80, 10, 0x00ff00ee) |
7893 | 1281 |
end |
10965 | 1282 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1283 |
elseif(GLOBAL_VISUAL_CIRCLE~=nil) |
7893 | 1284 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1285 |
DeleteVisualGear(GLOBAL_VISUAL_CIRCLE) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1286 |
GLOBAL_VISUAL_CIRCLE=nil |
7893 | 1287 |
end |
10965 | 1288 |
|
8618 | 1289 |
--sabotage |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1290 |
if(GLOBAL_SABOTAGE_HOGS[CurrentHedgehog]~=nil and GLOBAL_SABOTAGE_HOGS[CurrentHedgehog]>=1) |
7893 | 1291 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1292 |
--for sabotage |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1293 |
if(GLOBAL_SABOTAGE_HOGS[CurrentHedgehog]==1) |
7893 | 1294 |
then |
13364 | 1295 |
AddCaption(loc("You are sabotaged, RUN!")) |
1296 |
||
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1297 |
PlaySound(sndHellish) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1298 |
--update the constant at the top also to something in between |
13364 | 1299 |
GLOBAL_SABOTAGE_FREQUENCY=100 |
1300 |
SetGravity(350) |
|
10965 | 1301 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1302 |
GLOBAL_SABOTAGE_HOGS[CurrentHedgehog]=2 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1303 |
end |
10965 | 1304 |
|
13364 | 1305 |
if(GLOBAL_SABOTAGE_COUNTER % 20 == 0) |
7893 | 1306 |
then |
13364 | 1307 |
AddVisualGear(GetX(CurrentHedgehog), GetY(CurrentHedgehog), vgtSmokeWhite, 0, false) |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1308 |
end |
10965 | 1309 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1310 |
if(TurnTimeLeft<(GetAwayTime*10) or band(GetState(CurrentHedgehog),gstAttacked)==1) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1311 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1312 |
GLOBAL_SABOTAGE_HOGS[CurrentHedgehog]=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1313 |
elseif(GLOBAL_SABOTAGE_COUNTER >= GLOBAL_SABOTAGE_FREQUENCY) |
9805 | 1314 |
then |
10965 | 1315 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1316 |
if(GetHealth(CurrentHedgehog)<=2) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1317 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1318 |
SetHealth(CurrentHedgehog, 0) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1319 |
GLOBAL_SABOTAGE_HOGS[CurrentHedgehog]=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1320 |
else |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1321 |
SetHealth(CurrentHedgehog, GetHealth(CurrentHedgehog)-2) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1322 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1323 |
ShowDamageTag(CurrentHedgehog,2) |
10965 | 1324 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1325 |
GLOBAL_SABOTAGE_COUNTER=0 |
7893 | 1326 |
else |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1327 |
GLOBAL_SABOTAGE_COUNTER=GLOBAL_SABOTAGE_COUNTER+1 |
7893 | 1328 |
end |
13364 | 1329 |
elseif(GetGravity()==350 and (GLOBAL_SABOTAGE_HOGS[CurrentHedgehog]==0 or GLOBAL_SABOTAGE_HOGS[CurrentHedgehog]==nil)) |
1330 |
then |
|
1331 |
SetGravity(100) |
|
7893 | 1332 |
end |
10965 | 1333 |
|
13364 | 1334 |
--enable switch (north america) |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1335 |
if(GetCurAmmoType() == amSwitch and GLOBAL_TEMP_VALUE==87) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1336 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1337 |
SetGearMessage(CurrentHedgehog,gmAttack) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1338 |
GLOBAL_TEMP_VALUE=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1339 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1340 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1341 |
|
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1342 |
--some ppl complained :P |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1343 |
function onSlot(slot) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1344 |
if(GLOBAL_TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]==0) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1345 |
then |
12416
edeae7661dca
Lua refactor: Replace ParseCommand('setweap… with SetWeapon
Wuzzy <almikes@aol.com>
parents:
11520
diff
changeset
|
1346 |
SetWeapon(amSkip) |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1347 |
end |
7893 | 1348 |
end |
1349 |
||
1350 |
--if you used hogswitch or any similar weapon, dont enable any weaponchange |
|
1351 |
function onAttack() |
|
13364 | 1352 |
if(GLOBAL_SELECT_CONTINENT_CHECK==true) |
1353 |
then |
|
1354 |
if(GetCurAmmoType() == amSkip or GetCurAmmoType() == amNothing) |
|
1355 |
then |
|
1356 |
GLOBAL_SELECT_CONTINENT_CHECK=false |
|
1357 |
EndTurn(0) |
|
1358 |
else |
|
1359 |
SetWeapon(amSkip) |
|
1360 |
end |
|
1361 |
end |
|
10965 | 1362 |
|
7893 | 1363 |
--african special |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1364 |
if(GLOBAL_AFRICAN_SPECIAL_SEDUCTION == 1 and GetCurAmmoType() == amSeduction and band(GetState(CurrentHedgehog),gstAttacked)==0) |
7893 | 1365 |
then |
13364 | 1366 |
EndTurn(3) |
10965 | 1367 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1368 |
GLOBAL_TEMP_VALUE=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1369 |
runOnGears(AfricaSpecialSeduction) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1370 |
SetHealth(CurrentHedgehog, GetHealth(CurrentHedgehog)+GLOBAL_TEMP_VALUE) |
7893 | 1371 |
|
1372 |
--visual stuff |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1373 |
VisualExplosion(250,GetX(CurrentHedgehog), GetY(CurrentHedgehog),vgtSmoke,vgtSmokeWhite) |
7893 | 1374 |
PlaySound(sndParachute) |
10965 | 1375 |
|
9805 | 1376 |
RemoveWeapon(CurrentHedgehog,amSeduction) |
8618 | 1377 |
|
13364 | 1378 |
elseif(GLOBAL_ANTARCTICA_SPECIAL == 1 and GetCurAmmoType() == amPickHammer and band(GetState(CurrentHedgehog),gstAttacked)==0) |
1379 |
then |
|
1380 |
EndTurn(10) |
|
1381 |
SetGearPosition(CurrentHedgehog,GetX(CurrentHedgehog),0) |
|
1382 |
ParseCommand("hjump") |
|
1383 |
SetGearVelocity(CurrentHedgehog, 0, 100000000) |
|
1384 |
||
1385 |
PlaySound(sndPiano8) |
|
1386 |
||
1387 |
RemoveWeapon(CurrentHedgehog,amPickHammer) |
|
1388 |
||
7893 | 1389 |
--Kerguelen specials |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1390 |
elseif(GetCurAmmoType() == amHammer and GLOBAL_KERGUELEN_SPECIAL > 1 and band(GetState(CurrentHedgehog),gstAttacked)==0) |
7893 | 1391 |
then |
13364 | 1392 |
local escapetime=3 |
1393 |
||
8618 | 1394 |
--scream |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1395 |
if(GLOBAL_KERGUELEN_SPECIAL == 2) |
7893 | 1396 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1397 |
GLOBAL_TEMP_VALUE=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1398 |
runOnGears(KerguelenSpecialRed) |
12945
39b7b3ed619e
Add healing visual effect + heal msg in scripts
Wuzzy <Wuzzy2@mail.ru>
parents:
12906
diff
changeset
|
1399 |
HealHog(CurrentHedgehog, GLOBAL_TEMP_VALUE) |
7893 | 1400 |
PlaySound(sndHellish) |
10965 | 1401 |
|
8618 | 1402 |
--swap |
13364 | 1403 |
elseif(GLOBAL_KERGUELEN_SPECIAL == 3) |
7893 | 1404 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1405 |
GLOBAL_TEMP_VALUE=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1406 |
runOnGears(KerguelenSpecialYellowCountHogs) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1407 |
if(GLOBAL_TEMP_VALUE>0) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1408 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1409 |
GLOBAL_TEMP_VALUE=GetRandom(GLOBAL_TEMP_VALUE) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1410 |
runOnGears(KerguelenSpecialYellowSwap) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1411 |
PlaySound(sndPiano3) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1412 |
else |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1413 |
PlaySound(sndPiano6) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1414 |
end |
10965 | 1415 |
|
8618 | 1416 |
--cries |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1417 |
elseif(GLOBAL_KERGUELEN_SPECIAL == 5) |
7893 | 1418 |
then |
13364 | 1419 |
GLOBAL_TEMP_VALUE=0 |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1420 |
runOnGears(KerguelenSpecialBlueCheck) |
13364 | 1421 |
if(GLOBAL_TEMP_VALUE==0) |
7893 | 1422 |
then |
1423 |
AddGear(0, 0, gtWaterUp, 0, 0,0,0) |
|
1424 |
PlaySound(sndWarp) |
|
1425 |
PlaySound(sndMolotov) |
|
10965 | 1426 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1427 |
runOnGears(KerguelenSpecialBlueActivate) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1428 |
SetHealth(CurrentHedgehog, GetHealth(CurrentHedgehog)+GLOBAL_TEMP_VALUE) |
7893 | 1429 |
else |
1430 |
HogSay(CurrentHedgehog, loc("Hogs in sight!"), SAY_SAY) |
|
1431 |
end |
|
10965 | 1432 |
|
8618 | 1433 |
--sabotage |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1434 |
elseif(GLOBAL_KERGUELEN_SPECIAL == 6) |
7893 | 1435 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1436 |
GLOBAL_TEMP_VALUE=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1437 |
runOnGears(KerguelenSpecialGreen) |
13364 | 1438 |
|
1439 |
PlaySound(sndThrowRelease) |
|
1440 |
AddGear(GetX(CurrentHedgehog), GetY(CurrentHedgehog)-20, gtCluster, 0, 0, -1000000, 32) |
|
1441 |
||
1442 |
if(GLOBAL_TEMP_VALUE==1) |
|
9805 | 1443 |
then |
13364 | 1444 |
escapetime=10 |
9805 | 1445 |
end |
7893 | 1446 |
end |
10965 | 1447 |
|
13364 | 1448 |
EndTurn(escapetime) |
10965 | 1449 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1450 |
DeleteVisualGear(GLOBAL_VISUAL_CIRCLE) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1451 |
GLOBAL_VISUAL_CIRCLE=nil |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1452 |
GLOBAL_KERGUELEN_SPECIAL=0 |
10965 | 1453 |
|
9805 | 1454 |
RemoveWeapon(CurrentHedgehog,amHammer) |
10965 | 1455 |
|
8618 | 1456 |
elseif(GetCurAmmoType() == amVampiric) |
1457 |
then |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1458 |
GLOBAL_VAMPIRIC_IS_ON=75 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1459 |
elseif(GetCurAmmoType() == amExtraDamage) |
7893 | 1460 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1461 |
GLOBAL_EXTRA_DAMAGE_IS_ON=150 |
7893 | 1462 |
end |
1463 |
end |
|
1464 |
||
1465 |
function onGearAdd(gearUid) |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1466 |
GLOBAL_SELECT_CONTINENT_CHECK=false |
10965 | 1467 |
|
8618 | 1468 |
--track the gears im using |
10965 | 1469 |
if(GetGearType(gearUid) == gtHedgehog or GetGearType(gearUid) == gtMine or GetGearType(gearUid) == gtExplosives) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
1470 |
then |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
1471 |
trackGear(gearUid) |
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
1472 |
end |
10965 | 1473 |
|
7893 | 1474 |
--remove gasclouds on gasbombspecial |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1475 |
if(GetGearType(gearUid)==gtPoisonCloud and GLOBAL_SOUTH_AMERICAN_SPECIAL == true) |
7893 | 1476 |
then |
1477 |
DeleteGear(gearUid) |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1478 |
--african special |
7893 | 1479 |
elseif(GetGearType(gearUid)==gtSMine) |
1480 |
then |
|
1481 |
vx,vy=GetGearVelocity(gearUid) |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1482 |
if(GLOBAL_AFRICAN_SPECIAL_STICKY == 1) |
7893 | 1483 |
then |
1484 |
SetState(CurrentHedgehog, gstHHDriven+gstMoving) |
|
1485 |
SetGearPosition(CurrentHedgehog, GetX(CurrentHedgehog),GetY(CurrentHedgehog)-3) |
|
1486 |
SetGearVelocity(CurrentHedgehog, vx, vy) |
|
1487 |
DeleteGear(gearUid) |
|
10965 | 1488 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1489 |
elseif(GLOBAL_AFRICAN_SPECIAL_STICKY == 2) |
7893 | 1490 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1491 |
FireGear(CurrentHedgehog,gtNapalmBomb, vx, vy, 0) |
7893 | 1492 |
DeleteGear(gearUid) |
1493 |
end |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1494 |
--north american special |
7893 | 1495 |
elseif(GetGearType(gearUid)==gtSniperRifleShot) |
1496 |
then |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1497 |
GLOBAL_NORTH_AMERICAN_SPECIAL_SNIPER_IS_ON=true |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1498 |
if(GLOBAL_NORTH_AMERICAN_SPECIAL_SNIPER~=1) |
7893 | 1499 |
then |
1500 |
SetHealth(gearUid, 1) |
|
1501 |
end |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1502 |
--north american special |
7893 | 1503 |
elseif(GetGearType(gearUid)==gtShotgunShot) |
1504 |
then |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1505 |
if(GLOBAL_NORTH_AMERICAN_SPECIAL_SHOTGUN==true) |
7893 | 1506 |
then |
1507 |
AddVisualGear(GetX(gearUid), GetY(gearUid), vgtFeather, 0, false) |
|
1508 |
AddVisualGear(GetX(gearUid), GetY(gearUid), vgtFeather, 0, false) |
|
1509 |
AddVisualGear(GetX(gearUid), GetY(gearUid), vgtFeather, 0, false) |
|
1510 |
PlaySound(sndBirdyLay) |
|
1511 |
end |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1512 |
--european special |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1513 |
elseif(GetGearType(gearUid)==gtMolotov and GLOBAL_EUROPE_SPECIAL==1) |
7893 | 1514 |
then |
1515 |
vx,vy=GetGearVelocity(gearUid) |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1516 |
e_health=FireGear(CurrentHedgehog,gtCluster, vx, vy, 1) |
7893 | 1517 |
SetGearMessage(e_health, 2) |
1518 |
DeleteGear(gearUid) |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1519 |
--australian specials |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1520 |
elseif(GetGearType(gearUid)==gtShover and GLOBAL_AUSTRALIAN_SPECIAL~=0) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1521 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1522 |
GLOBAL_TEMP_VALUE=0 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1523 |
runOnGears(AustraliaSpecialCheckHogs) |
10965 | 1524 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1525 |
if(GLOBAL_TEMP_VALUE==0) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1526 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1527 |
vx,vy=GetGearVelocity(gearUid) |
10965 | 1528 |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1529 |
if(GLOBAL_AUSTRALIAN_SPECIAL==1) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1530 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1531 |
local austmine=FireGear(CurrentHedgehog,gtMine, vx, vy, 0) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1532 |
SetHealth(austmine, 100) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1533 |
SetTimer(austmine, 1000) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1534 |
else |
13364 | 1535 |
local austmine=FireGear(CurrentHedgehog,gtBall, vx, vy, 1) |
1536 |
--SetHealth(austmine, 1) |
|
1537 |
SetTimer(austmine, 1000) |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1538 |
SetGearMessage(austmine, 3) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1539 |
end |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1540 |
else |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1541 |
PlaySound(sndDenied) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1542 |
end |
7893 | 1543 |
elseif(GetGearType(gearUid)==gtParachute) |
1544 |
then |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1545 |
GLOBAL_PARACHUTE_IS_ON=1 |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1546 |
elseif(GetGearType(gearUid)==gtSwitcher) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1547 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1548 |
GLOBAL_SWITCH_HOG_IS_ON=true |
7893 | 1549 |
end |
1550 |
end |
|
1551 |
||
13364 | 1552 |
function onGearDamage(gearUid, damage) |
1553 |
if (GetGearType(gearUid) == gtCase) |
|
1554 |
then |
|
1555 |
GLOBAL_CRATE_TEST=gearUid |
|
1556 |
end |
|
1557 |
||
1558 |
if(gearUid==CurrentHedgehog and GLOBAL_SABOTAGE_HOGS[CurrentHedgehog]==1) |
|
1559 |
then |
|
1560 |
GLOBAL_SABOTAGE_HOGS[CurrentHedgehog]=0 |
|
1561 |
end |
|
1562 |
end |
|
1563 |
||
7893 | 1564 |
function onGearDelete(gearUid) |
1565 |
||
10965 | 1566 |
if(GetGearType(gearUid) == gtHedgehog or GetGearType(gearUid) == gtMine or GetGearType(gearUid) == gtExplosives) |
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
1567 |
then |
13364 | 1568 |
--sundaland special |
1569 |
if(GetGearType(gearUid) == gtHedgehog and GLOBAL_TEAM_CONTINENT[GLOBAL_SUNDALAND_END_HOG_CONTINENT_NAME]==10) |
|
1570 |
then |
|
1571 |
local currvalue=getTeamValue(GLOBAL_SUNDALAND_END_HOG_CONTINENT_NAME, "sundaland-count") |
|
10965 | 1572 |
|
13364 | 1573 |
if(currvalue==nil) |
9805 | 1574 |
then |
13364 | 1575 |
currvalue=0 |
9805 | 1576 |
end |
10965 | 1577 |
|
13364 | 1578 |
setTeamValue(GLOBAL_SUNDALAND_END_HOG_CONTINENT_NAME, "sundaland-count", currvalue+1) |
1579 |
PlaySound(sndReinforce,CurrentHedgehog) |
|
9805 | 1580 |
end |
13364 | 1581 |
|
1582 |
trackDeletion(gearUid) |
|
1583 |
end |
|
1584 |
||
1585 |
--if picking up a health crate |
|
1586 |
if(GLOBAL_SABOTAGE_HOGS[CurrentHedgehog]~=0 and GetGearType(gearUid) == gtCase and GetHealth(gearUid)~=0 and gearUid~=GLOBAL_CRATE_TEST and gearIsInCircle(CurrentHedgehog,GetX(gearUid), GetY(gearUid), 50, false)==true) |
|
1587 |
then |
|
1588 |
GLOBAL_SABOTAGE_HOGS[CurrentHedgehog]=0 |
|
7895
ac1610a7b7fa
apparently an older version was provided earlier and this one is newer and theoretically desync free. untested.
Vatten
parents:
7893
diff
changeset
|
1589 |
end |
10965 | 1590 |
|
8618 | 1591 |
--north american lipstick |
7893 | 1592 |
if(GetGearType(gearUid)==gtSniperRifleShot ) |
1593 |
then |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1594 |
GLOBAL_NORTH_AMERICAN_SPECIAL_SNIPER_IS_ON=false |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1595 |
if(GLOBAL_NORTH_AMERICAN_SPECIAL_SNIPER==2) |
7893 | 1596 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1597 |
GLOBAL_TEMP_VALUE=gearUid |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1598 |
runOnGears(NorthAmericaSpecialSniper) |
7893 | 1599 |
end |
8618 | 1600 |
--north american eagle eye |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1601 |
elseif(GetGearType(gearUid)==gtShotgunShot and GLOBAL_NORTH_AMERICAN_SPECIAL_SHOTGUN==true) |
7893 | 1602 |
then |
1603 |
SetGearPosition(CurrentHedgehog, GetX(gearUid), GetY(gearUid)+7) |
|
1604 |
PlaySound(sndWarp) |
|
1605 |
--south american special |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1606 |
elseif(GetGearType(gearUid)==gtGasBomb and GLOBAL_SOUTH_AMERICAN_SPECIAL == true) |
7893 | 1607 |
then |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1608 |
GLOBAL_TEMP_VALUE=gearUid |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1609 |
runOnGears(SouthAmericaSpecialCheeseExplosion) |
7893 | 1610 |
AddVisualGear(GetX(gearUid), GetY(gearUid), vgtExplosion, 0, false) |
10965 | 1611 |
|
8618 | 1612 |
--asian special |
7893 | 1613 |
elseif(GetGearType(gearUid)==gtSnowball and GetGearMessage(gearUid)==1) |
1614 |
then |
|
8618 | 1615 |
AddGear(GetX(gearUid), GetY(gearUid), gtCluster, 0, 0, 0, 22) |
10965 | 1616 |
|
8618 | 1617 |
--europe special |
7893 | 1618 |
elseif(GetGearType(gearUid)==gtCluster and GetGearMessage(gearUid)==2) |
1619 |
then |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1620 |
GLOBAL_TEMP_VALUE=gearUid |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1621 |
runOnGears(EuropeSpecialMolotovHit) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1622 |
VisualExplosion(100,GetX(gearUid), GetY(gearUid),vgtSmokeWhite,vgtSmokeWhite) |
7893 | 1623 |
AddVisualGear(GetX(gearUid), GetY(gearUid), vgtExplosion, 0, false) |
1624 |
PlaySound(sndGraveImpact) |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1625 |
--australian special |
13364 | 1626 |
elseif(GetGearType(gearUid)==gtBall and GetGearMessage(gearUid)==3) |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1627 |
then |
13364 | 1628 |
SpawnRandomCrate(GetX(gearUid), GetY(gearUid)) |
1629 |
||
8618 | 1630 |
--asia (using para) |
7893 | 1631 |
elseif(GetGearType(gearUid)==gtParachute) |
1632 |
then |
|
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1633 |
GLOBAL_PARACHUTE_IS_ON=false |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1634 |
elseif(GetGearType(gearUid)==gtSwitcher) |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1635 |
then |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1636 |
GLOBAL_SWITCH_HOG_IS_ON=false |
7893 | 1637 |
end |
7936 | 1638 |
end |
10956
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1639 |
|
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1640 |
--[[ |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1641 |
sources (populations & area): |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1642 |
Own calculations from wikipedia. |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1643 |
Some are approximations. |
80c3314f8123
Changed to continental supplies from the DLC, because its better :P
caf2 <florian.evaldsson@telia.com>
parents:
10527
diff
changeset
|
1644 |
]] |
13364 | 1645 |