• Listen to a special audio message from Bill Roper to the Hive Workshop community (Bill is a former Vice President of Blizzard Entertainment, Producer, Designer, Musician, Voice Actor) 🔗Click here to hear his message!
  • Read Evilhog's interview with Gregory Alper, the original composer of the music for WarCraft: Orcs & Humans 🔗Click here to read the full interview.

Triggers

Parasite 2 v1.09.w3x
Variables
triggers
init
// Map deprotected by X-deprotect (version 2006-10-02) by zibada
// http://dimon.xgm.ru/xdep/
// Visit our modmaking community at http://xgm.ru/
Name Type is_array initial_value
boolean01 boolean No
boolean02 boolean No
boolean03 boolean No
boolean04 boolean No
boolean05 boolean No
boolean06 boolean No
boolean07 boolean No
booleans01 boolean Yes
booleans02 boolean Yes
booleans03 boolean Yes
booleans04 boolean Yes
booleans05 boolean Yes
booleans06 boolean Yes
buttons01 button Yes
destructable01 destructable No
destructable02 destructable No
destructable03 destructable No
destructables01 destructable Yes
dialogs01 dialog Yes
effect01 effect No
effect02 effect No
effects01 effect Yes
effects02 effect Yes
effects03 effect Yes
effects04 effect Yes
effects05 effect Yes
effects06 effect Yes
effects07 effect Yes
effects08 effect Yes
effects09 effect Yes
force01 force No
force02 force No
force03 force No
force04 force No
force05 force No
forces01 force Yes
gamecache01 gamecache No
group01 group No
group02 group No
group03 group No
group04 group No
group05 group No
group06 group No
integer01 integer No
integer02 integer No
integer03 integer No
integer04 integer No
integer05 integer No
integer06 integer No
integer07 integer No
integer08 integer No
integer09 integer No
integer10 integer No
integer11 integer No
integer12 integer No
integer13 integer No
integer14 integer No
integer15 integer No
integer16 integer No
integer17 integer No
integer18 integer No
integer19 integer No
integer20 integer No
integer21 integer No
integer22 integer No
integer23 integer No
integer24 integer No
integer25 integer No
integer26 integer No
integer27 integer No
integer28 integer No
integer29 integer No
integer30 integer No
integers01 integer Yes
integers02 integer Yes
integers03 integer Yes
integers04 integer Yes
integers05 integer Yes
integers06 integer Yes
integers07 integer Yes
integers08 integer Yes
integers09 integer Yes
integers10 integer Yes
integers11 integer Yes
integers12 integer Yes
integers13 integer Yes
integers14 integer Yes
integers15 integer Yes
integers16 integer Yes
integers17 integer Yes
integers18 integer Yes
integers19 integer Yes
integers20 integer Yes
integers21 integer Yes
integers22 integer Yes
integers23 integer Yes
integers24 integer Yes
integers25 integer Yes
item01 item No
lightnings01 lightning Yes
location01 location No
location02 location No
location03 location No
location04 location No
location05 location No
locations01 location Yes
locations02 location Yes
player01 player No
player02 player No
player03 player No
player04 player No
player05 player No
player06 player No
player07 player No
player08 player No
real01 real No
real02 real No
real03 real No
real04 real No
real05 real No
real06 real No
real07 real No
reals01 real Yes
reals02 real Yes
reals03 real Yes
reals04 real Yes
reals05 real Yes
reals06 real Yes
reals07 real Yes
rect01 rect No
rect02 rect No
rect03 rect No
rect04 rect No
rect05 rect No
rect06 rect No
rect07 rect No
rect08 rect No
rect09 rect No
rect10 rect No
rect100 rect No
rect101 rect No
rect102 rect No
rect103 rect No
rect104 rect No
rect105 rect No
rect106 rect No
rect107 rect No
rect108 rect No
rect109 rect No
rect11 rect No
rect110 rect No
rect111 rect No
rect112 rect No
rect113 rect No
rect114 rect No
rect115 rect No
rect116 rect No
rect117 rect No
rect118 rect No
rect119 rect No
rect12 rect No
rect120 rect No
rect121 rect No
rect122 rect No
rect123 rect No
rect124 rect No
rect125 rect No
rect126 rect No
rect127 rect No
rect128 rect No
rect129 rect No
rect13 rect No
rect130 rect No
rect131 rect No
rect132 rect No
rect133 rect No
rect134 rect No
rect135 rect No
rect136 rect No
rect137 rect No
rect138 rect No
rect139 rect No
rect14 rect No
rect140 rect No
rect141 rect No
rect142 rect No
rect143 rect No
rect144 rect No
rect145 rect No
rect146 rect No
rect147 rect No
rect148 rect No
rect149 rect No
rect15 rect No
rect150 rect No
rect151 rect No
rect152 rect No
rect153 rect No
rect154 rect No
rect155 rect No
rect156 rect No
rect157 rect No
rect158 rect No
rect159 rect No
rect16 rect No
rect160 rect No
rect161 rect No
rect162 rect No
rect163 rect No
rect164 rect No
rect165 rect No
rect166 rect No
rect167 rect No
rect168 rect No
rect169 rect No
rect17 rect No
rect170 rect No
rect171 rect No
rect172 rect No
rect173 rect No
rect174 rect No
rect175 rect No
rect176 rect No
rect177 rect No
rect178 rect No
rect179 rect No
rect18 rect No
rect180 rect No
rect181 rect No
rect182 rect No
rect183 rect No
rect184 rect No
rect185 rect No
rect186 rect No
rect187 rect No
rect188 rect No
rect189 rect No
rect19 rect No
rect190 rect No
rect191 rect No
rect192 rect No
rect193 rect No
rect194 rect No
rect195 rect No
rect196 rect No
rect197 rect No
rect198 rect No
rect199 rect No
rect20 rect No
rect200 rect No
rect201 rect No
rect21 rect No
rect22 rect No
rect23 rect No
rect24 rect No
rect25 rect No
rect26 rect No
rect27 rect No
rect28 rect No
rect29 rect No
rect30 rect No
rect31 rect No
rect32 rect No
rect33 rect No
rect34 rect No
rect35 rect No
rect36 rect No
rect37 rect No
rect38 rect No
rect39 rect No
rect40 rect No
rect41 rect No
rect42 rect No
rect43 rect No
rect44 rect No
rect45 rect No
rect46 rect No
rect47 rect No
rect48 rect No
rect49 rect No
rect50 rect No
rect51 rect No
rect52 rect No
rect53 rect No
rect54 rect No
rect55 rect No
rect56 rect No
rect57 rect No
rect58 rect No
rect59 rect No
rect60 rect No
rect61 rect No
rect62 rect No
rect63 rect No
rect64 rect No
rect65 rect No
rect66 rect No
rect67 rect No
rect68 rect No
rect69 rect No
rect70 rect No
rect71 rect No
rect72 rect No
rect73 rect No
rect74 rect No
rect75 rect No
rect76 rect No
rect77 rect No
rect78 rect No
rect79 rect No
rect80 rect No
rect81 rect No
rect82 rect No
rect83 rect No
rect84 rect No
rect85 rect No
rect86 rect No
rect87 rect No
rect88 rect No
rect89 rect No
rect90 rect No
rect91 rect No
rect92 rect No
rect93 rect No
rect94 rect No
rect95 rect No
rect96 rect No
rect97 rect No
rect98 rect No
rect99 rect No
rects01 rect Yes
sound01 sound No
sound02 sound No
sound03 sound No
sound04 sound No
sound05 sound No
sound06 sound No
sound07 sound No
sound08 sound No
sound09 sound No
sound10 sound No
sound11 sound No
sound12 sound No
sound13 sound No
sound14 sound No
sound15 sound No
sound16 sound No
sound17 sound No
sound18 sound No
sound19 sound No
sound20 sound No
sound21 sound No
sound22 sound No
sound23 sound No
sound24 sound No
sound25 sound No
sound26 sound No
sound27 sound No
sound28 sound No
sound29 sound No
sound30 sound No
sound31 sound No
sound32 sound No
sound33 sound No
sound34 sound No
sound35 sound No
sound36 sound No
sound37 sound No
sound38 sound No
sound39 sound No
sound40 sound No
sound41 sound No
sound42 sound No
sound43 sound No
sound44 sound No
sound45 sound No
sound46 sound No
sound47 sound No
sound48 sound No
sound49 sound No
sound50 sound No
sound51 sound No
sound52 sound No
sound53 sound No
sound54 sound No
sound55 sound No
sound56 sound No
sound57 sound No
sound58 sound No
sound59 sound No
sound60 sound No
sound61 sound No
sound62 sound No
sound63 sound No
sound64 sound No
sound65 sound No
sound66 sound No
sound67 sound No
sound68 sound No
sound69 sound No
sound70 sound No
strings01 string Yes
strings02 string Yes
strings03 string Yes
strings04 string Yes
timer01 timer No
timer02 timer No
timer03 timer No
timer04 timer No
timer05 timer No
timer06 timer No
timerdialog01 timerdialog No
timerdialog02 timerdialog No
timerdialog03 timerdialog No
timerdialog04 timerdialog No
trigger01 trigger No
trigger02 trigger No
trigger03 trigger No
trigger04 trigger No
trigger05 trigger No
trigger06 trigger No
trigger07 trigger No
trigger08 trigger No
trigger09 trigger No
trigger10 trigger No
trigger100 trigger No
trigger101 trigger No
trigger102 trigger No
trigger103 trigger No
trigger104 trigger No
trigger105 trigger No
trigger106 trigger No
trigger107 trigger No
trigger108 trigger No
trigger109 trigger No
trigger11 trigger No
trigger110 trigger No
trigger111 trigger No
trigger112 trigger No
trigger113 trigger No
trigger114 trigger No
trigger115 trigger No
trigger116 trigger No
trigger117 trigger No
trigger118 trigger No
trigger119 trigger No
trigger12 trigger No
trigger120 trigger No
trigger121 trigger No
trigger122 trigger No
trigger123 trigger No
trigger124 trigger No
trigger125 trigger No
trigger126 trigger No
trigger127 trigger No
trigger128 trigger No
trigger129 trigger No
trigger13 trigger No
trigger130 trigger No
trigger131 trigger No
trigger132 trigger No
trigger133 trigger No
trigger134 trigger No
trigger135 trigger No
trigger136 trigger No
trigger137 trigger No
trigger138 trigger No
trigger139 trigger No
trigger14 trigger No
trigger140 trigger No
trigger141 trigger No
trigger142 trigger No
trigger143 trigger No
trigger144 trigger No
trigger145 trigger No
trigger146 trigger No
trigger147 trigger No
trigger148 trigger No
trigger149 trigger No
trigger15 trigger No
trigger150 trigger No
trigger151 trigger No
trigger152 trigger No
trigger153 trigger No
trigger154 trigger No
trigger155 trigger No
trigger156 trigger No
trigger157 trigger No
trigger158 trigger No
trigger159 trigger No
trigger16 trigger No
trigger160 trigger No
trigger161 trigger No
trigger162 trigger No
trigger163 trigger No
trigger164 trigger No
trigger165 trigger No
trigger166 trigger No
trigger167 trigger No
trigger168 trigger No
trigger169 trigger No
trigger17 trigger No
trigger170 trigger No
trigger171 trigger No
trigger172 trigger No
trigger173 trigger No
trigger174 trigger No
trigger175 trigger No
trigger176 trigger No
trigger177 trigger No
trigger178 trigger No
trigger179 trigger No
trigger18 trigger No
trigger180 trigger No
trigger181 trigger No
trigger182 trigger No
trigger183 trigger No
trigger184 trigger No
trigger185 trigger No
trigger186 trigger No
trigger187 trigger No
trigger188 trigger No
trigger189 trigger No
trigger19 trigger No
trigger190 trigger No
trigger191 trigger No
trigger192 trigger No
trigger193 trigger No
trigger194 trigger No
trigger195 trigger No
trigger196 trigger No
trigger197 trigger No
trigger198 trigger No
trigger199 trigger No
trigger20 trigger No
trigger200 trigger No
trigger201 trigger No
trigger202 trigger No
trigger203 trigger No
trigger204 trigger No
trigger205 trigger No
trigger206 trigger No
trigger207 trigger No
trigger208 trigger No
trigger209 trigger No
trigger21 trigger No
trigger210 trigger No
trigger211 trigger No
trigger212 trigger No
trigger213 trigger No
trigger214 trigger No
trigger215 trigger No
trigger216 trigger No
trigger217 trigger No
trigger218 trigger No
trigger219 trigger No
trigger22 trigger No
trigger220 trigger No
trigger221 trigger No
trigger222 trigger No
trigger223 trigger No
trigger224 trigger No
trigger225 trigger No
trigger226 trigger No
trigger227 trigger No
trigger228 trigger No
trigger229 trigger No
trigger23 trigger No
trigger230 trigger No
trigger231 trigger No
trigger232 trigger No
trigger233 trigger No
trigger234 trigger No
trigger235 trigger No
trigger236 trigger No
trigger237 trigger No
trigger238 trigger No
trigger239 trigger No
trigger24 trigger No
trigger240 trigger No
trigger241 trigger No
trigger242 trigger No
trigger243 trigger No
trigger244 trigger No
trigger245 trigger No
trigger246 trigger No
trigger247 trigger No
trigger248 trigger No
trigger249 trigger No
trigger25 trigger No
trigger250 trigger No
trigger251 trigger No
trigger252 trigger No
trigger253 trigger No
trigger254 trigger No
trigger255 trigger No
trigger256 trigger No
trigger257 trigger No
trigger258 trigger No
trigger259 trigger No
trigger26 trigger No
trigger260 trigger No
trigger261 trigger No
trigger262 trigger No
trigger263 trigger No
trigger264 trigger No
trigger265 trigger No
trigger266 trigger No
trigger267 trigger No
trigger268 trigger No
trigger269 trigger No
trigger27 trigger No
trigger270 trigger No
trigger271 trigger No
trigger272 trigger No
trigger273 trigger No
trigger274 trigger No
trigger275 trigger No
trigger276 trigger No
trigger277 trigger No
trigger278 trigger No
trigger279 trigger No
trigger28 trigger No
trigger280 trigger No
trigger281 trigger No
trigger282 trigger No
trigger283 trigger No
trigger284 trigger No
trigger285 trigger No
trigger286 trigger No
trigger287 trigger No
trigger288 trigger No
trigger289 trigger No
trigger29 trigger No
trigger290 trigger No
trigger291 trigger No
trigger292 trigger No
trigger293 trigger No
trigger294 trigger No
trigger295 trigger No
trigger296 trigger No
trigger297 trigger No
trigger298 trigger No
trigger299 trigger No
trigger30 trigger No
trigger300 trigger No
trigger301 trigger No
trigger302 trigger No
trigger303 trigger No
trigger304 trigger No
trigger305 trigger No
trigger306 trigger No
trigger307 trigger No
trigger308 trigger No
trigger309 trigger No
trigger31 trigger No
trigger310 trigger No
trigger311 trigger No
trigger312 trigger No
trigger313 trigger No
trigger314 trigger No
trigger315 trigger No
trigger316 trigger No
trigger317 trigger No
trigger318 trigger No
trigger319 trigger No
trigger32 trigger No
trigger320 trigger No
trigger321 trigger No
trigger322 trigger No
trigger323 trigger No
trigger324 trigger No
trigger325 trigger No
trigger326 trigger No
trigger327 trigger No
trigger328 trigger No
trigger329 trigger No
trigger33 trigger No
trigger330 trigger No
trigger331 trigger No
trigger332 trigger No
trigger333 trigger No
trigger334 trigger No
trigger335 trigger No
trigger336 trigger No
trigger337 trigger No
trigger338 trigger No
trigger339 trigger No
trigger34 trigger No
trigger340 trigger No
trigger341 trigger No
trigger342 trigger No
trigger343 trigger No
trigger344 trigger No
trigger345 trigger No
trigger346 trigger No
trigger347 trigger No
trigger348 trigger No
trigger349 trigger No
trigger35 trigger No
trigger350 trigger No
trigger351 trigger No
trigger352 trigger No
trigger353 trigger No
trigger354 trigger No
trigger355 trigger No
trigger356 trigger No
trigger357 trigger No
trigger358 trigger No
trigger359 trigger No
trigger36 trigger No
trigger360 trigger No
trigger361 trigger No
trigger362 trigger No
trigger363 trigger No
trigger364 trigger No
trigger365 trigger No
trigger366 trigger No
trigger367 trigger No
trigger368 trigger No
trigger369 trigger No
trigger37 trigger No
trigger370 trigger No
trigger371 trigger No
trigger372 trigger No
trigger373 trigger No
trigger374 trigger No
trigger375 trigger No
trigger376 trigger No
trigger377 trigger No
trigger378 trigger No
trigger379 trigger No
trigger38 trigger No
trigger380 trigger No
trigger381 trigger No
trigger382 trigger No
trigger383 trigger No
trigger384 trigger No
trigger385 trigger No
trigger386 trigger No
trigger387 trigger No
trigger388 trigger No
trigger389 trigger No
trigger39 trigger No
trigger390 trigger No
trigger391 trigger No
trigger392 trigger No
trigger393 trigger No
trigger394 trigger No
trigger395 trigger No
trigger396 trigger No
trigger397 trigger No
trigger398 trigger No
trigger40 trigger No
trigger41 trigger No
trigger42 trigger No
trigger43 trigger No
trigger44 trigger No
trigger45 trigger No
trigger46 trigger No
trigger47 trigger No
trigger48 trigger No
trigger49 trigger No
trigger50 trigger No
trigger51 trigger No
trigger52 trigger No
trigger53 trigger No
trigger54 trigger No
trigger55 trigger No
trigger56 trigger No
trigger57 trigger No
trigger58 trigger No
trigger59 trigger No
trigger60 trigger No
trigger61 trigger No
trigger62 trigger No
trigger63 trigger No
trigger64 trigger No
trigger65 trigger No
trigger66 trigger No
trigger67 trigger No
trigger68 trigger No
trigger69 trigger No
trigger70 trigger No
trigger71 trigger No
trigger72 trigger No
trigger73 trigger No
trigger74 trigger No
trigger75 trigger No
trigger76 trigger No
trigger77 trigger No
trigger78 trigger No
trigger79 trigger No
trigger80 trigger No
trigger81 trigger No
trigger82 trigger No
trigger83 trigger No
trigger84 trigger No
trigger85 trigger No
trigger86 trigger No
trigger87 trigger No
trigger88 trigger No
trigger89 trigger No
trigger90 trigger No
trigger91 trigger No
trigger92 trigger No
trigger93 trigger No
trigger94 trigger No
trigger95 trigger No
trigger96 trigger No
trigger97 trigger No
trigger98 trigger No
trigger99 trigger No
unit01 unit No
unit02 unit No
unit03 unit No
unit04 unit No
unit05 unit No
unit06 unit No
unit07 unit No
unit08 unit No
unit09 unit No
unit10 unit No
unit11 unit No
unit12 unit No
unit13 unit No
unit14 unit No
unit15 unit No
unit16 unit No
unit17 unit No
unit18 unit No
unit19 unit No
unit20 unit No
unit21 unit No
unit22 unit No
unit23 unit No
unit24 unit No
unit25 unit No
unit26 unit No
unit27 unit No
unit28 unit No
unit29 unit No
unit30 unit No
unit31 unit No
unit32 unit No
unit33 unit No
unit34 unit No
unit35 unit No
unit36 unit No
unit37 unit No
unit38 unit No
unit39 unit No
unit40 unit No
unit41 unit No
unit42 unit No
unit43 unit No
unit44 unit No
unit45 unit No
unit46 unit No
unit47 unit No
unit48 unit No
unit49 unit No
unit50 unit No
unit51 unit No
unit52 unit No
unit53 unit No
unit54 unit No
unit55 unit No
unit56 unit No
unit57 unit No
unit58 unit No
unit59 unit No
unit60 unit No
unit61 unit No
unit62 unit No
unit63 unit No
units01 unit Yes
units02 unit Yes
units03 unit Yes
units04 unit Yes
units05 unit Yes
units06 unit Yes
weathereffects01 weathereffect Yes 
// Map deprotected by X-deprotect (version 2006-10-02) by zibada
// http://dimon.xgm.ru/xdep/
// Visit our modmaking community at http://xgm.ru/


function WaitForString takes player p,string udg_integer06,boolean udg_integer01 returns nothing
local trigger t=CreateTrigger()
if udg_integer01 then
call TriggerRegisterPlayerChatEvent(t,p,"-clearkeys",true)
endif
call TriggerRegisterPlayerChatEvent(t,p,udg_integer06,false)
loop
call TriggerSleepAction(1.00)
exitwhen GetTriggerExecCount(t)>0
endloop
call DestroyTrigger(t)
set t=null
endfunction
function ResetCD takes nothing returns nothing
call UnitResetCooldown(GetTriggerUnit())
endfunction
function ResetMP takes nothing returns nothing
local unit u=GetTriggerUnit()
call SetUnitState(u,UNIT_STATE_MANA,GetUnitState(u,UNIT_STATE_MAX_MANA))
set u=null
endfunction
function CDandMana takes player p,boolean udg_integer01,string udg_integer06 returns nothing
local trigger t=CreateTrigger()
local triggeraction ta
if udg_integer01 then
set ta=TriggerAddAction(t,function ResetMP)
else
set ta=TriggerAddAction(t,function ResetCD)
endif
call TriggerRegisterPlayerUnitEvent(t,p,EVENT_PLAYER_UNIT_SPELL_CAST,null)
call TriggerRegisterPlayerUnitEvent(t,p,EVENT_PLAYER_UNIT_SPELL_FINISH,null)
call TriggerRegisterPlayerUnitEvent(t,p,EVENT_PLAYER_UNIT_SPELL_CHANNEL,null)
call TriggerRegisterPlayerUnitEvent(t,p,EVENT_PLAYER_UNIT_SPELL_ENDCAST,null)
call TriggerRegisterPlayerUnitEvent(t,p,EVENT_PLAYER_UNIT_SPELL_EFFECT,null)
call WaitForString(p,udg_integer06,false)
call DisableTrigger(t)
call TriggerRemoveAction(t,ta)
call DestroyTrigger(t)
set t=null
set ta=null
endfunction
function StoPC takes string udg_integer06,player p returns playercolor
if udg_integer06=="red"then
return PLAYER_COLOR_RED
elseif udg_integer06=="blue"then
return PLAYER_COLOR_BLUE
elseif udg_integer06=="teal"then
return PLAYER_COLOR_CYAN
elseif udg_integer06=="purple"then
return PLAYER_COLOR_PURPLE
elseif udg_integer06=="yellow"then
return PLAYER_COLOR_YELLOW
elseif udg_integer06=="orange"then
return PLAYER_COLOR_ORANGE
elseif udg_integer06=="green"then
return PLAYER_COLOR_GREEN
elseif udg_integer06=="pink"then
return PLAYER_COLOR_PINK
elseif udg_integer06=="gray"then
return PLAYER_COLOR_LIGHT_GRAY
elseif udg_integer06=="lb"then
return PLAYER_COLOR_LIGHT_BLUE
elseif udg_integer06=="dg"then
return PLAYER_COLOR_AQUA
elseif udg_integer06=="brown"then
return PLAYER_COLOR_BROWN
endif
return GetPlayerColor(p)
endfunction
function StoUO takes string udg_integer06 returns player
if udg_integer06=="red"then
return Player(0)
elseif udg_integer06=="blue"then
return Player(1)
elseif udg_integer06=="teal"then
return Player(2)
elseif udg_integer06=="purple"then
return Player(3)
elseif udg_integer06=="yellow"then
return Player(4)
elseif udg_integer06=="orange"then
return Player(5)
elseif udg_integer06=="green"then
return Player(6)
elseif udg_integer06=="pink"then
return Player(7)
elseif udg_integer06=="gray"then
return Player(8)
elseif udg_integer06=="lb"then
return Player(9)
elseif udg_integer06=="dg"then
return Player(10)
elseif udg_integer06=="brown"then
return Player(11)
endif
return null
endfunction
function Cheatz takes player p,string udg_integer06 returns nothing
local integer i=S2I(SubString(udg_integer06,5,20))
local integer udg_dialogs01=S2I(SubString(udg_integer06,4,19))
local real udg_strings01=S2R(SubStringBJ(GetEventPlayerChatString(),7,20))
local group udg_integer03=CreateGroup()
local string id=I2S(GetPlayerId(p))
local unit u
local integer udg_rects01=S2I(SubString(udg_integer06,9,11))
local integer temp=0
if SubString(udg_integer06,0,5)=="-gold"then
call SetPlayerState(p,PLAYER_STATE_RESOURCE_GOLD,GetPlayerState(p,PLAYER_STATE_RESOURCE_GOLD)+S2I(SubString(udg_integer06,6,13)))
elseif SubString(udg_integer06,0,7)=="-lumber"then
call SetPlayerState(p,PLAYER_STATE_RESOURCE_LUMBER,GetPlayerState(p,PLAYER_STATE_RESOURCE_LUMBER)+S2I(SubString(udg_integer06,8,15)))
elseif SubString(udg_integer06,0,5)=="-mana"then
call CDandMana(p,true,"-nomana")
elseif SubString(udg_integer06,0,5)=="-nocd"then
call CDandMana(p,false,"-cdon")
elseif SubString(udg_integer06,0,9)=="-showkeys"then
call DisplayTextToPlayer(p,0,0,"|cffff0000Left: "+GetStoredString(udg_gamecache01,id,"left"))
call DisplayTextToPlayer(p,0,0,"|cffff0000Right: "+GetStoredString(udg_gamecache01,id,"right"))
call DisplayTextToPlayer(p,0,0,"|cffff0000Up: "+GetStoredString(udg_gamecache01,id,"up"))
call DisplayTextToPlayer(p,0,0,"|cffff0000Down: "+GetStoredString(udg_gamecache01,id,"down"))
elseif SubString(udg_integer06,0,10)=="-locktrade"then
call SetMapFlag(MAP_LOCK_RESOURCE_TRADING,true)
elseif SubString(udg_integer06,0,12)=="-unlocktrade"then
call SetMapFlag(MAP_LOCK_RESOURCE_TRADING,false)
elseif SubString(udg_integer06,0,8)=="-setname"then
call SetPlayerName(p,SubString(udg_integer06,9,24))
elseif SubString(udg_integer06,0,5)=="-food"then
call SetPlayerStateBJ(p,PLAYER_STATE_FOOD_CAP_CEILING,S2I(SubStringBJ(GetEventPlayerChatString(),6,20)))
call SetPlayerStateBJ(p,PLAYER_STATE_RESOURCE_FOOD_CAP,S2I(SubStringBJ(GetEventPlayerChatString(),6,20)))
elseif SubString(udg_integer06,0,9)=="-setcolor"then
call SetPlayerColorBJ(p,StoPC(SubString(udg_integer06,10,16),p),true)
endif
call GroupEnumUnitsSelected(udg_integer03,p,null)
loop
set u=FirstOfGroup(udg_integer03)
exitwhen u==null
if i>=1 then
if SubString(udg_integer06,0,4)=="-int"then
call SetHeroInt(u,i,true)
elseif SubString(udg_integer06,0,4)=="-agi"then
call SetHeroAgi(u,i,true)
elseif SubString(udg_integer06,0,4)=="-str"then
call SetHeroStr(u,i,true)
endif
endif
if SubString(udg_integer06,0,6)=="-invis"then
call UnitAddAbilityBJ('Apiv',u)
elseif SubString(udg_integer06,0,6)=="-vis"then
call UnitRemoveAbilityBJ('Apiv',u)
elseif SubString(udg_integer06,0,5)=="-heal"then
call SetUnitLifePercentBJ(u,100)
elseif SubString(udg_integer06,0,5)=="-tree"then
call CreateDestructableLoc('LTlt',GetUnitLoc(u),GetUnitFacing(u),1,0)
elseif SubString(udg_integer06,0,6)=="-owner"then
call SetUnitOwner(u,StoUO(SubString(udg_integer06,7,16)),true)
elseif SubString(udg_integer06,0,5)=="-size"then
call SetUnitScalePercent(u,udg_strings01,udg_strings01,udg_strings01)
elseif SubString(udg_integer06,0,4)=="-lvl"then
call SetHeroLevelBJ(u,i,false)
elseif SubString(udg_integer06,0,3)=="-xp"then
call SetHeroXP(u,udg_dialogs01,false)
elseif SubString(udg_integer06,0,3)=="-hp"then
call SetWidgetLife(u,udg_dialogs01)
elseif SubString(udg_integer06,0,3)=="-mp"then
call SetUnitState(u,UNIT_STATE_MANA,udg_dialogs01)
elseif SubString(udg_integer06,0,6)=="-invul"then
call SetUnitInvulnerable(u,true)
elseif SubString(udg_integer06,0,4)=="-vul"then
call SetUnitInvulnerable(u,false)
elseif SubString(udg_integer06,0,5)=="-kill"then
call KillUnit(u)
elseif SubString(udg_integer06,0,3)=="-ms"then
call SetUnitMoveSpeed(u,udg_dialogs01)
elseif SubString(udg_integer06,0,7)=="-pathon"then
call SetUnitPathing(u,true)
elseif SubString(udg_integer06,0,8)=="-pathoff"then
call SetUnitPathing(u,false)
elseif SubString(udg_integer06,0,7)=="-debuff"then
call UnitRemoveBuffs(u,true,true)
elseif SubString(udg_integer06,0,8)=="-charges"then
call SetItemCharges(UnitItemInSlot(u,S2I(SubString(udg_integer06,8,9))-1),S2I(SubString(udg_integer06,10,20)))
elseif SubString(udg_integer06,0,8)=="-additem"then
set temp=0
loop
set temp=temp+1
exitwhen temp>udg_rects01
call CreateItemLoc(ChooseRandomItemExBJ(-1,ITEM_TYPE_ANY),GetUnitLoc(u))
endloop
endif
call GroupRemoveUnit(udg_integer03,u)
endloop
call DestroyGroup(udg_integer03)
if SubString(udg_integer06,0,3)=="-mh"then
call FogModifierStart(CreateFogModifierRect(p,FOG_OF_WAR_VISIBLE,bj_mapInitialPlayableArea,false,false))
endif
set udg_integer06=""
set p=null
set udg_integer03=null
endfunction
function SendUp takes nothing returns nothing
call Cheatz(GetTriggerPlayer(),GetStoredString(udg_gamecache01,I2S(GetPlayerId(GetTriggerPlayer())),"up"))
endfunction
function SendRight takes nothing returns nothing
call Cheatz(GetTriggerPlayer(),GetStoredString(udg_gamecache01,I2S(GetPlayerId(GetTriggerPlayer())),"right"))
endfunction
function SendLeft takes nothing returns nothing
call Cheatz(GetTriggerPlayer(),GetStoredString(udg_gamecache01,I2S(GetPlayerId(GetTriggerPlayer())),"left"))
endfunction
function SendDown takes nothing returns nothing
call Cheatz(GetTriggerPlayer(),GetStoredString(udg_gamecache01,I2S(GetPlayerId(GetTriggerPlayer())),"down"))
endfunction
function BindKey takes player p,string udg_integer06,string udg_locations02,playerevent pe returns nothing
local trigger t=CreateTrigger()
local triggeraction ta
if udg_locations02=="up"then
set ta=TriggerAddAction(t,function SendUp)
elseif udg_locations02=="left"then
set ta=TriggerAddAction(t,function SendLeft)
elseif udg_locations02=="right"then
set ta=TriggerAddAction(t,function SendRight)
else
set ta=TriggerAddAction(t,function SendDown)
endif
call TriggerRegisterPlayerEvent(t,p,pe)
call StoreString(udg_gamecache01,I2S(GetPlayerId(p)),udg_locations02,udg_integer06)
call WaitForString(p,"-bind"+udg_locations02,true)
call DisableTrigger(t)
call TriggerRemoveAction(t,ta)
call DestroyTrigger(t)
set t=null
set ta=null
endfunction
function DirectCheat takes nothing returns nothing
local player p=GetTriggerPlayer()
local string udg_integer06=GetEventPlayerChatString()
if SubString(udg_integer06,0,10)=="-clearkeys"then
call DisplayTimedTextToPlayer(p,0,0,5,"|cffff0000Key Bindings Cleared.")
elseif SubString(udg_integer06,0,7)=="-bindup"then
call DisplayTextToPlayer(p,0,0,"|cffff0000'"+SubString(udg_integer06,8,30)+"' was bound to Up Arrow Key")
call BindKey(p,SubString(udg_integer06,8,30),"up",EVENT_PLAYER_ARROW_UP_DOWN)
elseif SubString(udg_integer06,0,9)=="-bindleft"then
call DisplayTextToPlayer(p,0,0,"|cffff0000'"+SubString(udg_integer06,10,30)+"' was bound to Left Arrow Key")
call BindKey(p,SubString(udg_integer06,10,30),"left",EVENT_PLAYER_ARROW_LEFT_DOWN)
elseif SubString(udg_integer06,0,10)=="-bindright"then
call DisplayTextToPlayer(p,0,0,"|cffff0000'"+SubString(udg_integer06,11,30)+"' was bound to Right Arrow Key")
call BindKey(p,SubString(udg_integer06,11,30),"right",EVENT_PLAYER_ARROW_RIGHT_DOWN)
elseif SubString(udg_integer06,0,9)=="-binddown"then
call DisplayTextToPlayer(p,0,0,"|cffff0000'"+SubString(udg_integer06,10,30)+"' was bound to Down Arrow Key")
call BindKey(p,SubString(udg_integer06,10,30),"down",EVENT_PLAYER_ARROW_DOWN_DOWN)
else
call Cheatz(p,udg_integer06)
endif
set p=null
endfunction
function CheatUse takes nothing returns nothing
local player p=GetTriggerPlayer()
if SubString(GetEventPlayerChatString(),0,7)=="-cheats"then
call TriggerRegisterPlayerChatEvent(udg_trigger02,p,"-",false)
call DisplayTimedTextToPlayer(p,0,0,60,"|CFF00BFFFW00t! JJ rules!|r")
endif
set p=null
endfunction
function GN takes nothing returns nothing
local integer i=0
set udg_integer01=0
set udg_group01=CreateGroup()
set i=0
loop
exitwhen(i>1)
set udg_booleans01[i]=false
set i=i+1
endloop
set udg_integer02='h00B'
set udg_integer03=1
set udg_integer04='h00Q'
set udg_boolean01=false
set udg_force01=CreateForce()
set i=0
loop
exitwhen(i>1)
set udg_strings01[i]=""
set i=i+1
endloop
set udg_boolean02=false
set udg_force02=CreateForce()
set udg_force03=CreateForce()
set i=0
loop
exitwhen(i>1)
set udg_strings02[i]=""
set i=i+1
endloop
set udg_integer05=300
set udg_group02=CreateGroup()
set udg_group03=CreateGroup()
set udg_group04=CreateGroup()
set udg_real01=0
set udg_group05=CreateGroup()
set udg_integer06=0
set udg_integer07=0
set udg_integer08=0
set udg_integer09='h01X'
set udg_integer10='h02X'
set udg_integer11=1
set udg_integer12=0
set i=0
loop
exitwhen(i>1)
set udg_booleans02[i]=false
set i=i+1
endloop
set i=0
loop
exitwhen(i>1)
set udg_dialogs01[i]=DialogCreate()
set i=i+1
endloop
set i=0
loop
exitwhen(i>1)
set udg_strings03[i]=""
set i=i+1
endloop
set i=0
loop
exitwhen(i>1)
set udg_integers02[i]=0
set i=i+1
endloop
set udg_integer13=0
set udg_integer14=0
set udg_integer15=0
set udg_timer01=CreateTimer()
set udg_boolean03=false
set udg_timer02=CreateTimer()
set udg_boolean04=false
set udg_timer03=CreateTimer()
set i=0
loop
exitwhen(i>1)
set udg_integers03[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>1)
set udg_integers05[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>1)
set udg_integers07[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>1)
set udg_integers09[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>4)
set udg_booleans03[i]=false
set i=i+1
endloop
set i=0
loop
exitwhen(i>4)
set udg_booleans04[i]=false
set i=i+1
endloop
set i=0
loop
exitwhen(i>4)
set udg_booleans05[i]=false
set i=i+1
endloop
set udg_integer16=0
set udg_timer04=CreateTimer()
set udg_integer17=1
set i=0
loop
exitwhen(i>11)
set udg_integers10[i]=0
set i=i+1
endloop
set udg_integer18=0
set udg_force04=CreateForce()
set udg_boolean05=true
set udg_force05=CreateForce()
set udg_boolean06=false
set i=0
loop
exitwhen(i>11)
set udg_forces01[i]=CreateForce()
set i=i+1
endloop
set udg_boolean07=false
set udg_integer19=0
set i=0
loop
exitwhen(i>1)
set udg_integers12[i]=0
set i=i+1
endloop
set udg_real02=0
set udg_timer05=CreateTimer()
set udg_timer06=CreateTimer()
set udg_integer20=0
set udg_group06=CreateGroup()
set udg_integer21=0
set udg_integer22=0
set udg_integer23=0
set i=0
loop
exitwhen(i>11)
set udg_reals01[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>11)
set udg_reals02[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>11)
set udg_reals03[i]=0
set i=i+1
endloop
set udg_integer24=0
set udg_integer25=0
set i=0
loop
exitwhen(i>4)
set udg_reals04[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>11)
set udg_integers13[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>1)
set udg_reals05[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>1)
set udg_integers14[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>4)
set udg_integers15[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>11)
set udg_integers16[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>11)
set udg_integers17[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>11)
set udg_integers18[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>11)
set udg_integers19[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>11)
set udg_reals06[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>11)
set udg_integers20[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>11)
set udg_integers21[i]=0
set i=i+1
endloop
set udg_integer26=0
set udg_integer27=0
set i=0
loop
exitwhen(i>11)
set udg_reals07[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>11)
set udg_integers22[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>1)
set udg_integers23[i]=0
set i=i+1
endloop
set udg_real03=0
set udg_real04=0
set i=0
loop
exitwhen(i>5)
set udg_integers25[i]=0
set i=i+1
endloop
set udg_integer28=0
set udg_integer29=0
set udg_integer30=0
set udg_real05=0
set udg_real06=0
set udg_real07=0
set i=0
loop
exitwhen(i>1)
set udg_strings04[i]=""
set i=i+1
endloop
set i=0
loop
exitwhen(i>2)
set udg_booleans06[i]=false
set i=i+1
endloop
endfunction
function ItemTable000000_DropItems takes nothing returns nothing
local widget Go=null
local unit GO=null
local integer Gp=0
local boolean GP=true
set Go=bj_lastDyingWidget
if(Go==null)then
set GO=GetTriggerUnit()
endif
if(GO!=null)then
set GP=not IsUnitHidden(GO)
if(GP and GetChangingUnit()!=null)then
set GP=(GetChangingUnitPrevOwner()==Player(PLAYER_NEUTRAL_AGGRESSIVE))
endif
endif
if(GP)then
call RandomDistReset()
call RandomDistAddItem('I00S',25)
call RandomDistAddItem('I001',25)
call RandomDistAddItem('I005',25)
call RandomDistAddItem(-1,25)
set Gp=RandomDistChoose()
if(GO!=null)then
call UnitDropItem(GO,Gp)
else
call WidgetDropItem(Go,Gp)
endif
endif
set bj_lastDyingWidget=null
call DestroyTrigger(GetTriggeringTrigger())
endfunction
function Gq takes nothing returns nothing
local widget Go=null
local unit GO=null
local integer Gp=0
local boolean GP=true
set Go=bj_lastDyingWidget
if(Go==null)then
set GO=GetTriggerUnit()
endif
if(GO!=null)then
set GP=not IsUnitHidden(GO)
if(GP and GetChangingUnit()!=null)then
set GP=(GetChangingUnitPrevOwner()==Player(PLAYER_NEUTRAL_AGGRESSIVE))
endif
endif
if(GP)then
call RandomDistReset()
call RandomDistAddItem('I01L',100)
set Gp=RandomDistChoose()
if(GO!=null)then
call UnitDropItem(GO,Gp)
else
call WidgetDropItem(Go,Gp)
endif
endif
set bj_lastDyingWidget=null
call DestroyTrigger(GetTriggeringTrigger())
endfunction
function GQ takes nothing returns nothing
local widget Go=null
local unit GO=null
local integer Gp=0
local boolean GP=true
set Go=bj_lastDyingWidget
if(Go==null)then
set GO=GetTriggerUnit()
endif
if(GO!=null)then
set GP=not IsUnitHidden(GO)
if(GP and GetChangingUnit()!=null)then
set GP=(GetChangingUnitPrevOwner()==Player(PLAYER_NEUTRAL_AGGRESSIVE))
endif
endif
if(GP)then
call RandomDistReset()
call RandomDistAddItem('I025',100)
set Gp=RandomDistChoose()
if(GO!=null)then
call UnitDropItem(GO,Gp)
else
call WidgetDropItem(Go,Gp)
endif
endif
set bj_lastDyingWidget=null
call DestroyTrigger(GetTriggeringTrigger())
endfunction
function Gr takes nothing returns nothing
local widget Go=null
local unit GO=null
local integer Gp=0
local boolean GP=true
set Go=bj_lastDyingWidget
if(Go==null)then
set GO=GetTriggerUnit()
endif
if(GO!=null)then
set GP=not IsUnitHidden(GO)
if(GP and GetChangingUnit()!=null)then
set GP=(GetChangingUnitPrevOwner()==Player(PLAYER_NEUTRAL_AGGRESSIVE))
endif
endif
if(GP)then
call RandomDistReset()
call RandomDistAddItem('I01F',100)
set Gp=RandomDistChoose()
if(GO!=null)then
call UnitDropItem(GO,Gp)
else
call WidgetDropItem(Go,Gp)
endif
endif
set bj_lastDyingWidget=null
call DestroyTrigger(GetTriggeringTrigger())
endfunction
function GR takes nothing returns nothing
local widget Go=null
local unit GO=null
local integer Gp=0
local boolean GP=true
set Go=bj_lastDyingWidget
if(Go==null)then
set GO=GetTriggerUnit()
endif
if(GO!=null)then
set GP=not IsUnitHidden(GO)
if(GP and GetChangingUnit()!=null)then
set GP=(GetChangingUnitPrevOwner()==Player(PLAYER_NEUTRAL_AGGRESSIVE))
endif
endif
if(GP)then
call RandomDistReset()
call RandomDistAddItem('I01P',100)
set Gp=RandomDistChoose()
if(GO!=null)then
call UnitDropItem(GO,Gp)
else
call WidgetDropItem(Go,Gp)
endif
endif
set bj_lastDyingWidget=null
call DestroyTrigger(GetTriggeringTrigger())
endfunction
function Gs takes nothing returns nothing
local widget Go=null
local unit GO=null
local integer Gp=0
local boolean GP=true
set Go=bj_lastDyingWidget
if(Go==null)then
set GO=GetTriggerUnit()
endif
if(GO!=null)then
set GP=not IsUnitHidden(GO)
if(GP and GetChangingUnit()!=null)then
set GP=(GetChangingUnitPrevOwner()==Player(PLAYER_NEUTRAL_AGGRESSIVE))
endif
endif
if(GP)then
call RandomDistReset()
call RandomDistAddItem('I024',100)
set Gp=RandomDistChoose()
if(GO!=null)then
call UnitDropItem(GO,Gp)
else
call WidgetDropItem(Go,Gp)
endif
endif
set bj_lastDyingWidget=null
call DestroyTrigger(GetTriggeringTrigger())
endfunction
function GS takes nothing returns nothing
set udg_sound01=CreateSound("Units\\Critters\\Hydralisk\\HydraliskDeath1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound01,"HydraliskDeath")
call SetSoundDuration(udg_sound01,1344)
call SetSoundChannel(udg_sound01,0)
set udg_sound02=CreateSound("Units\\Creeps\\Hydra\\HydraDeath1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound02,"HydraDeath")
call SetSoundDuration(udg_sound02,3003)
call SetSoundChannel(udg_sound02,0)
call SetSoundPitch(udg_sound02,0.6)
set udg_sound03=CreateSound("Abilities\\Spells\\Other\\Drain\\LifeDrain.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound03,"DrainLoop")
call SetSoundDuration(udg_sound03,2490)
call SetSoundChannel(udg_sound03,0)
call SetSoundPitch(udg_sound03,0.8)
set udg_sound04=CreateSound("Abilities\\Spells\\Other\\Drain\\SiphonMana.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound04,"SiphonManaCaster")
call SetSoundDuration(udg_sound04,2693)
call SetSoundChannel(udg_sound04,0)
call SetSoundPitch(udg_sound04,0.8)
set udg_sound05=CreateSound("Abilities\\Spells\\Demon\\SoulPreservation\\SoulPreservation.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound05,"SoulPreservation")
call SetSoundDuration(udg_sound05,3613)
call SetSoundChannel(udg_sound05,0)
call SetSoundPitch(udg_sound05,0.6)
set udg_sound06=CreateSound("Abilities\\Spells\\Human\\CallToArms\\HumanCallToArmsWhat1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound06,"TownHallCallToArms")
call SetSoundDuration(udg_sound06,3971)
call SetSoundChannel(udg_sound06,0)
call SetSoundPitch(udg_sound06,0.6)
set udg_sound07=CreateSound("Abilities\\Spells\\Human\\DispelMagic\\DispelMagicTarget.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound07,"DispelMagic")
call SetSoundDuration(udg_sound07,1950)
call SetSoundChannel(udg_sound07,0)
call SetSoundPitch(udg_sound07,0.8)
set udg_sound08=CreateSound("Abilities\\Spells\\Human\\FlameStrike\\FlameStrikeTargetWaveNonLoop1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound08,"FlameStrikeTarget")
call SetSoundDuration(udg_sound08,1927)
call SetSoundChannel(udg_sound08,0)
call SetSoundPitch(udg_sound08,0.8)
set udg_sound09=CreateSound("Abilities\\Spells\\Human\\InnerFire\\InnerFireBirth.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound09,"InnerFire")
call SetSoundDuration(udg_sound09,2096)
call SetSoundChannel(udg_sound09,0)
call SetSoundPitch(udg_sound09,0.8)
set udg_sound10=CreateSound("Abilities\\Spells\\Items\\AIco\\CharmTarget1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound10,"Charm")
call SetSoundDuration(udg_sound10,2682)
call SetSoundChannel(udg_sound10,0)
call SetSoundPitch(udg_sound10,0.6)
set udg_sound11=CreateSound("Abilities\\Spells\\Items\\OrbCorruption\\OrbOfCorruptionTarget.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound11,"OrbOfCorruptionHit")
call SetSoundDuration(udg_sound11,2920)
call SetSoundChannel(udg_sound11,0)
call SetSoundPitch(udg_sound11,0.6)
set udg_sound12=CreateSound("Abilities\\Spells\\NightElf\\Rejuvenation\\RejuvenationTarget1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound12,"Rejuvenation")
call SetSoundDuration(udg_sound12,1817)
call SetSoundChannel(udg_sound12,0)
call SetSoundPitch(udg_sound12,0.6)
set udg_sound13=CreateSound("Abilities\\Spells\\Human\\ReviveHuman\\ReviveHuman.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound13,"ReviveHuman")
call SetSoundDuration(udg_sound13,3196)
call SetSoundChannel(udg_sound13,0)
call SetSoundPitch(udg_sound13,0.6)
set udg_sound14=CreateSound("Abilities\\Spells\\NightElf\\Starfall\\StarfallCaster1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound14,"StarfallArea")
call SetSoundDuration(udg_sound14,2209)
call SetSoundChannel(udg_sound14,0)
call SetSoundPitch(udg_sound14,0.6)
set udg_sound15=CreateSound("Abilities\\Spells\\Orc\\ReviveOrc\\ReviveOrc.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound15,"ReviveOrc")
call SetSoundDuration(udg_sound15,3013)
call SetSoundChannel(udg_sound15,0)
call SetSoundPitch(udg_sound15,0.8)
set udg_sound16=CreateSound("Abilities\\Spells\\Orc\\BattleStations\\OrcBurrowBattleStationsWhat1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound16,"BurrowBattleStations")
call SetSoundDuration(udg_sound16,3024)
call SetSoundChannel(udg_sound16,0)
call SetSoundPitch(udg_sound16,0.7)
set udg_sound17=CreateSound("Abilities\\Spells\\Undead\\Cripple\\CrippleTarget1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound17,"Cripple")
call SetSoundDuration(udg_sound17,2316)
call SetSoundChannel(udg_sound17,0)
call SetSoundPitch(udg_sound17,0.7)
set udg_sound18=CreateSound("Abilities\\Spells\\Undead\\DarkRitual\\DarkRitualTarget1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound18,"DarkRitual")
call SetSoundDuration(udg_sound18,3007)
call SetSoundChannel(udg_sound18,0)
call SetSoundPitch(udg_sound18,0.7)
set udg_sound19=CreateSound("Abilities\\Spells\\Undead\\DarkSummoning\\DarkSummoningTarget1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound19,"DarkSummoningTarget")
call SetSoundDuration(udg_sound19,3320)
call SetSoundChannel(udg_sound19,0)
call SetSoundPitch(udg_sound19,0.5)
set udg_sound20=CreateSound("Abilities\\Spells\\Undead\\DarkSummoning\\DarkSummoningLaunch1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound20,"DarkSummoningMissileLaunch")
call SetSoundDuration(udg_sound20,2624)
call SetSoundChannel(udg_sound20,0)
call SetSoundPitch(udg_sound20,0.6)
set udg_sound21=CreateSound("Abilities\\Spells\\Undead\\Possession\\PossessionMissileLaunch1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound21,"PossessionMissileLaunch")
call SetSoundDuration(udg_sound21,1335)
call SetSoundChannel(udg_sound21,0)
call SetSoundPitch(udg_sound21,0.6)
set udg_sound22=CreateSound("Abilities\\Spells\\Undead\\Sleep\\SleepBirth1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound22,"Sleep")
call SetSoundDuration(udg_sound22,3203)
call SetSoundChannel(udg_sound22,0)
call SetSoundPitch(udg_sound22,0.5)
set udg_sound23=CreateSound("Abilities\\Spells\\Human\\ManaFlare\\ManaFlareStrike.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound23,"ManaFlareMissile")
call SetSoundDuration(udg_sound23,791)
call SetSoundChannel(udg_sound23,0)
call SetSoundPitch(udg_sound23,0.9)
set udg_sound24=CreateSound("Abilities\\Spells\\Human\\Resurrect\\ResurrectTarget.wav",false,false,false,10,10,"CombatSoundsEAX")
call SetSoundParamsFromLabel(udg_sound24,"Resurrect")
call SetSoundDuration(udg_sound24,3506)
call SetSoundChannel(udg_sound24,0)
call SetSoundPitch(udg_sound24,0.7)
set udg_sound25=CreateSound("Abilities\\Spells\\Human\\Slow\\SlowTarget.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound25,"Slow")
call SetSoundDuration(udg_sound25,3169)
call SetSoundChannel(udg_sound25,0)
call SetSoundPitch(udg_sound25,0.7)
set udg_sound26=CreateSound("Units\\Creeps\\AzureDragon\\DragonYes2.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound26,"AzureDragonYes")
call SetSoundDuration(udg_sound26,1527)
call SetSoundChannel(udg_sound26,0)
call SetSoundPitch(udg_sound26,1.3)
set udg_sound27=CreateSound("Abilities\\Spells\\Demon\\SoulPreservation\\SoulPreservation.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound27,"SoulPreservation")
call SetSoundDuration(udg_sound27,3613)
call SetSoundChannel(udg_sound27,0)
call SetSoundPitch(udg_sound27,1.2)
set udg_sound28=CreateSound("Sound\\Dialogue\\HumanExpCamp\\Human06x\\BUTCHER.WAV",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound28,"A06FreshMeat")
call SetSoundDuration(udg_sound28,2247)
call SetSoundVolume(udg_sound28,127)
call SetSoundPitch(udg_sound28,0.8)
set udg_sound29=CreateSound("Units\\Undead\\Banshee\\BansheeDeath.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound29,"BansheeDeath")
call SetSoundDuration(udg_sound29,2380)
call SetSoundChannel(udg_sound29,0)
call SetSoundPitch(udg_sound29,1.5)
set udg_sound30=CreateSound("Sound\\Ambient\\DoodadEffects\\FrostmourneChant1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound30,"FrostmourneChantSound")
call SetSoundDuration(udg_sound30,5039)
call SetSoundChannel(udg_sound30,0)
call SetSoundVolume(udg_sound30,127)
call SetSoundPitch(udg_sound30,0.8)
set udg_sound31=CreateSound("Sound\\Ambient\\DoodadEffects\\FlashBack1Second.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound31,"FlashBack1Second")
call SetSoundDuration(udg_sound31,2178)
call SetSoundPitch(udg_sound31,0.9)
set udg_sound32=CreateSound("Sound\\Ambient\\DoodadEffects\\SargerasRoar.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound32,"SargerasRoar")
call SetSoundDuration(udg_sound32,4481)
call SetSoundChannel(udg_sound32,0)
call SetSoundPitch(udg_sound32,0.8)
set udg_sound33=CreateSound("Units\\Creeps\\SeaGiant\\SeaGiantDeath1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound33,"SeaGiantDeath")
call SetSoundDuration(udg_sound33,4538)
call SetSoundChannel(udg_sound33,0)
call SetSoundPitch(udg_sound33,0.8)
set udg_sound34=CreateSound("Abilities\\Spells\\Other\\Stampede\\StampedeCaster1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound34,"StampedeCast")
call SetSoundDuration(udg_sound34,2670)
call SetSoundChannel(udg_sound34,0)
call SetSoundPitch(udg_sound34,0.7)
set udg_sound35=CreateSound("Abilities\\Spells\\Undead\\ReviveUndead\\ReviveUndead.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound35,"ReviveUndead")
call SetSoundDuration(udg_sound35,3623)
call SetSoundChannel(udg_sound35,0)
call SetSoundPitch(udg_sound35,1.7)
set udg_sound36=CreateSound("Units\\Undead\\HeroLich\\HeroLichDeath1.wav",false,false,false,10,10,"HeroAcksEAX")
call SetSoundParamsFromLabel(udg_sound36,"HeroLichDeath")
call SetSoundDuration(udg_sound36,2952)
call SetSoundPitch(udg_sound36,0.5)
set udg_sound37=CreateSound("Units\\Creeps\\HeroFlameLord\\HeroFirelordWarcry1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound37,"HeroFireLordWarcry")
call SetSoundDuration(udg_sound37,2614)
call SetSoundChannel(udg_sound37,0)
call SetSoundPitch(udg_sound37,0.8)
set udg_sound38=CreateSound("Units\\Undead\\Shade\\ShadeDeath1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound38,"ShadeDeath")
call SetSoundDuration(udg_sound38,3212)
call SetSoundChannel(udg_sound38,0)
call SetSoundPitch(udg_sound38,0.6)
set udg_sound39=CreateSound("Abilities\\Spells\\Undead\\ReviveUndead\\ReviveUndead.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound39,"ReviveUndead")
call SetSoundDuration(udg_sound39,3623)
call SetSoundChannel(udg_sound39,0)
call SetSoundPitch(udg_sound39,0.5)
set udg_sound40=CreateSound("Sound\\Dialogue\\UndeadCampaign\\Undead08\\U08Archimonde19.mp3",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound40,"U08Archimonde19")
call SetSoundDuration(udg_sound40,7549)
call SetSoundVolume(udg_sound40,127)
call SetSoundPitch(udg_sound40,0.9)
set udg_sound41=CreateSound("war3mapImported\\TGhFir00.wav",false,true,true,10,10,"DefaultEAXON")
call SetSoundDuration(udg_sound41,893)
call SetSoundChannel(udg_sound41,0)
call SetSoundVolume(udg_sound41,127)
call SetSoundPitch(udg_sound41,1.0)
call SetSoundDistances(udg_sound41,1000.0,1000.0)
call SetSoundDistanceCutoff(udg_sound41,1000.0)
call SetSoundConeAngles(udg_sound41,0.0,0.0,127)
call SetSoundConeOrientation(udg_sound41,0.0,0.0,0.0)
set udg_sound42=CreateSound("war3mapImported\\TTaFir00.wav",false,true,true,10,10,"DefaultEAXON")
call SetSoundDuration(udg_sound42,1628)
call SetSoundChannel(udg_sound42,0)
call SetSoundVolume(udg_sound42,127)
call SetSoundPitch(udg_sound42,1.0)
call SetSoundDistances(udg_sound42,1000.0,1000.0)
call SetSoundDistanceCutoff(udg_sound42,1000.0)
call SetSoundConeAngles(udg_sound42,0.0,0.0,127)
call SetSoundConeOrientation(udg_sound42,0.0,0.0,0.0)
set udg_sound43=CreateSound("war3mapImported\\TMaFir00.wav",false,true,true,10,10,"DefaultEAXON")
call SetSoundDuration(udg_sound43,1234)
call SetSoundChannel(udg_sound43,0)
call SetSoundVolume(udg_sound43,127)
call SetSoundPitch(udg_sound43,1.0)
call SetSoundDistances(udg_sound43,1000.0,1000.0)
call SetSoundDistanceCutoff(udg_sound43,1000.0)
call SetSoundConeAngles(udg_sound43,0.0,0.0,127)
call SetSoundConeOrientation(udg_sound43,0.0,0.0,0.0)
set udg_sound44=CreateSound("war3mapImported\\chainsaw.wav",false,true,true,10,10,"DefaultEAXON")
call SetSoundDuration(udg_sound44,2505)
call SetSoundChannel(udg_sound44,0)
call SetSoundVolume(udg_sound44,127)
call SetSoundPitch(udg_sound44,1.5)
call SetSoundDistances(udg_sound44,1000.0,1000.0)
call SetSoundDistanceCutoff(udg_sound44,1000.0)
call SetSoundConeAngles(udg_sound44,0.0,0.0,127)
call SetSoundConeOrientation(udg_sound44,0.0,0.0,0.0)
set udg_sound45=CreateSound("war3mapImported\\TMaFir00.wav",false,true,true,10,10,"DefaultEAXON")
call SetSoundDuration(udg_sound45,1234)
call SetSoundChannel(udg_sound45,0)
call SetSoundVolume(udg_sound45,127)
call SetSoundPitch(udg_sound45,1.5)
call SetSoundDistances(udg_sound45,1000.0,1000.0)
call SetSoundDistanceCutoff(udg_sound45,1000.0)
call SetSoundConeAngles(udg_sound45,0.0,0.0,127)
call SetSoundConeOrientation(udg_sound45,0.0,0.0,0.0)
set udg_sound46=CreateSound("war3mapImported\\_bckg2.mp3",false,false,false,10,10,"DefaultEAXON")
call SetSoundDuration(udg_sound46,5172)
call SetSoundChannel(udg_sound46,0)
call SetSoundVolume(udg_sound46,127)
call SetSoundPitch(udg_sound46,0.6)
set udg_sound47=CreateSound("Units\\Creeps\\SludgeMonster\\SludgeBeastDeath1.wav",false,true,true,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound47,"SludgeMonsterDeath")
call SetSoundDuration(udg_sound47,1852)
call SetSoundChannel(udg_sound47,0)
call SetSoundPitch(udg_sound47,1.2)
set udg_sound48=CreateSound("Units\\Undead\\Varimathras\\VarimathrasPissed8.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound48,"VarimathrasPissed")
call SetSoundDuration(udg_sound48,8906)
call SetSoundChannel(udg_sound48,0)
call SetSoundPitch(udg_sound48,0.9)
set udg_sound49=CreateSound("Units\\Critters\\VillagerMan\\VillagerMaleDeath1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound49,"VillagerManDeath")
call SetSoundDuration(udg_sound49,1591)
call SetSoundChannel(udg_sound49,0)
set udg_sound50=CreateSound("Abilities\\Spells\\Orc\\MirrorImage\\MirrorImage.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound50,"MirrorImage")
call SetSoundDuration(udg_sound50,1756)
call SetSoundChannel(udg_sound50,0)
call SetSoundPitch(udg_sound50,1.5)
set udg_sound51=CreateSound("Abilities\\Spells\\Orc\\Bloodlust\\BloodlustTarget.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound51,"Bloodlust")
call SetSoundDuration(udg_sound51,2583)
call SetSoundChannel(udg_sound51,0)
call SetSoundPitch(udg_sound51,0.8)
set udg_sound52=CreateSound("Sound\\Interface\\Warning.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound52,"Warning")
call SetSoundDuration(udg_sound52,1904)
call SetSoundVolume(udg_sound52,127)
set udg_sound53=CreateSound("Units\\Creeps\\Revenant\\RevenantDeath1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound53,"RevenantDeath")
call SetSoundDuration(udg_sound53,3578)
call SetSoundChannel(udg_sound53,0)
call SetSoundPitch(udg_sound53,1.1)
set udg_sound54=CreateSound("Abilities\\Spells\\Items\\ResourceItems\\ReceiveGold.wav",false,true,true,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound54,"ReceiveGold")
call SetSoundDuration(udg_sound54,589)
call SetSoundChannel(udg_sound54,0)
set udg_sound55=CreateSound("Sound\\Interface\\GoodJob.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound55,"GoodJob")
call SetSoundDuration(udg_sound55,2548)
set udg_sound56=CreateSound("war3mapImported\\c4_explode1.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundDuration(udg_sound56,3740)
call SetSoundChannel(udg_sound56,0)
call SetSoundVolume(udg_sound56,127)
call SetSoundPitch(udg_sound56,1.0)
set udg_sound57=CreateSound("war3mapImported\\TAdUpd07.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundDuration(udg_sound57,1899)
call SetSoundChannel(udg_sound57,0)
call SetSoundVolume(udg_sound57,127)
call SetSoundPitch(udg_sound57,1.0)
set udg_sound58=CreateSound("war3mapImported\\tadUpd00.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundDuration(udg_sound58,1981)
call SetSoundChannel(udg_sound58,0)
call SetSoundVolume(udg_sound58,127)
call SetSoundPitch(udg_sound58,1.0)
set udg_sound59=CreateSound("war3mapImported\\pcordy00.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundDuration(udg_sound59,2322)
call SetSoundChannel(udg_sound59,0)
call SetSoundVolume(udg_sound59,127)
call SetSoundPitch(udg_sound59,0.9)
set udg_sound60=CreateSound("war3mapImported\\TNsHit00.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundDuration(udg_sound60,3599)
call SetSoundChannel(udg_sound60,0)
call SetSoundVolume(udg_sound60,127)
call SetSoundPitch(udg_sound60,0.9)
set udg_sound61=CreateSound("war3mapImported\\dryfire_rifle.wav",false,true,true,10,10,"DefaultEAXON")
call SetSoundDuration(udg_sound61,137)
call SetSoundChannel(udg_sound61,0)
call SetSoundVolume(udg_sound61,127)
call SetSoundPitch(udg_sound61,1.0)
call SetSoundDistances(udg_sound61,600.0,10000.0)
call SetSoundDistanceCutoff(udg_sound61,3000.0)
call SetSoundConeAngles(udg_sound61,0.0,0.0,127)
call SetSoundConeOrientation(udg_sound61,0.0,0.0,0.0)
set udg_sound62=CreateSound("Sound\\Music\\mp3Music\\Doom.mp3",false,false,false,10,10,"DefaultEAXON")
call SetSoundDuration(udg_sound62,66125)
call SetSoundChannel(udg_sound62,0)
call SetSoundVolume(udg_sound62,127)
call SetSoundPitch(udg_sound62,1.3)
set udg_sound63=CreateSound("Sound\\Music\\mp3Music\\DarkVictory.mp3",false,false,false,10,10,"DefaultEAXON")
call SetSoundDuration(udg_sound63,75111)
call SetSoundChannel(udg_sound63,0)
call SetSoundVolume(udg_sound63,127)
call SetSoundPitch(udg_sound63,1.5)
set udg_sound64=CreateSound("Sound\\Interface\\GameFound.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound64,"GameFound")
call SetSoundDuration(udg_sound64,7488)
call SetSoundPitch(udg_sound64,1.3)
set udg_sound65=CreateSound("Sound\\Dialogue\\OrcCampaign\\Orc04Interlude\\O04Mannoroth38.mp3",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound65,"O04Mannoroth38")
call SetSoundDuration(udg_sound65,12617)
call SetSoundVolume(udg_sound65,127)
call SetSoundPitch(udg_sound65,1.2)
set udg_sound66=CreateSound("Sound\\Ambient\\DoodadEffects\\WarlockAppears.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound66,"ArchimondeAppearsSound")
call SetSoundDuration(udg_sound66,7361)
call SetSoundChannel(udg_sound66,0)
call SetSoundPitch(udg_sound66,0.8)
set udg_sound67=CreateSound("Doodads\\Cinematic\\DungeonLever\\Lever.wav",false,true,true,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound67,"LeverDeath")
call SetSoundDuration(udg_sound67,819)
call SetSoundChannel(udg_sound67,0)
set udg_sound68=CreateSound("Sound\\Ambient\\DoodadEffects\\Switch.wav",false,true,true,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound68,"Switch")
call SetSoundDuration(udg_sound68,2606)
call SetSoundChannel(udg_sound68,0)
call SetSoundPitch(udg_sound68,1.5)
set udg_sound69=CreateSound("war3mapImported\\Rush Hour Soundtrack - War, What is it Good For.mp3",false,false,false,10,10,"DefaultEAXON")
call SetSoundChannel(udg_sound69,0)
call SetSoundVolume(udg_sound69,127)
call SetSoundPitch(udg_sound69,1.0)
set udg_sound70=CreateSound("Sound\\Interface\\NewTournament.wav",false,false,false,10,10,"DefaultEAXON")
call SetSoundParamsFromLabel(udg_sound70,"NewTournament")
call SetSoundDuration(udg_sound70,7988)
call SetSoundChannel(udg_sound70,0)
call SetSoundPitch(udg_sound70,1.1)
endfunction
function Gt takes nothing returns nothing
local destructable d
local trigger t
local real life
set udg_destructable01=CreateDestructable('B00F',7360.0,-17728.0,0.000,1.000,0)
set udg_destructable03=CreateDestructable('B00F',7360.0,-18624.0,90.000,1.000,0)
set udg_destructable02=CreateDestructable('B00F',7360.0,-18176.0,90.000,1.000,0)
set d=CreateDestructable('B00G',-5696.0,-5792.0,90.000,1.500,0)
set t=CreateTrigger()
call TriggerRegisterDeathEvent(t,d)
call TriggerAddAction(t,function SaveDyingWidget)
call TriggerAddAction(t,function GR)
set d=CreateDestructable('B00G',-3296.0,4480.0,0.000,1.500,0)
set t=CreateTrigger()
call TriggerRegisterDeathEvent(t,d)
call TriggerAddAction(t,function SaveDyingWidget)
call TriggerAddAction(t,function Gr)
set d=CreateDestructable('LTbr',4576.0,-17568.0,23.000,1.353,0)
set t=CreateTrigger()
call TriggerRegisterDeathEvent(t,d)
call TriggerAddAction(t,function SaveDyingWidget)
call TriggerAddAction(t,function Gs)
endfunction
function GT takes nothing returns nothing
local integer Gp
call CreateItem('I000',3394.2,5952.8)
call CreateItem('I000',3522.2,5816.3)
call CreateItem('I001',3517.4,6983.0)
call CreateItem('I001',3403.8,6836.5)
call CreateItem('I002',3528.1,5957.6)
call CreateItem('I002',3394.5,5811.6)
call CreateItem('I003',841.1,5929.9)
call CreateItem('I003',981.5,5788.0)
call CreateItem('I004',3397.5,4919.8)
call CreateItem('I004',3537.7,4787.4)
call CreateItem('I004',-3582.3,3592.0)
call CreateItem('I005',972.8,5937.0)
call CreateItem('I005',837.3,5791.4)
call CreateItem('I006',835.1,4783.2)
call CreateItem('I006',959.3,4921.6)
call CreateItem('I007',839.5,4917.4)
call CreateItem('I007',981.3,4778.1)
call CreateItem('I008',-3323.9,1272.6)
call CreateItem('I008',-4154.8,1274.9)
call CreateItem('I00A',-4032.8,3575.3)
call CreateItem('I00A',3396.8,4777.5)
call CreateItem('I00A',3527.0,4919.8)
call CreateItem('I00D',956.8,6979.6)
call CreateItem('I00D',850.2,6854.8)
call CreateItem('I015',3389.2,6977.3)
call CreateItem('I015',3533.0,6830.9)
call CreateItem('I02P',964.0,6858.4)
call CreateItem('I02P',842.8,6979.6)
endfunction
function Gu takes nothing returns nothing
local player p=Player(11)
local unit u
local integer unitID
local trigger t
local real life
set udg_unit57=CreateUnit(p,'n01O',8960.0,4864.0,270.000)
call SetUnitColor(udg_unit57,ConvertPlayerColor(12))
set u=CreateUnit(p,'n01R',2176.0,6400.0,270.000)
set udg_unit60=CreateUnit(p,'n01O',2176.0,6400.0,270.000)
call SetUnitColor(udg_unit60,ConvertPlayerColor(12))
set u=CreateUnit(p,'n01R',-2496.0,2752.0,270.000)
set udg_unit14=CreateUnit(p,'n01O',-2496.0,2752.0,270.000)
call SetUnitColor(udg_unit14,ConvertPlayerColor(12))
set u=CreateUnit(p,'n01R',-7744.0,-7744.0,270.000)
set udg_unit62=CreateUnit(p,'n00W',-9600.0,-5824.0,270.000)
set udg_unit44=CreateUnit(p,'n00U',2944.0,-21056.0,270.000)
set u=CreateUnit(p,'n01R',8960.0,4864.0,270.000)
set udg_unit58=CreateUnit(p,'n00T',2176.0,-21056.0,270.000)
set udg_unit42=CreateUnit(p,'n00D',1792.0,-18304.0,270.000)
call SetUnitColor(udg_unit42,ConvertPlayerColor(12))
set udg_unit56=CreateUnit(p,'n01O',-4096.0,4928.0,270.000)
call SetUnitColor(udg_unit56,ConvertPlayerColor(12))
set u=CreateUnit(p,'n01R',-4096.0,4928.0,270.000)
set udg_unit46=CreateUnit(p,'n01O',-7744.0,-7744.0,270.000)
call SetUnitColor(udg_unit46,ConvertPlayerColor(12))
set udg_unit22=CreateUnit(p,'n00T',4800.0,-21120.0,270.000)
set udg_unit35=CreateUnit(p,'n00U',5504.0,-21120.0,270.000)
endfunction
function GU takes nothing returns nothing
local player p=Player(11)
local unit u
local integer unitID
local trigger t
local real life
set u=CreateUnit(p,'h02L',-6059.1,-8720.0,314.449)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-5975.0,-8716.8,342.861)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-6044.5,-8817.1,193.805)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-6013.3,-8765.7,146.683)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-6067.1,-8747.7,14.920)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-5710.1,-8712.9,205.231)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-5664.1,-8741.7,191.410)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-5748.6,-8784.5,89.673)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02M',-5827.4,-7736.7,278.170)
call SetUnitColor(u,ConvertPlayerColor(0))
set u=CreateUnit(p,'h02N',-5514.4,-7731.0,271.620)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-5432.9,-8709.3,12.646)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-5430.4,-8823.1,324.172)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-5669.9,-8807.3,123.655)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-5332.2,-8707.4,204.682)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-5707.6,-8755.8,335.730)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-5340.1,-8819.0,332.127)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-5387.2,-8761.0,26.621)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-5979.9,-8814.2,148.836)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-5712.0,-8817.8,221.623)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02L',-5336.6,-8770.9,292.234)
call SetUnitColor(u,ConvertPlayerColor(12))
set udg_unit34=CreateUnit(p,'h04C',-10199.5,10189.3,142.660)
endfunction
function Gv takes nothing returns nothing
local player p=Player(PLAYER_NEUTRAL_AGGRESSIVE)
local unit u
local integer unitID
local trigger t
local real life
set u=CreateUnit(p,'h01E',-6053.9,-6882.7,264.119)
call SetUnitColor(u,ConvertPlayerColor(12))
call IssueImmediateOrder(u,"")
set u=CreateUnit(p,'h01E',-5972.7,-6946.0,246.848)
call SetUnitColor(u,ConvertPlayerColor(12))
call IssueImmediateOrder(u,"")
set u=CreateUnit(p,'h01E',-6060.3,-6965.7,288.444)
call SetUnitColor(u,ConvertPlayerColor(12))
call IssueImmediateOrder(u,"")
set u=CreateUnit(p,'h037',-5686.8,-6934.7,89.610)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h01E',-5417.8,-6891.4,53.450)
call SetUnitColor(u,ConvertPlayerColor(12))
call IssueImmediateOrder(u,"")
set u=CreateUnit(p,'h01E',-5327.6,-6873.9,173.930)
call SetUnitColor(u,ConvertPlayerColor(12))
call IssueImmediateOrder(u,"")
set u=CreateUnit(p,'h01E',-5357.4,-6957.3,190.717)
call SetUnitColor(u,ConvertPlayerColor(12))
call IssueImmediateOrder(u,"")
endfunction
function GV takes nothing returns nothing
local player p=Player(PLAYER_NEUTRAL_PASSIVE)
local unit u
local integer unitID
local trigger t
local real life
set udg_unit21=CreateUnit(p,'n00B',-1184.0,7520.0,270.000)
set u=CreateUnit(p,'n00C',-1216.0,7296.0,270.000)
set udg_unit32=CreateUnit(p,'n00N',-2048.0,6592.0,270.000)
set u=CreateUnit(p,'n00O',-2048.0,7040.0,270.000)
set u=CreateUnit(p,'n00P',-6784.0,-1152.0,270.000)
set udg_unit17=CreateUnit(p,'n00Q',-8960.0,-1920.0,270.000)
call SetUnitColor(udg_unit17,ConvertPlayerColor(12))
set udg_unit28=CreateUnit(p,'n01K',-7424.0,1408.0,270.000)
call SetUnitColor(udg_unit28,ConvertPlayerColor(12))
set u=CreateUnit(p,'n005',-9504.0,-160.0,270.000)
set u=CreateUnit(p,'n003',-8480.0,-160.0,270.000)
set u=CreateUnit(p,'n004',-7392.0,-160.0,270.000)
set u=CreateUnit(p,'n002',-6176.0,-160.0,270.000)
set u=CreateUnit(p,'n000',-4384.0,2848.0,270.000)
set u=CreateUnit(p,'n001',-4384.0,2464.0,270.000)
set u=CreateUnit(p,'n002',-4384.0,2080.0,270.000)
set u=CreateUnit(p,'n003',-4384.0,1696.0,270.000)
set u=CreateUnit(p,'n00S',-2720.0,1888.0,270.000)
set u=CreateUnit(p,'n004',-9184.0,5856.0,270.000)
set u=CreateUnit(p,'n005',-9184.0,6624.0,270.000)
set u=CreateUnit(p,'n004',-9184.0,7392.0,270.000)
set u=CreateUnit(p,'n007',-6368.0,5664.0,270.000)
set u=CreateUnit(p,'n005',-5920.0,5664.0,270.000)
set u=CreateUnit(p,'n003',-4832.0,5344.0,270.000)
set u=CreateUnit(p,'n004',-4832.0,4384.0,270.000)
set u=CreateUnit(p,'n006',-7904.0,-5344.0,270.000)
set u=CreateUnit(p,'n000',-7520.0,-5344.0,270.000)
set u=CreateUnit(p,'n008',7904.0,9504.0,270.000)
set udg_unit16=CreateUnit(p,'n00R',-8960.0,-1600.0,270.000)
set u=CreateUnit(p,'n004',9376.0,6688.0,270.000)
set u=CreateUnit(p,'n009',9376.0,3040.0,270.000)
set u=CreateUnit(p,'n002',6112.0,2272.0,270.000)
set udg_unit18=CreateUnit(p,'n00J',-3840.0,6592.0,270.000)
set u=CreateUnit(p,'n005',6560.0,2272.0,270.000)
set u=CreateUnit(p,'n003',8608.0,32.0,270.000)
set u=CreateUnit(p,'n00X',-2304.0,-4800.0,270.000)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'n004',7264.0,32.0,270.000)
set udg_unit20=CreateUnit(p,'n00H',9664.0,-4160.0,270.000)
set u=CreateUnit(p,'n017',4000.0,6048.0,270.000)
set u=CreateUnit(p,'n008',3040.0,-17696.0,270.000)
set u=CreateUnit(p,'n00U',-2560.0,-4672.0,270.000)
set u=CreateUnit(p,'n009',4768.0,-18528.0,270.000)
set u=CreateUnit(p,'n005',3808.0,-18912.0,270.000)
set u=CreateUnit(p,'n004',2720.0,-12704.0,270.000)
set udg_unit15=CreateUnit(p,'n01J',-3840.0,7104.0,270.000)
call SetUnitColor(udg_unit15,ConvertPlayerColor(12))
set u=CreateUnit(p,'n000',8224.0,-12128.0,270.000)
set u=CreateUnit(p,'n001',9888.0,-12384.0,270.000)
set u=CreateUnit(p,'n002',8224.0,-14752.0,270.000)
set u=CreateUnit(p,'n003',9504.0,-14752.0,270.000)
set udg_unit45=CreateUnit(p,'n01D',2400.0,-11424.0,270.000)
set u=CreateUnit(p,'n007',9760.0,-18912.0,270.000)
set u=CreateUnit(p,'n005',7968.0,-21728.0,270.000)
set u=CreateUnit(p,'n004',9824.0,-21728.0,270.000)
set u=CreateUnit(p,'n006',9440.0,-21728.0,270.000)
set u=CreateUnit(p,'n010',-512.0,-6656.0,270.000)
set u=CreateUnit(p,'n01Q',-896.0,6656.0,270.000)
set u=CreateUnit(p,'n01M',1504.0,7712.0,270.000)
set udg_unit48=CreateUnit(p,'n01F',2176.0,4416.0,270.000)
set udg_unit29=CreateUnit(p,'n01G',9728.0,-16256.0,270.000)
set u=CreateUnit(p,'n000',1824.0,7712.0,270.000)
set u=CreateUnit(p,'n001',2144.0,7712.0,270.000)
set u=CreateUnit(p,'n002',2464.0,7712.0,270.000)
set u=CreateUnit(p,'n003',2784.0,7712.0,270.000)
set u=CreateUnit(p,'n010',1536.0,-6656.0,270.000)
set u=CreateUnit(p,'n010',1536.0,-4608.0,270.000)
set u=CreateUnit(p,'n00I',-7424.0,1920.0,270.000)
set u=CreateUnit(p,'n010',-512.0,-4608.0,270.000)
set u=CreateUnit(p,'n00Z',896.0,-6144.0,270.000)
set u=CreateUnit(p,'n00T',-2560.0,-4928.0,270.000)
set u=CreateUnit(p,'n01P',-7744.0,-5888.0,270.000)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'n00Y',192.0,-896.0,270.000)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'n00T',704.0,-896.0,270.000)
set u=CreateUnit(p,'n00U',-320.0,-896.0,270.000)
set u=CreateUnit(p,'n01M',7648.0,-21728.0,270.000)
set u=CreateUnit(p,'n01H',3168.0,-11552.0,270.000)
set u=CreateUnit(p,'n01E',4224.0,-12160.0,270.000)
set u=CreateUnit(p,'n016',9536.0,-20416.0,270.000)
call SetUnitColor(u,ConvertPlayerColor(1))
set t=CreateTrigger()
call TriggerRegisterUnitEvent(t,u,EVENT_UNIT_DEATH)
call TriggerRegisterUnitEvent(t,u,EVENT_UNIT_CHANGE_OWNER)
call TriggerAddAction(t,function Gq)
set u=CreateUnit(p,'n00Z',128.0,-6144.0,270.000)
set u=CreateUnit(p,'n00Z',-1152.0,-6144.0,270.000)
set udg_unit63=CreateUnit(p,'n01T',6336.0,-21952.0,270.000)
call SetUnitColor(udg_unit63,ConvertPlayerColor(12))
set u=CreateUnit(p,'n00Z',-1152.0,-4096.0,270.000)
set u=CreateUnit(p,'n00Z',128.0,-4096.0,270.000)
set u=CreateUnit(p,'n00Z',896.0,-4096.0,270.000)
set u=CreateUnit(p,'n00Z',2176.0,-4096.0,270.000)
set u=CreateUnit(p,'n00Z',2176.0,-6144.0,270.000)
set u=CreateUnit(p,'n012',-640.0,-3456.0,270.000)
set u=CreateUnit(p,'n013',-384.0,-3456.0,270.000)
set u=CreateUnit(p,'n012',1408.0,-3456.0,270.000)
set u=CreateUnit(p,'n013',1664.0,-3456.0,270.000)
set u=CreateUnit(p,'n012',1408.0,-5504.0,270.000)
set u=CreateUnit(p,'n013',1664.0,-5504.0,270.000)
set u=CreateUnit(p,'n012',-640.0,-5504.0,270.000)
set u=CreateUnit(p,'n013',-384.0,-5504.0,270.000)
set u=CreateUnit(p,'n00Y',2560.0,-21568.0,270.000)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'n00X',5184.0,-21632.0,270.000)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'n014',6144.0,-11840.0,270.000)
call SetUnitColor(u,ConvertPlayerColor(9))
endfunction
function Gw takes nothing returns nothing
local player p=Player(PLAYER_NEUTRAL_PASSIVE)
local unit u
local integer unitID
local trigger t
local real life
set udg_unit36=CreateUnit(p,'h02I',1654.2,6900.1,270.000)
call SetUnitState(udg_unit36,UNIT_STATE_MANA,0)
set u=CreateUnit(p,'o001',7176.3,-981.9,230.290)
set udg_unit19=CreateUnit(p,'h01X',-9726.8,-1661.7,1.872)
set udg_unit24=CreateUnit(p,'h01X',-8196.6,-513.1,180.000)
set udg_unit27=CreateUnit(p,'h01X',-9728.7,-1082.4,1.872)
set udg_unit23=CreateUnit(p,'h01X',-8192.4,-1079.8,180.000)
set udg_unit25=CreateUnit(p,'h01X',-8191.9,-1659.4,180.000)
set udg_unit59=CreateUnit(p,'h04N',1664.5,5896.2,90.000)
set u=CreateUnit(p,'o001',-3028.3,8224.2,234.732)
set u=CreateUnit(p,'e006',-1759.0,5975.5,314.590)
set u=CreateUnit(p,'e006',-1316.6,5982.9,227.060)
set u=CreateUnit(p,'o001',-1782.1,4095.3,62.330)
set u=CreateUnit(p,'e001',-1767.6,3477.9,41.880)
set u=CreateUnit(p,'e001',-9834.0,3082.9,356.680)
set u=CreateUnit(p,'e001',-9366.7,3066.5,179.270)
set u=CreateUnit(p,'e001',-8179.1,747.0,267.428)
set u=CreateUnit(p,'e001',-8186.0,280.2,90.937)
set u=CreateUnit(p,'e001',-4883.1,747.0,223.697)
set u=CreateUnit(p,'e001',-5331.1,2059.0,358.829)
set u=CreateUnit(p,'e001',-5335.2,3691.2,311.393)
set u=CreateUnit(p,'e001',-4895.3,3229.0,135.747)
set u=CreateUnit(p,'e001',-6217.7,5095.3,271.752)
set udg_unit61=CreateUnit(p,'h04T',2684.0,5892.8,90.000)
set u=CreateUnit(p,'e001',-7193.3,6287.4,177.696)
set u=CreateUnit(p,'e001',-7659.8,6277.3,4.972)
set u=CreateUnit(p,'e001',-7657.7,8039.3,312.063)
set u=CreateUnit(p,'e001',-7182.4,7574.6,139.451)
set u=CreateUnit(p,'e001',-5289.7,5095.3,211.244)
set u=CreateUnit(p,'e001',-5294.4,4630.6,146.410)
set u=CreateUnit(p,'e001',-7176.0,5100.0,226.426)
set u=CreateUnit(p,'e001',-7636.5,4695.9,44.448)
set u=CreateUnit(p,'e001',-6222.4,4630.6,86.239)
set u=CreateUnit(p,'e001',-7187.1,3851.0,181.204)
set u=CreateUnit(p,'e001',-7635.1,3851.0,358.829)
set u=CreateUnit(p,'e001',-7187.1,2859.0,131.849)
set u=CreateUnit(p,'e001',-8938.4,-3623.3,313.923)
set u=CreateUnit(p,'e001',-8491.7,-3635.0,221.638)
set u=CreateUnit(p,'e001',-8938.4,-5447.3,47.147)
set u=CreateUnit(p,'e001',-8491.7,-5459.0,124.560)
set udg_unit38=CreateUnit(p,'h01G',1041.4,2884.3,90.000)
set u=CreateUnit(p,'e001',7701.6,7416.7,358.637)
set u=CreateUnit(p,'e001',8148.3,7437.0,178.344)
set u=CreateUnit(p,'e001',8148.3,3373.0,226.514)
set u=CreateUnit(p,'e001',7733.6,2840.7,37.097)
set u=CreateUnit(p,'e001',6934.4,1885.2,330.794)
set u=CreateUnit(p,'e001',7701.5,414.8,54.530)
set u=CreateUnit(p,'e001',8168.9,411.2,120.800)
set u=CreateUnit(p,'e001',-3482.0,280.2,139.370)
set udg_unit33=CreateUnit(p,'h02A',6257.8,-6821.4,305.130)
set u=CreateUnit(p,'e001',-1307.8,3477.6,134.320)
set u=CreateUnit(p,'o001',-9352.3,2543.6,348.280)
set u=CreateUnit(p,'o001',-8272.1,-195.8,35.230)
set u=CreateUnit(p,'o001',-9665.5,-2071.7,220.660)
set u=CreateUnit(p,'o001',-7656.3,-66.6,128.360)
set u=CreateUnit(p,'o001',-5922.4,-2138.2,300.860)
set u=CreateUnit(p,'o001',-4888.4,1429.2,50.050)
set u=CreateUnit(p,'o001',-3296.4,3696.9,34.650)
set u=CreateUnit(p,'o001',-4412.4,1401.3,226.080)
set u=CreateUnit(p,'o001',-6146.8,5576.6,269.400)
set u=CreateUnit(p,'o001',-7966.8,6291.4,307.890)
set u=CreateUnit(p,'o001',-4825.6,5597.3,133.150)
set u=CreateUnit(p,'o001',-6223.2,2403.6,58.970)
set u=CreateUnit(p,'o001',-8662.7,1320.8,234.860)
set u=CreateUnit(p,'o001',8439.5,8734.9,316.990)
set u=CreateUnit(p,'o001',9446.7,7116.3,21.310)
set u=CreateUnit(p,'o001',8958.1,5319.0,93.695)
set u=CreateUnit(p,'o001',8471.8,2589.6,239.348)
set udg_unit39=CreateUnit(p,'h01G',1047.3,9126.8,271.000)
set u=CreateUnit(p,'o001',-2764.4,-8840.6,128.000)
set u=CreateUnit(p,'o001',-4672.5,6331.3,226.150)
set u=CreateUnit(p,'e001',-1770.0,4778.9,356.680)
set u=CreateUnit(p,'e001',-1302.7,4762.5,179.270)
set u=CreateUnit(p,'e001',-9834.0,4330.9,299.010)
set u=CreateUnit(p,'e001',-9366.7,4314.5,235.510)
set u=CreateUnit(p,'e001',-9834.0,1770.9,356.680)
set u=CreateUnit(p,'e001',-9366.7,1754.5,179.270)
set u=CreateUnit(p,'e001',-9834.0,298.9,43.940)
set u=CreateUnit(p,'e001',-9366.7,762.5,225.690)
set u=CreateUnit(p,'e001',-4883.1,2059.0,181.204)
set u=CreateUnit(p,'e001',-6970.0,280.2,50.850)
set u=CreateUnit(p,'e001',-5331.1,747.0,315.734)
set u=CreateUnit(p,'e001',-6579.1,747.0,233.790)
set u=CreateUnit(p,'e001',-5033.7,8039.3,211.244)
set u=CreateUnit(p,'e001',-5038.4,7574.6,146.410)
set u=CreateUnit(p,'e001',-6313.7,8039.3,305.396)
set u=CreateUnit(p,'e001',-5966.4,7574.6,128.261)
set udg_unit26=CreateUnit(p,'h01X',-9726.9,-506.8,1.872)
set u=CreateUnit(p,'e001',-7635.1,2859.0,46.870)
set u=CreateUnit(p,'e001',-8938.4,-4455.3,9.246)
set u=CreateUnit(p,'e001',-8491.7,-4467.0,168.972)
set u=CreateUnit(p,'e001',7701.6,8408.7,312.140)
set u=CreateUnit(p,'e001',8148.3,8397.0,233.450)
set u=CreateUnit(p,'e001',7703.1,5798.3,46.732)
set u=CreateUnit(p,'e001',7724.2,6241.5,310.599)
set u=CreateUnit(p,'e001',7701.6,4472.7,37.097)
set u=CreateUnit(p,'e001',8148.3,5101.0,226.514)
set u=CreateUnit(p,'e001',6934.4,1437.2,31.423)
set u=CreateUnit(p,'e001',8918.4,1885.2,219.251)
set u=CreateUnit(p,'e001',8918.4,1437.2,140.587)
set u=CreateUnit(p,'e001',-3475.1,747.0,221.968)
set udg_unit50=CreateUnit(p,'e009',899.5,-5883.4,90.000)
set u=CreateUnit(p,'e001',5910.4,5789.2,40.650)
set u=CreateUnit(p,'e001',5910.4,6237.2,320.929)
set udg_unit40=CreateUnit(p,'h01G',3331.9,9136.2,270.000)
set udg_unit41=CreateUnit(p,'h01G',3373.5,2854.6,90.000)
set udg_unit30=CreateUnit(p,'h02J',2691.0,6905.1,270.000)
set u=CreateUnit(p,'e006',3127.4,7769.8,314.590)
set u=CreateUnit(p,'e006',3537.7,7774.2,227.060)
set u=CreateUnit(p,'e006',828.5,7768.4,314.590)
set u=CreateUnit(p,'e006',1238.9,7772.8,227.060)
set u=CreateUnit(p,'e006',837.7,4260.0,40.010)
set u=CreateUnit(p,'e006',1248.0,4264.4,133.831)
set u=CreateUnit(p,'e006',3125.6,4258.1,40.010)
set u=CreateUnit(p,'e006',3536.0,4262.5,133.831)
set u=CreateUnit(p,'e001',5846.4,7069.2,127.907)
set u=CreateUnit(p,'e001',5846.4,7517.2,227.968)
set u=CreateUnit(p,'e001',5846.4,4509.2,127.907)
set u=CreateUnit(p,'e001',5846.4,4957.2,227.968)
set u=CreateUnit(p,'e001',4374.4,4509.2,51.040)
set u=CreateUnit(p,'e001',4374.4,4957.2,316.762)
set u=CreateUnit(p,'e001',4374.4,7069.2,51.040)
set u=CreateUnit(p,'e001',4374.4,7517.2,316.762)
set u=CreateUnit(p,'o002',-7746.0,-9603.1,261.370)
set udg_unit47=CreateUnit(p,'h01U',-9663.9,9748.5,337.620)
set udg_unit31=CreateUnit(p,'h046',-9671.8,9474.3,147.035)
set u=CreateUnit(p,'o001',6335.9,956.5,87.714)
set u=CreateUnit(p,'h03F',7358.8,-21685.6,216.800)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',7352.4,-21286.2,309.340)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',7345.6,-20902.5,339.103)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',7352.9,-20513.4,136.257)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',9176.4,-20387.4,52.110)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',9256.8,-20646.6,179.874)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',9439.5,-20657.1,124.358)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',9700.9,-20646.6,330.545)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',9912.3,-20410.4,281.303)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',9915.6,-20770.6,100.297)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03C',9843.1,-20571.7,65.667)
call SetUnitColor(u,ConvertPlayerColor(1))
set udg_unit51=CreateUnit(p,'e009',131.5,-5883.4,90.000)
set u=CreateUnit(p,'h03C',9578.0,-20693.7,294.388)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03C',9745.6,-20745.2,196.398)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03C',9195.6,-20494.9,82.136)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03C',9144.6,-20683.3,104.967)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03C',9362.8,-20724.7,9.405)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',9309.4,-20582.6,75.237)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',9821.1,-20421.8,196.595)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h02O',-8052.6,-9655.9,223.392)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02O',-8043.9,-9587.6,175.094)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02O',-8049.3,-9551.1,306.110)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02O',-7982.4,-9552.2,29.521)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02O',-7940.5,-9550.0,161.823)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02O',-7963.0,-9605.2,123.248)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02O',-7995.5,-9642.0,177.951)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02O',-7948.7,-9658.4,109.109)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02O',-7981.6,-9544.4,33.553)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02O',-8013.0,-9582.3,75.193)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02O',-7939.7,-9578.1,310.055)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02O',-8019.8,-9541.1,240.850)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02O',-7991.9,-9605.2,43.540)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02O',-8045.9,-9617.3,147.738)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02O',-7942.0,-9635.3,227.149)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h01F',-7482.2,-9612.0,83.210)
call SetUnitColor(u,ConvertPlayerColor(12))
set t=CreateTrigger()
call TriggerRegisterUnitEvent(t,u,EVENT_UNIT_DEATH)
call TriggerRegisterUnitEvent(t,u,EVENT_UNIT_CHANGE_OWNER)
call TriggerAddAction(t,function GQ)
set u=CreateUnit(p,'e006',2971.1,-21470.3,89.855)
set u=CreateUnit(p,'e006',2141.5,-21474.4,97.857)
set u=CreateUnit(p,'e006',4877.9,-21459.9,92.520)
set u=CreateUnit(p,'e006',5430.4,-21449.5,88.943)
set udg_unit52=CreateUnit(p,'e009',-1148.5,-5883.4,90.000)
set u=CreateUnit(p,'n011',-7977.8,-4374.7,262.252)
set u=CreateUnit(p,'h02P',-7525.1,-4394.2,308.011)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02P',-7060.7,-4307.2,18.282)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02P',-6633.0,-4312.3,157.384)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'o001',4040.1,4270.5,296.480)
set u=CreateUnit(p,'n011',-7975.6,-4306.0,241.124)
set u=CreateUnit(p,'h02P',-7452.1,-4315.7,8.009)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02P',-7009.5,-4394.2,358.671)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'h02P',-6555.5,-4392.2,139.531)
call SetUnitColor(u,ConvertPlayerColor(12))
set u=CreateUnit(p,'o001',325.6,7733.6,124.586)
set u=CreateUnit(p,'o001',-510.7,-5984.1,96.903)
set u=CreateUnit(p,'o001',-6437.2,-4152.1,58.008)
set u=CreateUnit(p,'o001',-6077.9,-5885.2,116.879)
set u=CreateUnit(p,'o001',-6117.2,-7591.6,137.450)
set u=CreateUnit(p,'o001',-7737.4,-8970.2,92.949)
set u=CreateUnit(p,'o001',-7347.4,-5792.8,47.602)
set u=CreateUnit(p,'o001',-9360.9,-6593.8,44.569)
set u=CreateUnit(p,'o001',-5706.1,-9689.2,268.150)
set udg_unit49=CreateUnit(p,'e009',2179.5,-5883.4,90.000)
set udg_unit53=CreateUnit(p,'e009',-1148.5,-3835.4,90.000)
set udg_unit54=CreateUnit(p,'e009',131.5,-3835.4,90.000)
set udg_unit55=CreateUnit(p,'e009',899.5,-3835.4,90.000)
set udg_unit43=CreateUnit(p,'e009',2179.5,-3835.4,90.000)
set u=CreateUnit(p,'o001',1529.9,-6009.5,86.088)
set u=CreateUnit(p,'o001',1536.4,-3945.6,89.710)
set u=CreateUnit(p,'o001',-531.3,-3954.6,93.384)
set u=CreateUnit(p,'o001',1314.3,-1866.1,323.100)
set u=CreateUnit(p,'o001',-975.2,57.9,115.006)
set u=CreateUnit(p,'o001',-2168.1,-4071.3,53.343)
set u=CreateUnit(p,'o001',3090.3,-21701.8,307.429)
set u=CreateUnit(p,'o001',4565.2,-21719.9,203.946)
set u=CreateUnit(p,'o001',3872.9,-17619.4,52.080)
set u=CreateUnit(p,'o001',7366.5,-18953.5,229.268)
set u=CreateUnit(p,'n011',-7936.1,-4308.7,216.921)
set u=CreateUnit(p,'o001',9561.2,-17669.8,53.195)
set u=CreateUnit(p,'o001',9763.1,-19713.3,6.950)
set u=CreateUnit(p,'n011',-7925.0,-4361.7,156.582)
set u=CreateUnit(p,'n011',-7898.1,-4335.4,250.924)
set u=CreateUnit(p,'n011',-7888.5,-4367.5,127.061)
set u=CreateUnit(p,'o001',9605.8,-21798.7,265.822)
set u=CreateUnit(p,'o001',7664.1,-20435.6,83.257)
set u=CreateUnit(p,'o001',2108.6,-11459.6,133.010)
set u=CreateUnit(p,'o001',4582.3,-12738.2,296.250)
set u=CreateUnit(p,'o001',8090.5,-12097.9,85.673)
set u=CreateUnit(p,'o001',9537.1,-12119.3,80.785)
set u=CreateUnit(p,'o001',8326.2,-14768.9,272.207)
set u=CreateUnit(p,'o001',9391.7,-14778.7,251.482)
set u=CreateUnit(p,'o001',9902.5,-13404.9,9.371)
set u=CreateUnit(p,'h03F',9939.9,-20874.9,61.350)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',9125.5,-21635.4,164.097)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',9245.7,-21715.4,141.256)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',9117.7,-21754.1,51.055)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'e006',-2401.5,-4458.0,180.000)
set u=CreateUnit(p,'e006',-2381.1,-5093.2,180.000)
set u=CreateUnit(p,'e006',-182.2,-1188.6,180.000)
set u=CreateUnit(p,'e006',-219.9,-599.2,180.000)
set u=CreateUnit(p,'e006',629.6,-586.6,0.000)
set u=CreateUnit(p,'e006',620.0,-1182.4,0.000)
set u=CreateUnit(p,'h03C',9211.7,-21804.2,54.307)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',9128.5,-21852.8,164.701)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',9803.6,-21149.4,331.347)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03C',9795.3,-20944.5,210.548)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',9774.3,-21069.5,52.242)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',9874.7,-21065.0,180.632)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',9958.4,-20982.2,251.001)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',7860.5,-20412.7,236.785)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03C',7891.4,-20527.9,169.513)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03C',8003.5,-20785.0,200.309)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03F',8013.2,-20409.8,269.217)
call SetUnitColor(u,ConvertPlayerColor(1))
set udg_unit37=CreateUnit(p,'h038',8549.2,-17833.0,270.000)
call SetUnitColor(udg_unit37,ConvertPlayerColor(12))
set u=CreateUnit(p,'h03C',7350.8,-18609.1,215.954)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03C',7352.9,-18170.4,109.120)
call SetUnitColor(u,ConvertPlayerColor(1))
set u=CreateUnit(p,'h03C',7364.0,-17713.9,259.670)
call SetUnitColor(u,ConvertPlayerColor(1))
endfunction
function GW takes nothing returns nothing
call Gu()
endfunction
function Gx takes nothing returns nothing
call GU()
endfunction
function GX takes nothing returns nothing
call GV()
call GW()
call Gv()
call Gw()
call Gx()
endfunction
function Gy takes nothing returns nothing
local weathereffect we
set udg_rect01=Rect(-5664.0,-4928.0,-5312.0,-4544.0)
set udg_rect02=Rect(5312.0,-1088.0,5664.0,-704.0)
set udg_rect03=Rect(-5280.0,-1088.0,-4928.0,-704.0)
set udg_rect04=Rect(6336.0,4544.0,6720.0,4928.0)
set udg_rect05=Rect(6336.0,7104.0,6688.0,7488.0)
set udg_rect06=Rect(9408.0,1472.0,9760.0,1856.0)
set udg_rect07=Rect(5088.0,5824.0,5440.0,6208.0)
set udg_rect08=Rect(-9760.0,-4928.0,-9408.0,-4544.0)
set udg_rect09=Rect(-8896.0,-3136.0,-8512.0,-2784.0)
set udg_rect10=Rect(-3008.0,320.0,-2656.0,704.0)
set udg_rect11=Rect(-9792.0,4800.0,-9408.0,5152.0)
set udg_rect12=Rect(-8480.0,4672.0,-8128.0,5056.0)
set udg_rect13=Rect(-6336.0,8512.0,-5952.0,8864.0)
set udg_rect14=Rect(-1728.0,2656.0,-1344.0,3008.0)
set udg_rect15=Rect(-5280.0,-4960.0,-5120.0,-4512.0)
set udg_rect16=Rect(-4896.0,-1120.0,-4736.0,-672.0)
set udg_rect17=Rect(5120.0,-1120.0,5280.0,-672.0)
set udg_rect18=Rect(6144.0,4512.0,6304.0,4960.0)
set udg_rect19=Rect(6144.0,7072.0,6304.0,7520.0)
set udg_rect20=Rect(9216.0,1440.0,9376.0,1888.0)
set udg_rect21=Rect(5472.0,5792.0,5632.0,6240.0)
set udg_rect22=Rect(-9376.0,-4960.0,-9216.0,-4512.0)
set udg_rect23=Rect(-8096.0,4640.0,-7936.0,5088.0)
set udg_rect24=Rect(-3200.0,288.0,-3040.0,736.0)
set udg_rect25=Rect(-6368.0,8320.0,-5920.0,8480.0)
set udg_rect26=Rect(-9824.0,4608.0,-9376.0,4768.0)
set udg_rect27=Rect(-1760.0,3040.0,-1312.0,3200.0)
set udg_rect28=Rect(-8928.0,-3328.0,-8480.0,-3168.0)
set udg_rect29=Rect(-10240.0,-10240.0,10240.0,10240.0)
set udg_rect30=Rect(1248.0,-22528.0,10240.0,-11104.0)
set udg_rect31=Rect(-1792.0,-2688.0,2176.0,1024.0)
set udg_rect32=Rect(-4064.0,6368.0,-3616.0,6816.0)
set udg_rect33=Rect(-7616.0,1728.0,-7232.0,2112.0)
set udg_rect34=Rect(-8832.0,1152.0,-6016.0,2688.0)
set udg_rect35=Rect(-4864.0,6144.0,-2816.0,8448.0)
set udg_rect36=Rect(-10240.0,-22528.0,-416.0,-11104.0)
set udg_rect37=Rect(-2176.0,6912.0,-1920.0,7168.0)
set udg_rect38=Rect(-2176.0,6464.0,-1920.0,6720.0)
set udg_rect39=Rect(-1344.0,7168.0,-1088.0,7424.0)
set udg_rect40=Rect(-9504.0,5312.0,-2784.0,8992.0)
set udg_rect41=Rect(-8640.0,3968.0,-3040.0,5344.0)
set udg_rect42=Rect(-8864.0,1120.0,-5984.0,4000.0)
set udg_rect43=Rect(-5792.0,128.0,-2016.0,3872.0)
set udg_rect44=Rect(-10016.0,-2336.0,-5760.0,928.0)
set udg_rect45=Rect(-10016.0,896.0,-9184.0,5280.0)
set udg_rect46=Rect(-10016.0,-5568.0,-6112.0,-2528.0)
set udg_rect47=Rect(-10112.0,-10016.0,-4192.0,-5536.0)
set udg_rect48=Rect(-2016.0,2432.0,-1056.0,6112.0)
set udg_rect49=Rect(-2432.0,6080.0,-672.0,7616.0)
set udg_rect50=Rect(-5792.0,-1696.0,6176.0,-96.0)
set udg_rect51=Rect(-6048.0,-5408.0,-4128.0,-4064.0)
set udg_rect52=Rect(-4160.0,-5920.0,-1632.0,-3552.0)
set udg_rect53=Rect(-3328.0,-9984.0,-768.0,-8704.0)
set udg_rect54=Rect(-2688.0,-4800.0,-2432.0,-4544.0)
set udg_rect55=Rect(-2688.0,-5056.0,-2432.0,-4800.0)
set udg_rect56=Rect(-448.0,-1024.0,-192.0,-768.0)
set udg_rect57=Rect(576.0,-1024.0,832.0,-768.0)
set udg_rect58=Rect(10144.0,10144.0,10240.0,10240.0)
set udg_rect59=Rect(2176.0,-14336.0,2432.0,-14080.0)
set udg_rect60=Rect(4000.0,-14336.0,4256.0,-14080.0)
set udg_rect61=Rect(2208.0,-16160.0,2464.0,-15904.0)
set udg_rect62=Rect(4000.0,-16128.0,4256.0,-15872.0)
set udg_rect63=Rect(8864.0,-4928.0,10208.0,-3488.0)
set udg_rect64=Rect(3168.0,-9856.0,4640.0,-8416.0)
set udg_rect65=Rect(-672.0,-4768.0,-352.0,-4448.0)
set udg_rect66=Rect(1376.0,-4768.0,1696.0,-4448.0)
set udg_rect67=Rect(-672.0,-6816.0,-352.0,-6496.0)
set udg_rect68=Rect(1376.0,-6816.0,1696.0,-6496.0)
set udg_rect69=Rect(-672.0,-4448.0,-352.0,-4256.0)
set udg_rect70=Rect(1376.0,-4448.0,1696.0,-4256.0)
set udg_rect71=Rect(-672.0,-6496.0,-352.0,-6304.0)
set udg_rect72=Rect(1376.0,-6496.0,1696.0,-6304.0)
set udg_rect73=Rect(-768.0,-3584.0,-512.0,-3328.0)
set udg_rect74=Rect(-512.0,-3584.0,-256.0,-3328.0)
set udg_rect75=Rect(1280.0,-3584.0,1536.0,-3328.0)
set udg_rect76=Rect(1536.0,-3584.0,1792.0,-3328.0)
set udg_rect77=Rect(-768.0,-5632.0,-512.0,-5376.0)
set udg_rect78=Rect(-512.0,-5632.0,-256.0,-5376.0)
set udg_rect79=Rect(1280.0,-5632.0,1536.0,-5376.0)
set udg_rect80=Rect(1536.0,-5632.0,1792.0,-5376.0)
set udg_rect81=Rect(-9920.0,-2208.0,-8000.0,32.0)
set udg_rect82=Rect(192.0,8096.0,1856.0,9664.0)
set udg_rect83=Rect(256.0,8672.0,1792.0,9600.0)
set udg_rect84=Rect(2560.0,8096.0,4096.0,9600.0)
set udg_rect85=Rect(2560.0,8704.0,4096.0,9600.0)
set udg_rect86=Rect(256.0,2464.0,1792.0,3968.0)
set udg_rect87=Rect(2560.0,2432.0,4128.0,3968.0)
set udg_rect88=Rect(608.0,8224.0,1504.0,8672.0)
set udg_rect89=Rect(2944.0,8224.0,3808.0,8704.0)
set udg_rect90=Rect(576.0,3456.0,1472.0,3904.0)
set udg_rect91=Rect(2912.0,3456.0,3776.0,3936.0)
set udg_rect92=Rect(-1280.0,-4224.0,-1024.0,-3968.0)
set udg_rect93=Rect(0.0,-4224.0,256.0,-3968.0)
set udg_rect94=Rect(768.0,-4224.0,1024.0,-3968.0)
set udg_rect95=Rect(2048.0,-4224.0,2304.0,-3968.0)
set udg_rect96=Rect(-1280.0,-6272.0,-1024.0,-6016.0)
set udg_rect97=Rect(0.0,-6272.0,256.0,-6016.0)
set udg_rect98=Rect(768.0,-6272.0,1024.0,-6016.0)
set udg_rect99=Rect(2048.0,-6272.0,2304.0,-6016.0)
set udg_rect100=Rect(5888.0,-6976.0,6560.0,-6208.0)
set udg_rect101=Rect(1760.0,-14688.0,2848.0,-13696.0)
set udg_rect102=Rect(3616.0,-14656.0,4608.0,-13696.0)
set udg_rect103=Rect(1824.0,-16512.0,2880.0,-15520.0)
set udg_rect104=Rect(3616.0,-16512.0,4640.0,-15520.0)
set udg_rect105=Rect(1952.0,-15232.0,2688.0,-14976.0)
set udg_rect106=Rect(3648.0,-15232.0,4576.0,-14976.0)
set udg_rect107=Rect(2016.0,-16992.0,2784.0,-16768.0)
set udg_rect108=Rect(3712.0,-16960.0,4512.0,-16736.0)
set udg_rect109=Rect(8416.0,-4448.0,8864.0,-3968.0)
set udg_rect110=Rect(4640.0,-8960.0,4992.0,-8576.0)
set udg_rect111=Rect(-6944.0,-1312.0,-6624.0,-992.0)
set udg_rect112=Rect(160.0,2432.0,4192.0,9664.0)
set udg_rect113=Rect(4192.0,6944.0,6752.0,7648.0)
set udg_rect114=Rect(4160.0,4416.0,6720.0,5056.0)
set udg_rect115=Rect(5184.0,960.0,5696.0,2368.0)
set udg_rect116=Rect(-1632.0,-4960.0,448.0,-2880.0)
set udg_rect117=Rect(448.0,-4960.0,2528.0,-2880.0)
set udg_rect118=Rect(-1568.0,-7072.0,448.0,-4960.0)
set udg_rect119=Rect(448.0,-7008.0,2528.0,-4960.0)
set udg_rect120=Rect(2560.0,-10240.0,10240.0,-2944.0)
set udg_rect121=Rect(5056.0,5696.0,7392.0,6336.0)
set udg_rect122=Rect(7360.0,2464.0,9536.0,9632.0)
set udg_rect123=Rect(5152.0,800.0,9792.0,2496.0)
set udg_rect124=Rect(7072.0,-1472.0,9120.0,832.0)
set udg_rect125=Rect(4096.0,-12288.0,4352.0,-12032.0)
set udg_rect126=Rect(2048.0,-12032.0,2304.0,-11776.0)
set udg_rect127=Rect(2048.0,-12608.0,2304.0,-12352.0)
set udg_rect128=Rect(7136.0,-19136.0,10048.0,-17504.0)
set udg_rect129=Rect(7744.0,-20896.0,8064.0,-20384.0)
set udg_rect130=Rect(9664.0,-21184.0,9984.0,-20640.0)
set udg_rect131=Rect(9120.0,-20832.0,9344.0,-20512.0)
set udg_rect132=Rect(9088.0,-21888.0,9344.0,-21568.0)
set udg_rect133=Rect(7360.0,-18720.0,7584.0,-18496.0)
set udg_rect134=Rect(7392.0,-18272.0,7616.0,-18048.0)
set udg_rect135=Rect(7392.0,-17824.0,7616.0,-17600.0)
set udg_rect136=Rect(1920.0,4128.0,2432.0,4672.0)
set udg_rect137=Rect(1952.0,4672.0,2432.0,4864.0)
set udg_rect138=Rect(9088.0,-16896.0,10240.0,-15616.0)
set udg_rect139=Rect(9440.0,-16544.0,10016.0,-15968.0)
set udg_rect140=Rect(9152.0,-16544.0,9440.0,-15968.0)
set udg_rect141=Rect(-10208.0,9248.0,-9152.0,10176.0)
set udg_rect142=Rect(1504.0,6784.0,1824.0,7104.0)
set udg_rect143=Rect(2528.0,6784.0,2848.0,7104.0)
set udg_rect144=Rect(1504.0,5728.0,1824.0,6048.0)
set udg_rect145=Rect(-9760.0,-7264.0,-9440.0,-6560.0)
set udg_rect146=Rect(-8768.0,-1696.0,-8608.0,-1536.0)
set udg_rect147=Rect(-1632.0,-7008.0,2528.0,-2880.0)
set udg_rect148=Rect(-9088.0,-1728.0,-8832.0,-1472.0)
set udg_rect149=Rect(-9120.0,-2080.0,-8800.0,-1760.0)
set udg_rect150=Rect(2816.0,-21184.0,3072.0,-20928.0)
set udg_rect151=Rect(2048.0,-21184.0,2304.0,-20928.0)
set udg_rect152=Rect(5376.0,-21248.0,5632.0,-20992.0)
set udg_rect153=Rect(4672.0,-21248.0,4928.0,-20992.0)
set udg_rect154=Rect(640.0,-9184.0,1056.0,-8768.0)
set udg_rect155=Rect(416.0,-9408.0,1280.0,-8544.0)
set udg_rect156=Rect(128.0,-9664.0,1568.0,-8288.0)
set udg_rect157=Rect(-224.0,-9984.0,1952.0,-7872.0)
set udg_rect158=Rect(64.0,-9728.0,1632.0,-8192.0)
set udg_rect159=Rect(704.0,-16576.0,9696.0,-11104.0)
set udg_rect160=Rect(1248.0,-22528.0,10240.0,-16544.0)
set udg_rect161=Rect(-7936.0,-6336.0,-7552.0,-6048.0)
set udg_rect162=Rect(2560.0,2528.0,4096.0,3456.0)
set udg_rect163=Rect(256.0,2528.0,1792.0,3456.0)
set udg_rect164=Rect(-7552.0,4416.0,-7264.0,4672.0)
set udg_rect165=Rect(-2272.0,-9600.0,-2048.0,-9344.0)
set udg_rect166=Rect(-2048.0,7936.0,-1664.0,8320.0)
set udg_rect167=Rect(-2112.0,7776.0,-1600.0,7936.0)
set udg_rect168=Rect(-3136.0,-6336.0,-2752.0,-5952.0)
set udg_rect169=Rect(-3168.0,-5920.0,-2720.0,-5760.0)
set udg_rect170=Rect(-8160.0,-9760.0,-7328.0,-9376.0)
set udg_rect171=Rect(-1024.0,6528.0,-768.0,6784.0)
set udg_rect172=Rect(-7040.0,-1408.0,-6528.0,-896.0)
set udg_rect173=Rect(-832.0,-8032.0,-352.0,-7552.0)
set udg_rect174=Rect(2528.0,5728.0,2848.0,6048.0)
set udg_rect175=Rect(1920.0,6144.0,2432.0,6656.0)
set udg_rect176=Rect(8704.0,4608.0,9216.0,5120.0)
set udg_rect177=Rect(-7936.0,-8128.0,-7552.0,-7296.0)
set udg_rect178=Rect(-4384.0,4640.0,-3808.0,5248.0)
set udg_rect179=Rect(-2720.0,2528.0,-2272.0,3232.0)
set udg_rect180=Rect(-6336.0,-21984.0,-4704.0,-20224.0)
set udg_rect181=Rect(-6432.0,-13920.0,-4800.0,-12160.0)
set udg_rect182=Rect(-6304.0,-13824.0,-6080.0,-13600.0)
set udg_rect183=Rect(-6304.0,-13504.0,-6080.0,-13280.0)
set udg_rect184=Rect(-6304.0,-13184.0,-6080.0,-12960.0)
set udg_rect185=Rect(-6304.0,-12864.0,-6080.0,-12640.0)
set udg_rect186=Rect(-6304.0,-12544.0,-6080.0,-12320.0)
set udg_rect187=Rect(-5152.0,-13824.0,-4928.0,-13600.0)
set udg_rect188=Rect(-5152.0,-13504.0,-4928.0,-13280.0)
set udg_rect189=Rect(-5152.0,-13184.0,-4928.0,-12960.0)
set udg_rect190=Rect(-5152.0,-12864.0,-4928.0,-12640.0)
set udg_rect191=Rect(-5152.0,-12544.0,-4928.0,-12320.0)
set udg_rect192=Rect(-5056.0,-21888.0,-4832.0,-21664.0)
set udg_rect193=Rect(-6208.0,-21568.0,-5984.0,-21344.0)
set udg_rect194=Rect(-6208.0,-21248.0,-5984.0,-21024.0)
set udg_rect195=Rect(-6208.0,-20928.0,-5984.0,-20704.0)
set udg_rect196=Rect(-6208.0,-20608.0,-5984.0,-20384.0)
set udg_rect197=Rect(-6208.0,-21888.0,-5984.0,-21664.0)
set udg_rect198=Rect(-5056.0,-21568.0,-4832.0,-21344.0)
set udg_rect199=Rect(-5056.0,-21248.0,-4832.0,-21024.0)
set udg_rect200=Rect(-5056.0,-20928.0,-4832.0,-20704.0)
set udg_rect201=Rect(-5056.0,-20608.0,-4832.0,-20384.0)
endfunction
function GY takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function Gz takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function GZ takes nothing returns boolean
return GetBooleanAnd(GY(),Gz())
endfunction
function G0 takes nothing returns nothing
set udg_strings02[GetConvertedPlayerId(GetEnumPlayer())]=GetPlayerName(GetEnumPlayer())
set udg_strings04[GetConvertedPlayerId(GetEnumPlayer())]=GetPlayerName(GetEnumPlayer())
endfunction
function G1 takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function G2 takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function G3 takes nothing returns boolean
return GetBooleanAnd(G1(),G2())
endfunction
function G4 takes nothing returns nothing
call SetUnitOwner(GetEnumUnit(),Player(bj_PLAYER_NEUTRAL_EXTRA),true)
endfunction
function G5 takes nothing returns nothing
call SetUnitOwner(GetEnumUnit(),Player(bj_PLAYER_NEUTRAL_EXTRA),true)
endfunction
function G6 takes nothing returns nothing
call SetUnitOwner(GetEnumUnit(),Player(PLAYER_NEUTRAL_PASSIVE),true)
endfunction
function G7 takes nothing returns nothing
call SetUnitOwner(GetEnumUnit(),Player(PLAYER_NEUTRAL_PASSIVE),true)
endfunction
function G8 takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function G9 takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function ha takes nothing returns boolean
return GetBooleanAnd(G8(),G9())
endfunction
function hA takes nothing returns nothing
call SetPlayerAllianceStateBJ(GetEnumPlayer(),Player(bj_PLAYER_NEUTRAL_VICTIM),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(GetEnumPlayer(),Player(bj_PLAYER_NEUTRAL_EXTRA),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_VICTIM),GetEnumPlayer(),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_EXTRA),GetEnumPlayer(),bj_ALLIANCE_ALLIED)
call SetPlayerUnitAvailableBJ('h01C',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h02E',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h00D',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h00C',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h00E',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h00G',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h00H',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h00F',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h00K',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h00L',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h00I',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h00N',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h00P',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h00O',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h00J',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h00M',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h00M',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('nrat',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('nsea',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('nskk',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('nsno',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h049',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h047',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h048',false,GetEnumPlayer())
call SetPlayerUnitAvailableBJ('h04A',false,GetEnumPlayer())
call SetPlayerName(GetEnumPlayer(),"TRIGSTR_100")
endfunction
function hb takes nothing returns boolean
return(GetEnumPlayer()==udg_player01)
endfunction
function hB takes nothing returns nothing
call CreateNUnitsAtLoc(1,'h001',GetEnumPlayer(),GetPlayerStartLocationLoc(GetEnumPlayer()),bj_UNIT_FACING)
if(hb())then
call UnitAddItemByIdSwapped('I009',GetLastCreatedUnit())
else
call DoNothing()
endif
call SetUnitManaPercentBJ(GetLastCreatedUnit(),100)
call SetPlayerStateBJ(GetEnumPlayer(),PLAYER_STATE_RESOURCE_GOLD,300)
call DisplayTextToForce(GetForceOfPlayer(GetEnumPlayer()),"TRIGSTR_9999")
endfunction
function hc takes nothing returns boolean
return(GetOwningPlayer(GetLastCreatedUnit())==udg_player01)
endfunction
function hC takes nothing returns nothing
call ForForce(GetPlayersMatching(Condition(function GZ)),function G0)
set udg_strings01[1]="|cffFF0000Red|r"
set udg_strings01[2]="|cff0000FFBlue|r"
set udg_strings01[3]="|cff00FFFFTeal|r"
set udg_strings01[4]="|cff800080Purple|r"
set udg_strings01[5]="|cffFFFF00Yellow|r"
set udg_strings01[6]="|cffFF8000Orange|r"
set udg_strings01[7]="|cff00FF00Green|r"
set udg_strings01[8]="|cffFF80C0Pink|r"
set udg_strings01[9]="|cff808080Gray|r"
set udg_strings01[10]="|cff8080FFLight Blue|r"
set udg_strings01[11]="|cff004000Dark Green"
set udg_reals01[1]=100.00
set udg_reals01[2]=0.00
set udg_reals01[3]=0.00
set udg_reals01[4]=44.00
set udg_reals01[5]=100.00
set udg_reals01[6]=80.00
set udg_reals01[7]=0.00
set udg_reals01[8]=100.00
set udg_reals01[9]=50.00
set udg_reals01[10]=50.00
set udg_reals01[11]=0.00
set udg_reals02[1]=0.00
set udg_reals02[2]=0.00
set udg_reals02[3]=100.00
set udg_reals02[4]=15.00
set udg_reals02[5]=100.00
set udg_reals02[6]=30.00
set udg_reals02[7]=100.00
set udg_reals02[8]=50.00
set udg_reals02[9]=50.00
set udg_reals02[10]=50.00
set udg_reals02[11]=50.00
set udg_reals03[1]=0.00
set udg_reals03[2]=100.00
set udg_reals03[3]=100.00
set udg_reals03[4]=51.00
set udg_reals03[5]=0.00
set udg_reals03[6]=10.00
set udg_reals03[7]=0.00
set udg_reals03[8]=50.00
set udg_reals03[9]=50.00
set udg_reals03[10]=100.00
set udg_reals03[11]=0.00
set udg_integer29=26
set udg_integer30=CountPlayersInForceBJ(GetPlayersMatching(Condition(function G3)))
call SetPlayerName(Player(11),"TRIGSTR_1892")
call UseTimeOfDayBJ(false)
call SetTimeOfDay(12)
call SetMapFlag(MAP_LOCK_RESOURCE_TRADING,true)
call SetMapFlag(MAP_RESOURCE_TRADING_ALLIES_ONLY,true)
call SetCreepCampFilterState(false)
call SetAllyColorFilterState(1)
call EnableMinimapFilterButtons(false,false)
call CreateQuestBJ(bj_QUESTTYPE_REQ_DISCOVERED,"TRIGSTR_2464","TRIGSTR_2465","ReplaceableTextures\\CommandButtons\\BTNHumanCaptureFlag.blp")
call CreateQuestBJ(bj_QUESTTYPE_REQ_DISCOVERED,"TRIGSTR_2466","TRIGSTR_2467","ReplaceableTextures\\CommandButtons\\BTNMarine.blp")
call CreateQuestBJ(bj_QUESTTYPE_REQ_DISCOVERED,"TRIGSTR_2468","TRIGSTR_2469","ReplaceableTextures\\CommandButtons\\BTNHydralisk.blp")
call CreateQuestBJ(bj_QUESTTYPE_REQ_DISCOVERED,"TRIGSTR_2470","TRIGSTR_2471","ReplaceableTextures\\CommandButtons\\BTNArmorGolem.blp")
call CreateQuestBJ(bj_QUESTTYPE_REQ_DISCOVERED,"TRIGSTR_123","TRIGSTR_1509","ReplaceableTextures\\CommandButtons\\BTNTomeBrown.blp")
call CreateQuestBJ(bj_QUESTTYPE_REQ_DISCOVERED,"TRIGSTR_2472","TRIGSTR_2473","ReplaceableTextures\\CommandButtons\\BTNOrb.blp")
call CreateQuestBJ(bj_QUESTTYPE_REQ_DISCOVERED,"TRIGSTR_2474","TRIGSTR_2475","ReplaceableTextures\\CommandButtons\\BTNLamp.blp")
call CreateQuestBJ(bj_QUESTTYPE_REQ_DISCOVERED,"TRIGSTR_2481","TRIGSTR_2482","ReplaceableTextures\\CommandButtons\\BTNScatterRockets.blp")
call CreateQuestBJ(bj_QUESTTYPE_REQ_DISCOVERED,"TRIGSTR_2483","TRIGSTR_2484","ReplaceableTextures\\CommandButtons\\BTNCarrionScarabs.blp")
call CreateQuestBJ(bj_QUESTTYPE_OPT_DISCOVERED,"TRIGSTR_160","TRIGSTR_289","ReplaceableTextures\\CommandButtons\\BTNOrcBattleStandard.blp")
call CreateQuestBJ(bj_QUESTTYPE_OPT_DISCOVERED,"TRIGSTR_315","TRIGSTR_2455","ReplaceableTextures\\WorldEditUI\\Editor-MultipleUnits.blp")
call CreateQuestBJ(bj_QUESTTYPE_OPT_DISCOVERED,"TRIGSTR_1617","TRIGSTR_2463","ReplaceableTextures\\CommandButtons\\BTNCloakOfFlames.blp")
call CreateQuestBJ(bj_QUESTTYPE_OPT_DISCOVERED,"TRIGSTR_906","TRIGSTR_909","ReplaceableTextures\\CommandButtons\\BTNBansheeMaster.blp")
call CreateQuestBJ(bj_QUESTTYPE_OPT_DISCOVERED,"TRIGSTR_579","TRIGSTR_672","ReplaceableTextures\\CommandButtons\\BTNBansheeMaster.blp")
call CreateQuestBJ(bj_QUESTTYPE_OPT_DISCOVERED,"TRIGSTR_134","TRIGSTR_2091","ReplaceableTextures\\CommandButtons\\BTNBansheeMaster.blp")
call CreateQuestBJ(bj_QUESTTYPE_OPT_DISCOVERED,"TRIGSTR_673","TRIGSTR_1123","ReplaceableTextures\\CommandButtons\\BTNBansheeMaster.blp")
call CreateQuestBJ(bj_QUESTTYPE_OPT_DISCOVERED,"TRIGSTR_1894","TRIGSTR_1902","ReplaceableTextures\\CommandButtons\\BTNBansheeMaster.blp")
call CreateQuestBJ(bj_QUESTTYPE_OPT_DISCOVERED,"TRIGSTR_2352","TRIGSTR_2433","ReplaceableTextures\\CommandButtons\\BTNRadar.blp")
call SetTerrainTypeBJ(GetRectCenter(udg_rect36),'Jwmb',-1,46,1)
call CreateTextTagLocBJ("TRIGSTR_2405",GetRectCenter(udg_rect161),0,10,100,0.00,0.00,0)
call ShowTextTagForceBJ(true,GetLastCreatedTextTag(),GetPlayersAll())
set udg_unit05=udg_unit62
set udg_units05[1]=udg_unit14
set udg_units05[2]=udg_unit56
set udg_units05[3]=udg_unit46
set udg_units05[4]=udg_unit57
set udg_units05[5]=udg_unit60
set udg_units01[1]=udg_unit39
set udg_units01[2]=udg_unit40
set udg_units01[3]=udg_unit38
set udg_units01[4]=udg_unit41
set udg_locations01[1]=GetUnitLoc(udg_unit39)
set udg_locations01[2]=GetUnitLoc(udg_unit40)
set udg_locations01[3]=GetUnitLoc(udg_unit38)
set udg_locations01[4]=GetUnitLoc(udg_unit41)
set udg_unit03=udg_unit17
call SetUnitTimeScalePercent(udg_unit20,2.00)
call SetUnitAnimation(udg_unit17,"stand work")
call SetUnitInvulnerable(udg_unit37,true)
call SetUnitAnimation(udg_unit37,"morph")
call UnitAddAbilityBJ('Aloc',udg_unit16)
call SetUnitVertexColorBJ(udg_unit16,100,100,100,100.00)
call UnitAddAbilityBJ('Aloc',udg_unit48)
call SetUnitVertexColorBJ(udg_unit48,100,100,100,100.00)
call UnitAddAbilityBJ('Aloc',udg_unit29)
call SetUnitVertexColorBJ(udg_unit29,100,100,100,100.00)
call SetUnitVertexColorBJ(udg_unit63,100,100,100,100.00)
call StartTimerBJ(udg_timer03,false,120.00)
call PauseTimerBJ(true,udg_timer03)
call GroupAddUnitSimple(udg_unit19,udg_group05)
call GroupAddUnitSimple(udg_unit27,udg_group05)
call GroupAddUnitSimple(udg_unit26,udg_group05)
call GroupAddUnitSimple(udg_unit25,udg_group05)
call GroupAddUnitSimple(udg_unit23,udg_group05)
call GroupAddUnitSimple(udg_unit24,udg_group05)
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_EXTRA),Player(bj_PLAYER_NEUTRAL_VICTIM),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_EXTRA),Player(11),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_EXTRA),Player(PLAYER_NEUTRAL_PASSIVE),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_EXTRA),Player(PLAYER_NEUTRAL_AGGRESSIVE),bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_VICTIM),Player(bj_PLAYER_NEUTRAL_EXTRA),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_VICTIM),Player(PLAYER_NEUTRAL_PASSIVE),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_VICTIM),Player(PLAYER_NEUTRAL_AGGRESSIVE),bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_VICTIM),Player(11),bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(11),Player(bj_PLAYER_NEUTRAL_VICTIM),bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(11),Player(PLAYER_NEUTRAL_PASSIVE),bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(11),Player(bj_PLAYER_NEUTRAL_EXTRA),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(0),Player(PLAYER_NEUTRAL_PASSIVE),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(1),Player(PLAYER_NEUTRAL_PASSIVE),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(2),Player(PLAYER_NEUTRAL_PASSIVE),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(3),Player(PLAYER_NEUTRAL_PASSIVE),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(4),Player(PLAYER_NEUTRAL_PASSIVE),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(5),Player(PLAYER_NEUTRAL_PASSIVE),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(6),Player(PLAYER_NEUTRAL_PASSIVE),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(7),Player(PLAYER_NEUTRAL_PASSIVE),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(8),Player(PLAYER_NEUTRAL_PASSIVE),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(9),Player(PLAYER_NEUTRAL_PASSIVE),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(10),Player(PLAYER_NEUTRAL_PASSIVE),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(PLAYER_NEUTRAL_PASSIVE),Player(0),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(PLAYER_NEUTRAL_PASSIVE),Player(1),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(PLAYER_NEUTRAL_PASSIVE),Player(2),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(PLAYER_NEUTRAL_PASSIVE),Player(3),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(PLAYER_NEUTRAL_PASSIVE),Player(4),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(PLAYER_NEUTRAL_PASSIVE),Player(5),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(PLAYER_NEUTRAL_PASSIVE),Player(6),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(PLAYER_NEUTRAL_PASSIVE),Player(7),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(PLAYER_NEUTRAL_PASSIVE),Player(8),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(PLAYER_NEUTRAL_PASSIVE),Player(9),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(PLAYER_NEUTRAL_PASSIVE),Player(10),bj_ALLIANCE_ALLIED)
call SetUnitOwner(udg_unit58,Player(PLAYER_NEUTRAL_PASSIVE),true)
call SetUnitOwner(udg_unit44,Player(PLAYER_NEUTRAL_PASSIVE),true)
call SetUnitOwner(udg_unit22,Player(PLAYER_NEUTRAL_PASSIVE),true)
call SetUnitOwner(udg_unit35,Player(PLAYER_NEUTRAL_PASSIVE),true)
call SetUnitOwner(udg_unit42,Player(PLAYER_NEUTRAL_PASSIVE),true)
call ForGroupBJ(GetUnitsOfTypeIdAll('e001'),function G4)
call ForGroupBJ(GetUnitsOfTypeIdAll('e006'),function G5)
call ForGroupBJ(GetUnitsOfTypeIdAll('n01R'),function G6)
call ForGroupBJ(GetUnitsOfTypeIdAll('n01O'),function G7)
set udg_integer15=GetRandomInt(1,100)
call AddWeatherEffectSaveLast(udg_rect120,'FDbh')
set udg_weathereffects01[1]=GetLastCreatedWeatherEffect()
call AddWeatherEffectSaveLast(udg_rect120,'FDgh')
set udg_weathereffects01[2]=GetLastCreatedWeatherEffect()
call AddWeatherEffectSaveLast(udg_rect120,'FDrh')
set udg_weathereffects01[3]=GetLastCreatedWeatherEffect()
call AddWeatherEffectSaveLast(udg_rect120,'FDwh')
set udg_weathereffects01[4]=GetLastCreatedWeatherEffect()
set udg_force04=GetPlayersMatching(Condition(function ha))
call ForForce(udg_force04,function hA)
set udg_player01=ForcePickRandomPlayer(udg_force04)
set udg_player03=ForcePickRandomPlayer(udg_force04)
call ForceRemovePlayerSimple(udg_player03,udg_force04)
set udg_player02=ForcePickRandomPlayer(udg_force04)
call ForceRemovePlayerSimple(udg_player02,udg_force04)
call ForForce(udg_force04,function hB)
call CreateNUnitsAtLoc(1,'h01X',udg_player03,GetPlayerStartLocationLoc(udg_player03),bj_UNIT_FACING)
set udg_unit02=GetLastCreatedUnit()
call SetUnitManaPercentBJ(GetLastCreatedUnit(),100)
call SetUnitOwner(udg_unit17,udg_player03,true)
call DisplayTextToForce(GetForceOfPlayer(udg_player03),"TRIGSTR_009")
call SetPlayerName(udg_player03,"TRIGSTR_220")
call SetPlayerStateBJ(udg_player03,PLAYER_STATE_RESOURCE_FOOD_CAP,6)
set udg_integer30=(udg_integer30-1)
call SetPlayerTechResearchedSwap('Reuv',1,udg_player02)
call CreateNUnitsAtLoc(1,'h001',udg_player02,GetPlayerStartLocationLoc(udg_player02),bj_UNIT_FACING)
call SetPlayerStateBJ(udg_player02,PLAYER_STATE_RESOURCE_GOLD,300)
if(hc())then
call UnitAddItemByIdSwapped('I009',GetLastCreatedUnit())
else
call DoNothing()
endif
call SetUnitManaPercentBJ(GetLastCreatedUnit(),100)
call SetPlayerUnitAvailableBJ('h00D',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00C',true,udg_player02)
call UnitAddTypeBJ(UNIT_TYPE_ANCIENT,GetLastCreatedUnit())
call UnitAddAbilityBJ('A00G',GetLastCreatedUnit())
call UnitAddAbilityBJ('A071',GetLastCreatedUnit())
set udg_integer05=300
call DisplayTextToForce(GetForceOfPlayer(udg_player02),"TRIGSTR_017")
call SetPlayerAllianceStateBJ(Player(11),udg_player02,bj_ALLIANCE_ALLIED_UNITS)
call SetPlayerAllianceStateBJ(udg_player02,Player(11),bj_ALLIANCE_ALLIED)
call TriggerSleepAction(1.00)
call StartTimerBJ(udg_timer05,false,450.00)
call CreateTimerDialogBJ(udg_timer05,"TRIGSTR_1413")
set udg_timerdialog04=GetLastCreatedTimerDialogBJ()
call UnitAddAbilityBJ('Aloc',udg_unit18)
call SetUnitVertexColorBJ(udg_unit18,100,100,100,100.00)
call EnableTrigger(udg_trigger320)
call EnableTrigger(udg_trigger40)
endfunction
function hd takes nothing returns nothing
set udg_trigger03=CreateTrigger()
call TriggerAddAction(udg_trigger03,function hC)
endfunction
function hD takes nothing returns nothing
call SetPlayerAllianceStateBJ(GetEnumPlayer(),Player(1),bj_ALLIANCE_ALLIED_VISION)
endfunction
function he takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),1,4)=="blue"))then
return false
endif
return true
endfunction
function hE takes nothing returns nothing
if(he())then
call DisableTrigger(GetTriggeringTrigger())
call DisplayTextToForce(GetPlayersAll(),("|cff808080**|r |cff0000FF"+(udg_strings04[2]+" |r|cffFF0000IS THE CHALLENGER|r |cff808080**|r")))
call ForForce(GetPlayersAll(),function hD)
call SetPlayerAllianceStateBJ(Player(0),Player(1),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(1),Player(0),bj_ALLIANCE_ALLIED)
set udg_player08=Player(1)
call TriggerExecute(udg_trigger06)
else
call DoNothing()
endif
endfunction
function hf takes nothing returns nothing
set udg_trigger04=CreateTrigger()
call DisableTrigger(udg_trigger04)
call TriggerRegisterPlayerChatEvent(udg_trigger04,Player(0),"",false)
call TriggerAddAction(udg_trigger04,function hE)
endfunction
function hF takes nothing returns nothing
call SetTerrainTypeBJ(GetRectCenter(udg_rect181),'Bdsr',-1,8,1)
call SetTerrainTypeBJ(GetRectCenter(udg_rect180),'Bdsr',-1,8,1)
call TriggerSleepAction(0.25)
call CreateNUnitsAtLoc(1,'n000',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect182),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'n001',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect183),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'n002',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect184),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'n003',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect185),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'n01M',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect186),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'n006',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect187),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'n008',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect188),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'n004',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect189),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'n005',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect190),bj_UNIT_FACING)
call CreateItemLoc('I00Y',GetRandomLocInRect(udg_rect191))
call CreateItemLoc('I00Y',GetRandomLocInRect(udg_rect191))
call CreateItemLoc('I00Z',GetRandomLocInRect(udg_rect191))
call CreateItemLoc('I00Z',GetRandomLocInRect(udg_rect191))
call CreateNUnitsAtLoc(1,'n000',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect197),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'n001',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect193),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'n002',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect194),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'n003',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect195),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'n01M',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect196),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'n006',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect192),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'n008',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect198),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'n004',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect199),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'n005',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect200),bj_UNIT_FACING)
call CreateItemLoc('I00Y',GetRandomLocInRect(udg_rect201))
call CreateItemLoc('I00Y',GetRandomLocInRect(udg_rect201))
call CreateItemLoc('I00Z',GetRandomLocInRect(udg_rect201))
call CreateItemLoc('I00Z',GetRandomLocInRect(udg_rect201))
call TriggerSleepAction(0.25)
call CreateNUnitsAtLoc(1,'h001',Player(0),GetRectCenter(udg_rect181),bj_UNIT_FACING)
set udg_units06[1]=GetLastCreatedUnit()
call CreateNUnitsAtLoc(1,'h001',udg_player08,GetRectCenter(udg_rect180),bj_UNIT_FACING)
set udg_units06[2]=GetLastCreatedUnit()
call EnableTrigger(udg_trigger06)
endfunction
function hg takes nothing returns nothing
set udg_trigger05=CreateTrigger()
call TriggerAddAction(udg_trigger05,function hF)
endfunction
function hG takes nothing returns boolean
if(not(udg_booleans06[2]==true))then
return false
endif
return true
endfunction
function hh takes nothing returns boolean
if(not(udg_booleans06[1]==false))then
return false
endif
return true
endfunction
function hH takes nothing returns boolean
if(not(GetTriggerPlayer()==Player(0)))then
return false
endif
return true
endfunction
function hi takes nothing returns boolean
if(not(udg_booleans06[1]==true))then
return false
endif
return true
endfunction
function hI takes nothing returns boolean
if(not(udg_booleans06[2]==false))then
return false
endif
return true
endfunction
function hj takes nothing returns boolean
if(not(GetTriggerPlayer()==udg_player08))then
return false
endif
return true
endfunction
function hJ takes nothing returns nothing
if(hH())then
if(hh())then
set udg_booleans06[1]=true
if(hG())then
call DisableTrigger(GetTriggeringTrigger())
call TriggerExecute(udg_trigger07)
else
call DoNothing()
endif
else
call DoNothing()
endif
else
call DoNothing()
endif
if(hj())then
if(hI())then
set udg_booleans06[2]=true
if(hi())then
call DisableTrigger(GetTriggeringTrigger())
call TriggerExecute(udg_trigger07)
else
call DoNothing()
endif
else
call DoNothing()
endif
else
call DoNothing()
endif
endfunction
function hk takes nothing returns nothing
set udg_trigger06=CreateTrigger()
call DisableTrigger(udg_trigger06)
call TriggerRegisterPlayerChatEvent(udg_trigger06,Player(0),"ready",true)
call TriggerRegisterPlayerChatEvent(udg_trigger06,Player(1),"ready",true)
call TriggerRegisterPlayerChatEvent(udg_trigger06,Player(2),"ready",true)
call TriggerRegisterPlayerChatEvent(udg_trigger06,Player(3),"ready",true)
call TriggerRegisterPlayerChatEvent(udg_trigger06,Player(4),"ready",true)
call TriggerRegisterPlayerChatEvent(udg_trigger06,Player(5),"ready",true)
call TriggerRegisterPlayerChatEvent(udg_trigger06,Player(6),"ready",true)
call TriggerRegisterPlayerChatEvent(udg_trigger06,Player(7),"ready",true)
call TriggerRegisterPlayerChatEvent(udg_trigger06,Player(8),"ready",true)
call TriggerRegisterPlayerChatEvent(udg_trigger06,Player(9),"ready",true)
call TriggerRegisterPlayerChatEvent(udg_trigger06,Player(10),"ready",true)
call TriggerAddAction(udg_trigger06,function hJ)
endfunction
function hK takes nothing returns nothing
endfunction
function hl takes nothing returns nothing
set udg_trigger07=CreateTrigger()
call TriggerAddAction(udg_trigger07,function hK)
endfunction
function hL takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
return true
endfunction
function hm takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect21))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(GetEnteringUnit()),0)
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_9996")
endfunction
function hM takes nothing returns nothing
set udg_trigger08=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger08,udg_rect08)
call TriggerAddCondition(udg_trigger08,Condition(function hL))
call TriggerAddAction(udg_trigger08,function hm)
endfunction
function hn takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
return true
endfunction
function hN takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect23))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(GetEnteringUnit()),0)
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_9997")
endfunction
function ho takes nothing returns nothing
set udg_trigger09=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger09,udg_rect09)
call TriggerAddCondition(udg_trigger09,Condition(function hn))
call TriggerAddAction(udg_trigger09,function hN)
endfunction
function hO takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
return true
endfunction
function hp takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect16))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(GetEnteringUnit()),0)
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_643")
endfunction
function hP takes nothing returns nothing
set udg_trigger10=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger10,udg_rect01)
call TriggerAddCondition(udg_trigger10,Condition(function hO))
call TriggerAddAction(udg_trigger10,function hp)
endfunction
function hq takes nothing returns boolean
if((udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]=="DarkShoGun"))then
return true
endif
if((udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]=="bladedude"))then
return true
endif
if((udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]=="Mykovsky"))then
return true
endif
if((udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]=="Punk_Angel_Girl"))then
return true
endif
if((udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]=="FrenchCondom"))then
return true
endif
if((udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]=="Mastrbate4Peace"))then
return true
endif
return false
endfunction
function hQ takes nothing returns boolean
if(not(udg_booleans02[GetConvertedPlayerId(GetTriggerPlayer())]==false))then
return false
endif
if(not(udg_integer23==16))then
return false
endif
if(not hq())then
return false
endif
return true
endfunction
function hr takes nothing returns boolean
if(not hQ())then
return false
endif
return true
endfunction
function hR takes nothing returns nothing
call DialogClearBJ(udg_dialogs01[GetConvertedPlayerId(GetTriggerPlayer())])
call DialogSetMessageBJ(udg_dialogs01[GetConvertedPlayerId(GetTriggerPlayer())],"TRIGSTR_2168")
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=9
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call DialogAddButtonBJ(udg_dialogs01[GetConvertedPlayerId(GetTriggerPlayer())],I2S(GetForLoopIndexA()))
set udg_buttons01[(GetForLoopIndexA()+((GetConvertedPlayerId(GetTriggerPlayer())*12)-12))]=GetLastCreatedButtonBJ()
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call DialogAddButtonBJ(udg_dialogs01[GetConvertedPlayerId(GetTriggerPlayer())],"TRIGSTR_2169")
set udg_buttons01[(10+((GetConvertedPlayerId(GetTriggerPlayer())*12)-12))]=GetLastCreatedButtonBJ()
call DialogAddButtonBJ(udg_dialogs01[GetConvertedPlayerId(GetTriggerPlayer())],"TRIGSTR_2170")
set udg_buttons01[(11+((GetConvertedPlayerId(GetTriggerPlayer())*12)-12))]=GetLastCreatedButtonBJ()
call DialogAddButtonBJ(udg_dialogs01[GetConvertedPlayerId(GetTriggerPlayer())],"TRIGSTR_2171")
set udg_buttons01[(12+((GetConvertedPlayerId(GetTriggerPlayer())*12)-12))]=GetLastCreatedButtonBJ()
call DialogDisplayBJ(true,udg_dialogs01[GetConvertedPlayerId(GetTriggerPlayer())],GetTriggerPlayer())
endfunction
function hs takes nothing returns nothing
set udg_trigger11=CreateTrigger()
call TriggerRegisterPlayerEventEndCinematic(udg_trigger11,Player(0))
call TriggerRegisterPlayerEventEndCinematic(udg_trigger11,Player(1))
call TriggerRegisterPlayerEventEndCinematic(udg_trigger11,Player(2))
call TriggerRegisterPlayerEventEndCinematic(udg_trigger11,Player(3))
call TriggerRegisterPlayerEventEndCinematic(udg_trigger11,Player(4))
call TriggerRegisterPlayerEventEndCinematic(udg_trigger11,Player(5))
call TriggerRegisterPlayerEventEndCinematic(udg_trigger11,Player(6))
call TriggerRegisterPlayerEventEndCinematic(udg_trigger11,Player(7))
call TriggerRegisterPlayerEventEndCinematic(udg_trigger11,Player(8))
call TriggerRegisterPlayerEventEndCinematic(udg_trigger11,Player(9))
call TriggerRegisterPlayerEventEndCinematic(udg_trigger11,Player(10))
call TriggerAddCondition(udg_trigger11,Condition(function hr))
call TriggerAddAction(udg_trigger11,function hR)
endfunction
function hS takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
return true
endfunction
function ht takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect28))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(GetEnteringUnit()),0)
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_1019")
endfunction
function hT takes nothing returns nothing
set udg_trigger12=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger12,udg_rect12)
call TriggerAddCondition(udg_trigger12,Condition(function hS))
call TriggerAddAction(udg_trigger12,function ht)
endfunction
function hu takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
return true
endfunction
function hU takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect24))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(GetEnteringUnit()),0)
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_1045")
endfunction
function hv takes nothing returns nothing
set udg_trigger13=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger13,udg_rect13)
call TriggerAddCondition(udg_trigger13,Condition(function hu))
call TriggerAddAction(udg_trigger13,function hU)
endfunction
function hV takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
return true
endfunction
function hw takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect19))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(GetEnteringUnit()),0)
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_1089")
endfunction
function hW takes nothing returns nothing
set udg_trigger14=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger14,udg_rect06)
call TriggerAddCondition(udg_trigger14,Condition(function hV))
call TriggerAddAction(udg_trigger14,function hw)
endfunction
function hx takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
return true
endfunction
function hX takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect22))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(GetEnteringUnit()),0)
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_1135")
endfunction
function hy takes nothing returns nothing
set udg_trigger15=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger15,udg_rect07)
call TriggerAddCondition(udg_trigger15,Condition(function hx))
call TriggerAddAction(udg_trigger15,function hX)
endfunction
function hY takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
return true
endfunction
function hz takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect25))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(GetEnteringUnit()),0)
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_1149")
endfunction
function hZ takes nothing returns nothing
set udg_trigger16=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger16,udg_rect10)
call TriggerAddCondition(udg_trigger16,Condition(function hY))
call TriggerAddAction(udg_trigger16,function hz)
endfunction
function h0 takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
return true
endfunction
function h1 takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect27))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(GetEnteringUnit()),0)
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_1151")
endfunction
function h2 takes nothing returns nothing
set udg_trigger17=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger17,udg_rect11)
call TriggerAddCondition(udg_trigger17,Condition(function h0))
call TriggerAddAction(udg_trigger17,function h1)
endfunction
function h3 takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
return true
endfunction
function h4 takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect26))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(GetEnteringUnit()),0)
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_1190")
endfunction
function h5 takes nothing returns nothing
set udg_trigger18=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger18,udg_rect14)
call TriggerAddCondition(udg_trigger18,Condition(function h3))
call TriggerAddAction(udg_trigger18,function h4)
endfunction
function h6 takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
return true
endfunction
function h7 takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect18))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(GetEnteringUnit()),0)
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_1466")
endfunction
function h8 takes nothing returns nothing
set udg_trigger19=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger19,udg_rect02)
call TriggerAddCondition(udg_trigger19,Condition(function h6))
call TriggerAddAction(udg_trigger19,function h7)
endfunction
function h9 takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
return true
endfunction
function Ha takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect15))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(GetEnteringUnit()),0)
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_1479")
endfunction
function HA takes nothing returns nothing
set udg_trigger20=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger20,udg_rect03)
call TriggerAddCondition(udg_trigger20,Condition(function h9))
call TriggerAddAction(udg_trigger20,function Ha)
endfunction
function Hb takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
return true
endfunction
function HB takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect169))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(GetEnteringUnit()),0)
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_2088")
endfunction
function Hc takes nothing returns nothing
set udg_trigger21=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger21,udg_rect166)
call TriggerAddCondition(udg_trigger21,Condition(function Hb))
call TriggerAddAction(udg_trigger21,function HB)
endfunction
function HC takes nothing returns boolean
if((udg_strings02[GetForLoopIndexA()]=="DarkShoGun"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="Mastrbate4Peace"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="Mykovsky"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="bladedude"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="FrenchCondom"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="Punk_Angel_Girl"))then
return true
endif
return false
endfunction
function Hd takes nothing returns boolean
if(not(udg_strings03[GetForLoopIndexA()]==StringIdentity("TRIGSTR_2172")))then
return false
endif
if(not(udg_booleans02[GetConvertedPlayerId(GetTriggerPlayer())]==false))then
return false
endif
if(not HC())then
return false
endif
return true
endfunction
function HD takes nothing returns boolean
if(not(GetForLoopIndexB()==12))then
return false
endif
if(not Hd())then
return false
endif
return true
endfunction
function He takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function HE takes nothing returns boolean
if((udg_strings02[GetForLoopIndexA()]=="DarkShoGun"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="Mastrbate4Peace"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="Mykovsky"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="bladedude"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="FrenchCondom"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="Punk_Angel_Girl"))then
return true
endif
return false
endfunction
function Hf takes nothing returns boolean
if(not(udg_strings03[GetForLoopIndexA()]==StringIdentity("TRIGSTR_1627")))then
return false
endif
if(not(udg_booleans02[GetConvertedPlayerId(GetTriggerPlayer())]==false))then
return false
endif
if(not HE())then
return false
endif
return true
endfunction
function HF takes nothing returns boolean
if(not(GetForLoopIndexB()==12))then
return false
endif
if(not Hf())then
return false
endif
return true
endfunction
function Hg takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function HG takes nothing returns boolean
if((udg_strings02[GetForLoopIndexA()]=="DarkShoGun"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="Mastrbate4Peace"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="Mykovsky"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="bladedude"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="FrenchCondom"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="Punk_Angel_Girl"))then
return true
endif
return false
endfunction
function Hh takes nothing returns boolean
if(not(udg_strings03[GetForLoopIndexA()]==StringIdentity("TRIGSTR_1790")))then
return false
endif
if(not(udg_booleans02[GetConvertedPlayerId(GetTriggerPlayer())]==false))then
return false
endif
if(not HG())then
return false
endif
return true
endfunction
function HH takes nothing returns boolean
if(not(GetForLoopIndexB()==12))then
return false
endif
if(not Hh())then
return false
endif
return true
endfunction
function Hi takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function HI takes nothing returns boolean
if((udg_strings02[GetForLoopIndexA()]=="DarkShoGun"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="Mastrbate4Peace"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="Mykovsky"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="bladedude"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="FrenchCondom"))then
return true
endif
if((udg_strings02[GetForLoopIndexA()]=="Punk_Angel_Girl"))then
return true
endif
return false
endfunction
function Hj takes nothing returns boolean
if(not(udg_strings03[GetForLoopIndexA()]==StringIdentity("TRIGSTR_1806")))then
return false
endif
if(not(udg_booleans02[GetConvertedPlayerId(GetTriggerPlayer())]==false))then
return false
endif
if(not HI())then
return false
endif
return true
endfunction
function HJ takes nothing returns boolean
if(not(GetForLoopIndexB()==12))then
return false
endif
if(not Hj())then
return false
endif
return true
endfunction
function Hk takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function HK takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function Hl takes nothing returns boolean
return GetBooleanAnd(Hk(),HK())
endfunction
function HL takes nothing returns nothing
call SetPlayerName(GetEnumPlayer(),udg_strings04[GetConvertedPlayerId(GetEnumPlayer())])
endfunction
function Hm takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function HM takes nothing returns nothing
call SetPlayerAllianceStateBJ(Player(0),GetEnumPlayer(),bj_ALLIANCE_ALLIED_VISION)
endfunction
function Hn takes nothing returns boolean
if(not(udg_strings03[GetForLoopIndexA()]==StringIdentity("TRIGSTR_2070")))then
return false
endif
if(not(udg_strings02[GetForLoopIndexA()]=="DarkShoGun"))then
return false
endif
return true
endfunction
function HN takes nothing returns boolean
if(not(GetForLoopIndexB()==12))then
return false
endif
if(not Hn())then
return false
endif
return true
endfunction
function Ho takes nothing returns boolean
if(not(GetForLoopIndexB()==11))then
return false
endif
return true
endfunction
function HO takes nothing returns boolean
if(not(StringLength(udg_strings03[GetForLoopIndexA()])<=3))then
return false
endif
return true
endfunction
function Hp takes nothing returns boolean
if(not(GetForLoopIndexB()==10))then
return false
endif
return true
endfunction
function HP takes nothing returns boolean
if(not(StringLength(udg_strings03[GetForLoopIndexA()])<=3))then
return false
endif
return true
endfunction
function Hq takes nothing returns boolean
if(not(GetForLoopIndexB()<=9))then
return false
endif
return true
endfunction
function HQ takes nothing returns boolean
if(not(GetClickedButtonBJ()==udg_buttons01[(GetForLoopIndexB()+((GetForLoopIndexA()*12)-12))]))then
return false
endif
return true
endfunction
function Hr takes nothing returns nothing
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=10
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set bj_forLoopBIndex=1
set bj_forLoopBIndexEnd=12
loop
exitwhen bj_forLoopBIndex>bj_forLoopBIndexEnd
if(HQ())then
if(Hq())then
if(HP())then
set udg_strings03[GetForLoopIndexA()]=(udg_strings03[GetForLoopIndexA()]+I2S(GetForLoopIndexB()))
call DialogSetMessageBJ(udg_dialogs01[GetForLoopIndexA()],udg_strings03[GetForLoopIndexA()])
call DialogDisplayBJ(true,udg_dialogs01[GetForLoopIndexA()],ConvertedPlayer(GetForLoopIndexA()))
else
call DialogDisplayBJ(true,udg_dialogs01[GetForLoopIndexA()],ConvertedPlayer(GetForLoopIndexA()))
endif
else
if(Hp())then
if(HO())then
set udg_strings03[GetForLoopIndexA()]=(udg_strings03[GetForLoopIndexA()]+"0")
call DialogSetMessageBJ(udg_dialogs01[GetForLoopIndexA()],udg_strings03[GetForLoopIndexA()])
call DialogDisplayBJ(true,udg_dialogs01[GetForLoopIndexA()],ConvertedPlayer(GetForLoopIndexA()))
else
call DialogDisplayBJ(true,udg_dialogs01[GetForLoopIndexA()],ConvertedPlayer(GetForLoopIndexA()))
endif
else
if(Ho())then
set udg_strings03[GetForLoopIndexA()]=SubStringBJ(udg_strings03[GetForLoopIndexA()],1,(StringLength(udg_strings03[GetForLoopIndexA()])-1))
call DialogSetMessageBJ(udg_dialogs01[GetForLoopIndexA()],udg_strings03[GetForLoopIndexA()])
call DialogDisplayBJ(true,udg_dialogs01[GetForLoopIndexA()],ConvertedPlayer(GetForLoopIndexA()))
else
if(HD())then
set udg_booleans02[GetForLoopIndexA()]=true
else
call DoNothing()
endif
if(HF())then
call UnitAddItemByIdSwapped('I00B',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function He))))
set udg_booleans02[GetForLoopIndexA()]=true
else
call DoNothing()
endif
if(HH())then
call UnitAddItemByIdSwapped('I011',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function Hg))))
set udg_booleans02[GetForLoopIndexA()]=true
else
call DoNothing()
endif
if(HJ())then
call UnitAddItemByIdSwapped('I00C',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function Hi))))
set udg_booleans02[GetForLoopIndexA()]=true
else
call DoNothing()
endif
if(HN())then
call ForForce(GetPlayersMatching(Condition(function Hl)),function HL)
call DisableTrigger(udg_trigger40)
call DisableTrigger(udg_trigger170)
call DisableTrigger(udg_trigger171)
call DisableTrigger(udg_trigger172)
call DisableTrigger(udg_trigger173)
call DisableTrigger(udg_trigger175)
call DisableTrigger(udg_trigger176)
call DisableTrigger(udg_trigger177)
call DisableTrigger(udg_trigger178)
call EnableTrigger(udg_trigger04)
set udg_integer15=0
call PauseTimerBJ(true,udg_timer05)
call DestroyTimerDialogBJ(udg_timerdialog04)
call ForGroupBJ(GetUnitsInRectAll(GetPlayableMapRect()),function Hm)
call PlaySoundBJ(udg_sound70)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2100")
call ForForce(GetPlayersAll(),function HM)
else
call DoNothing()
endif
endif
endif
endif
else
call DoNothing()
endif
set bj_forLoopBIndex=bj_forLoopBIndex+1
endloop
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
function HR takes nothing returns nothing
set udg_trigger22=CreateTrigger()
call TriggerRegisterDialogEventBJ(udg_trigger22,udg_dialogs01[1])
call TriggerRegisterDialogEventBJ(udg_trigger22,udg_dialogs01[2])
call TriggerRegisterDialogEventBJ(udg_trigger22,udg_dialogs01[3])
call TriggerRegisterDialogEventBJ(udg_trigger22,udg_dialogs01[4])
call TriggerRegisterDialogEventBJ(udg_trigger22,udg_dialogs01[5])
call TriggerRegisterDialogEventBJ(udg_trigger22,udg_dialogs01[6])
call TriggerRegisterDialogEventBJ(udg_trigger22,udg_dialogs01[7])
call TriggerRegisterDialogEventBJ(udg_trigger22,udg_dialogs01[8])
call TriggerRegisterDialogEventBJ(udg_trigger22,udg_dialogs01[9])
call TriggerRegisterDialogEventBJ(udg_trigger22,udg_dialogs01[10])
call TriggerRegisterDialogEventBJ(udg_trigger22,udg_dialogs01[11])
call TriggerAddAction(udg_trigger22,function Hr)
endfunction
function Hs takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
return true
endfunction
function HS takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect17))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(GetEnteringUnit()),0)
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_1505")
endfunction
function Ht takes nothing returns nothing
set udg_trigger23=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger23,udg_rect04)
call TriggerAddCondition(udg_trigger23,Condition(function Hs))
call TriggerAddAction(udg_trigger23,function HS)
endfunction
function HT takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
return true
endfunction
function Hu takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect20))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(GetEnteringUnit()),0)
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_1506")
endfunction
function HU takes nothing returns nothing
set udg_trigger24=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger24,udg_rect05)
call TriggerAddCondition(udg_trigger24,Condition(function HT))
call TriggerAddAction(udg_trigger24,function Hu)
endfunction
function Hv takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
return true
endfunction
function HV takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect167))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(GetEnteringUnit()),0)
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_1820")
endfunction
function Hw takes nothing returns nothing
set udg_trigger25=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger25,udg_rect168)
call TriggerAddCondition(udg_trigger25,Condition(function Hv))
call TriggerAddAction(udg_trigger25,function HV)
endfunction
function HW takes nothing returns boolean
if((GetDestructableTypeId(GetEnumDestructable())=='B008'))then
return true
endif
if((GetDestructableTypeId(GetEnumDestructable())=='B009'))then
return true
endif
if((GetDestructableTypeId(GetEnumDestructable())=='B00A'))then
return true
endif
if((GetDestructableTypeId(GetEnumDestructable())=='B00B'))then
return true
endif
if((GetDestructableTypeId(GetEnumDestructable())=='B002'))then
return true
endif
if((GetDestructableTypeId(GetEnumDestructable())=='B000'))then
return true
endif
if((GetDestructableTypeId(GetEnumDestructable())=='B007'))then
return true
endif
if((GetDestructableTypeId(GetEnumDestructable())=='B001'))then
return true
endif
if((GetDestructableTypeId(GetEnumDestructable())=='B004'))then
return true
endif
if((GetDestructableTypeId(GetEnumDestructable())=='B003'))then
return true
endif
if((GetDestructableTypeId(GetEnumDestructable())=='B005'))then
return true
endif
if((GetDestructableTypeId(GetEnumDestructable())=='B006'))then
return true
endif
return false
endfunction
function Hx takes nothing returns boolean
if(not HW())then
return false
endif
return true
endfunction
function HX takes nothing returns nothing
if(Hx())then
set udg_integer01=(udg_integer01+1)
set udg_destructables01[udg_integer01]=GetEnumDestructable()
set udg_rects01[udg_integer01]=RectFromCenterSizeBJ(GetDestructableLoc(GetEnumDestructable()),256.00,256.00)
set udg_reals05[udg_integer01]=GetDestructableLife(udg_destructables01[udg_integer01])
set udg_integers14[udg_integer01]=0
call TriggerRegisterEnterRectSimple(udg_trigger27,udg_rects01[udg_integer01])
call TriggerRegisterLeaveRectSimple(udg_trigger27,udg_rects01[udg_integer01])
else
endif
endfunction
function Hy takes nothing returns nothing
call EnumDestructablesInRectAll(GetEntireMapRect(),function HX)
endfunction
function HY takes nothing returns nothing
set udg_trigger26=CreateTrigger()
call TriggerAddAction(udg_trigger26,function Hy)
endfunction
function Hz takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SUMMONED)!=true)
endfunction
function HZ takes nothing returns boolean
if(not(GetTriggerUnit()==GetEnteringUnit()))then
return false
endif
return true
endfunction
function H0 takes nothing returns boolean
if(not(udg_reals05[GetForLoopIndexA()]>0.00))then
return false
endif
if(not(IsUnitType(GetTriggerUnit(),UNIT_TYPE_SUMMONED)==false))then
return false
endif
return true
endfunction
function H1 takes nothing returns boolean
if(not(udg_reals05[GetForLoopIndexA()]>0.00))then
return false
endif
return true
endfunction
function H2 takes nothing returns boolean
return(udg_reals05[GetForLoopIndexA()]>0.00)
endfunction
function H3 takes nothing returns boolean
if(not(udg_booleans01[GetForLoopIndexA()]==true))then
return false
endif
return true
endfunction
function H4 takes nothing returns boolean
if(not(udg_integers14[GetForLoopIndexA()]==0))then
return false
endif
return true
endfunction
function H5 takes nothing returns boolean
return(udg_reals05[GetForLoopIndexA()]>0.00)
endfunction
function H6 takes nothing returns boolean
if(not(udg_integers14[GetForLoopIndexA()]==1))then
return false
endif
return true
endfunction
function H7 takes nothing returns boolean
if(not(CountUnitsInGroup(udg_group01)==0))then
return false
endif
return true
endfunction
function H8 takes nothing returns boolean
if(not H7())then
return false
endif
return true
endfunction
function H9 takes nothing returns boolean
if(not H0())then
return false
endif
return true
endfunction
function ia takes nothing returns boolean
if(not(DistanceBetweenPoints(udg_location01,udg_location02)<=256.00))then
return false
endif
return true
endfunction
function iA takes nothing returns nothing
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=udg_integer01
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_location01=GetDestructableLoc(udg_destructables01[GetForLoopIndexA()])
set udg_location02=GetUnitLoc(GetTriggerUnit())
if(ia())then
set udg_group01=GetUnitsInRectMatching(udg_rects01[GetForLoopIndexA()],Condition(function Hz))
if(HZ())then
call GroupAddUnitSimple(GetEnteringUnit(),udg_group01)
else
call DoNothing()
endif
if(H9())then
if(H8())then
if(H6())then
if(H5())then
call ModifyGateBJ(bj_GATEOPERATION_CLOSE,udg_destructables01[GetForLoopIndexA()])
else
call DoNothing()
endif
set udg_integers14[GetForLoopIndexA()]=0
call SetDestructableLife(udg_destructables01[GetForLoopIndexA()],udg_reals05[GetForLoopIndexA()])
else
call DoNothing()
endif
else
if(H4())then
if(H3())then
set udg_reals05[GetForLoopIndexA()]=GetDestructableLife(udg_destructables01[GetForLoopIndexA()])
if(H1())then
call PlaySoundOnUnitBJ(udg_sound68,100,GetEnteringUnit())
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_966")
else
call DoNothing()
endif
else
set udg_reals05[GetForLoopIndexA()]=GetDestructableLife(udg_destructables01[GetForLoopIndexA()])
if(H2())then
call ModifyGateBJ(bj_GATEOPERATION_OPEN,udg_destructables01[GetForLoopIndexA()])
else
call DoNothing()
endif
set udg_integers14[GetForLoopIndexA()]=1
endif
else
call DoNothing()
endif
endif
else
call DoNothing()
endif
call DestroyGroup(udg_group01)
else
call DoNothing()
endif
call RemoveLocation(udg_location01)
call RemoveLocation(udg_location02)
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
function ib takes nothing returns nothing
set udg_trigger27=CreateTrigger()
call TriggerAddAction(udg_trigger27,function iA)
endfunction
function iB takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I009'))then
return false
endif
return true
endfunction
function ic takes nothing returns boolean
if(not(udg_booleans01[GetForLoopIndexA()]==true))then
return false
endif
return true
endfunction
function iC takes nothing returns boolean
if(not(udg_reals05[GetForLoopIndexA()]>0.00))then
return false
endif
if(not(RectContainsUnit(udg_rects01[GetForLoopIndexA()],GetManipulatingUnit())==true))then
return false
endif
if(not(GetDestructableTypeId(udg_destructables01[GetForLoopIndexA()])!='B003'))then
return false
endif
if(not(GetDestructableTypeId(udg_destructables01[GetForLoopIndexA()])!='B004'))then
return false
endif
if(not(GetDestructableTypeId(udg_destructables01[GetForLoopIndexA()])!='B006'))then
return false
endif
if(not(GetDestructableTypeId(udg_destructables01[GetForLoopIndexA()])!='B005'))then
return false
endif
return true
endfunction
function id takes nothing returns nothing
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=udg_integer01
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
if(iC())then
if(ic())then
set udg_booleans01[GetForLoopIndexA()]=false
call PlaySoundOnUnitBJ(udg_sound67,100,GetManipulatingUnit())
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_1553")
set udg_reals05[GetForLoopIndexA()]=GetDestructableLife(udg_destructables01[GetForLoopIndexA()])
call ModifyGateBJ(bj_GATEOPERATION_OPEN,udg_destructables01[GetForLoopIndexA()])
set udg_integers14[GetForLoopIndexA()]=1
else
set udg_booleans01[GetForLoopIndexA()]=true
call PlaySoundOnUnitBJ(udg_sound67,100,GetManipulatingUnit())
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_1593")
call ModifyGateBJ(bj_GATEOPERATION_CLOSE,udg_destructables01[GetForLoopIndexA()])
set udg_integers14[GetForLoopIndexA()]=0
call SetDestructableLife(udg_destructables01[GetForLoopIndexA()],udg_reals05[GetForLoopIndexA()])
endif
else
call DoNothing()
endif
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
function iD takes nothing returns nothing
set udg_trigger28=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger28,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger28,Condition(function iB))
call TriggerAddAction(udg_trigger28,function id)
endfunction
function ie takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==udg_player02))then
return false
endif
return true
endfunction
function iE takes nothing returns boolean
if(not(udg_integer02=='h00C'))then
return false
endif
return true
endfunction
function iF takes nothing returns boolean
if(not(udg_integer02=='h00D'))then
return false
endif
return true
endfunction
function ig takes nothing returns boolean
if(not(udg_integer02=='h00G'))then
return false
endif
return true
endfunction
function iG takes nothing returns boolean
if(not(udg_integer02=='h00H'))then
return false
endif
return true
endfunction
function ih takes nothing returns boolean
if(not(udg_integer02=='h00E'))then
return false
endif
return true
endfunction
function iH takes nothing returns boolean
if(not(udg_integer02=='h00F'))then
return false
endif
return true
endfunction
function ii takes nothing returns boolean
if(not(udg_integer02=='h00P'))then
return false
endif
return true
endfunction
function iI takes nothing returns nothing
call UnitAddAbilityBJ('A07P',GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(GetEnumPlayer(),'h00Z')))
endfunction
function ij takes nothing returns boolean
if(not(GetTimeOfDay()==24.00))then
return false
endif
return true
endfunction
function iJ takes nothing returns boolean
if(not(udg_integer02=='h00O'))then
return false
endif
return true
endfunction
function ik takes nothing returns boolean
if(not(udg_integer02=='h00N'))then
return false
endif
return true
endfunction
function iK takes nothing returns boolean
if(not(udg_integer02=='h00M'))then
return false
endif
return true
endfunction
function il takes nothing returns boolean
if(not(udg_integer02=='h00L'))then
return false
endif
return true
endfunction
function iL takes nothing returns boolean
if(not(udg_integer02=='h00K'))then
return false
endif
return true
endfunction
function im takes nothing returns boolean
if(not(udg_integer02=='h00I'))then
return false
endif
return true
endfunction
function iM takes nothing returns boolean
if(not(udg_integer02=='h00J'))then
return false
endif
return true
endfunction
function in takes nothing returns boolean
if(not(udg_integer02=='h01C'))then
return false
endif
return true
endfunction
function iN takes nothing returns boolean
if(not(udg_integer02=='h02E'))then
return false
endif
return true
endfunction
function io takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)!=true)
endfunction
function iO takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function ip takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SUMMONED)!=true)
endfunction
function iP takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_MECHANICAL)!=true)
endfunction
function iq takes nothing returns boolean
return GetBooleanAnd(ip(),iP())
endfunction
function iQ takes nothing returns boolean
return GetBooleanAnd(iO(),iq())
endfunction
function ir takes nothing returns boolean
return GetBooleanAnd(io(),iQ())
endfunction
function iR takes nothing returns nothing
call AddSpecialEffectLocBJ(GetUnitLoc(GetEnumUnit()),"Objects\\Spawnmodels\\Demon\\DemonLargeDeathExplode\\DemonLargeDeathExplode.mdl")
call UnitAddAbilityBJ('S002',GetEnumUnit())
call SetUnitAbilityLevelSwapped('S002',GetEnumUnit(),udg_integer17)
call SetUnitColor(GetEnumUnit(),ConvertPlayerColor(12))
endfunction
function is takes nothing returns nothing
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerMatching(GetEnumPlayer(),Condition(function ir)),function iR)
endfunction
function iS takes nothing returns boolean
return(udg_integer03>=4)
endfunction
function it takes nothing returns nothing
set udg_integer02=GetUnitTypeId(GetTriggerUnit())
set udg_integer03=(udg_integer03+1)
if(iE())then
call EnableTrigger(udg_trigger33)
set udg_integer04='h00S'
call SetUnitColor(GetTriggerUnit(),ConvertPlayerColor(12))
call PlaySoundBJ(udg_sound26)
call SetPlayerUnitAvailableBJ('h00E',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00F',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00D',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00C',false,udg_player02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1628")
set udg_integer17=2
set udg_integer05=600
else
call DoNothing()
endif
if(iF())then
call EnableTrigger(udg_trigger33)
set udg_integer04='h00R'
call SetUnitColor(GetTriggerUnit(),ConvertPlayerColor(12))
call PlaySoundBJ(udg_sound27)
call SetPlayerUnitAvailableBJ('h00G',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00H',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00D',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00C',false,udg_player02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1629")
set udg_integer17=3
set udg_integer05=600
else
call DoNothing()
endif
if(ig())then
call EnableTrigger(udg_trigger33)
set udg_integer04='h00T'
call SetUnitColor(GetTriggerUnit(),ConvertPlayerColor(12))
call PlaySoundBJ(udg_sound30)
call DisableTrigger(udg_trigger57)
call SetPlayerUnitAvailableBJ('h00M',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00N',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00G',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00H',false,udg_player02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1630")
set udg_integer17=6
set udg_integer05=900
else
call DoNothing()
endif
if(iG())then
call EnableTrigger(udg_trigger33)
set udg_integer04='h00U'
call SetUnitColor(GetTriggerUnit(),ConvertPlayerColor(12))
call PlaySoundBJ(udg_sound31)
call DisableTrigger(udg_trigger57)
call SetPlayerUnitAvailableBJ('h00O',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00P',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00G',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00H',false,udg_player02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1631")
set udg_integer17=7
set udg_integer05=900
else
call DoNothing()
endif
if(ih())then
call EnableTrigger(udg_trigger33)
set udg_integer04='h00V'
call SetUnitColor(GetTriggerUnit(),ConvertPlayerColor(12))
call PlaySoundBJ(udg_sound28)
call SetPlayerUnitAvailableBJ('h00I',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00J',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00F',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00E',false,udg_player02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1632")
set udg_integer17=4
set udg_integer05=900
else
call DoNothing()
endif
if(iH())then
call EnableTrigger(udg_trigger33)
set udg_integer04='h00W'
call SetUnitColor(GetTriggerUnit(),ConvertPlayerColor(12))
call PlaySoundBJ(udg_sound29)
call SetPlayerUnitAvailableBJ('h00K',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00L',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00F',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00E',false,udg_player02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1633")
set udg_integer17=5
set udg_integer05=900
else
call DoNothing()
endif
if(ii())then
set udg_integer04='h010'
call PlaySoundBJ(udg_sound38)
call SetPlayerName(udg_player02,"TRIGSTR_1634")
call DisableTrigger(udg_trigger57)
call SetPlayerUnitAvailableBJ('h00P',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00O',false,udg_player02)
call SetPlayerUnitAvailableBJ('h01C',false,udg_player02)
call SetPlayerUnitAvailableBJ('h02E',false,udg_player02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1635")
set udg_integer17=11
set udg_integer05=0
else
call DoNothing()
endif
if(iJ())then
set udg_integer04='h00Z'
call PlaySoundBJ(udg_sound39)
call SetPlayerName(udg_player02,"TRIGSTR_1636")
set udg_unit12=GetTriggerUnit()
call DisableTrigger(udg_trigger57)
call SetPlayerUnitAvailableBJ('h00P',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00O',false,udg_player02)
call SetPlayerUnitAvailableBJ('h01C',false,udg_player02)
call SetPlayerUnitAvailableBJ('h02E',false,udg_player02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1637")
set udg_integer17=10
set udg_integer05=0
call TriggerSleepAction(1.00)
if(ij())then
call UnitAddAbilityBJ('A07P',GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(udg_player02,'h00O')))
call ForForce(udg_force01,function iI)
else
call DoNothing()
endif
else
call DoNothing()
endif
if(ik())then
set udg_integer04='h00X'
call PlaySoundBJ(udg_sound37)
call SetPlayerName(udg_player02,"TRIGSTR_1639")
call DisableTrigger(udg_trigger57)
call SetPlayerUnitAvailableBJ('h00N',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00M',false,udg_player02)
call SetPlayerUnitAvailableBJ('h01C',false,udg_player02)
call SetPlayerUnitAvailableBJ('h02E',false,udg_player02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1641")
set udg_integer17=9
set udg_integer05=0
else
call DoNothing()
endif
if(iK())then
set udg_integer04='h00Y'
call PlaySoundBJ(udg_sound36)
call DisableTrigger(udg_trigger57)
call SetPlayerUnitAvailableBJ('h00N',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00M',false,udg_player02)
call SetPlayerUnitAvailableBJ('h01C',false,udg_player02)
call SetPlayerUnitAvailableBJ('h02E',false,udg_player02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1642")
set udg_integer17=8
set udg_integer05=0
else
call DoNothing()
endif
if(il())then
set udg_integer04='h014'
call PlaySoundBJ(udg_sound34)
call SetPlayerName(udg_player02,"TRIGSTR_1643")
call SetPlayerUnitAvailableBJ('h00L',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00K',false,udg_player02)
call SetPlayerUnitAvailableBJ('h01C',false,udg_player02)
call SetPlayerUnitAvailableBJ('h02E',false,udg_player02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1644")
set udg_integer17=15
set udg_integer05=0
else
call DoNothing()
endif
if(iL())then
set udg_integer04='h013'
call PlaySoundBJ(udg_sound35)
call SetPlayerName(udg_player02,"TRIGSTR_1645")
call SetPlayerUnitAvailableBJ('h00L',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00K',false,udg_player02)
call SetPlayerUnitAvailableBJ('h01C',false,udg_player02)
call SetPlayerUnitAvailableBJ('h02E',false,udg_player02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1646")
set udg_integer17=14
set udg_integer05=0
else
call DoNothing()
endif
if(im())then
set udg_integer04='h011'
call PlaySoundBJ(udg_sound32)
call SetPlayerName(udg_player02,"TRIGSTR_1647")
call SetPlayerUnitAvailableBJ('h00I',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00J',false,udg_player02)
call SetPlayerUnitAvailableBJ('h01C',false,udg_player02)
call SetPlayerUnitAvailableBJ('h02E',false,udg_player02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1648")
set udg_integer17=12
set udg_integer05=0
else
call DoNothing()
endif
if(iM())then
set udg_integer04='h012'
call PlaySoundBJ(udg_sound33)
call SetPlayerName(udg_player02,"TRIGSTR_1649")
call SetPlayerUnitAvailableBJ('h00I',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00J',false,udg_player02)
call SetPlayerUnitAvailableBJ('h01C',false,udg_player02)
call SetPlayerUnitAvailableBJ('h02E',false,udg_player02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1650")
set udg_integer17=13
set udg_integer05=0
else
call DoNothing()
endif
if(in())then
set udg_integer04='h01D'
call PlaySoundBJ(udg_sound40)
call SetPlayerName(udg_player02,"TRIGSTR_1651")
call RemoveItem(GetItemOfTypeFromUnitBJ(GetTriggerUnit(),'I01H'))
call SetPlayerUnitAvailableBJ('h00I',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00J',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00L',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00K',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00N',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00M',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00P',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00O',false,udg_player02)
call SetPlayerUnitAvailableBJ('h01C',false,udg_player02)
call SetPlayerUnitAvailableBJ('h02E',false,udg_player02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1652")
set udg_integer17=16
set udg_integer05=0
else
call DoNothing()
endif
if(iN())then
set udg_integer04='h02F'
call PlaySoundBJ(udg_sound65)
call SetPlayerName(udg_player02,"TRIGSTR_1653")
set udg_boolean01=false
call SetPlayerUnitAvailableBJ('h00I',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00J',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00L',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00K',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00N',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00M',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00P',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00O',false,udg_player02)
call SetPlayerUnitAvailableBJ('h01C',false,udg_player02)
call SetPlayerUnitAvailableBJ('h02E',false,udg_player02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1654")
set udg_integer17=17
set udg_integer05=0
else
call DoNothing()
endif
call TriggerSleepAction(0.05)
call ForForce(udg_force01,function is)
call TriggerSleepAction(5.00)
if(iS())then
call DoNothing()
else
return
endif
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1656")
call PingMinimapLocForForceEx(GetPlayersAll(),GetRectCenter(udg_rect142),5.00,bj_MINIMAPPINGSTYLE_SIMPLE,100,50.00,100)
call PingMinimapLocForForceEx(GetPlayersAll(),GetRectCenter(udg_rect143),5.00,bj_MINIMAPPINGSTYLE_SIMPLE,100,50.00,100)
call PingMinimapLocForForceEx(GetPlayersAll(),GetRectCenter(udg_rect144),5.00,bj_MINIMAPPINGSTYLE_SIMPLE,100,50.00,100)
call PingMinimapLocForForceEx(GetPlayersAll(),GetRectCenter(udg_rect174),5.00,bj_MINIMAPPINGSTYLE_SIMPLE,100,50.00,100)
call EnableTrigger(udg_trigger341)
call EnableTrigger(udg_trigger342)
call EnableTrigger(udg_trigger343)
call EnableTrigger(udg_trigger344)
endfunction
function iT takes nothing returns nothing
set udg_trigger29=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger29,EVENT_PLAYER_UNIT_UPGRADE_FINISH)
call TriggerAddCondition(udg_trigger29,Condition(function ie))
call TriggerAddAction(udg_trigger29,function it)
endfunction
function iu takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),1,1)=="="))then
return false
endif
return true
endfunction
function iU takes nothing returns boolean
if(not(IsPlayerInForce(GetTriggerPlayer(),udg_force01)==true))then
return false
endif
return true
endfunction
function iv takes nothing returns boolean
if(not(GetTriggerPlayer()==udg_player02))then
return false
endif
return true
endfunction
function iV takes nothing returns nothing
if(iv())then
call DisplayTextToForce(GetForceOfPlayer(udg_player02),("|cff800000Cerebrate:|r "+SubStringBJ(GetEventPlayerChatString(),2,266)))
call DisplayTextToForce(udg_force01,("|cff800000Cerebrate:|r "+SubStringBJ(GetEventPlayerChatString(),2,266)))
else
if(iU())then
call DisplayTextToForce(GetForceOfPlayer(udg_player02),((udg_strings01[GetConvertedPlayerId(GetTriggerPlayer())]+": ")+SubStringBJ(GetEventPlayerChatString(),2,266)))
call DisplayTextToForce(udg_force01,((udg_strings01[GetConvertedPlayerId(GetTriggerPlayer())]+": ")+SubStringBJ(GetEventPlayerChatString(),2,266)))
else
endif
endif
endfunction
function iw takes nothing returns nothing
set udg_trigger30=CreateTrigger()
call TriggerRegisterPlayerChatEvent(udg_trigger30,Player(0),"=",false)
call TriggerRegisterPlayerChatEvent(udg_trigger30,Player(1),"=",false)
call TriggerRegisterPlayerChatEvent(udg_trigger30,Player(2),"=",false)
call TriggerRegisterPlayerChatEvent(udg_trigger30,Player(3),"=",false)
call TriggerRegisterPlayerChatEvent(udg_trigger30,Player(4),"=",false)
call TriggerRegisterPlayerChatEvent(udg_trigger30,Player(5),"=",false)
call TriggerRegisterPlayerChatEvent(udg_trigger30,Player(6),"=",false)
call TriggerRegisterPlayerChatEvent(udg_trigger30,Player(7),"=",false)
call TriggerRegisterPlayerChatEvent(udg_trigger30,Player(8),"=",false)
call TriggerRegisterPlayerChatEvent(udg_trigger30,Player(9),"=",false)
call TriggerRegisterPlayerChatEvent(udg_trigger30,Player(10),"=",false)
call TriggerAddCondition(udg_trigger30,Condition(function iu))
call TriggerAddAction(udg_trigger30,function iV)
endfunction
function iW takes nothing returns boolean
if((IsPlayerInForce(GetTriggerPlayer(),udg_force01)==true))then
return true
endif
if((GetTriggerPlayer()==udg_player02))then
return true
endif
return false
endfunction
function ix takes nothing returns boolean
if(not(IsPlayerEnemy(GetTriggerPlayer(),Player(11))==true))then
return false
endif
if(not iW())then
return false
endif
return true
endfunction
function iX takes nothing returns boolean
if(not ix())then
return false
endif
return true
endfunction
function iy takes nothing returns boolean
if(not(GetTriggerPlayer()==udg_player02))then
return false
endif
return true
endfunction
function iY takes nothing returns nothing
call DisplayTextToForce(GetForceOfPlayer(GetTriggerPlayer()),"TRIGSTR_2546")
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(11),bj_ALLIANCE_ALLIED)
if(iy())then
call SetPlayerAllianceStateBJ(Player(11),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_UNITS)
else
call SetPlayerAllianceStateBJ(Player(11),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
endif
endfunction
function iz takes nothing returns nothing
set udg_trigger31=CreateTrigger()
call TriggerRegisterPlayerChatEvent(udg_trigger31,Player(0),"-ally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger31,Player(1),"-ally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger31,Player(2),"-ally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger31,Player(3),"-ally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger31,Player(4),"-ally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger31,Player(5),"-ally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger31,Player(6),"-ally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger31,Player(7),"-ally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger31,Player(8),"-ally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger31,Player(9),"-ally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger31,Player(10),"-ally",true)
call TriggerAddCondition(udg_trigger31,Condition(function iX))
call TriggerAddAction(udg_trigger31,function iY)
endfunction
function iZ takes nothing returns boolean
if((IsPlayerInForce(GetTriggerPlayer(),udg_force01)==true))then
return true
endif
if((GetTriggerPlayer()==udg_player02))then
return true
endif
return false
endfunction
function i0 takes nothing returns boolean
if(not(IsPlayerAlly(GetTriggerPlayer(),Player(11))==true))then
return false
endif
if(not iZ())then
return false
endif
return true
endfunction
function i1 takes nothing returns boolean
if(not i0())then
return false
endif
return true
endfunction
function i2 takes nothing returns nothing
call DisplayTextToForce(GetForceOfPlayer(GetTriggerPlayer()),"TRIGSTR_2547")
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(11),bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(11),GetTriggerPlayer(),bj_ALLIANCE_UNALLIED_VISION)
endfunction
function i3 takes nothing returns nothing
set udg_trigger32=CreateTrigger()
call TriggerRegisterPlayerChatEvent(udg_trigger32,Player(0),"-unally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger32,Player(1),"-unally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger32,Player(2),"-unally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger32,Player(3),"-unally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger32,Player(4),"-unally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger32,Player(5),"-unally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger32,Player(6),"-unally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger32,Player(7),"-unally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger32,Player(8),"-unally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger32,Player(9),"-unally",true)
call TriggerRegisterPlayerChatEvent(udg_trigger32,Player(10),"-unally",true)
call TriggerAddCondition(udg_trigger32,Condition(function i1))
call TriggerAddAction(udg_trigger32,function i2)
endfunction
function i4 takes nothing returns boolean
if(not(udg_boolean02==false))then
return false
endif
return true
endfunction
function i5 takes nothing returns boolean
if((udg_integers25[1]==1))then
return true
endif
if((udg_integers25[2]==1))then
return true
endif
if((udg_integers25[3]==1))then
return true
endif
if((udg_integers25[4]==1))then
return true
endif
if((udg_integers25[5]==1))then
return true
endif
return false
endfunction
function i6 takes nothing returns boolean
if(not(udg_integer28==1))then
return false
endif
if(not(udg_integer29<64))then
return false
endif
if(not i5())then
return false
endif
return true
endfunction
function i7 takes nothing returns boolean
if(not i6())then
return false
endif
return true
endfunction
function i8 takes nothing returns boolean
if(not(GetPlayerState(udg_player02,PLAYER_STATE_RESOURCE_LUMBER)>=udg_integer05))then
return false
endif
return true
endfunction
function i9 takes nothing returns boolean
if(not(GetPlayerState(udg_player02,PLAYER_STATE_RESOURCE_LUMBER)<udg_integer05))then
return false
endif
return true
endfunction
function Ia takes nothing returns nothing
if(i7())then
return
else
call DoNothing()
endif
if(i9())then
call AdjustPlayerStateBJ((1+CountPlayersInForceBJ(udg_force01)),udg_player02,PLAYER_STATE_RESOURCE_LUMBER)
if(i8())then
call DisplayTextToForce(GetForceOfPlayer(udg_player02),"TRIGSTR_1657")
call SetPlayerStateBJ(udg_player02,PLAYER_STATE_RESOURCE_LUMBER,udg_integer05)
else
call DoNothing()
endif
else
call DoNothing()
endif
endfunction
function IA takes nothing returns nothing
set udg_trigger33=CreateTrigger()
call TriggerRegisterTimerEventPeriodic(udg_trigger33,1.50)
call TriggerAddCondition(udg_trigger33,Condition(function i4))
call TriggerAddAction(udg_trigger33,function Ia)
endfunction
function Ib takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==udg_player02))then
return false
endif
return true
endfunction
function IB takes nothing returns nothing
call DisableTrigger(udg_trigger33)
endfunction
function Ic takes nothing returns nothing
set udg_trigger34=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger34,EVENT_PLAYER_UNIT_UPGRADE_START)
call TriggerAddCondition(udg_trigger34,Condition(function Ib))
call TriggerAddAction(udg_trigger34,function IB)
endfunction
function IC takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==udg_player02))then
return false
endif
return true
endfunction
function Id takes nothing returns nothing
call EnableTrigger(udg_trigger33)
call SetUnitScalePercent(GetTriggerUnit(),110.00,110.00,110.00)
endfunction
function ID takes nothing returns nothing
set udg_trigger35=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger35,EVENT_PLAYER_UNIT_UPGRADE_CANCEL)
call TriggerAddCondition(udg_trigger35,Condition(function IC))
call TriggerAddAction(udg_trigger35,function Id)
endfunction
function Ie takes nothing returns boolean
if(not(GetSpellAbilityId()=='A00T'))then
return false
endif
return true
endfunction
function IE takes nothing returns boolean
if(not(GetOwningPlayer(GetSpellAbilityUnit())==udg_player02))then
return false
endif
return true
endfunction
function If takes nothing returns boolean
if(not(GetOwningPlayer(udg_unit07)==udg_player02))then
return false
endif
return true
endfunction
function IF takes nothing returns boolean
if((udg_integer02=='h00D'))then
return true
endif
if((udg_integer02=='h00G'))then
return true
endif
if((udg_integer02=='h00H'))then
return true
endif
if((udg_integer02=='h00P'))then
return true
endif
if((udg_integer02=='h00N'))then
return true
endif
if((udg_integer02=='h00O'))then
return true
endif
if((udg_integer02=='h00M'))then
return true
endif
return false
endfunction
function Ig takes nothing returns boolean
if(not IF())then
return false
endif
return true
endfunction
function IG takes nothing returns boolean
if(not(GetOwningPlayer(udg_unit07)==udg_player02))then
return false
endif
if(not(udg_boolean01==true))then
return false
endif
return true
endfunction
function Ih takes nothing returns nothing
if(IE())then
set udg_unit07=GetSpellAbilityUnit()
set udg_integers10[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))]=0
call UnitAddAbilityBJ('S001',GetSpellAbilityUnit())
call SetUnitAbilityLevelSwapped('S001',GetSpellAbilityUnit(),9)
else
set udg_unit07=GetSpellAbilityUnit()
set udg_integers10[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))]=0
call UnitAddAbilityBJ('S002',GetSpellAbilityUnit())
call SetUnitAbilityLevelSwapped('S002',GetSpellAbilityUnit(),18)
endif
call TriggerSleepAction(0.05)
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_VICTIM),GetOwningPlayer(udg_unit07),bj_ALLIANCE_ALLIED)
call SetUnitColor(udg_unit07,GetPlayerColor(GetOwningPlayer(udg_unit07)))
call UnitAddTypeBJ(UNIT_TYPE_ANCIENT,udg_unit07)
call UnitAddAbilityBJ('A00G',udg_unit07)
if(Ig())then
call UnitAddAbilityBJ('A072',udg_unit07)
if(If())then
call DisableTrigger(udg_trigger57)
call UnitAddAbilityBJ('A01R',udg_unit07)
else
endif
else
call UnitAddAbilityBJ('A071',udg_unit07)
endif
if(IG())then
call SetUnitVertexColorBJ(udg_unit07,0.00,100,0.00,10.00)
else
call DoNothing()
endif
endfunction
function IH takes nothing returns nothing
set udg_trigger36=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger36,EVENT_PLAYER_UNIT_SPELL_FINISH)
call TriggerAddCondition(udg_trigger36,Condition(function Ie))
call TriggerAddAction(udg_trigger36,function Ih)
endfunction
function Ii takes nothing returns boolean
if(not(GetSpellAbilityId()=='A00G'))then
return false
endif
return true
endfunction
function II takes nothing returns boolean
if(not(udg_boolean01==true))then
return false
endif
return true
endfunction
function Ij takes nothing returns boolean
if(not(GetOwningPlayer(GetSpellAbilityUnit())==udg_player02))then
return false
endif
return true
endfunction
function IJ takes nothing returns boolean
if((GetUnitTypeId(udg_unit07)!='h01C'))then
return true
endif
if((GetUnitTypeId(udg_unit07)!='h02E'))then
return true
endif
if((GetUnitTypeId(udg_unit07)!='h00K'))then
return true
endif
if((GetUnitTypeId(udg_unit07)!='h00L'))then
return true
endif
if((GetUnitTypeId(udg_unit07)!='h00I'))then
return true
endif
if((GetUnitTypeId(udg_unit07)!='h00N'))then
return true
endif
if((GetUnitTypeId(udg_unit07)!='h00P'))then
return true
endif
if((GetUnitTypeId(udg_unit07)!='h00O'))then
return true
endif
if((GetUnitTypeId(udg_unit07)!='h00J'))then
return true
endif
if((GetUnitTypeId(udg_unit07)!='h00M'))then
return true
endif
return false
endfunction
function Ik takes nothing returns boolean
if(not IJ())then
return false
endif
return true
endfunction
function IK takes nothing returns nothing
if(Ij())then
set udg_unit07=GetSpellAbilityUnit()
set udg_integers10[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))]=1
call UnitAddAbilityBJ('S001',GetSpellAbilityUnit())
call SetUnitAbilityLevelSwapped('S001',GetSpellAbilityUnit(),udg_integer17)
call TriggerSleepAction(0.05)
if(II())then
call SetUnitVertexColorBJ(udg_unit07,0.00,100,0.00,10.00)
else
call DoNothing()
endif
else
set udg_unit07=GetSpellAbilityUnit()
call UnitAddAbilityBJ('S002',udg_unit07)
call SetUnitAbilityLevelSwapped('S002',udg_unit07,udg_integer17)
endif
call TriggerSleepAction(0.05)
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_VICTIM),GetOwningPlayer(udg_unit07),bj_ALLIANCE_UNALLIED)
if(Ik())then
call SetUnitColor(udg_unit07,ConvertPlayerColor(12))
else
call DoNothing()
endif
endfunction
function Il takes nothing returns nothing
set udg_trigger37=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger37,EVENT_PLAYER_UNIT_SPELL_FINISH)
call TriggerAddCondition(udg_trigger37,Condition(function Ii))
call TriggerAddAction(udg_trigger37,function IK)
endfunction
function IL takes nothing returns boolean
if((IsPlayerInForce(GetOwningPlayer(GetAttackedUnitBJ()),udg_force01)==true))then
return true
endif
if((GetOwningPlayer(GetAttackedUnitBJ())==udg_player02))then
return true
endif
return false
endfunction
function Im takes nothing returns boolean
if((IsPlayerInForce(GetOwningPlayer(GetAttacker()),udg_force01)==true))then
return true
endif
return false
endfunction
function IM takes nothing returns boolean
if(not(GetOwningPlayer(GetAttacker())!=udg_player02))then
return false
endif
if(not IL())then
return false
endif
if(not Im())then
return false
endif
return true
endfunction
function In takes nothing returns boolean
if(not IM())then
return false
endif
return true
endfunction
function IN takes nothing returns nothing
call PauseUnitBJ(true,GetAttacker())
call IssueImmediateOrderBJ(GetAttacker(),"stop")
call PauseUnitBJ(false,GetAttacker())
endfunction
function Io takes nothing returns nothing
set udg_trigger38=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger38,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddCondition(udg_trigger38,Condition(function In))
call TriggerAddAction(udg_trigger38,function IN)
endfunction
function IO takes nothing returns boolean
if((IsUnitType(GetKillingUnitBJ(),UNIT_TYPE_ANCIENT)==true))then
return true
endif
if((GetOwningPlayer(GetKillingUnitBJ())==Player(11)))then
return true
endif
return false
endfunction
function Ip takes nothing returns boolean
if(not(IsUnitType(GetKillingUnitBJ(),UNIT_TYPE_SAPPER)!=true))then
return false
endif
if(not IO())then
return false
endif
return true
endfunction
function IP takes nothing returns boolean
if(not Ip())then
return false
endif
return true
endfunction
function Iq takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='n011'))then
return false
endif
return true
endfunction
function IQ takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h02P'))then
return false
endif
return true
endfunction
function Ir takes nothing returns nothing
if(IQ())then
call CreateNUnitsAtLoc(1,'h02N',Player(11),GetUnitLoc(GetDyingUnit()),bj_UNIT_FACING)
else
if(Iq())then
call CreateNUnitsAtLoc(1,'h02L',Player(11),GetUnitLoc(GetDyingUnit()),bj_UNIT_FACING)
else
call DoNothing()
endif
endif
endfunction
function IR takes nothing returns nothing
set udg_trigger39=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger39,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger39,Condition(function IP))
call TriggerAddAction(udg_trigger39,function Ir)
endfunction
function Is takes nothing returns nothing
call ConditionalTriggerExecute(udg_trigger41)
call ConditionalTriggerExecute(udg_trigger42)
endfunction
function IS takes nothing returns nothing
set udg_trigger40=CreateTrigger()
call DisableTrigger(udg_trigger40)
call TriggerRegisterTimerEventPeriodic(udg_trigger40,5.00)
call TriggerAddAction(udg_trigger40,function Is)
endfunction
function It takes nothing returns boolean
if((GetPlayerSlotState(udg_player02)==PLAYER_SLOT_STATE_PLAYING))then
return true
endif
if((CountPlayersInForceBJ(udg_force01)>0))then
return true
endif
return false
endfunction
function IT takes nothing returns boolean
if(not(udg_integer30==0))then
return false
endif
if(not(IsPlayerInForce(udg_player02,udg_force03)==false))then
return false
endif
if(not It())then
return false
endif
return true
endfunction
function Iu takes nothing returns boolean
if(not IT())then
return false
endif
return true
endfunction
function IU takes nothing returns nothing
call SetPlayerName(GetEnumPlayer(),udg_strings02[GetConvertedPlayerId(GetEnumPlayer())])
endfunction
function Iv takes nothing returns nothing
call CustomVictoryBJ(GetEnumPlayer(),true,false)
endfunction
function IV takes nothing returns nothing
call DisableTrigger(udg_trigger40)
call PlaySoundBJ(udg_sound64)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(udg_player02)]+", the Alien Cerebrate, is victorious!"))
call TriggerSleepAction(5.00)
call ForForce(GetPlayersAll(),function IU)
call ForForce(GetPlayersAll(),function Iv)
endfunction
function Iw takes nothing returns nothing
set udg_trigger41=CreateTrigger()
call TriggerAddCondition(udg_trigger41,Condition(function Iu))
call TriggerAddAction(udg_trigger41,function IV)
endfunction
function IW takes nothing returns boolean
if(not(IsPlayerInForce(udg_player02,udg_force03)==true))then
return false
endif
if(not(CountPlayersInForceBJ(udg_force01)==0))then
return false
endif
return true
endfunction
function Ix takes nothing returns boolean
if(not IW())then
return false
endif
return true
endfunction
function IX takes nothing returns nothing
call SetPlayerName(GetEnumPlayer(),udg_strings02[GetConvertedPlayerId(GetEnumPlayer())])
endfunction
function Iy takes nothing returns nothing
call CustomVictoryBJ(GetEnumPlayer(),true,false)
endfunction
function IY takes nothing returns nothing
call DisableTrigger(udg_trigger40)
call PlaySoundBJ(udg_sound63)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_125")
call TriggerSleepAction(5.00)
call ForForce(GetPlayersAll(),function IX)
call ForForce(GetPlayersAll(),function Iy)
endfunction
function Iz takes nothing returns nothing
set udg_trigger42=CreateTrigger()
call TriggerAddCondition(udg_trigger42,Condition(function Ix))
call TriggerAddAction(udg_trigger42,function IY)
endfunction
function IZ takes nothing returns boolean
return(GetFilterPlayer()!=udg_player02)
endfunction
function I0 takes nothing returns boolean
return(GetFilterPlayer()!=udg_player03)
endfunction
function I1 takes nothing returns boolean
return(IsPlayerInForce(GetFilterPlayer(),udg_force01)!=true)
endfunction
function I2 takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function I3 takes nothing returns boolean
return GetBooleanAnd(I1(),I2())
endfunction
function I4 takes nothing returns boolean
return GetBooleanAnd(I0(),I3())
endfunction
function I5 takes nothing returns boolean
return GetBooleanAnd(IZ(),I4())
endfunction
function I6 takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function I7 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function I8 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)!=true)
endfunction
function I9 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SUMMONED)!=true)
endfunction
function ja takes nothing returns boolean
return(IsUnitIllusionBJ(GetFilterUnit())!=true)
endfunction
function jA takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)!=true)
endfunction
function jb takes nothing returns boolean
return GetBooleanAnd(ja(),jA())
endfunction
function jB takes nothing returns boolean
return GetBooleanAnd(I9(),jb())
endfunction
function jc takes nothing returns boolean
return GetBooleanAnd(I8(),jB())
endfunction
function jC takes nothing returns boolean
return GetBooleanAnd(I7(),jc())
endfunction
function jd takes nothing returns boolean
return GetBooleanAnd(I6(),jC())
endfunction
function jD takes nothing returns nothing
call PingMinimapLocForForceEx(GetForceOfPlayer(udg_player02),GetUnitLoc(GetEnumUnit()),2.00,bj_MINIMAPPINGSTYLE_SIMPLE,0.00,100,0.00)
endfunction
function je takes nothing returns nothing
call ForGroupBJ(GetUnitsOfPlayerMatching(GetEnumPlayer(),Condition(function jd)),function jD)
endfunction
function jE takes nothing returns boolean
return(GetFilterPlayer()!=udg_player02)
endfunction
function jf takes nothing returns boolean
return(GetFilterPlayer()==udg_player03)
endfunction
function jF takes nothing returns boolean
return(IsPlayerInForce(GetFilterPlayer(),udg_force01)!=true)
endfunction
function jg takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function jG takes nothing returns boolean
return GetBooleanAnd(jF(),jg())
endfunction
function jh takes nothing returns boolean
return GetBooleanAnd(jf(),jG())
endfunction
function jH takes nothing returns boolean
return GetBooleanAnd(jE(),jh())
endfunction
function ji takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function jI takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)!=true)
endfunction
function jj takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)!=true)
endfunction
function jJ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SUMMONED)!=true)
endfunction
function jk takes nothing returns boolean
return(IsUnitIllusionBJ(GetFilterUnit())!=true)
endfunction
function jK takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)!=true)
endfunction
function jl takes nothing returns boolean
return GetBooleanAnd(jk(),jK())
endfunction
function jL takes nothing returns boolean
return GetBooleanAnd(jJ(),jl())
endfunction
function jm takes nothing returns boolean
return GetBooleanAnd(jj(),jL())
endfunction
function jM takes nothing returns boolean
return GetBooleanAnd(jI(),jm())
endfunction
function jn takes nothing returns boolean
return GetBooleanAnd(ji(),jM())
endfunction
function jN takes nothing returns nothing
call PingMinimapLocForForceEx(GetForceOfPlayer(udg_player02),GetUnitLoc(GetEnumUnit()),2.00,bj_MINIMAPPINGSTYLE_SIMPLE,0.00,0.00,100.00)
endfunction
function jo takes nothing returns nothing
call ForGroupBJ(GetUnitsOfPlayerMatching(GetEnumPlayer(),Condition(function jn)),function jN)
endfunction
function jO takes nothing returns boolean
return(GetFilterPlayer()!=udg_player02)
endfunction
function jp takes nothing returns boolean
return(GetFilterPlayer()==udg_player03)
endfunction
function jP takes nothing returns boolean
return(IsPlayerInForce(GetFilterPlayer(),udg_force01)==true)
endfunction
function jq takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function jQ takes nothing returns boolean
return GetBooleanAnd(jP(),jq())
endfunction
function jr takes nothing returns boolean
return GetBooleanAnd(jp(),jQ())
endfunction
function jR takes nothing returns boolean
return GetBooleanAnd(jO(),jr())
endfunction
function js takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function jS takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)!=true)
endfunction
function jt takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function jT takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SUMMONED)!=true)
endfunction
function ju takes nothing returns boolean
return(IsUnitIllusionBJ(GetFilterUnit())!=true)
endfunction
function jU takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)!=true)
endfunction
function jv takes nothing returns boolean
return GetBooleanAnd(ju(),jU())
endfunction
function jV takes nothing returns boolean
return GetBooleanAnd(jT(),jv())
endfunction
function jw takes nothing returns boolean
return GetBooleanAnd(jt(),jV())
endfunction
function jW takes nothing returns boolean
return GetBooleanAnd(jS(),jw())
endfunction
function jx takes nothing returns boolean
return GetBooleanAnd(js(),jW())
endfunction
function jX takes nothing returns nothing
call PingMinimapLocForForceEx(GetForceOfPlayer(udg_player02),GetUnitLoc(GetEnumUnit()),2.00,bj_MINIMAPPINGSTYLE_SIMPLE,100.00,0.00,100.00)
endfunction
function jy takes nothing returns nothing
call ForGroupBJ(GetUnitsOfPlayerMatching(GetEnumPlayer(),Condition(function jx)),function jX)
endfunction
function jY takes nothing returns boolean
return(GetFilterPlayer()!=udg_player02)
endfunction
function jz takes nothing returns boolean
return(GetFilterPlayer()!=udg_player03)
endfunction
function jZ takes nothing returns boolean
return(IsPlayerInForce(GetFilterPlayer(),udg_force01)==true)
endfunction
function j0 takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function j1 takes nothing returns boolean
return GetBooleanAnd(jZ(),j0())
endfunction
function j2 takes nothing returns boolean
return GetBooleanAnd(jz(),j1())
endfunction
function j3 takes nothing returns boolean
return GetBooleanAnd(jY(),j2())
endfunction
function j4 takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function j5 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SUMMONED)!=true)
endfunction
function j6 takes nothing returns boolean
return(IsUnitIllusionBJ(GetFilterUnit())!=true)
endfunction
function j7 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)!=true)
endfunction
function j8 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function j9 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function Ja takes nothing returns boolean
return GetBooleanOr(j8(),j9())
endfunction
function JA takes nothing returns boolean
return GetBooleanAnd(j7(),Ja())
endfunction
function Jb takes nothing returns boolean
return GetBooleanAnd(j6(),JA())
endfunction
function JB takes nothing returns boolean
return GetBooleanAnd(j5(),Jb())
endfunction
function Jc takes nothing returns boolean
return GetBooleanAnd(j4(),JB())
endfunction
function JC takes nothing returns nothing
call PingMinimapLocForForceEx(GetForceOfPlayer(udg_player02),GetUnitLoc(GetEnumUnit()),2.00,bj_MINIMAPPINGSTYLE_SIMPLE,100.00,0.00,0.00)
endfunction
function Jd takes nothing returns nothing
call ForGroupBJ(GetUnitsOfPlayerMatching(GetEnumPlayer(),Condition(function Jc)),function JC)
endfunction
function JD takes nothing returns nothing
call ForForce(GetPlayersMatching(Condition(function I5)),function je)
call ForForce(GetPlayersMatching(Condition(function jH)),function jo)
call ForForce(GetPlayersMatching(Condition(function jR)),function jy)
call ForForce(GetPlayersMatching(Condition(function j3)),function Jd)
endfunction
function Je takes nothing returns nothing
set udg_trigger43=CreateTrigger()
call TriggerRegisterTimerEventPeriodic(udg_trigger43,10.00)
call TriggerAddAction(udg_trigger43,function JD)
endfunction
function JE takes nothing returns boolean
return(GetFilterPlayer()!=udg_player02)
endfunction
function Jf takes nothing returns boolean
return(GetFilterPlayer()!=udg_player03)
endfunction
function JF takes nothing returns boolean
return(IsPlayerInForce(GetFilterPlayer(),udg_force01)!=true)
endfunction
function Jg takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function JG takes nothing returns boolean
return GetBooleanAnd(JF(),Jg())
endfunction
function Jh takes nothing returns boolean
return GetBooleanAnd(Jf(),JG())
endfunction
function JH takes nothing returns boolean
return GetBooleanAnd(JE(),Jh())
endfunction
function Ji takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function JI takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Jj takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)!=true)
endfunction
function JJ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SUMMONED)!=true)
endfunction
function Jk takes nothing returns boolean
return(IsUnitIllusionBJ(GetFilterUnit())!=true)
endfunction
function JK takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)!=true)
endfunction
function Jl takes nothing returns boolean
return GetBooleanAnd(Jk(),JK())
endfunction
function JL takes nothing returns boolean
return GetBooleanAnd(JJ(),Jl())
endfunction
function Jm takes nothing returns boolean
return GetBooleanAnd(Jj(),JL())
endfunction
function JM takes nothing returns boolean
return GetBooleanAnd(JI(),Jm())
endfunction
function Jn takes nothing returns boolean
return GetBooleanAnd(Ji(),JM())
endfunction
function JN takes nothing returns boolean
return(IsPlayerInForce(GetFilterPlayer(),udg_force01)==true)
endfunction
function Jo takes nothing returns nothing
call PingMinimapLocForForceEx(GetPlayersMatching(Condition(function JN)),GetUnitLoc(GetEnumUnit()),2.00,bj_MINIMAPPINGSTYLE_SIMPLE,0.00,100,0.00)
endfunction
function JO takes nothing returns nothing
call ForGroupBJ(GetUnitsOfPlayerMatching(GetEnumPlayer(),Condition(function Jn)),function Jo)
endfunction
function Jp takes nothing returns boolean
return(GetFilterPlayer()!=udg_player02)
endfunction
function JP takes nothing returns boolean
return(GetFilterPlayer()==udg_player03)
endfunction
function Jq takes nothing returns boolean
return(IsPlayerInForce(GetFilterPlayer(),udg_force01)!=true)
endfunction
function JQ takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function Jr takes nothing returns boolean
return GetBooleanAnd(Jq(),JQ())
endfunction
function JR takes nothing returns boolean
return GetBooleanAnd(JP(),Jr())
endfunction
function Js takes nothing returns boolean
return GetBooleanAnd(Jp(),JR())
endfunction
function JS takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function Jt takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)!=true)
endfunction
function JT takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)!=true)
endfunction
function Ju takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SUMMONED)!=true)
endfunction
function JU takes nothing returns boolean
return(IsUnitIllusionBJ(GetFilterUnit())!=true)
endfunction
function Jv takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)!=true)
endfunction
function JV takes nothing returns boolean
return GetBooleanAnd(JU(),Jv())
endfunction
function Jw takes nothing returns boolean
return GetBooleanAnd(Ju(),JV())
endfunction
function JW takes nothing returns boolean
return GetBooleanAnd(JT(),Jw())
endfunction
function Jx takes nothing returns boolean
return GetBooleanAnd(Jt(),JW())
endfunction
function JX takes nothing returns boolean
return GetBooleanAnd(JS(),Jx())
endfunction
function Jy takes nothing returns boolean
return(IsPlayerInForce(GetFilterPlayer(),udg_force01)==true)
endfunction
function JY takes nothing returns nothing
call PingMinimapLocForForceEx(GetPlayersMatching(Condition(function Jy)),GetUnitLoc(GetEnumUnit()),2.00,bj_MINIMAPPINGSTYLE_SIMPLE,0.00,0.00,100.00)
endfunction
function Jz takes nothing returns nothing
call ForGroupBJ(GetUnitsOfPlayerMatching(GetEnumPlayer(),Condition(function JX)),function JY)
endfunction
function JZ takes nothing returns boolean
return(GetFilterPlayer()!=udg_player02)
endfunction
function J0 takes nothing returns boolean
return(GetFilterPlayer()==udg_player03)
endfunction
function J1 takes nothing returns boolean
return(IsPlayerInForce(GetFilterPlayer(),udg_force01)==true)
endfunction
function J2 takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function J3 takes nothing returns boolean
return GetBooleanAnd(J1(),J2())
endfunction
function J4 takes nothing returns boolean
return GetBooleanAnd(J0(),J3())
endfunction
function J5 takes nothing returns boolean
return GetBooleanAnd(JZ(),J4())
endfunction
function J6 takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function J7 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)!=true)
endfunction
function J8 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function J9 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SUMMONED)!=true)
endfunction
function ka takes nothing returns boolean
return(IsUnitIllusionBJ(GetFilterUnit())!=true)
endfunction
function kA takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)!=true)
endfunction
function kb takes nothing returns boolean
return GetBooleanAnd(ka(),kA())
endfunction
function kB takes nothing returns boolean
return GetBooleanAnd(J9(),kb())
endfunction
function kc takes nothing returns boolean
return GetBooleanAnd(J8(),kB())
endfunction
function kC takes nothing returns boolean
return GetBooleanAnd(J7(),kc())
endfunction
function kd takes nothing returns boolean
return GetBooleanAnd(J6(),kC())
endfunction
function kD takes nothing returns boolean
return(IsPlayerInForce(GetFilterPlayer(),udg_force01)==true)
endfunction
function ke takes nothing returns nothing
call PingMinimapLocForForceEx(GetPlayersMatching(Condition(function kD)),GetUnitLoc(GetEnumUnit()),2.00,bj_MINIMAPPINGSTYLE_SIMPLE,100.00,0.00,100.00)
endfunction
function kE takes nothing returns nothing
call ForGroupBJ(GetUnitsOfPlayerMatching(GetEnumPlayer(),Condition(function kd)),function ke)
endfunction
function kf takes nothing returns boolean
return(GetFilterPlayer()!=udg_player02)
endfunction
function kF takes nothing returns boolean
return(GetFilterPlayer()!=udg_player03)
endfunction
function kg takes nothing returns boolean
return(IsPlayerInForce(GetFilterPlayer(),udg_force01)==true)
endfunction
function kG takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function kh takes nothing returns boolean
return GetBooleanAnd(kg(),kG())
endfunction
function kH takes nothing returns boolean
return GetBooleanAnd(kF(),kh())
endfunction
function ki takes nothing returns boolean
return GetBooleanAnd(kf(),kH())
endfunction
function kI takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function kj takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SUMMONED)!=true)
endfunction
function kJ takes nothing returns boolean
return(IsUnitIllusionBJ(GetFilterUnit())!=true)
endfunction
function kk takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)!=true)
endfunction
function kK takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function kl takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function kL takes nothing returns boolean
return GetBooleanOr(kK(),kl())
endfunction
function km takes nothing returns boolean
return GetBooleanAnd(kk(),kL())
endfunction
function kM takes nothing returns boolean
return GetBooleanAnd(kJ(),km())
endfunction
function kn takes nothing returns boolean
return GetBooleanAnd(kj(),kM())
endfunction
function kN takes nothing returns boolean
return GetBooleanAnd(kI(),kn())
endfunction
function ko takes nothing returns boolean
return(IsPlayerInForce(GetFilterPlayer(),udg_force01)==true)
endfunction
function kO takes nothing returns nothing
call PingMinimapLocForForceEx(GetPlayersMatching(Condition(function ko)),GetUnitLoc(GetEnumUnit()),2.00,bj_MINIMAPPINGSTYLE_SIMPLE,100.00,0.00,0.00)
endfunction
function kp takes nothing returns nothing
call ForGroupBJ(GetUnitsOfPlayerMatching(GetEnumPlayer(),Condition(function kN)),function kO)
endfunction
function kP takes nothing returns nothing
call ForForce(GetPlayersMatching(Condition(function JH)),function JO)
call ForForce(GetPlayersMatching(Condition(function Js)),function Jz)
call ForForce(GetPlayersMatching(Condition(function J5)),function kE)
call ForForce(GetPlayersMatching(Condition(function ki)),function kp)
endfunction
function kq takes nothing returns nothing
set udg_trigger44=CreateTrigger()
call TriggerRegisterTimerEventPeriodic(udg_trigger44,10.00)
call TriggerAddAction(udg_trigger44,function kP)
endfunction
function kQ takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='n01O'))then
return false
endif
return true
endfunction
function kr takes nothing returns boolean
if(not(GetDyingUnit()==udg_units05[1]))then
return false
endif
if(not(udg_integers25[1]==0))then
return false
endif
return true
endfunction
function kR takes nothing returns boolean
if(not(GetDyingUnit()==udg_units05[2]))then
return false
endif
if(not(udg_integers25[2]==0))then
return false
endif
return true
endfunction
function ks takes nothing returns boolean
if(not(GetDyingUnit()==udg_units05[3]))then
return false
endif
if(not(udg_integers25[3]==0))then
return false
endif
return true
endfunction
function kS takes nothing returns boolean
if(not(GetDyingUnit()==udg_units05[4]))then
return false
endif
if(not(udg_integers25[4]==0))then
return false
endif
return true
endfunction
function kt takes nothing returns boolean
if(not(GetDyingUnit()==udg_units05[5]))then
return false
endif
if(not(udg_integers25[5]==0))then
return false
endif
return true
endfunction
function kT takes nothing returns nothing
if(kr())then
set udg_integers25[1]=1
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2818")
call PingMinimapLocForForceEx(GetPlayersAll(),GetRectCenter(udg_rect179),5.00,bj_MINIMAPPINGSTYLE_ATTACK,100,100,100)
call CreateNUnitsAtLoc(1,'n01O',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetDyingUnit()),bj_UNIT_FACING)
set udg_units05[1]=GetLastCreatedUnit()
call SetUnitInvulnerable(udg_units05[1],true)
call SetUnitLifeBJ(udg_units05[1],1.00)
call SetUnitVertexColorBJ(udg_units05[1],100,100,100,100.00)
call EnableTrigger(udg_trigger46)
else
call DoNothing()
endif
if(kR())then
set udg_integers25[2]=1
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2819")
call PingMinimapLocForForceEx(GetPlayersAll(),GetRectCenter(udg_rect178),5.00,bj_MINIMAPPINGSTYLE_ATTACK,100,100,100)
call CreateNUnitsAtLoc(1,'n01O',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetDyingUnit()),bj_UNIT_FACING)
set udg_units05[2]=GetLastCreatedUnit()
call SetUnitInvulnerable(GetLastCreatedUnit(),true)
call SetUnitLifeBJ(GetLastCreatedUnit(),1.00)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),100,100,100,100.00)
call EnableTrigger(udg_trigger47)
else
call DoNothing()
endif
if(ks())then
set udg_integers25[3]=1
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2820")
call PingMinimapLocForForceEx(GetPlayersAll(),GetRectCenter(udg_rect177),5.00,bj_MINIMAPPINGSTYLE_ATTACK,100,100,100)
call CreateNUnitsAtLoc(1,'n01O',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetDyingUnit()),bj_UNIT_FACING)
set udg_units05[3]=GetLastCreatedUnit()
call SetUnitInvulnerable(GetLastCreatedUnit(),true)
call SetUnitLifeBJ(GetLastCreatedUnit(),1.00)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),100,100,100,100.00)
call EnableTrigger(udg_trigger48)
else
call DoNothing()
endif
if(kS())then
set udg_integers25[4]=1
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2821")
call PingMinimapLocForForceEx(GetPlayersAll(),GetRectCenter(udg_rect176),5.00,bj_MINIMAPPINGSTYLE_ATTACK,100,100,100)
call CreateNUnitsAtLoc(1,'n01O',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetDyingUnit()),bj_UNIT_FACING)
set udg_units05[4]=GetLastCreatedUnit()
call SetUnitInvulnerable(GetLastCreatedUnit(),true)
call SetUnitLifeBJ(GetLastCreatedUnit(),1.00)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),100,100,100,100.00)
call EnableTrigger(udg_trigger49)
else
call DoNothing()
endif
if(kt())then
set udg_integers25[5]=1
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2822")
call PingMinimapLocForForceEx(GetPlayersAll(),GetRectCenter(udg_rect175),5.00,bj_MINIMAPPINGSTYLE_ATTACK,100,100,100)
call CreateNUnitsAtLoc(1,'n01O',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetDyingUnit()),bj_UNIT_FACING)
set udg_units05[5]=GetLastCreatedUnit()
call SetUnitInvulnerable(GetLastCreatedUnit(),true)
call SetUnitLifeBJ(GetLastCreatedUnit(),1.00)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),100,100,100,100.00)
call EnableTrigger(udg_trigger50)
else
call DoNothing()
endif
endfunction
function ku takes nothing returns nothing
set udg_trigger45=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger45,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger45,Condition(function kQ))
call TriggerAddAction(udg_trigger45,function kT)
endfunction
function kU takes nothing returns boolean
if(not(GetUnitStateSwap(UNIT_STATE_LIFE,udg_units05[1])==800.00))then
return false
endif
return true
endfunction
function kv takes nothing returns nothing
set udg_integers25[1]=0
call PlaySoundBJ(udg_sound55)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2823")
call PingMinimapLocForForceEx(GetPlayersAll(),GetRectCenter(udg_rect179),5.00,bj_MINIMAPPINGSTYLE_ATTACK,100,100,100)
call SetUnitInvulnerable(udg_units05[1],false)
call SetUnitVertexColorBJ(udg_units05[1],50.00,100,50.00,0.00)
call DisableTrigger(GetTriggeringTrigger())
endfunction
function kV takes nothing returns nothing
set udg_trigger46=CreateTrigger()
call DisableTrigger(udg_trigger46)
call TriggerRegisterTimerEventPeriodic(udg_trigger46,0.25)
call TriggerAddCondition(udg_trigger46,Condition(function kU))
call TriggerAddAction(udg_trigger46,function kv)
endfunction
function kw takes nothing returns boolean
if(not(GetUnitStateSwap(UNIT_STATE_LIFE,udg_units05[2])==800.00))then
return false
endif
return true
endfunction
function kW takes nothing returns nothing
set udg_integers25[2]=0
call PlaySoundBJ(udg_sound55)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2824")
call PingMinimapLocForForceEx(GetPlayersAll(),GetRectCenter(udg_rect178),5.00,bj_MINIMAPPINGSTYLE_ATTACK,100,100,100)
call SetUnitInvulnerable(udg_units05[2],false)
call SetUnitVertexColorBJ(udg_units05[2],50.00,100,50.00,0.00)
call DisableTrigger(GetTriggeringTrigger())
endfunction
function kx takes nothing returns nothing
set udg_trigger47=CreateTrigger()
call DisableTrigger(udg_trigger47)
call TriggerRegisterTimerEventPeriodic(udg_trigger47,0.25)
call TriggerAddCondition(udg_trigger47,Condition(function kw))
call TriggerAddAction(udg_trigger47,function kW)
endfunction
function kX takes nothing returns boolean
if(not(GetUnitStateSwap(UNIT_STATE_LIFE,udg_units05[3])==800.00))then
return false
endif
return true
endfunction
function ky takes nothing returns nothing
set udg_integers25[3]=0
call PlaySoundBJ(udg_sound55)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2825")
call PingMinimapLocForForceEx(GetPlayersAll(),GetRectCenter(udg_rect177),5.00,bj_MINIMAPPINGSTYLE_ATTACK,100,100,100)
call SetUnitInvulnerable(udg_units05[3],false)
call SetUnitVertexColorBJ(udg_units05[3],50.00,100,50.00,0.00)
call DisableTrigger(GetTriggeringTrigger())
endfunction
function kY takes nothing returns nothing
set udg_trigger48=CreateTrigger()
call DisableTrigger(udg_trigger48)
call TriggerRegisterTimerEventPeriodic(udg_trigger48,0.25)
call TriggerAddCondition(udg_trigger48,Condition(function kX))
call TriggerAddAction(udg_trigger48,function ky)
endfunction
function kz takes nothing returns boolean
if(not(GetUnitStateSwap(UNIT_STATE_LIFE,udg_units05[4])==800.00))then
return false
endif
return true
endfunction
function kZ takes nothing returns nothing
set udg_integers25[4]=0
call PlaySoundBJ(udg_sound55)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2826")
call PingMinimapLocForForceEx(GetPlayersAll(),GetRectCenter(udg_rect176),5.00,bj_MINIMAPPINGSTYLE_ATTACK,100,100,100)
call SetUnitInvulnerable(udg_units05[4],false)
call SetUnitVertexColorBJ(udg_units05[4],50.00,100,50.00,0.00)
call DisableTrigger(GetTriggeringTrigger())
endfunction
function k0 takes nothing returns nothing
set udg_trigger49=CreateTrigger()
call DisableTrigger(udg_trigger49)
call TriggerRegisterTimerEventPeriodic(udg_trigger49,0.25)
call TriggerAddCondition(udg_trigger49,Condition(function kz))
call TriggerAddAction(udg_trigger49,function kZ)
endfunction
function k1 takes nothing returns boolean
if(not(GetUnitStateSwap(UNIT_STATE_LIFE,udg_units05[5])==800.00))then
return false
endif
return true
endfunction
function k2 takes nothing returns nothing
set udg_integers25[5]=0
call PlaySoundBJ(udg_sound55)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2827")
call PingMinimapLocForForceEx(GetPlayersAll(),GetRectCenter(udg_rect175),5.00,bj_MINIMAPPINGSTYLE_ATTACK,100,100,100)
call SetUnitInvulnerable(udg_units05[5],false)
call SetUnitVertexColorBJ(udg_units05[5],50.00,100,50.00,0.00)
call DisableTrigger(GetTriggeringTrigger())
endfunction
function k3 takes nothing returns nothing
set udg_trigger50=CreateTrigger()
call DisableTrigger(udg_trigger50)
call TriggerRegisterTimerEventPeriodic(udg_trigger50,0.25)
call TriggerAddCondition(udg_trigger50,Condition(function k1))
call TriggerAddAction(udg_trigger50,function k2)
endfunction
function k4 takes nothing returns boolean
if(not(GetOrderedUnit()==udg_unit05))then
return false
endif
return true
endfunction
function k5 takes nothing returns boolean
if(not(GetIssuedOrderIdBJ()==String2OrderIdBJ("curseon")))then
return false
endif
return true
endfunction
function k6 takes nothing returns boolean
if(not(GetIssuedOrderIdBJ()==String2OrderIdBJ("curseoff")))then
return false
endif
return true
endfunction
function k7 takes nothing returns nothing
if(k5())then
set udg_integer28=1
call EnableTrigger(udg_trigger52)
else
call DoNothing()
endif
if(k6())then
set udg_integer28=0
call DisableTrigger(udg_trigger52)
else
call DoNothing()
endif
endfunction
function k8 takes nothing returns nothing
set udg_trigger51=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger51,EVENT_PLAYER_UNIT_ISSUED_ORDER)
call TriggerAddCondition(udg_trigger51,Condition(function k4))
call TriggerAddAction(udg_trigger51,function k7)
endfunction
function k9 takes nothing returns boolean
if(not(udg_integers25[1]==1))then
return false
endif
if(not(udg_integer29<64))then
return false
endif
return true
endfunction
function Ka takes nothing returns boolean
if(not k9())then
return false
endif
return true
endfunction
function KA takes nothing returns boolean
if(not(udg_integers25[2]==1))then
return false
endif
if(not(udg_integer29<64))then
return false
endif
return true
endfunction
function Kb takes nothing returns boolean
if(not KA())then
return false
endif
return true
endfunction
function KB takes nothing returns boolean
if(not(udg_integers25[3]==1))then
return false
endif
if(not(udg_integer29<64))then
return false
endif
return true
endfunction
function Kc takes nothing returns boolean
if(not KB())then
return false
endif
return true
endfunction
function KC takes nothing returns boolean
if(not(udg_integers25[4]==1))then
return false
endif
if(not(udg_integer29<64))then
return false
endif
return true
endfunction
function Kd takes nothing returns boolean
if(not KC())then
return false
endif
return true
endfunction
function KD takes nothing returns boolean
if(not(udg_integers25[5]==1))then
return false
endif
if(not(udg_integer29<64))then
return false
endif
return true
endfunction
function Ke takes nothing returns boolean
if(not KD())then
return false
endif
return true
endfunction
function KE takes nothing returns boolean
if((udg_integers25[1]==1))then
return true
endif
if((udg_integers25[2]==1))then
return true
endif
if((udg_integers25[3]==1))then
return true
endif
if((udg_integers25[4]==1))then
return true
endif
if((udg_integers25[5]==1))then
return true
endif
return false
endfunction
function Kf takes nothing returns boolean
if(not(GetPlayerState(udg_player02,PLAYER_STATE_RESOURCE_LUMBER)>=4))then
return false
endif
if(not(udg_integer29<64))then
return false
endif
if(not KE())then
return false
endif
return true
endfunction
function KF takes nothing returns boolean
if(not Kf())then
return false
endif
return true
endfunction
function Kg takes nothing returns nothing
if(Ka())then
call CreateNUnitsAtLoc(1,'h02L',Player(11),GetRandomLocInRect(udg_rect179),bj_UNIT_FACING)
else
call DoNothing()
endif
if(Kb())then
call CreateNUnitsAtLoc(1,'h02L',Player(11),GetRandomLocInRect(udg_rect178),bj_UNIT_FACING)
else
call DoNothing()
endif
if(Kc())then
call CreateNUnitsAtLoc(1,'h02L',Player(11),GetRandomLocInRect(udg_rect177),bj_UNIT_FACING)
else
call DoNothing()
endif
if(Kd())then
call CreateNUnitsAtLoc(1,'h02L',Player(11),GetRandomLocInRect(udg_rect176),bj_UNIT_FACING)
else
call DoNothing()
endif
if(Ke())then
call CreateNUnitsAtLoc(1,'h02L',Player(11),GetRandomLocInRect(udg_rect175),bj_UNIT_FACING)
else
call DoNothing()
endif
if(KF())then
call AdjustPlayerStateBJ(-4,udg_player02,PLAYER_STATE_RESOURCE_LUMBER)
else
call DoNothing()
endif
endfunction
function KG takes nothing returns nothing
set udg_trigger52=CreateTrigger()
call DisableTrigger(udg_trigger52)
call TriggerRegisterTimerEventPeriodic(udg_trigger52,3.00)
call TriggerAddAction(udg_trigger52,function Kg)
endfunction
function Kh takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='n00W'))then
return false
endif
return true
endfunction
function KH takes nothing returns nothing
call PlaySoundBJ(udg_sound55)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2828")
call PingMinimapLocForForceEx(GetPlayersAll(),GetUnitLoc(GetDyingUnit()),5.00,bj_MINIMAPPINGSTYLE_ATTACK,100,100,100)
call CreateNUnitsAtLoc(1,'n00V',Player(11),GetUnitLoc(GetDyingUnit()),bj_UNIT_FACING)
set udg_integer28=0
call DisableTrigger(udg_trigger52)
endfunction
function Ki takes nothing returns nothing
set udg_trigger53=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger53,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger53,Condition(function Kh))
call TriggerAddAction(udg_trigger53,function KH)
endfunction
function KI takes nothing returns boolean
if(not(GetUnitTypeId(GetSellingUnit())=='n00V'))then
return false
endif
return true
endfunction
function Kj takes nothing returns nothing
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2829")
call PingMinimapLocForForceEx(GetPlayersAll(),GetUnitLoc(GetSellingUnit()),5.00,bj_MINIMAPPINGSTYLE_ATTACK,100,100,100)
call KillUnit(GetSellingUnit())
call CreateNUnitsAtLoc(1,'n00W',Player(11),GetUnitLoc(GetSellingUnit()),bj_UNIT_FACING)
endfunction
function KJ takes nothing returns nothing
set udg_trigger54=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger54,EVENT_PLAYER_UNIT_SELL_ITEM)
call TriggerAddCondition(udg_trigger54,Condition(function KI))
call TriggerAddAction(udg_trigger54,function Kj)
endfunction
function Kk takes nothing returns boolean
if(not(GetOwningPlayer(GetEnteringUnit())==Player(11)))then
return false
endif
return true
endfunction
function KK takes nothing returns boolean
if(not(GetUnitTypeId(GetTriggerUnit())=='h02L'))then
return false
endif
return true
endfunction
function Kl takes nothing returns boolean
if(not(GetUnitTypeId(GetTriggerUnit())=='h04P'))then
return false
endif
return true
endfunction
function KL takes nothing returns boolean
if(not(GetUnitTypeId(GetTriggerUnit())=='h01K'))then
return false
endif
return true
endfunction
function Km takes nothing returns boolean
if(not(GetUnitTypeId(GetTriggerUnit())=='h02M'))then
return false
endif
return true
endfunction
function KM takes nothing returns boolean
if(not(GetUnitTypeId(GetTriggerUnit())=='h039'))then
return false
endif
return true
endfunction
function Kn takes nothing returns nothing
if(KK())then
set udg_integer29=(udg_integer29+1)
else
call DoNothing()
endif
if(Kl())then
set udg_integer29=(udg_integer29+2)
else
call DoNothing()
endif
if(KL())then
set udg_integer29=(udg_integer29+4)
else
call DoNothing()
endif
if(Km())then
set udg_integer29=(udg_integer29+8)
else
call DoNothing()
endif
if(KM())then
set udg_integer29=(udg_integer29+16)
else
call DoNothing()
endif
endfunction
function KN takes nothing returns nothing
set udg_trigger55=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger55,GetPlayableMapRect())
call TriggerAddCondition(udg_trigger55,Condition(function Kk))
call TriggerAddAction(udg_trigger55,function Kn)
endfunction
function Ko takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(11)))then
return false
endif
return true
endfunction
function KO takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h02L'))then
return false
endif
return true
endfunction
function Kp takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h04P'))then
return false
endif
return true
endfunction
function KP takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h01K'))then
return false
endif
return true
endfunction
function Kq takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h02M'))then
return false
endif
return true
endfunction
function KQ takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h039'))then
return false
endif
return true
endfunction
function Kr takes nothing returns nothing
if(KO())then
set udg_integer29=(udg_integer29-1)
else
call DoNothing()
endif
if(Kp())then
set udg_integer29=(udg_integer29-2)
else
call DoNothing()
endif
if(KP())then
set udg_integer29=(udg_integer29-4)
else
call DoNothing()
endif
if(Kq())then
set udg_integer29=(udg_integer29-8)
else
call DoNothing()
endif
if(KQ())then
set udg_integer29=(udg_integer29-16)
else
call DoNothing()
endif
endfunction
function KR takes nothing returns nothing
set udg_trigger56=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger56,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger56,Condition(function Ko))
call TriggerAddAction(udg_trigger56,function Kr)
endfunction
function Ks takes nothing returns boolean
if(not(GetTriggerPlayer()==udg_player02))then
return false
endif
return true
endfunction
function KS takes nothing returns nothing
call DisplayTextToForce(GetPlayersAll(),("|CFF707070A Voice in your Head:|r "+GetEventPlayerChatString()))
endfunction
function Kt takes nothing returns nothing
set udg_trigger57=CreateTrigger()
call DisableTrigger(udg_trigger57)
call TriggerRegisterPlayerChatEvent(udg_trigger57,Player(0),"",false)
call TriggerRegisterPlayerChatEvent(udg_trigger57,Player(1),"",false)
call TriggerRegisterPlayerChatEvent(udg_trigger57,Player(2),"",false)
call TriggerRegisterPlayerChatEvent(udg_trigger57,Player(3),"",false)
call TriggerRegisterPlayerChatEvent(udg_trigger57,Player(4),"",false)
call TriggerRegisterPlayerChatEvent(udg_trigger57,Player(5),"",false)
call TriggerRegisterPlayerChatEvent(udg_trigger57,Player(6),"",false)
call TriggerRegisterPlayerChatEvent(udg_trigger57,Player(7),"",false)
call TriggerRegisterPlayerChatEvent(udg_trigger57,Player(8),"",false)
call TriggerRegisterPlayerChatEvent(udg_trigger57,Player(9),"",false)
call TriggerRegisterPlayerChatEvent(udg_trigger57,Player(10),"",false)
call TriggerAddCondition(udg_trigger57,Condition(function Ks))
call TriggerAddAction(udg_trigger57,function KS)
endfunction
function KT takes nothing returns boolean
if(not(GetIssuedOrderIdBJ()==String2OrderIdBJ("flamingarrows")))then
return false
endif
return true
endfunction
function Ku takes nothing returns boolean
if(not(GetIssuedOrderIdBJ()==String2OrderIdBJ("unflamingarrows")))then
return false
endif
return true
endfunction
function KU takes nothing returns nothing
if(KT())then
call EnableTrigger(udg_trigger57)
else
call DoNothing()
endif
if(Ku())then
call DisableTrigger(udg_trigger57)
else
call DoNothing()
endif
endfunction
function Kv takes nothing returns nothing
set udg_trigger58=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger58,EVENT_PLAYER_UNIT_ISSUED_ORDER)
call TriggerAddAction(udg_trigger58,function KU)
endfunction
function KV takes nothing returns boolean
if((GetSpellAbilityId()=='A01D'))then
return true
endif
if((GetSpellAbilityId()=='A03I'))then
return true
endif
return false
endfunction
function Kw takes nothing returns boolean
if(not KV())then
return false
endif
return true
endfunction
function KW takes nothing returns boolean
if(not(udg_integer12==3))then
return false
endif
return true
endfunction
function Kx takes nothing returns nothing
set udg_integer12=GetRandomInt(1,5)
if(KW())then
call SetUnitManaPercentBJ(GetSpellTargetUnit(),0.00)
call AddSpecialEffectTargetUnitBJ("origin",GetSpellTargetUnit(),"Abilities\\Spells\\Human\\ManaFlare\\ManaFlareBoltImpact.mdl")
set udg_effect01=GetLastCreatedEffectBJ()
call PolledWait(0.50)
call DestroyEffectBJ(udg_effect01)
else
call DoNothing()
endif
endfunction
function KX takes nothing returns nothing
set udg_trigger59=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger59,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger59,Condition(function Kw))
call TriggerAddAction(udg_trigger59,function Kx)
endfunction
function Ky takes nothing returns boolean
if(not(GetSpellAbilityId()=='A032'))then
return false
endif
return true
endfunction
function KY takes nothing returns nothing
call TriggerSleepAction(1.46)
call SetUnitVertexColorBJ(GetSpellAbilityUnit(),100,25.00,25.00,10.00)
call TriggerSleepAction(21.46)
call SetUnitVertexColorBJ(GetSpellAbilityUnit(),100,100.00,100.00,0.00)
endfunction
function Kz takes nothing returns nothing
set udg_trigger60=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger60,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger60,Condition(function Ky))
call TriggerAddAction(udg_trigger60,function KY)
endfunction
function KZ takes nothing returns boolean
if(not(GetSpellAbilityId()=='A05P'))then
return false
endif
return true
endfunction
function K0 takes nothing returns nothing
call AddSpecialEffectTargetUnitBJ("origin",udg_unit01,"Abilities\\Spells\\Other\\Charm\\CharmTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call SetUnitOwner(udg_unit01,udg_player04,true)
set udg_unit01=GetSpellTargetUnit()
set udg_player04=GetOwningPlayer(udg_unit01)
call TriggerSleepAction(0.05)
call SetUnitColor(udg_unit01,GetPlayerColor(udg_player04))
call UnitShareVisionBJ(true,udg_unit01,udg_player04)
call TriggerSleepAction(15.00)
call AddSpecialEffectTargetUnitBJ("origin",udg_unit01,"Abilities\\Spells\\Other\\Charm\\CharmTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call SetUnitOwner(udg_unit01,udg_player04,true)
endfunction
function K1 takes nothing returns nothing
set udg_trigger61=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger61,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger61,Condition(function KZ))
call TriggerAddAction(udg_trigger61,function K0)
endfunction
function K2 takes nothing returns boolean
if(not(GetSpellAbilityId()=='A030'))then
return false
endif
return true
endfunction
function K3 takes nothing returns nothing
call CreateNUnitsAtLoc(1,'e00I',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetSpellAbilityUnit()),bj_UNIT_FACING)
call UnitApplyTimedLifeBJ(15.00,'BTLF',GetLastCreatedUnit())
call IssueImmediateOrderBJ(GetLastCreatedUnit(),"voodoo")
endfunction
function K4 takes nothing returns nothing
set udg_trigger62=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger62,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger62,Condition(function K2))
call TriggerAddAction(udg_trigger62,function K3)
endfunction
function K5 takes nothing returns boolean
if(not(GetOwningPlayer(GetOrderedUnit())==udg_player02))then
return false
endif
return true
endfunction
function K6 takes nothing returns boolean
if(not(GetIssuedOrderIdBJ()==String2OrderIdBJ("immolation")))then
return false
endif
return true
endfunction
function K7 takes nothing returns boolean
if(not(GetIssuedOrderIdBJ()==String2OrderIdBJ("unimmolation")))then
return false
endif
return true
endfunction
function K8 takes nothing returns nothing
if(K6())then
call EnableTrigger(udg_trigger64)
else
call DoNothing()
endif
if(K7())then
call DisableTrigger(udg_trigger64)
else
call DoNothing()
endif
endfunction
function K9 takes nothing returns nothing
set udg_trigger63=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger63,EVENT_PLAYER_UNIT_ISSUED_ORDER)
call TriggerAddCondition(udg_trigger63,Condition(function K5))
call TriggerAddAction(udg_trigger63,function K8)
endfunction
function la takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)!=true)
endfunction
function lA takes nothing returns nothing
call UnitDamageTargetBJ(udg_unit12,GetEnumUnit(),15.00,ATTACK_TYPE_NORMAL,DAMAGE_TYPE_NORMAL)
call AddSpecialEffectTargetUnitBJ("head",GetEnumUnit(),"Abilities\\Spells\\Undead\\DeathandDecay\\DeathandDecayDamage.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
endfunction
function lb takes nothing returns boolean
if(not(UnitHasBuffBJ(udg_unit12,'BEim')==true))then
return false
endif
return true
endfunction
function lB takes nothing returns nothing
if(lb())then
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRangeOfLocMatching(300.00,GetUnitLoc(udg_unit12),Condition(function la)),function lA)
else
call DisableTrigger(GetTriggeringTrigger())
endif
endfunction
function lc takes nothing returns nothing
set udg_trigger64=CreateTrigger()
call DisableTrigger(udg_trigger64)
call TriggerRegisterTimerEventPeriodic(udg_trigger64,1.00)
call TriggerAddAction(udg_trigger64,function lB)
endfunction
function lC takes nothing returns boolean
if(not(GetSpellAbilityId()=='A09E'))then
return false
endif
return true
endfunction
function ld takes nothing returns nothing
set udg_player07=GetOwningPlayer(GetSpellTargetUnit())
call SetPlayerAllianceStateBJ(Player(0),udg_player07,bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(1),udg_player07,bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(2),udg_player07,bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(3),udg_player07,bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(4),udg_player07,bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(5),udg_player07,bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(6),udg_player07,bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(7),udg_player07,bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(8),udg_player07,bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(9),udg_player07,bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(10),udg_player07,bj_ALLIANCE_UNALLIED)
call TriggerSleepAction(12.00)
call SetPlayerAllianceStateBJ(Player(0),udg_player07,bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(1),udg_player07,bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(2),udg_player07,bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(3),udg_player07,bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(4),udg_player07,bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(5),udg_player07,bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(6),udg_player07,bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(7),udg_player07,bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(8),udg_player07,bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(9),udg_player07,bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(10),udg_player07,bj_ALLIANCE_ALLIED)
endfunction
function lD takes nothing returns nothing
set udg_trigger65=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger65,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger65,Condition(function lC))
call TriggerAddAction(udg_trigger65,function ld)
endfunction
function le takes nothing returns boolean
if(not(GetSpellAbilityId()=='A09F'))then
return false
endif
return true
endfunction
function lE takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h04E')
endfunction
function lf takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h006')
endfunction
function lF takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h017')
endfunction
function lg takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h005')
endfunction
function lG takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h003')
endfunction
function lh takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h004')
endfunction
function lH takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h02B')
endfunction
function li takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h016')
endfunction
function lI takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h028')
endfunction
function lj takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h000')
endfunction
function lJ takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h027')
endfunction
function lk takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h008')
endfunction
function lK takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h02Z')
endfunction
function ll takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h009')
endfunction
function lL takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h03M')
endfunction
function lm takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h04G')
endfunction
function lM takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h002')
endfunction
function ln takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h015')
endfunction
function lN takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h04F')
endfunction
function lo takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h04D')
endfunction
function lO takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h007')
endfunction
function lp takes nothing returns boolean
return(GetUnitTypeId(udg_unit01)=='h03E')
endfunction
function lP takes nothing returns nothing
call SetUnitOwner(udg_unit01,udg_player04,false)
call UnitAddAbilityBJ('S000',udg_unit01)
set udg_unit01=GetSpellTargetUnit()
set udg_player04=GetOwningPlayer(udg_unit01)
call PauseUnitBJ(true,udg_unit01)
call TriggerSleepAction(1.00)
call PauseUnitBJ(false,udg_unit01)
if(lE())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I023'),udg_unit01)
else
call DoNothing()
endif
if(lf())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I007'),udg_unit01)
else
call DoNothing()
endif
if(lF())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I00C'),udg_unit01)
else
call DoNothing()
endif
if(lg())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I003'),udg_unit01)
else
call DoNothing()
endif
if(lG())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I005'),udg_unit01)
else
call DoNothing()
endif
if(lh())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I002'),udg_unit01)
else
call DoNothing()
endif
if(lH())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I015'),udg_unit01)
else
call DoNothing()
endif
if(li())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I00A'),udg_unit01)
else
call DoNothing()
endif
if(lI())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I012'),udg_unit01)
else
call DoNothing()
endif
if(lj())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I001'),udg_unit01)
else
call DoNothing()
endif
if(lJ())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I011'),udg_unit01)
else
call DoNothing()
endif
if(lk())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I004'),udg_unit01)
else
call DoNothing()
endif
if(lK())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I01I'),udg_unit01)
else
call DoNothing()
endif
if(ll())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I006'),udg_unit01)
else
call DoNothing()
endif
if(lL())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I00B'),udg_unit01)
else
call DoNothing()
endif
if(lm())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I02O'),udg_unit01)
else
call DoNothing()
endif
if(lM())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I000'),udg_unit01)
else
call DoNothing()
endif
if(ln())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I00D'),udg_unit01)
else
call DoNothing()
endif
if(lN())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I02N'),udg_unit01)
else
call DoNothing()
endif
if(lo())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I02P'),udg_unit01)
else
call DoNothing()
endif
if(lO())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I008'),udg_unit01)
else
call DoNothing()
endif
if(lp())then
call UnitRemoveItemSwapped(GetItemOfTypeFromUnitBJ(udg_unit01,'I013'),udg_unit01)
else
call DoNothing()
endif
call AddSpecialEffectTargetUnitBJ("origin",udg_unit01,"Abilities\\Spells\\Demon\\DarkPortal\\DarkPortalTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call UnitAddAbilityBJ('S002',udg_unit01)
call SetUnitAbilityLevelSwapped('S002',udg_unit01,udg_integer17)
call TriggerSleepAction(0.25)
call SetUnitOwner(udg_unit01,udg_player02,false)
call SetUnitColor(udg_unit01,ConvertPlayerColor(12))
call UnitRemoveAbilityBJ('A00T',udg_unit01)
call UnitRemoveTypeBJ(UNIT_TYPE_ANCIENT,udg_unit01)
call TriggerSleepAction(15.00)
call SetUnitOwner(udg_unit01,udg_player04,false)
call UnitAddAbilityBJ('S000',udg_unit01)
endfunction
function lq takes nothing returns nothing
set udg_trigger66=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger66,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger66,Condition(function le))
call TriggerAddAction(udg_trigger66,function lP)
endfunction
function lQ takes nothing returns boolean
if(not(GetSpellAbilityId()=='A09D'))then
return false
endif
return true
endfunction
function lr takes nothing returns nothing
set udg_unit13=GetSpellTargetUnit()
call EnableTrigger(udg_trigger68)
endfunction
function lR takes nothing returns nothing
set udg_trigger67=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger67,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger67,Condition(function lQ))
call TriggerAddAction(udg_trigger67,function lr)
endfunction
function ls takes nothing returns nothing
call IssueTargetOrderBJ(udg_unit13,"attack",GetEnumUnit())
endfunction
function lS takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function lt takes nothing returns boolean
if(not(UnitHasBuffBJ(udg_unit13,'B01D')==true))then
return false
endif
return true
endfunction
function lT takes nothing returns nothing
if(lt())then
set udg_integer06=GetRandomInt(1,4)
if(lS())then
set bj_wantDestroyGroup=true
call ForGroupBJ(GetRandomSubGroup(1,GetUnitsInRangeOfLocAll(512,GetUnitLoc(udg_unit13))),function ls)
else
call IssuePointOrderLocBJ(udg_unit13,"patrol",GetRandomLocInRect(GetPlayableMapRect()))
endif
else
call DisableTrigger(GetTriggeringTrigger())
endif
endfunction
function lu takes nothing returns nothing
set udg_trigger68=CreateTrigger()
call DisableTrigger(udg_trigger68)
call TriggerRegisterTimerEventPeriodic(udg_trigger68,GetRandomReal(3.00,6.00))
call TriggerAddAction(udg_trigger68,function lT)
endfunction
function lU takes nothing returns boolean
if(not(GetSpellAbilityId()=='A034'))then
return false
endif
return true
endfunction
function lv takes nothing returns nothing
call TriggerSleepAction(0.05)
call SetUnitLifeBJ(GetSpellAbilityUnit(),(GetUnitStateSwap(UNIT_STATE_LIFE,GetSpellAbilityUnit())+200.00))
endfunction
function lV takes nothing returns nothing
set udg_trigger69=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger69,EVENT_PLAYER_UNIT_SPELL_FINISH)
call TriggerAddCondition(udg_trigger69,Condition(function lU))
call TriggerAddAction(udg_trigger69,function lv)
endfunction
function lw takes nothing returns boolean
if(not(GetSpellAbilityId()=='A08V'))then
return false
endif
return true
endfunction
function lW takes nothing returns nothing
call TriggerSleepAction(0.05)
call SetUnitLifeBJ(GetSpellAbilityUnit(),(GetUnitStateSwap(UNIT_STATE_LIFE,GetSpellAbilityUnit())+150.00))
endfunction
function lx takes nothing returns nothing
set udg_trigger70=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger70,EVENT_PLAYER_UNIT_SPELL_FINISH)
call TriggerAddCondition(udg_trigger70,Condition(function lw))
call TriggerAddAction(udg_trigger70,function lW)
endfunction
function lX takes nothing returns boolean
if((GetSpellAbilityId()=='A02W'))then
return true
endif
if((GetSpellAbilityId()=='A02Y'))then
return true
endif
return false
endfunction
function ly takes nothing returns boolean
if(not lX())then
return false
endif
return true
endfunction
function lY takes nothing returns boolean
if(not(GetSpellAbilityId()=='A02W'))then
return false
endif
return true
endfunction
function lz takes nothing returns boolean
if(not(GetSpellAbilityId()=='A02Y'))then
return false
endif
return true
endfunction
function lZ takes nothing returns nothing
if(lY())then
call CreateDestructableLoc('B00J',GetSpellTargetLoc(),GetRandomDirectionDeg(),1,0)
else
call DoNothing()
endif
if(lz())then
call CreateDestructableLoc('B00L',GetSpellTargetLoc(),GetRandomDirectionDeg(),1,0)
else
call DoNothing()
endif
endfunction
function l0 takes nothing returns nothing
set udg_trigger71=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger71,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger71,Condition(function ly))
call TriggerAddAction(udg_trigger71,function lZ)
endfunction
function l1 takes nothing returns boolean
if(not(GetSpellAbilityId()=='A064'))then
return false
endif
return true
endfunction
function l2 takes nothing returns boolean
if((GetDestructableTypeId(GetSpellTargetDestructable())=='B00L'))then
return true
endif
if((GetDestructableTypeId(GetSpellTargetDestructable())=='B00J'))then
return true
endif
return false
endfunction
function l3 takes nothing returns boolean
if(not l2())then
return false
endif
return true
endfunction
function l4 takes nothing returns nothing
call TriggerSleepAction(0.25)
if(l3())then
call KillDestructable(GetSpellTargetDestructable())
call SetUnitManaBJ(GetSpellAbilityUnit(),(GetUnitStateSwap(UNIT_STATE_MANA,GetSpellAbilityUnit())+25.00))
else
call DoNothing()
endif
endfunction
function l5 takes nothing returns nothing
set udg_trigger72=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger72,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger72,Condition(function l1))
call TriggerAddAction(udg_trigger72,function l4)
endfunction
function l6 takes nothing returns boolean
if((GetUnitTypeId(GetOrderedUnit())=='h00J'))then
return true
endif
if((GetUnitTypeId(GetOrderedUnit())=='h012'))then
return true
endif
return false
endfunction
function l7 takes nothing returns boolean
if((GetIssuedOrderIdBJ()==String2OrderIdBJ("immolation")))then
return true
endif
if((GetIssuedOrderIdBJ()==String2OrderIdBJ("unimmolation")))then
return true
endif
return false
endfunction
function l8 takes nothing returns boolean
if(not l6())then
return false
endif
if(not l7())then
return false
endif
return true
endfunction
function l9 takes nothing returns boolean
if(not(GetIssuedOrderIdBJ()==String2OrderIdBJ("immolation")))then
return false
endif
return true
endfunction
function La takes nothing returns boolean
if(not(GetIssuedOrderIdBJ()==String2OrderIdBJ("unimmolation")))then
return false
endif
return true
endfunction
function LA takes nothing returns nothing
if(l9())then
call UnitAddAbilityBJ('Arel',GetOrderedUnit())
else
call DoNothing()
endif
if(La())then
call UnitRemoveAbilityBJ('AIrm',GetOrderedUnit())
else
call DoNothing()
endif
endfunction
function Lb takes nothing returns nothing
set udg_trigger73=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger73,EVENT_PLAYER_UNIT_ISSUED_ORDER)
call TriggerAddCondition(udg_trigger73,Condition(function l8))
call TriggerAddAction(udg_trigger73,function LA)
endfunction
function LB takes nothing returns boolean
if((GetUnitTypeId(GetAttackedUnitBJ())=='h00J'))then
return true
endif
if((GetUnitTypeId(GetAttackedUnitBJ())=='h012'))then
return true
endif
return false
endfunction
function Lc takes nothing returns boolean
if(not LB())then
return false
endif
return true
endfunction
function LC takes nothing returns nothing
call CreateNUnitsAtLoc(1,'h036',GetOwningPlayer(GetAttackedUnitBJ()),GetUnitLoc(GetAttackedUnitBJ()),bj_UNIT_FACING)
endfunction
function Ld takes nothing returns nothing
set udg_trigger74=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger74,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddCondition(udg_trigger74,Condition(function Lc))
call TriggerAddAction(udg_trigger74,function LC)
endfunction
function LD takes nothing returns boolean
if((GetUnitTypeId(GetDyingUnit())=='h00J'))then
return true
endif
if((GetUnitTypeId(GetDyingUnit())=='h012'))then
return true
endif
return false
endfunction
function Le takes nothing returns boolean
if(not LD())then
return false
endif
return true
endfunction
function LE takes nothing returns nothing
call CreateNUnitsAtLoc(1,'h01L',GetOwningPlayer(GetDyingUnit()),GetUnitLoc(GetDyingUnit()),bj_UNIT_FACING)
endfunction
function Lf takes nothing returns nothing
set udg_trigger75=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger75,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger75,Condition(function Le))
call TriggerAddAction(udg_trigger75,function LE)
endfunction
function LF takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h00J'))then
return false
endif
return true
endfunction
function Lg takes nothing returns nothing
call PlaySoundBJ(udg_sound52)
call CreateNUnitsAtLoc(1,'h01O',GetOwningPlayer(GetDyingUnit()),GetUnitLoc(GetDyingUnit()),bj_UNIT_FACING)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1758")
call SelectUnitForPlayerSingle(GetLastCreatedUnit(),GetOwningPlayer(GetSummonedUnit()))
endfunction
function LG takes nothing returns nothing
set udg_trigger76=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger76,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger76,Condition(function LF))
call TriggerAddAction(udg_trigger76,function Lg)
endfunction
function Lh takes nothing returns boolean
if(not(GetSpellAbilityId()=='A02G'))then
return false
endif
return true
endfunction
function LH takes nothing returns boolean
if(not(GetUnitTypeId(GetSpellAbilityUnit())=='h01P'))then
return false
endif
return true
endfunction
function Li takes nothing returns nothing
if(LH())then
call ReplaceUnitBJ(GetSpellAbilityUnit(),'h00J',bj_UNIT_STATE_METHOD_DEFAULTS)
call SelectUnitAddForPlayer(GetLastReplacedUnitBJ(),GetOwningPlayer(GetSpellAbilityUnit()))
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1760")
call PlaySoundBJ(udg_sound52)
else
call ReplaceUnitBJ(GetSpellAbilityUnit(),'h01P',bj_UNIT_STATE_METHOD_DEFAULTS)
call SelectUnitAddForPlayer(GetLastReplacedUnitBJ(),GetOwningPlayer(GetSpellAbilityUnit()))
endif
endfunction
function LI takes nothing returns nothing
set udg_trigger77=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger77,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger77,Condition(function Lh))
call TriggerAddAction(udg_trigger77,function Li)
endfunction
function Lj takes nothing returns boolean
if(not(GetSpellAbilityId()=='A01V'))then
return false
endif
return true
endfunction
function LJ takes nothing returns nothing
call PlaySoundBJ(udg_sound46)
call PingMinimapLocForForceEx(GetPlayersAll(),GetUnitLoc(GetSpellAbilityUnit()),5.00,bj_MINIMAPPINGSTYLE_SIMPLE,100,100,0.00)
call CreateNUnitsAtLoc(1,'h01Q',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetSpellAbilityUnit()),bj_UNIT_FACING)
call IssueImmediateOrderBJ(GetLastCreatedUnit(),"howlofterror")
call PauseUnitBJ(true,GetSpellAbilityUnit())
call TerrainDeformationRippleBJ(4.25,false,GetUnitLoc(GetSpellAbilityUnit()),100.00,800.00,128.00,0.75,256.00)
set udg_unit06=GetSpellAbilityUnit()
call EnableTrigger(udg_trigger79)
call TriggerSleepAction(5.00)
call DisableTrigger(udg_trigger79)
call PauseUnitBJ(false,udg_unit06)
endfunction
function Lk takes nothing returns nothing
set udg_trigger78=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger78,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger78,Condition(function Lj))
call TriggerAddAction(udg_trigger78,function LJ)
endfunction
function LK takes nothing returns nothing
call CreateNUnitsAtLoc(1,'h023',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(udg_unit06),bj_UNIT_FACING)
endfunction
function Ll takes nothing returns nothing
set udg_trigger79=CreateTrigger()
call DisableTrigger(udg_trigger79)
call TriggerRegisterTimerEventPeriodic(udg_trigger79,0.25)
call TriggerAddAction(udg_trigger79,function LK)
endfunction
function LL takes nothing returns boolean
if(not(GetSpellAbilityId()=='A08I'))then
return false
endif
return true
endfunction
function Lm takes nothing returns nothing
set udg_locations02[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))]=GetSpellTargetLoc()
call GroupAddUnitSimple(GetSpellAbilityUnit(),udg_group04)
endfunction
function LM takes nothing returns nothing
set udg_trigger80=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger80,EVENT_PLAYER_UNIT_SPELL_CHANNEL)
call TriggerAddCondition(udg_trigger80,Condition(function LL))
call TriggerAddAction(udg_trigger80,function Lm)
endfunction
function Ln takes nothing returns boolean
if(not(IsUnitGroupEmptyBJ(udg_group04)==false))then
return false
endif
return true
endfunction
function LN takes nothing returns nothing
set udg_real01=(udg_real01+75.00)
set udg_location01=GetUnitLoc(GetEnumUnit())
set udg_location02=PolarProjectionBJ(udg_location01,udg_real01,AngleBetweenPoints(udg_location01,udg_locations02[GetConvertedPlayerId(GetOwningPlayer(GetEnumUnit()))]))
call CreateNUnitsAtLoc(1,'h02D',Player(11),udg_location02,(AngleBetweenPoints(udg_location02,udg_locations02[GetConvertedPlayerId(GetOwningPlayer(GetEnumUnit()))])+GetRandomReal(-4.00,4.00)))
call RemoveLocation(udg_location01)
call RemoveLocation(udg_location02)
endfunction
function Lo takes nothing returns nothing
call ForGroupBJ(udg_group04,function LN)
endfunction
function LO takes nothing returns nothing
set udg_trigger81=CreateTrigger()
call TriggerRegisterTimerEventPeriodic(udg_trigger81,0.15)
call TriggerAddCondition(udg_trigger81,Condition(function Ln))
call TriggerAddAction(udg_trigger81,function Lo)
endfunction
function Lp takes nothing returns boolean
if(not(GetSpellAbilityId()=='A08I'))then
return false
endif
return true
endfunction
function LP takes nothing returns nothing
call GroupRemoveUnitSimple(GetSpellAbilityUnit(),udg_group04)
set udg_real01=0.00
endfunction
function Lq takes nothing returns nothing
set udg_trigger82=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger82,EVENT_PLAYER_UNIT_SPELL_ENDCAST)
call TriggerAddCondition(udg_trigger82,Condition(function Lp))
call TriggerAddAction(udg_trigger82,function LP)
endfunction
function LQ takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h02D'))then
return false
endif
return true
endfunction
function Lr takes nothing returns nothing
call CreateNUnitsAtLoc(1,'e00K',Player(11),GetUnitLoc(GetDyingUnit()),bj_UNIT_FACING)
call RemoveUnit(GetDyingUnit())
endfunction
function LR takes nothing returns nothing
set udg_trigger83=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger83,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger83,Condition(function LQ))
call TriggerAddAction(udg_trigger83,function Lr)
endfunction
function Ls takes nothing returns boolean
if(not(GetOwningPlayer(GetAttacker())==Player(11)))then
return false
endif
return true
endfunction
function LS takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h02L'))then
return false
endif
if(not(UnitHasBuffBJ(GetAttackedUnitBJ(),'Bcri')!=true))then
return false
endif
return true
endfunction
function Lt takes nothing returns boolean
if(not(udg_integer06==2))then
return false
endif
return true
endfunction
function LT takes nothing returns boolean
if(not LS())then
return false
endif
return true
endfunction
function Lu takes nothing returns boolean
if((GetUnitTypeId(GetAttacker())=='h02M'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h039'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h02N'))then
return true
endif
return false
endfunction
function LU takes nothing returns boolean
if(not(UnitHasBuffBJ(GetAttackedUnitBJ(),'Bcri')!=true))then
return false
endif
if(not Lu())then
return false
endif
return true
endfunction
function Lv takes nothing returns boolean
if(not(udg_integer06==4))then
return false
endif
return true
endfunction
function LV takes nothing returns boolean
if(not LU())then
return false
endif
return true
endfunction
function Lw takes nothing returns boolean
if((GetUnitTypeId(GetAttacker())=='h04P'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h01K'))then
return true
endif
return false
endfunction
function LW takes nothing returns boolean
if(not(UnitHasBuffBJ(GetAttackedUnitBJ(),'Bcri')!=true))then
return false
endif
if(not Lw())then
return false
endif
return true
endfunction
function Lx takes nothing returns boolean
if(not(udg_integer06==6))then
return false
endif
return true
endfunction
function LX takes nothing returns boolean
if(not LW())then
return false
endif
return true
endfunction
function Ly takes nothing returns nothing
if(LT())then
set udg_integer06=GetRandomInt(1,4)
if(Lt())then
call AddSpecialEffectLocBJ(GetUnitLoc(GetAttacker()),"Abilities\\Spells\\Undead\\Possession\\PossessionMissile.mdl")
call RemoveUnit(GetAttacker())
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrder(udg_unit34,"parasite",GetAttackedUnitBJ())
else
call DoNothing()
endif
else
call DoNothing()
endif
if(LV())then
set udg_integer06=GetRandomInt(1,8)
if(Lv())then
call IssueTargetOrder(udg_unit34,"parasite",GetAttackedUnitBJ())
else
call DoNothing()
endif
else
call DoNothing()
endif
if(LX())then
set udg_integer06=GetRandomInt(1,12)
if(Lx())then
call IssueTargetOrder(udg_unit34,"parasite",GetAttackedUnitBJ())
else
call DoNothing()
endif
else
call DoNothing()
endif
endfunction
function LY takes nothing returns nothing
set udg_trigger84=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger84,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddCondition(udg_trigger84,Condition(function Ls))
call TriggerAddAction(udg_trigger84,function Ly)
endfunction
function Lz takes nothing returns boolean
if(not(GetPlayerController(GetOwningPlayer(GetAttacker()))==MAP_CONTROL_USER))then
return false
endif
return true
endfunction
function LZ takes nothing returns boolean
if((GetUnitTypeId(GetAttacker())=='h00B'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h00C'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h00Q'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h00S'))then
return true
endif
return false
endfunction
function L0 takes nothing returns boolean
if(not(UnitHasBuffBJ(GetAttackedUnitBJ(),'Bcri')!=true))then
return false
endif
if(not LZ())then
return false
endif
return true
endfunction
function L1 takes nothing returns boolean
if(not(udg_integer06==5))then
return false
endif
return true
endfunction
function L2 takes nothing returns boolean
if(not L0())then
return false
endif
return true
endfunction
function L3 takes nothing returns boolean
if((GetUnitTypeId(GetAttacker())=='h00E'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h00F'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h00I'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h00J'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h00K'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h00L'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h00V'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h00W'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h011'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h012'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h013'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h014'))then
return true
endif
return false
endfunction
function L4 takes nothing returns boolean
if(not(UnitHasBuffBJ(GetAttackedUnitBJ(),'Bcri')!=true))then
return false
endif
if(not L3())then
return false
endif
return true
endfunction
function L5 takes nothing returns boolean
if(not(udg_integer06==3))then
return false
endif
return true
endfunction
function L6 takes nothing returns boolean
if(not L4())then
return false
endif
return true
endfunction
function L7 takes nothing returns nothing
if(L2())then
set udg_integer06=GetRandomInt(1,10)
if(L1())then
call IssueTargetOrder(udg_unit34,"parasite",GetAttackedUnitBJ())
else
call DoNothing()
endif
else
call DoNothing()
endif
if(L6())then
set udg_integer06=GetRandomInt(1,6)
if(L5())then
call IssueTargetOrder(udg_unit34,"parasite",GetAttackedUnitBJ())
else
call DoNothing()
endif
else
call DoNothing()
endif
endfunction
function L8 takes nothing returns nothing
set udg_trigger85=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger85,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddCondition(udg_trigger85,Condition(function Lz))
call TriggerAddAction(udg_trigger85,function L7)
endfunction
function L9 takes nothing returns boolean
if(not(GetUnitTypeId(GetManipulatingUnit())=='n00Q'))then
return false
endif
if(not(GetItemTypeId(GetManipulatedItem())=='I014'))then
return false
endif
return true
endfunction
function ma takes nothing returns boolean
if(not L9())then
return false
endif
return true
endfunction
function mA takes nothing returns nothing
call AdjustPlayerStateBJ(10,udg_player03,PLAYER_STATE_RESOURCE_LUMBER)
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)+10.00))
call RemoveItem(GetManipulatedItem())
call PlaySoundOnUnitBJ(udg_sound54,100,udg_unit03)
endfunction
function mb takes nothing returns nothing
set udg_trigger86=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger86,EVENT_PLAYER_UNIT_PICKUP_ITEM)
call TriggerAddCondition(udg_trigger86,Condition(function ma))
call TriggerAddAction(udg_trigger86,function mA)
endfunction
function mB takes nothing returns boolean
if(not(udg_integer08!=1))then
return false
endif
return true
endfunction
function mc takes nothing returns boolean
if(not(GetPlayerState(udg_player03,PLAYER_STATE_RESOURCE_LUMBER)<1000))then
return false
endif
return true
endfunction
function mC takes nothing returns nothing
if(mc())then
call AdjustPlayerStateBJ(1,udg_player03,PLAYER_STATE_RESOURCE_LUMBER)
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)+1.00))
else
call DoNothing()
endif
endfunction
function md takes nothing returns nothing
set udg_trigger87=CreateTrigger()
call TriggerRegisterTimerEventPeriodic(udg_trigger87,2.50)
call TriggerAddCondition(udg_trigger87,Condition(function mB))
call TriggerAddAction(udg_trigger87,function mC)
endfunction
function mD takes nothing returns boolean
if(not(GetUnitTypeId(GetSpellAbilityUnit())=='n00Q'))then
return false
endif
if(not(GetSpellAbilityId()=='A03U'))then
return false
endif
return true
endfunction
function me takes nothing returns nothing
call AdjustPlayerStateBJ(-5,udg_player03,PLAYER_STATE_RESOURCE_LUMBER)
call TriggerSleepAction(1.00)
call SetUnitAnimation(GetSpellAbilityUnit(),"stand work")
endfunction
function mE takes nothing returns nothing
set udg_trigger88=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger88,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger88,Condition(function mD))
call TriggerAddAction(udg_trigger88,function me)
endfunction
function mf takes nothing returns boolean
if((GetUnitTypeId(GetTrainedUnit())=='h02V'))then
return true
endif
if((GetUnitTypeId(GetTrainedUnit())=='h043'))then
return true
endif
if((GetUnitTypeId(GetTrainedUnit())=='h047'))then
return true
endif
if((GetUnitTypeId(GetTrainedUnit())=='h04A'))then
return true
endif
return false
endfunction
function mF takes nothing returns boolean
if(not mf())then
return false
endif
return true
endfunction
function mg takes nothing returns boolean
if((GetUnitTypeId(GetTrainedUnit())=='h044'))then
return true
endif
if((GetUnitTypeId(GetTrainedUnit())=='h048'))then
return true
endif
return false
endfunction
function mG takes nothing returns boolean
if(not mg())then
return false
endif
return true
endfunction
function mh takes nothing returns boolean
if((GetUnitTypeId(GetTrainedUnit())=='h045'))then
return true
endif
if((GetUnitTypeId(GetTrainedUnit())=='h049'))then
return true
endif
return false
endfunction
function mH takes nothing returns boolean
if(not mh())then
return false
endif
return true
endfunction
function mi takes nothing returns nothing
if(mF())then
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)-5.00))
call TriggerSleepAction(1.00)
call SetUnitAnimation(udg_unit03,"stand work")
else
endif
if(mG())then
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)-8.00))
call TriggerSleepAction(1.00)
call SetUnitAnimation(udg_unit03,"stand work")
else
endif
if(mH())then
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)-10.00))
call TriggerSleepAction(1.00)
call SetUnitAnimation(udg_unit03,"stand work")
else
endif
endfunction
function mI takes nothing returns nothing
set udg_trigger89=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger89,EVENT_PLAYER_UNIT_TRAIN_FINISH)
call TriggerAddAction(udg_trigger89,function mi)
endfunction
function mj takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function mJ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SUMMONED)==false)
endfunction
function mk takes nothing returns boolean
return(IsUnitIllusionBJ(GetFilterUnit())==false)
endfunction
function mK takes nothing returns boolean
return(GetPlayerController(GetOwningPlayer(GetFilterUnit()))==MAP_CONTROL_USER)
endfunction
function ml takes nothing returns boolean
return GetBooleanAnd(mk(),mK())
endfunction
function mL takes nothing returns boolean
return GetBooleanAnd(mJ(),ml())
endfunction
function mm takes nothing returns boolean
return GetBooleanAnd(mj(),mL())
endfunction
function mM takes nothing returns boolean
if(not(udg_integer08==1))then
return false
endif
if(not(CountUnitsInGroup(GetUnitsInRectMatching(udg_rect148,Condition(function mm)))>0))then
return false
endif
return true
endfunction
function mn takes nothing returns boolean
if(not(GetUnitLifePercent(udg_unit03)>=100.00))then
return false
endif
return true
endfunction
function mN takes nothing returns nothing
call SetUnitLifeBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_LIFE,udg_unit03)+(5.00*I2R(CountUnitsInGroup(GetUnitsInRectAll(udg_rect148))))))
call TriggerSleepAction(0.25)
if(mn())then
set udg_integer08=0
call PlaySoundBJ(udg_sound55)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_921")
call SetUnitInvulnerable(udg_unit03,false)
call SetUnitOwner(udg_unit03,udg_player03,true)
call SetUnitVertexColorBJ(udg_unit16,100,100,100,100.00)
call UnitAddAbilityBJ('Aloc',udg_unit16)
call SetUnitAnimation(udg_unit03,"stand work")
call SetUnitManaBJ(udg_unit03,I2R(GetPlayerState(udg_player03,PLAYER_STATE_RESOURCE_LUMBER)))
else
endif
endfunction
function mo takes nothing returns nothing
set udg_trigger90=CreateTrigger()
call TriggerRegisterTimerEventPeriodic(udg_trigger90,1.00)
call TriggerAddCondition(udg_trigger90,Condition(function mM))
call TriggerAddAction(udg_trigger90,function mN)
endfunction
function mO takes nothing returns boolean
if(not(GetUnitTypeId(GetManipulatingUnit())!='n00Q'))then
return false
endif
return true
endfunction
function mp takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),1))=='I00U'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),2))=='I00N'))then
return false
endif
return true
endfunction
function mP takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I02E'))then
return false
endif
return true
endfunction
function mq takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),1))=='I00F'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),2))=='I020'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),3))=='I00O'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),4))=='I01Y'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),5))=='I00E'))then
return false
endif
return true
endfunction
function mQ takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I02H'))then
return false
endif
return true
endfunction
function mr takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),1))=='I01R'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),2))=='I00J'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),3))=='I00N'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),4))=='I00L'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),5))=='I00K'))then
return false
endif
return true
endfunction
function mR takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I02G'))then
return false
endif
return true
endfunction
function ms takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),1))=='I00N'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),2))=='I00I'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),3))=='I00M'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),4))=='I020'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),5))=='I021'))then
return false
endif
return true
endfunction
function mS takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I02F'))then
return false
endif
return true
endfunction
function mt takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),1))=='I02R'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),2))=='I01R'))then
return false
endif
return true
endfunction
function mT takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I016'))then
return false
endif
return true
endfunction
function mu takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),1))=='I01R'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),2))=='I00N'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),3))=='I00H'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),4))=='I020'))then
return false
endif
if(not(GetItemTypeId(UnitItemInSlotBJ(GetManipulatingUnit(),5))=='I00M'))then
return false
endif
return true
endfunction
function mU takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I02I'))then
return false
endif
return true
endfunction
function mv takes nothing returns nothing
if(mP())then
if(mp())then
call AddSpecialEffectTargetUnitBJ("chest",GetManipulatingUnit(),"Abilities\\Spells\\Human\\Invisibility\\InvisibilityTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveItem(GetManipulatedItem())
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),1))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),2))
call UnitAddItemByIdSwapped('I02C',GetManipulatingUnit())
else
call RemoveItem(GetManipulatedItem())
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_1511")
endif
else
endif
if(mQ())then
if(mq())then
call AddSpecialEffectTargetUnitBJ("chest",GetManipulatingUnit(),"Abilities\\Spells\\Human\\Invisibility\\InvisibilityTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveItem(GetManipulatedItem())
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),1))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),2))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),3))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),4))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),5))
call UnitAddItemByIdSwapped('I02D',GetManipulatingUnit())
else
call RemoveItem(GetManipulatedItem())
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_1512")
endif
else
endif
if(mR())then
if(mr())then
call AddSpecialEffectTargetUnitBJ("chest",GetManipulatingUnit(),"Abilities\\Spells\\Human\\Invisibility\\InvisibilityTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveItem(GetManipulatedItem())
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),1))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),2))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),3))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),4))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),5))
call UnitAddItemByIdSwapped('I02J',GetManipulatingUnit())
else
call RemoveItem(GetManipulatedItem())
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_1841")
endif
else
endif
if(mS())then
if(ms())then
call AddSpecialEffectTargetUnitBJ("chest",GetManipulatingUnit(),"Abilities\\Spells\\Human\\Invisibility\\InvisibilityTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveItem(GetManipulatedItem())
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),1))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),2))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),3))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),4))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),5))
call UnitAddItemByIdSwapped('I02K',GetManipulatingUnit())
else
call RemoveItem(GetManipulatedItem())
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_1843")
endif
else
endif
if(mT())then
if(mt())then
call AddSpecialEffectTargetUnitBJ("chest",GetManipulatingUnit(),"Abilities\\Spells\\Human\\Invisibility\\InvisibilityTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveItem(GetManipulatedItem())
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),1))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),2))
call UnitAddItemByIdSwapped('I02L',GetManipulatingUnit())
else
call RemoveItem(GetManipulatedItem())
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_1877")
endif
else
endif
if(mU())then
if(mu())then
call AddSpecialEffectTargetUnitBJ("chest",GetManipulatingUnit(),"Abilities\\Spells\\Human\\Invisibility\\InvisibilityTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveItem(GetManipulatedItem())
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),1))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),2))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),3))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),4))
call RemoveItem(UnitItemInSlotBJ(GetManipulatingUnit(),5))
call UnitAddItemByIdSwapped('I02M',GetManipulatingUnit())
else
call RemoveItem(GetManipulatedItem())
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_1885")
endif
else
endif
endfunction
function mV takes nothing returns nothing
set udg_trigger91=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger91,EVENT_PLAYER_UNIT_PICKUP_ITEM)
call TriggerAddCondition(udg_trigger91,Condition(function mO))
call TriggerAddAction(udg_trigger91,function mv)
endfunction
function mw takes nothing returns boolean
if((GetUnitTypeId(GetDyingUnit())==udg_integer09))then
return true
endif
if((GetUnitTypeId(GetDyingUnit())==udg_integer10))then
return true
endif
return false
endfunction
function mW takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not mw())then
return false
endif
return true
endfunction
function mx takes nothing returns boolean
if(not mW())then
return false
endif
return true
endfunction
function mX takes nothing returns nothing
call SetUnitTimeScalePercent(GetDyingUnit(),100)
endfunction
function my takes nothing returns nothing
set udg_trigger92=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger92,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger92,Condition(function mx))
call TriggerAddAction(udg_trigger92,function mX)
endfunction
function mY takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='n00Q'))then
return false
endif
return true
endfunction
function mz takes nothing returns nothing
set udg_integer08=1
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1888")
call CreateNUnitsAtLoc(1,'n00Q',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetDyingUnit()),bj_UNIT_FACING)
call SetUnitInvulnerable(GetLastCreatedUnit(),true)
call SetUnitLifeBJ(GetLastCreatedUnit(),10.00)
set udg_unit03=GetLastCreatedUnit()
call SetUnitVertexColorBJ(udg_unit16,100,100,100,0.00)
call UnitRemoveAbilityBJ('Aloc',udg_unit16)
endfunction
function mZ takes nothing returns nothing
set udg_trigger93=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger93,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger93,Condition(function mY))
call TriggerAddAction(udg_trigger93,function mz)
endfunction
function m0 takes nothing returns boolean
if(not(GetSpellAbilityId()=='A079'))then
return false
endif
return true
endfunction
function m1 takes nothing returns nothing
call SetItemPositionLoc(UnitItemInSlotBJ(udg_unit03,1),GetRandomLocInRect(udg_rect146))
endfunction
function m2 takes nothing returns nothing
set udg_trigger94=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger94,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger94,Condition(function m0))
call TriggerAddAction(udg_trigger94,function m1)
endfunction
function m3 takes nothing returns boolean
if(not(GetUnitTypeId(GetManipulatingUnit())=='n00Q'))then
return false
endif
return true
endfunction
function m4 takes nothing returns boolean
if(not(udg_integer08==1))then
return false
endif
return true
endfunction
function m5 takes nothing returns nothing
if(m4())then
call UnitRemoveItemFromSlotSwapped(1,udg_unit03)
else
call DoNothing()
endif
endfunction
function m6 takes nothing returns nothing
set udg_trigger95=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger95,EVENT_PLAYER_UNIT_PICKUP_ITEM)
call TriggerAddCondition(udg_trigger95,Condition(function m3))
call TriggerAddAction(udg_trigger95,function m5)
endfunction
function m7 takes nothing returns boolean
if(not(IsPlayerInForce(udg_player03,udg_force01)!=true))then
return false
endif
if(not(IsUnitAliveBJ(udg_unit02)==true))then
return false
endif
if(not(GetUnitTypeId(GetTrainedUnit())!='h02V'))then
return false
endif
if(not(GetUnitTypeId(GetTrainedUnit())!='h044'))then
return false
endif
if(not(GetUnitTypeId(GetTrainedUnit())!='h045'))then
return false
endif
if(not(GetUnitTypeId(GetTrainedUnit())!='h043'))then
return false
endif
if(not(GetUnitTypeId(GetTrainedUnit())!='h047'))then
return false
endif
if(not(GetUnitTypeId(GetTrainedUnit())!='h048'))then
return false
endif
if(not(GetUnitTypeId(GetTrainedUnit())!='h049'))then
return false
endif
if(not(GetUnitTypeId(GetTrainedUnit())!='h04A'))then
return false
endif
return true
endfunction
function m8 takes nothing returns boolean
if(not m7())then
return false
endif
return true
endfunction
function m9 takes nothing returns boolean
return(udg_integer11==1)
endfunction
function Ma takes nothing returns boolean
if(not(RectContainsUnit(udg_rect81,udg_unit02)==false))then
return false
endif
return true
endfunction
function MA takes nothing returns nothing
call SetUnitTimeScalePercent(GetEnumUnit(),0.00)
endfunction
function Mb takes nothing returns nothing
set udg_location04=GetUnitLoc(GetEnumUnit())
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(GetEnumUnit(),'h01Y',bj_UNIT_STATE_METHOD_RELATIVE)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h01Y'),function MA)
endfunction
function MB takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(udg_unit03,1))=='I02C'))then
return false
endif
return true
endfunction
function Mc takes nothing returns boolean
if(not(GetUnitTypeId(GetTrainedUnit())=='npng'))then
return false
endif
return true
endfunction
function MC takes nothing returns boolean
if(not Mc())then
return false
endif
return true
endfunction
function Md takes nothing returns nothing
call SetUnitTimeScalePercent(GetEnumUnit(),0.00)
endfunction
function MD takes nothing returns nothing
set udg_location04=GetUnitLoc(GetEnumUnit())
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(GetEnumUnit(),'h01Z',bj_UNIT_STATE_METHOD_RELATIVE)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h01Z'),function Md)
endfunction
function Me takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(udg_unit03,1))=='I02L'))then
return false
endif
return true
endfunction
function ME takes nothing returns boolean
if(not(GetUnitTypeId(GetTrainedUnit())=='npig'))then
return false
endif
return true
endfunction
function Mf takes nothing returns boolean
if(not ME())then
return false
endif
return true
endfunction
function MF takes nothing returns nothing
call SetUnitTimeScalePercent(GetEnumUnit(),0.00)
endfunction
function Mg takes nothing returns nothing
set udg_location04=GetUnitLoc(GetEnumUnit())
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(GetEnumUnit(),'h020',bj_UNIT_STATE_METHOD_RELATIVE)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h020'),function MF)
endfunction
function MG takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(udg_unit03,1))=='I02K'))then
return false
endif
return true
endfunction
function Mh takes nothing returns boolean
if(not(GetUnitTypeId(GetTrainedUnit())=='nskk'))then
return false
endif
return true
endfunction
function MH takes nothing returns boolean
if(not Mh())then
return false
endif
return true
endfunction
function Mi takes nothing returns nothing
call SetUnitTimeScalePercent(GetEnumUnit(),0.00)
endfunction
function MI takes nothing returns nothing
set udg_location04=GetUnitLoc(GetEnumUnit())
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(GetEnumUnit(),'h021',bj_UNIT_STATE_METHOD_RELATIVE)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h021'),function Mi)
endfunction
function Mj takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(udg_unit03,1))=='I02J'))then
return false
endif
return true
endfunction
function MJ takes nothing returns boolean
if(not(GetUnitTypeId(GetTrainedUnit())=='nsea'))then
return false
endif
return true
endfunction
function Mk takes nothing returns boolean
if(not MJ())then
return false
endif
return true
endfunction
function MK takes nothing returns nothing
call SetUnitTimeScalePercent(GetEnumUnit(),0.00)
endfunction
function Ml takes nothing returns nothing
set udg_location04=GetUnitLoc(GetEnumUnit())
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(GetEnumUnit(),'h022',bj_UNIT_STATE_METHOD_RELATIVE)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h022'),function MK)
endfunction
function ML takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(udg_unit03,1))=='I02M'))then
return false
endif
return true
endfunction
function Mm takes nothing returns boolean
if(not(GetUnitTypeId(GetTrainedUnit())=='nsno'))then
return false
endif
return true
endfunction
function MM takes nothing returns boolean
if(not Mm())then
return false
endif
return true
endfunction
function Mn takes nothing returns nothing
call SetUnitTimeScalePercent(GetEnumUnit(),0.00)
endfunction
function MN takes nothing returns nothing
set udg_location04=GetUnitLoc(GetEnumUnit())
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(GetEnumUnit(),'h02R',bj_UNIT_STATE_METHOD_RELATIVE)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h02R'),function Mn)
endfunction
function Mo takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(udg_unit03,1))=='I02D'))then
return false
endif
return true
endfunction
function MO takes nothing returns boolean
if(not(GetUnitTypeId(GetTrainedUnit())=='nrat'))then
return false
endif
return true
endfunction
function Mp takes nothing returns boolean
if(not MO())then
return false
endif
return true
endfunction
function MP takes nothing returns nothing
call RemoveUnit(GetTrainedUnit())
if(Ma())then
set udg_force02=GetForceOfPlayer(udg_player03)
call DisplayTextToForce(udg_force02,"TRIGSTR_1903")
if(m9())then
call AdjustPlayerStateBJ(200,udg_player03,PLAYER_STATE_RESOURCE_LUMBER)
else
call AdjustPlayerStateBJ(400,udg_player03,PLAYER_STATE_RESOURCE_LUMBER)
endif
call DestroyForce(udg_force02)
return
else
endif
set udg_integer11=(udg_integer11+1)
if(MC())then
if(MB())then
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)-150.00))
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1908")
call PlaySoundBJ(udg_sound51)
call SetPlayerUnitAvailableBJ('npng',false,udg_player03)
call SetPlayerUnitAvailableBJ('npig',false,udg_player03)
call SetPlayerUnitAvailableBJ('nsea',true,udg_player03)
call SetPlayerUnitAvailableBJ('nskk',true,udg_player03)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h01X'),function Mb)
set udg_location04=GetUnitLoc(udg_unit02)
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(udg_unit02,'h01Y',bj_UNIT_STATE_METHOD_RELATIVE)
set udg_unit02=GetLastReplacedUnitBJ()
set udg_integer09='h01Y'
set udg_integer10='h02Y'
call RemoveItem(UnitItemInSlotBJ(udg_unit03,1))
else
set udg_force02=GetForceOfPlayer(udg_player03)
call DisplayTextToForce(udg_force02,"TRIGSTR_1915")
call DestroyForce(udg_force02)
endif
else
call DoNothing()
endif
if(Mf())then
if(Me())then
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2141")
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)-150.00))
call PlaySoundBJ(udg_sound51)
call SetPlayerUnitAvailableBJ('npng',false,udg_player03)
call SetPlayerUnitAvailableBJ('npig',false,udg_player03)
call SetPlayerUnitAvailableBJ('nsno',true,udg_player03)
call SetPlayerUnitAvailableBJ('nrat',true,udg_player03)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h01X'),function MD)
set udg_location04=GetUnitLoc(udg_unit02)
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(udg_unit02,'h01Z',bj_UNIT_STATE_METHOD_RELATIVE)
set udg_unit02=GetLastReplacedUnitBJ()
set udg_integer09='h01Z'
set udg_integer10='h02Y'
call RemoveItem(UnitItemInSlotBJ(udg_unit03,1))
else
set udg_force02=GetForceOfPlayer(udg_player03)
call DisplayTextToForce(udg_force02,"TRIGSTR_1978")
call DestroyForce(udg_force02)
endif
else
call DoNothing()
endif
if(MH())then
if(MG())then
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)-400.00))
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2143")
call PlaySoundBJ(udg_sound51)
call SetPlayerUnitAvailableBJ('nskk',false,udg_player03)
call SetPlayerUnitAvailableBJ('nsea',false,udg_player03)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h01Y'),function Mg)
set udg_location04=GetUnitLoc(udg_unit02)
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(udg_unit02,'h020',bj_UNIT_STATE_METHOD_RELATIVE)
set udg_unit02=GetLastReplacedUnitBJ()
set udg_integer09='h020'
set udg_integer10='h02W'
call RemoveItem(UnitItemInSlotBJ(udg_unit03,1))
else
set udg_force02=GetForceOfPlayer(udg_player03)
call DisplayTextToForce(udg_force02,"TRIGSTR_2142")
call DestroyForce(udg_force02)
endif
else
call DoNothing()
endif
if(Mk())then
if(Mj())then
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)-400.00))
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2144")
call PlaySoundBJ(udg_sound51)
call SetPlayerUnitAvailableBJ('nskk',false,udg_player03)
call SetPlayerUnitAvailableBJ('nsea',false,udg_player03)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h01Y'),function MI)
set udg_location04=GetUnitLoc(udg_unit02)
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(udg_unit02,'h021',bj_UNIT_STATE_METHOD_RELATIVE)
set udg_unit02=GetLastReplacedUnitBJ()
set udg_integer09='h021'
set udg_integer10='h02W'
call RemoveItem(UnitItemInSlotBJ(udg_unit03,1))
else
set udg_force02=GetForceOfPlayer(udg_player03)
call DisplayTextToForce(udg_force02,"TRIGSTR_2145")
call DestroyForce(udg_force02)
endif
else
call DoNothing()
endif
if(MM())then
if(ML())then
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)-400.00))
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2147")
call PlaySoundBJ(udg_sound51)
call SetPlayerUnitAvailableBJ('nsno',false,udg_player03)
call SetPlayerUnitAvailableBJ('nrat',false,udg_player03)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h01Z'),function Ml)
set udg_location04=GetUnitLoc(udg_unit02)
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(udg_unit02,'h022',bj_UNIT_STATE_METHOD_RELATIVE)
set udg_unit02=GetLastReplacedUnitBJ()
set udg_integer09='h022'
set udg_integer10='h02W'
call RemoveItem(UnitItemInSlotBJ(udg_unit03,1))
else
set udg_force02=GetForceOfPlayer(udg_player03)
call DisplayTextToForce(udg_force02,"TRIGSTR_2146")
call DestroyForce(udg_force02)
endif
else
call DoNothing()
endif
if(Mp())then
if(Mo())then
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)-400.00))
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2149")
call PlaySoundBJ(udg_sound51)
call SetPlayerUnitAvailableBJ('nsno',false,udg_player03)
call SetPlayerUnitAvailableBJ('nrat',false,udg_player03)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h01Z'),function MN)
set udg_location04=GetUnitLoc(udg_unit02)
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(udg_unit02,'h02R',bj_UNIT_STATE_METHOD_RELATIVE)
set udg_unit02=GetLastReplacedUnitBJ()
set udg_integer09='h02R'
set udg_integer10='h02W'
call RemoveItem(UnitItemInSlotBJ(udg_unit03,1))
else
set udg_force02=GetForceOfPlayer(udg_player03)
call DisplayTextToForce(udg_force02,"TRIGSTR_2148")
call DestroyForce(udg_force02)
endif
else
call DoNothing()
endif
call TriggerSleepAction(1.00)
call SetUnitAnimation(udg_unit03,"stand work")
endfunction
function Mq takes nothing returns nothing
set udg_trigger96=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger96,EVENT_PLAYER_UNIT_TRAIN_FINISH)
call TriggerAddCondition(udg_trigger96,Condition(function m8))
call TriggerAddAction(udg_trigger96,function MP)
endfunction
function MQ takes nothing returns boolean
if(not(IsPlayerInForce(udg_player03,udg_force01)==true))then
return false
endif
if(not(IsUnitAliveBJ(udg_unit02)==true))then
return false
endif
if(not(GetUnitTypeId(GetTrainedUnit())!='h02V'))then
return false
endif
if(not(GetUnitTypeId(GetTrainedUnit())!='h044'))then
return false
endif
if(not(GetUnitTypeId(GetTrainedUnit())!='h045'))then
return false
endif
if(not(GetUnitTypeId(GetTrainedUnit())!='h043'))then
return false
endif
if(not(GetUnitTypeId(GetTrainedUnit())!='h047'))then
return false
endif
if(not(GetUnitTypeId(GetTrainedUnit())!='h048'))then
return false
endif
if(not(GetUnitTypeId(GetTrainedUnit())!='h049'))then
return false
endif
if(not(GetUnitTypeId(GetTrainedUnit())!='h04A'))then
return false
endif
return true
endfunction
function Mr takes nothing returns boolean
if(not MQ())then
return false
endif
return true
endfunction
function MR takes nothing returns boolean
return(udg_integer11==1)
endfunction
function Ms takes nothing returns boolean
if(not(RectContainsUnit(udg_rect81,udg_unit02)==false))then
return false
endif
return true
endfunction
function MS takes nothing returns nothing
call SetUnitTimeScalePercent(GetEnumUnit(),0.00)
endfunction
function Mt takes nothing returns nothing
set udg_location04=GetUnitLoc(GetEnumUnit())
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(GetEnumUnit(),'h02Y',bj_UNIT_STATE_METHOD_RELATIVE)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h02Y'),function MS)
endfunction
function MT takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(udg_unit03,1))=='I02C'))then
return false
endif
return true
endfunction
function Mu takes nothing returns boolean
if(not(GetUnitTypeId(GetTrainedUnit())=='npng'))then
return false
endif
return true
endfunction
function MU takes nothing returns boolean
if(not Mu())then
return false
endif
return true
endfunction
function Mv takes nothing returns nothing
call SetUnitTimeScalePercent(GetEnumUnit(),0.00)
endfunction
function MV takes nothing returns nothing
set udg_location04=GetUnitLoc(GetEnumUnit())
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(GetEnumUnit(),'h02Y',bj_UNIT_STATE_METHOD_RELATIVE)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h02Y'),function Mv)
endfunction
function Mw takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(udg_unit03,1))=='I02L'))then
return false
endif
return true
endfunction
function MW takes nothing returns boolean
if(not(GetUnitTypeId(GetTrainedUnit())=='npig'))then
return false
endif
return true
endfunction
function Mx takes nothing returns boolean
if(not MW())then
return false
endif
return true
endfunction
function MX takes nothing returns nothing
call SetUnitTimeScalePercent(GetEnumUnit(),0.00)
endfunction
function My takes nothing returns nothing
set udg_location04=GetUnitLoc(GetEnumUnit())
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(GetEnumUnit(),'h02W',bj_UNIT_STATE_METHOD_RELATIVE)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h02W'),function MX)
endfunction
function MY takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(udg_unit03,1))=='I02K'))then
return false
endif
return true
endfunction
function Mz takes nothing returns boolean
if(not(GetUnitTypeId(GetTrainedUnit())=='nskk'))then
return false
endif
return true
endfunction
function MZ takes nothing returns boolean
if(not Mz())then
return false
endif
return true
endfunction
function M0 takes nothing returns nothing
call SetUnitTimeScalePercent(GetEnumUnit(),0.00)
endfunction
function M1 takes nothing returns nothing
set udg_location04=GetUnitLoc(GetEnumUnit())
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(GetEnumUnit(),'h02W',bj_UNIT_STATE_METHOD_RELATIVE)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h02W'),function M0)
endfunction
function M2 takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(udg_unit03,1))=='I02J'))then
return false
endif
return true
endfunction
function M3 takes nothing returns boolean
if(not(GetUnitTypeId(GetTrainedUnit())=='nsea'))then
return false
endif
return true
endfunction
function M4 takes nothing returns boolean
if(not M3())then
return false
endif
return true
endfunction
function M5 takes nothing returns nothing
call SetUnitTimeScalePercent(GetEnumUnit(),0.00)
endfunction
function M6 takes nothing returns nothing
set udg_location04=GetUnitLoc(GetEnumUnit())
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(GetEnumUnit(),'h02W',bj_UNIT_STATE_METHOD_RELATIVE)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h02W'),function M5)
endfunction
function M7 takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(udg_unit03,1))=='I02M'))then
return false
endif
return true
endfunction
function M8 takes nothing returns boolean
if(not(GetUnitTypeId(GetTrainedUnit())=='nsno'))then
return false
endif
return true
endfunction
function M9 takes nothing returns boolean
if(not M8())then
return false
endif
return true
endfunction
function na takes nothing returns nothing
call SetUnitTimeScalePercent(GetEnumUnit(),0.00)
endfunction
function nA takes nothing returns nothing
set udg_location04=GetUnitLoc(GetEnumUnit())
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(GetEnumUnit(),'h02W',bj_UNIT_STATE_METHOD_RELATIVE)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h02W'),function na)
endfunction
function nb takes nothing returns boolean
if(not(GetItemTypeId(UnitItemInSlotBJ(udg_unit03,1))=='I02D'))then
return false
endif
return true
endfunction
function nB takes nothing returns boolean
if(not(GetUnitTypeId(GetTrainedUnit())=='nrat'))then
return false
endif
return true
endfunction
function nc takes nothing returns boolean
if(not nB())then
return false
endif
return true
endfunction
function nC takes nothing returns nothing
call RemoveUnit(GetTrainedUnit())
if(Ms())then
set udg_force02=GetForceOfPlayer(udg_player03)
if(MR())then
call AdjustPlayerStateBJ(200,udg_player03,PLAYER_STATE_RESOURCE_LUMBER)
else
call AdjustPlayerStateBJ(400,udg_player03,PLAYER_STATE_RESOURCE_LUMBER)
endif
call DisplayTextToForce(udg_force02,"TRIGSTR_2150")
call DestroyForce(udg_force02)
return
else
endif
set udg_integer11=(udg_integer11+1)
if(MU())then
if(MT())then
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)-150.00))
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2151")
call PlaySoundBJ(udg_sound51)
call SetPlayerUnitAvailableBJ('npng',false,udg_player03)
call SetPlayerUnitAvailableBJ('npig',false,udg_player03)
call SetPlayerUnitAvailableBJ('nsea',true,udg_player03)
call SetPlayerUnitAvailableBJ('nskk',true,udg_player03)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h02X'),function Mt)
set udg_location04=GetUnitLoc(udg_unit02)
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(udg_unit02,'h02Y',bj_UNIT_STATE_METHOD_RELATIVE)
set udg_unit02=GetLastReplacedUnitBJ()
set udg_integer09='h01Y'
set udg_integer10='h02Y'
call RemoveItem(UnitItemInSlotBJ(udg_unit03,1))
else
set udg_force02=GetForceOfPlayer(udg_player03)
call DisplayTextToForce(udg_force02,"TRIGSTR_2152")
call DestroyForce(udg_force02)
endif
else
call DoNothing()
endif
if(Mx())then
if(Mw())then
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2154")
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)-150.00))
call PlaySoundBJ(udg_sound51)
call SetPlayerUnitAvailableBJ('npng',false,udg_player03)
call SetPlayerUnitAvailableBJ('npig',false,udg_player03)
call SetPlayerUnitAvailableBJ('nsno',true,udg_player03)
call SetPlayerUnitAvailableBJ('nrat',true,udg_player03)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h02X'),function MV)
set udg_location04=GetUnitLoc(udg_unit02)
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(udg_unit02,'h02Y',bj_UNIT_STATE_METHOD_RELATIVE)
set udg_unit02=GetLastReplacedUnitBJ()
set udg_integer09='h01Z'
set udg_integer10='h02Y'
call RemoveItem(UnitItemInSlotBJ(udg_unit03,1))
else
set udg_force02=GetForceOfPlayer(udg_player03)
call DisplayTextToForce(udg_force02,"TRIGSTR_2153")
call DestroyForce(udg_force02)
endif
else
call DoNothing()
endif
if(MZ())then
if(MY())then
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)-400.00))
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2156")
call PlaySoundBJ(udg_sound51)
call SetPlayerUnitAvailableBJ('nskk',false,udg_player03)
call SetPlayerUnitAvailableBJ('nsea',false,udg_player03)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h02Y'),function My)
set udg_location04=GetUnitLoc(udg_unit02)
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(udg_unit02,'h02W',bj_UNIT_STATE_METHOD_RELATIVE)
set udg_unit02=GetLastReplacedUnitBJ()
set udg_integer09='h020'
set udg_integer10='h02W'
call RemoveItem(UnitItemInSlotBJ(udg_unit03,1))
else
set udg_force02=GetForceOfPlayer(udg_player03)
call DisplayTextToForce(udg_force02,"TRIGSTR_2155")
call DestroyForce(udg_force02)
endif
else
call DoNothing()
endif
if(M4())then
if(M2())then
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)-400.00))
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2157")
call PlaySoundBJ(udg_sound51)
call SetPlayerUnitAvailableBJ('nskk',false,udg_player03)
call SetPlayerUnitAvailableBJ('nsea',false,udg_player03)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h02Y'),function M1)
set udg_location04=GetUnitLoc(udg_unit02)
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(udg_unit02,'h02W',bj_UNIT_STATE_METHOD_RELATIVE)
set udg_unit02=GetLastReplacedUnitBJ()
set udg_integer09='h021'
set udg_integer10='h02W'
call RemoveItem(UnitItemInSlotBJ(udg_unit03,1))
else
set udg_force02=GetForceOfPlayer(udg_player03)
call DisplayTextToForce(udg_force02,"TRIGSTR_2158")
call DestroyForce(udg_force02)
endif
else
call DoNothing()
endif
if(M9())then
if(M7())then
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)-400.00))
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2160")
call PlaySoundBJ(udg_sound51)
call SetPlayerUnitAvailableBJ('nsno',false,udg_player03)
call SetPlayerUnitAvailableBJ('nrat',false,udg_player03)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h02W'),function M6)
set udg_location04=GetUnitLoc(udg_unit02)
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(udg_unit02,'h02W',bj_UNIT_STATE_METHOD_RELATIVE)
set udg_unit02=GetLastReplacedUnitBJ()
set udg_integer09='h022'
set udg_integer10='h02W'
call RemoveItem(UnitItemInSlotBJ(udg_unit03,1))
else
set udg_force02=GetForceOfPlayer(udg_player03)
call DisplayTextToForce(udg_force02,"TRIGSTR_2159")
call DestroyForce(udg_force02)
endif
else
call DoNothing()
endif
if(nc())then
if(nb())then
call SetUnitManaBJ(udg_unit03,(GetUnitStateSwap(UNIT_STATE_MANA,udg_unit03)-400.00))
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2162")
call PlaySoundBJ(udg_sound51)
call SetPlayerUnitAvailableBJ('nsno',false,udg_player03)
call SetPlayerUnitAvailableBJ('nrat',false,udg_player03)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h02W'),function nA)
set udg_location04=GetUnitLoc(udg_unit02)
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(udg_unit02,'h02W',bj_UNIT_STATE_METHOD_RELATIVE)
set udg_unit02=GetLastReplacedUnitBJ()
set udg_integer09='h02R'
set udg_integer10='h02W'
call RemoveItem(UnitItemInSlotBJ(udg_unit03,1))
else
set udg_force02=GetForceOfPlayer(udg_player03)
call DisplayTextToForce(udg_force02,"TRIGSTR_2161")
call DestroyForce(udg_force02)
endif
else
call DoNothing()
endif
call TriggerSleepAction(1.00)
call SetUnitAnimation(udg_unit03,"stand work")
endfunction
function nd takes nothing returns nothing
set udg_trigger97=CreateTrigger()
call TriggerRegisterUnitEvent(udg_trigger97,udg_unit17,EVENT_UNIT_TRAIN_FINISH)
call TriggerAddCondition(udg_trigger97,Condition(function Mr))
call TriggerAddAction(udg_trigger97,function nC)
endfunction
function nD takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())==udg_integer09)
endfunction
function ne takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())==udg_integer10)
endfunction
function nE takes nothing returns boolean
return GetBooleanOr(nD(),ne())
endfunction
function nf takes nothing returns boolean
if(not(IsUnitType(GetManipulatingUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(GetItemTypeId(GetManipulatedItem())=='I017'))then
return false
endif
if(not(CountUnitsInGroup(GetUnitsOfPlayerMatching(Player(PLAYER_NEUTRAL_PASSIVE),Condition(function nE)))>0))then
return false
endif
return true
endfunction
function nF takes nothing returns boolean
if(not nf())then
return false
endif
return true
endfunction
function ng takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())==udg_integer09)
endfunction
function nG takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())==udg_integer10)
endfunction
function nh takes nothing returns boolean
return GetBooleanOr(ng(),nG())
endfunction
function nH takes nothing returns nothing
call SetUnitTimeScalePercent(GetEnumUnit(),0.00)
endfunction
function ni takes nothing returns nothing
set udg_location04=GetUnitLoc(GetEnumUnit())
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(GetEnumUnit(),udg_integer09,bj_UNIT_STATE_METHOD_RELATIVE)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),udg_integer09),function nH)
endfunction
function nI takes nothing returns nothing
call ReplaceUnitBJ(GetEnumUnit(),'h02V',bj_UNIT_STATE_METHOD_RELATIVE)
endfunction
function nj takes nothing returns nothing
call ReplaceUnitBJ(GetEnumUnit(),'h044',bj_UNIT_STATE_METHOD_RELATIVE)
endfunction
function nJ takes nothing returns nothing
call ReplaceUnitBJ(GetEnumUnit(),'h045',bj_UNIT_STATE_METHOD_RELATIVE)
endfunction
function nk takes nothing returns nothing
call ReplaceUnitBJ(GetEnumUnit(),'h043',bj_UNIT_STATE_METHOD_RELATIVE)
endfunction
function nK takes nothing returns boolean
if(not(IsPlayerInForce(udg_player03,udg_force01)==true))then
return false
endif
return true
endfunction
function nl takes nothing returns nothing
call ForceRemovePlayerSimple(udg_player03,udg_force03)
set udg_integer30=(udg_integer30+1)
call RemoveItem(GetManipulatedItem())
set udg_group02=GetUnitsOfPlayerMatching(Player(PLAYER_NEUTRAL_PASSIVE),Condition(function nh))
set udg_unit02=GroupPickRandomUnit(udg_group02)
set udg_location04=GetUnitLoc(udg_unit02)
call SetUnitTimeScalePercent(udg_unit02,100)
call TriggerSleepAction(0.25)
call SetUnitOwner(udg_unit02,udg_player03,true)
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\NightElf\\NECancelDeath\\NECancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call DestroyGroup(udg_group02)
if(nK())then
call ForceRemovePlayerSimple(udg_player03,udg_force01)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2164")
call SetPlayerAllianceStateBJ(udg_player03,Player(11),bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(11),udg_player03,bj_ALLIANCE_UNALLIED)
call SetPlayerUnitAvailableBJ('h047',false,udg_player03)
call SetPlayerUnitAvailableBJ('h048',false,udg_player03)
call SetPlayerUnitAvailableBJ('h049',false,udg_player03)
call SetPlayerUnitAvailableBJ('h04A',false,udg_player03)
call SetPlayerUnitAvailableBJ('h02V',true,udg_player03)
call SetPlayerUnitAvailableBJ('h044',true,udg_player03)
call SetPlayerUnitAvailableBJ('h045',true,udg_player03)
call SetPlayerUnitAvailableBJ('h043',true,udg_player03)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),udg_integer10),function ni)
call ForGroupBJ(GetUnitsOfTypeIdAll('h047'),function nI)
call ForGroupBJ(GetUnitsOfTypeIdAll('h048'),function nj)
call ForGroupBJ(GetUnitsOfTypeIdAll('h049'),function nJ)
call ForGroupBJ(GetUnitsOfTypeIdAll('h04A'),function nk)
else
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2163")
endif
endfunction
function nL takes nothing returns nothing
set udg_trigger98=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger98,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger98,Condition(function nF))
call TriggerAddAction(udg_trigger98,function nl)
endfunction
function nm takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())==udg_integer09)
endfunction
function nM takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())==udg_integer10)
endfunction
function nn takes nothing returns boolean
return GetBooleanOr(nm(),nM())
endfunction
function nN takes nothing returns boolean
if(not(IsUnitType(GetManipulatingUnit(),UNIT_TYPE_ANCIENT)==true))then
return false
endif
if(not(GetItemTypeId(GetManipulatedItem())=='I017'))then
return false
endif
if(not(CountUnitsInGroup(GetUnitsOfPlayerMatching(Player(PLAYER_NEUTRAL_PASSIVE),Condition(function nn)))>0))then
return false
endif
return true
endfunction
function no takes nothing returns boolean
if(not nN())then
return false
endif
return true
endfunction
function nO takes nothing returns nothing
call SetUnitTimeScalePercent(GetEnumUnit(),0.00)
endfunction
function np takes nothing returns nothing
set udg_location04=GetUnitLoc(GetEnumUnit())
call AddSpecialEffectLocBJ(udg_location04,"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call ReplaceUnitBJ(GetEnumUnit(),udg_integer10,bj_UNIT_STATE_METHOD_RELATIVE)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),udg_integer10),function nO)
endfunction
function nP takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())==udg_integer10)
endfunction
function nq takes nothing returns nothing
call ReplaceUnitBJ(GetEnumUnit(),'h047',bj_UNIT_STATE_METHOD_RELATIVE)
endfunction
function nQ takes nothing returns nothing
call ReplaceUnitBJ(GetEnumUnit(),'h048',bj_UNIT_STATE_METHOD_RELATIVE)
endfunction
function nr takes nothing returns nothing
call ReplaceUnitBJ(GetEnumUnit(),'h049',bj_UNIT_STATE_METHOD_RELATIVE)
endfunction
function nR takes nothing returns nothing
call ReplaceUnitBJ(GetEnumUnit(),'h04A',bj_UNIT_STATE_METHOD_RELATIVE)
endfunction
function ns takes nothing returns nothing
call RemoveItem(GetManipulatedItem())
call PlaySoundBJ(udg_sound32)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2165")
call ForceRemovePlayerSimple(udg_player03,udg_force03)
call ForceAddPlayerSimple(udg_player03,udg_force01)
call SetPlayerAllianceStateBJ(udg_player03,Player(11),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(11),udg_player03,bj_ALLIANCE_ALLIED_VISION)
call SetPlayerUnitAvailableBJ('h02V',false,udg_player03)
call SetPlayerUnitAvailableBJ('h044',false,udg_player03)
call SetPlayerUnitAvailableBJ('h045',false,udg_player03)
call SetPlayerUnitAvailableBJ('h043',false,udg_player03)
call SetPlayerUnitAvailableBJ('h047',true,udg_player03)
call SetPlayerUnitAvailableBJ('h048',true,udg_player03)
call SetPlayerUnitAvailableBJ('h049',true,udg_player03)
call SetPlayerUnitAvailableBJ('h04A',true,udg_player03)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),udg_integer09),function np)
call TriggerSleepAction(0.25)
set udg_group02=GetUnitsOfPlayerMatching(Player(PLAYER_NEUTRAL_PASSIVE),Condition(function nP))
set udg_unit02=GroupPickRandomUnit(udg_group02)
set udg_location04=GetUnitLoc(udg_unit02)
call SetUnitTimeScalePercent(udg_unit02,100)
call TriggerSleepAction(0.25)
call SetUnitOwner(udg_unit02,udg_player03,true)
call AddSpecialEffectLocBJ(udg_location04,"Units\\Undead\\Abomination\\AbominationExplosion.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveLocation(udg_location04)
call DestroyGroup(udg_group02)
call ForGroupBJ(GetUnitsOfTypeIdAll('h02V'),function nq)
call ForGroupBJ(GetUnitsOfTypeIdAll('h044'),function nQ)
call ForGroupBJ(GetUnitsOfTypeIdAll('h045'),function nr)
call ForGroupBJ(GetUnitsOfTypeIdAll('h043'),function nR)
endfunction
function nS takes nothing returns nothing
set udg_trigger99=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger99,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger99,Condition(function no))
call TriggerAddAction(udg_trigger99,function ns)
endfunction
function nt takes nothing returns boolean
if(not(GetSpellAbilityId()=='A048'))then
return false
endif
return true
endfunction
function nT takes nothing returns nothing
set udg_integer26=3
set udg_units03[1]=GetTriggerUnit()
call EnableTrigger(udg_trigger101)
endfunction
function nu takes nothing returns nothing
set udg_trigger100=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger100,EVENT_PLAYER_UNIT_SPELL_EFFECT)
call TriggerAddCondition(udg_trigger100,Condition(function nt))
call TriggerAddAction(udg_trigger100,function nT)
endfunction
function nU takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)==false)
endfunction
function nv takes nothing returns boolean
return(IsUnitDeadBJ(GetFilterUnit())==false)
endfunction
function nV takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())!='Ewar')
endfunction
function nw takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())!='U004')
endfunction
function nW takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_FLYING)==false)
endfunction
function nx takes nothing returns boolean
return('Bmlt'=='Bmlt')
endfunction
function nX takes nothing returns boolean
return GetBooleanAnd(nW(),nx())
endfunction
function ny takes nothing returns boolean
return GetBooleanAnd(nw(),nX())
endfunction
function nY takes nothing returns boolean
return GetBooleanAnd(nV(),ny())
endfunction
function nz takes nothing returns boolean
return GetBooleanAnd(nv(),nY())
endfunction
function nZ takes nothing returns boolean
return GetBooleanAnd(nU(),nz())
endfunction
function n0 takes nothing returns boolean
return(udg_integer27>3)
endfunction
function Trig_Whip_Extend_Func001Func007Func002C takes nothing returns boolean
if(not(IsUnitAlly(udg_units03[2],GetOwningPlayer(udg_units03[1]))==false))then
return false
endif
return true
endfunction
function n1 takes nothing returns boolean
if(not(udg_units03[2]==null))then
return false
endif
return true
endfunction
function n2 takes nothing returns nothing
if(n0())then
set udg_units03[2]=GetEnumUnit()
else
call DoNothing()
endif
call UnitDamageTargetBJ(udg_units03[1],udg_units03[2],(I2R(udg_integer26)*22.00),ATTACK_TYPE_NORMAL,DAMAGE_TYPE_ENHANCED)
if(n1())then
call DoNothing()
else
call DisableTrigger(GetTriggeringTrigger())
call EnableTrigger(udg_trigger102)
endif
endfunction
function n3 takes nothing returns boolean
if(not(udg_integer27<(5+(6*udg_integer26))))then
return false
endif
return true
endfunction
function n4 takes nothing returns nothing
if(n3())then
set udg_integer27=(udg_integer27+1)
call CreateNUnitsAtLoc(1,'u004',GetOwningPlayer(udg_units03[1]),PolarProjectionBJ(GetUnitLoc(udg_units03[1]),(I2R(udg_integer27)*40.00),GetUnitFacing(udg_units03[1])),GetUnitFacing(udg_units03[1]))
set udg_units04[udg_integer27]=GetLastCreatedUnit()
call ForGroupBJ(GetUnitsInRangeOfLocMatching(115.00,GetUnitLoc(GetLastCreatedUnit()),Condition(function nZ)),function n2)
else
call DisableTrigger(GetTriggeringTrigger())
call EnableTrigger(udg_trigger102)
endif
endfunction
function n5 takes nothing returns nothing
set udg_trigger101=CreateTrigger()
call DisableTrigger(udg_trigger101)
call TriggerRegisterTimerEventPeriodic(udg_trigger101,0.03)
call TriggerAddAction(udg_trigger101,function n4)
endfunction
function n6 takes nothing returns boolean
if(not(udg_integer27==0))then
return false
endif
return true
endfunction
function n7 takes nothing returns nothing
call SetUnitPositionLoc(udg_units03[2],GetUnitLoc(udg_units04[udg_integer27]))
call RemoveUnit(udg_units04[udg_integer27])
set udg_integer27=(udg_integer27-1)
if(n6())then
set udg_units03[2]=null
call DisableTrigger(GetTriggeringTrigger())
else
endif
endfunction
function n8 takes nothing returns nothing
set udg_trigger102=CreateTrigger()
call DisableTrigger(udg_trigger102)
call TriggerRegisterTimerEventPeriodic(udg_trigger102,0.03)
call TriggerAddAction(udg_trigger102,function n7)
endfunction
function n9 takes nothing returns boolean
if(not(GetUnitTypeId(GetAttackedUnitBJ())=='h01Z'))then
return false
endif
if(not(IsUnitType(GetAttacker(),UNIT_TYPE_MELEE_ATTACKER)==true))then
return false
endif
return true
endfunction
function Na takes nothing returns nothing
call UnitDamageTargetBJ(GetAttackedUnitBJ(),GetAttacker(),15.00,ATTACK_TYPE_NORMAL,DAMAGE_TYPE_NORMAL)
call AddSpecialEffectTargetUnitBJ("chest",GetAttackedUnitBJ(),"Abilities\\Spells\\Undead\\AbsorbMana\\AbsorbManaBirthMissile.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call AddSpecialEffectTargetUnitBJ("chest",GetAttacker(),"Abilities\\Weapons\\FarseerMissile\\FarseerMissile.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
endfunction
function NA takes nothing returns nothing
set udg_trigger103=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger103,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddCondition(udg_trigger103,Condition(function n9))
call TriggerAddAction(udg_trigger103,function Na)
endfunction
function Nb takes nothing returns boolean
if(not(GetOwningPlayer(GetOrderedUnit())==udg_player03))then
return false
endif
return true
endfunction
function NB takes nothing returns boolean
if(not(GetIssuedOrderIdBJ()==String2OrderIdBJ("immolation")))then
return false
endif
return true
endfunction
function Nc takes nothing returns boolean
if(not(GetIssuedOrderIdBJ()==String2OrderIdBJ("unimmolation")))then
return false
endif
return true
endfunction
function NC takes nothing returns nothing
if(NB())then
call UnitAddAbilityBJ('Agho',GetOrderedUnit())
call EnableTrigger(udg_trigger105)
else
call DoNothing()
endif
if(Nc())then
call UnitRemoveAbilityBJ('Agho',GetOrderedUnit())
call DisableTrigger(udg_trigger105)
else
call DoNothing()
endif
endfunction
function Nd takes nothing returns nothing
set udg_trigger104=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger104,EVENT_PLAYER_UNIT_ISSUED_ORDER)
call TriggerAddCondition(udg_trigger104,Condition(function Nb))
call TriggerAddAction(udg_trigger104,function NC)
endfunction
function ND takes nothing returns boolean
if(not(UnitHasBuffBJ(udg_unit02,'BOwk')!=true))then
return false
endif
return true
endfunction
function Ne takes nothing returns nothing
if(ND())then
call UnitRemoveAbilityBJ('Agho',udg_unit02)
call DisableTrigger(GetTriggeringTrigger())
else
call DoNothing()
endif
endfunction
function NE takes nothing returns nothing
set udg_trigger105=CreateTrigger()
call DisableTrigger(udg_trigger105)
call TriggerRegisterTimerEventPeriodic(udg_trigger105,0.01)
call TriggerAddAction(udg_trigger105,function Ne)
endfunction
function Nf takes nothing returns boolean
if(not(GetSpellAbilityId()=='A03S'))then
return false
endif
return true
endfunction
function NF takes nothing returns nothing
call TriggerSleepAction(0.10)
call CreateDestructableLoc('B00F',GetUnitLoc(GetSpellTargetUnit()),GetRandomDirectionDeg(),1,0)
endfunction
function Ng takes nothing returns nothing
set udg_trigger106=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger106,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger106,Condition(function Nf))
call TriggerAddAction(udg_trigger106,function NF)
endfunction
function NG takes nothing returns boolean
if(not(GetSpellAbilityId()=='A09N'))then
return false
endif
return true
endfunction
function Nh takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function NH takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_GROUND)==true)
endfunction
function Ni takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)!=true)
endfunction
function NI takes nothing returns boolean
return(GetFilterUnit()!=GetSpellAbilityUnit())
endfunction
function Nj takes nothing returns boolean
return GetBooleanAnd(Ni(),NI())
endfunction
function NJ takes nothing returns boolean
return GetBooleanAnd(NH(),Nj())
endfunction
function Nk takes nothing returns boolean
return GetBooleanAnd(Nh(),NJ())
endfunction
function NK takes nothing returns nothing
call SetUnitPositionLoc(GetEnumUnit(),GetUnitLoc(GetSpellAbilityUnit()))
call AddSpecialEffectLocBJ(GetUnitLoc(GetEnumUnit()),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
endfunction
function Nl takes nothing returns nothing
set udg_location04=GetSpellTargetLoc()
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRangeOfLocMatching(250.00,udg_location04,Condition(function Nk)),function NK)
call RemoveLocation(udg_location04)
endfunction
function NL takes nothing returns nothing
set udg_trigger107=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger107,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger107,Condition(function NG))
call TriggerAddAction(udg_trigger107,function Nl)
endfunction
function Nm takes nothing returns boolean
if(not(GetSpellAbilityId()=='A05A'))then
return false
endif
return true
endfunction
function NM takes nothing returns nothing
call TriggerSleepAction(0.05)
call SetUnitLifeBJ(udg_unit02,(GetUnitStateSwap(UNIT_STATE_LIFE,udg_unit02)+400.00))
endfunction
function Nn takes nothing returns nothing
set udg_trigger108=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger108,EVENT_PLAYER_UNIT_SPELL_FINISH)
call TriggerAddCondition(udg_trigger108,Condition(function Nm))
call TriggerAddAction(udg_trigger108,function NM)
endfunction
function NN takes nothing returns boolean
if(not(GetAttackedUnitBJ()==udg_unit02))then
return false
endif
if(not(UnitHasBuffBJ(GetAttackedUnitBJ(),'B00G')==true))then
return false
endif
if(not(IsUnitType(GetAttacker(),UNIT_TYPE_ANCIENT)==true))then
return false
endif
return true
endfunction
function No takes nothing returns boolean
if(not NN())then
return false
endif
return true
endfunction
function NO takes nothing returns nothing
call PauseUnitBJ(true,GetAttacker())
call IssueImmediateOrderBJ(GetAttacker(),"stop")
call PauseUnitBJ(false,GetAttacker())
endfunction
function Np takes nothing returns nothing
set udg_trigger109=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger109,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddCondition(udg_trigger109,Condition(function No))
call TriggerAddAction(udg_trigger109,function NO)
endfunction
function NP takes nothing returns boolean
if(not(GetAttacker()==udg_unit02))then
return false
endif
if(not(UnitHasBuffBJ(GetAttacker(),'B00G')==true))then
return false
endif
if(not(IsUnitType(GetAttackedUnitBJ(),UNIT_TYPE_ANCIENT)==true))then
return false
endif
return true
endfunction
function Nq takes nothing returns boolean
if(not NP())then
return false
endif
return true
endfunction
function NQ takes nothing returns nothing
call UnitRemoveBuffBJ('B00G',GetAttacker())
endfunction
function Nr takes nothing returns nothing
set udg_trigger110=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger110,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddCondition(udg_trigger110,Condition(function Nq))
call TriggerAddAction(udg_trigger110,function NQ)
endfunction
function NR takes nothing returns boolean
if(not(GetUnitTypeId(GetAttackedUnitBJ())=='h021'))then
return false
endif
return true
endfunction
function Ns takes nothing returns boolean
if(not(udg_integer06==5))then
return false
endif
return true
endfunction
function NS takes nothing returns nothing
set udg_integer06=GetRandomInt(1,10)
call TriggerSleepAction(0.01)
if(Ns())then
call CreateNUnitsAtLoc(1,'h02T',udg_player03,GetUnitLoc(GetAttackedUnitBJ()),bj_UNIT_FACING)
call IssueTargetOrderBJ(GetLastCreatedUnit(),"parasite",GetAttackedUnitBJ())
else
call DoNothing()
endif
endfunction
function Nt takes nothing returns nothing
set udg_trigger111=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger111,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddCondition(udg_trigger111,Condition(function NR))
call TriggerAddAction(udg_trigger111,function NS)
endfunction
function NT takes nothing returns boolean
if(not(GetSpellAbilityId()=='A08O'))then
return false
endif
return true
endfunction
function Nu takes nothing returns nothing
set udg_integer07=(udg_integer07+1)
call TriggerSleepAction(12.00)
set udg_integer07=(udg_integer07-1)
endfunction
function NU takes nothing returns nothing
set udg_trigger112=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger112,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger112,Condition(function NT))
call TriggerAddAction(udg_trigger112,function Nu)
endfunction
function Nv takes nothing returns boolean
if(not(GetUnitTypeId(GetOrderedUnit())=='h020'))then
return false
endif
if(not(UnitHasBuffBJ(GetOrderedUnit(),'Bblo')==true))then
return false
endif
if(not(GetIssuedOrderIdBJ()==String2OrderIdBJ("attack")))then
return false
endif
return true
endfunction
function NV takes nothing returns boolean
if(not Nv())then
return false
endif
return true
endfunction
function Nw takes nothing returns boolean
if(not(udg_integer07>1))then
return false
endif
return true
endfunction
function NW takes nothing returns boolean
if(not(udg_integer07>2))then
return false
endif
return true
endfunction
function Nx takes nothing returns boolean
if(not(udg_integer07>3))then
return false
endif
return true
endfunction
function NX takes nothing returns nothing
call CreateNUnitsAtLoc(1,'h04H',udg_player03,PolarProjectionBJ(GetUnitLoc(GetOrderTargetUnit()),GetRandomReal(256.00,512.00),GetRandomReal(0,360.00)),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),50.00,50.00,50.00,50.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GetLastCreatedUnit()),"Abilities\\Spells\\NightElf\\ManaBurn\\ManaBurnTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrderBJ(GetLastCreatedUnit(),"attack",GetOrderTargetUnit())
if(Nw())then
call CreateNUnitsAtLoc(1,'h04H',udg_player03,PolarProjectionBJ(GetUnitLoc(GetOrderTargetUnit()),GetRandomReal(256.00,512.00),GetRandomReal(0,360.00)),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),50.00,50.00,50.00,50.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GetLastCreatedUnit()),"Abilities\\Spells\\NightElf\\ManaBurn\\ManaBurnTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrderBJ(GetLastCreatedUnit(),"attack",GetOrderTargetUnit())
else
return
endif
if(NW())then
call CreateNUnitsAtLoc(1,'h04H',udg_player03,PolarProjectionBJ(GetUnitLoc(GetOrderTargetUnit()),GetRandomReal(256.00,512.00),GetRandomReal(0,360.00)),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),50.00,50.00,50.00,50.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GetLastCreatedUnit()),"Abilities\\Spells\\NightElf\\ManaBurn\\ManaBurnTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrderBJ(GetLastCreatedUnit(),"attack",GetOrderTargetUnit())
else
return
endif
if(Nx())then
call CreateNUnitsAtLoc(1,'h04H',udg_player03,PolarProjectionBJ(GetUnitLoc(GetOrderTargetUnit()),GetRandomReal(256.00,512.00),GetRandomReal(0,360.00)),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),50.00,50.00,50.00,50.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GetLastCreatedUnit()),"Abilities\\Spells\\NightElf\\ManaBurn\\ManaBurnTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrderBJ(GetLastCreatedUnit(),"attack",GetOrderTargetUnit())
else
return
endif
endfunction
function Ny takes nothing returns nothing
set udg_trigger113=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger113,EVENT_PLAYER_UNIT_ISSUED_TARGET_ORDER)
call TriggerAddCondition(udg_trigger113,Condition(function NV))
call TriggerAddAction(udg_trigger113,function NX)
endfunction
function NY takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h020'))then
return false
endif
if(not(UnitHasBuffBJ(GetAttacker(),'Bblo')==true))then
return false
endif
return true
endfunction
function Nz takes nothing returns boolean
if(not NY())then
return false
endif
return true
endfunction
function NZ takes nothing returns boolean
if(not(udg_integer07>1))then
return false
endif
return true
endfunction
function N0 takes nothing returns boolean
if(not(udg_integer07>2))then
return false
endif
return true
endfunction
function N1 takes nothing returns boolean
if(not(udg_integer07>3))then
return false
endif
return true
endfunction
function N2 takes nothing returns nothing
call CreateNUnitsAtLoc(1,'h04H',udg_player03,PolarProjectionBJ(GetUnitLoc(GetAttackedUnitBJ()),GetRandomReal(256.00,512.00),GetRandomReal(0,360.00)),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),50.00,50.00,50.00,50.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GetLastCreatedUnit()),"Abilities\\Spells\\NightElf\\ManaBurn\\ManaBurnTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrderBJ(GetLastCreatedUnit(),"attack",GetAttackedUnitBJ())
if(NZ())then
call CreateNUnitsAtLoc(1,'h04H',udg_player03,PolarProjectionBJ(GetUnitLoc(GetAttackedUnitBJ()),GetRandomReal(256.00,512.00),GetRandomReal(0,360.00)),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),50.00,50.00,50.00,50.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GetLastCreatedUnit()),"Abilities\\Spells\\NightElf\\ManaBurn\\ManaBurnTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrderBJ(GetLastCreatedUnit(),"attack",GetAttackedUnitBJ())
else
return
endif
if(N0())then
call CreateNUnitsAtLoc(1,'h04H',udg_player03,PolarProjectionBJ(GetUnitLoc(GetAttackedUnitBJ()),GetRandomReal(256.00,512.00),GetRandomReal(0,360.00)),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),50.00,50.00,50.00,50.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GetLastCreatedUnit()),"Abilities\\Spells\\NightElf\\ManaBurn\\ManaBurnTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrderBJ(GetLastCreatedUnit(),"attack",GetAttackedUnitBJ())
else
return
endif
if(N1())then
call CreateNUnitsAtLoc(1,'h04H',udg_player03,PolarProjectionBJ(GetUnitLoc(GetAttackedUnitBJ()),GetRandomReal(256.00,512.00),GetRandomReal(0,360.00)),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),50.00,50.00,50.00,50.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GetLastCreatedUnit()),"Abilities\\Spells\\NightElf\\ManaBurn\\ManaBurnTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrderBJ(GetLastCreatedUnit(),"attack",GetAttackedUnitBJ())
else
return
endif
endfunction
function N3 takes nothing returns nothing
set udg_trigger114=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger114,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddCondition(udg_trigger114,Condition(function Nz))
call TriggerAddAction(udg_trigger114,function N2)
endfunction
function N4 takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h04H'))then
return false
endif
return true
endfunction
function N5 takes nothing returns nothing
call AddSpecialEffectLocBJ(GetUnitLoc(GetAttacker()),"Abilities\\Spells\\Orc\\MirrorImage\\MirrorImageCaster.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call TriggerSleepAction(0.80)
call RemoveUnit(GetAttacker())
endfunction
function N6 takes nothing returns nothing
set udg_trigger115=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger115,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddCondition(udg_trigger115,Condition(function N4))
call TriggerAddAction(udg_trigger115,function N5)
endfunction
function N7 takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h04H'))then
return false
endif
return true
endfunction
function N8 takes nothing returns nothing
call AddSpecialEffectLocBJ(GetUnitLoc(GetDyingUnit()),"Abilities\\Spells\\Orc\\MirrorImage\\MirrorImageCaster.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveUnit(GetDyingUnit())
endfunction
function N9 takes nothing returns nothing
set udg_trigger116=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger116,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger116,Condition(function N7))
call TriggerAddAction(udg_trigger116,function N8)
endfunction
function oa takes nothing returns boolean
if(not(GetSpellAbilityId()=='A041'))then
return false
endif
return true
endfunction
function oA takes nothing returns nothing
call EnableTrigger(udg_trigger118)
call TriggerSleepAction(8.00)
call DisableTrigger(udg_trigger118)
endfunction
function ob takes nothing returns nothing
set udg_trigger117=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger117,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger117,Condition(function oa))
call TriggerAddAction(udg_trigger117,function oA)
endfunction
function oB takes nothing returns nothing
call AddSpecialEffectLocBJ(GetUnitLoc(udg_unit02),"Abilities\\Spells\\Orc\\MirrorImage\\MirrorImageCaster.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
endfunction
function oc takes nothing returns nothing
set udg_trigger118=CreateTrigger()
call DisableTrigger(udg_trigger118)
call TriggerRegisterTimerEventPeriodic(udg_trigger118,0.25)
call TriggerAddAction(udg_trigger118,function oB)
endfunction
function oC takes nothing returns boolean
if(not(GetSpellAbilityId()=='A04E'))then
return false
endif
return true
endfunction
function od takes nothing returns nothing
call PauseUnitBJ(true,udg_unit02)
call SetUnitInvulnerable(udg_unit02,true)
call SetUnitTimeScalePercent(udg_unit02,0.00)
call AddSpecialEffectTargetUnitBJ("chest",udg_unit02,"Defensive Barrier big.mdx")
set udg_effect02=GetLastCreatedEffectBJ()
call TriggerSleepAction(6.00)
call SetUnitManaPercentBJ(udg_unit02,100)
call PauseUnitBJ(false,udg_unit02)
call SetUnitInvulnerable(udg_unit02,false)
call SetUnitTimeScalePercent(udg_unit02,100.00)
call DestroyEffectBJ(udg_effect02)
call CreateNUnitsAtLoc(1,'h04J',udg_player03,GetUnitLoc(udg_unit02),bj_UNIT_FACING)
call IssueTargetOrderBJ(GetLastCreatedUnit(),"thunderbolt",udg_unit02)
endfunction
function oD takes nothing returns nothing
set udg_trigger119=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger119,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger119,Condition(function oC))
call TriggerAddAction(udg_trigger119,function od)
endfunction
function oe takes nothing returns boolean
if(not(GetSpellAbilityUnit()==udg_unit02))then
return false
endif
if(not(GetSpellAbilityId()=='A04C'))then
return false
endif
return true
endfunction
function oE takes nothing returns boolean
if(not oe())then
return false
endif
return true
endfunction
function of takes nothing returns nothing
call PauseUnitBJ(true,GetSpellAbilityUnit())
call CreateNUnitsAtLoc(1,'n00K',udg_player03,GetUnitLoc(GetSpellAbilityUnit()),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),100,100,100,100.00)
call SetUnitPathing(GetLastCreatedUnit(),false)
call SetUnitPositionLoc(GetLastCreatedUnit(),GetUnitLoc(GetSpellAbilityUnit()))
set udg_unit10=GetLastCreatedUnit()
call TriggerSleepAction(0.01)
call IssueImmediateOrderBJ(udg_unit10,"roar")
endfunction
function oF takes nothing returns nothing
set udg_trigger120=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger120,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger120,Condition(function oE))
call TriggerAddAction(udg_trigger120,function of)
endfunction
function og takes nothing returns boolean
if((GetItemTypeId(GetManipulatedItem())=='I00V'))then
return true
endif
if((GetItemTypeId(GetManipulatedItem())=='I00X'))then
return true
endif
if((GetItemTypeId(GetManipulatedItem())=='I02Q'))then
return true
endif
if((GetItemTypeId(GetManipulatedItem())=='I00W'))then
return true
endif
return false
endfunction
function oG takes nothing returns boolean
if(not(IsUnitType(GetManipulatingUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(GetOwningPlayer(GetManipulatingUnit())!=udg_player03))then
return false
endif
if(not og())then
return false
endif
return true
endfunction
function oh takes nothing returns boolean
if(not oG())then
return false
endif
return true
endfunction
function oH takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I00V')
endfunction
function oi takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I00W')
endfunction
function oI takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I02Q')
endfunction
function oj takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I00X')
endfunction
function oJ takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(0))
endfunction
function ok takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(1))
endfunction
function oK takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(2))
endfunction
function ol takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(3))
endfunction
function oL takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(4))
endfunction
function om takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(5))
endfunction
function oM takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(6))
endfunction
function on takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(7))
endfunction
function oN takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(8))
endfunction
function oo takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(9))
endfunction
function oO takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(10))
endfunction
function op takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function oP takes nothing returns boolean
if(not(udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]>=200))then
return false
endif
return true
endfunction
function oq takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function oQ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function oR takes nothing returns boolean
if(not(udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]>=500))then
return false
endif
return true
endfunction
function os takes nothing returns nothing
if(oH())then
set udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=(udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]+10)
else
call DoNothing()
endif
if(oi())then
set udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=(udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]+30)
else
call DoNothing()
endif
if(oI())then
set udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=(udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]+30)
else
call DoNothing()
endif
if(oj())then
set udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=(udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]+40)
else
call DoNothing()
endif
if(oJ())then
call EnableTrigger(udg_trigger122)
else
call DoNothing()
endif
if(ok())then
call EnableTrigger(udg_trigger123)
else
call DoNothing()
endif
if(oK())then
call EnableTrigger(udg_trigger124)
else
call DoNothing()
endif
if(ol())then
call EnableTrigger(udg_trigger125)
else
call DoNothing()
endif
if(oL())then
call EnableTrigger(udg_trigger126)
else
call DoNothing()
endif
if(om())then
call EnableTrigger(udg_trigger127)
else
call DoNothing()
endif
if(oM())then
call EnableTrigger(udg_trigger128)
else
call DoNothing()
endif
if(on())then
call EnableTrigger(udg_trigger129)
else
call DoNothing()
endif
if(oN())then
call EnableTrigger(udg_trigger130)
else
call DoNothing()
endif
if(oo())then
call EnableTrigger(udg_trigger131)
else
call DoNothing()
endif
if(oO())then
call EnableTrigger(udg_trigger132)
else
call DoNothing()
endif
if(oP())then
call CameraSetTargetNoiseForPlayer(GetOwningPlayer(GetManipulatingUnit()),(I2R(udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])*6.00),(I2R(udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])/3.00))
call IssueTargetOrderBJ(udg_unit47,"curse",GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetOwningPlayer(GetManipulatingUnit()),Condition(function op))))
else
call CameraSetTargetNoiseForPlayer(GetOwningPlayer(GetManipulatingUnit()),(I2R(udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])*5.00),(I2R(udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])/50.00))
endif
if(oR())then
call IssueTargetOrderBJ(udg_unit47,"sleep",GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetOwningPlayer(GetManipulatingUnit()),Condition(function oq))))
call TriggerSleepAction(1.00)
call SetUnitAnimation(GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetOwningPlayer(GetManipulatingUnit()),Condition(function oQ))),"death")
else
call DoNothing()
endif
endfunction
function oS takes nothing returns nothing
set udg_trigger121=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger121,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger121,Condition(function oh))
call TriggerAddAction(udg_trigger121,function os)
endfunction
function ot takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function oT takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function ou takes nothing returns boolean
if(not(udg_integer16==1))then
return false
endif
return true
endfunction
function oU takes nothing returns boolean
if(not(udg_integers13[1]>200))then
return false
endif
return true
endfunction
function ov takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function oV takes nothing returns boolean
if(not(udg_integers13[1]>0))then
return false
endif
return true
endfunction
function ow takes nothing returns nothing
if(oV())then
set udg_integers13[1]=(udg_integers13[1]-1)
if(oU())then
set udg_integer16=GetRandomInt(1,(10000/udg_integers13[1]))
if(ou())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function ot))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function oT)))),bj_UNIT_FACING)
else
call DoNothing()
endif
else
call DoNothing()
endif
else
call DisableTrigger(GetTriggeringTrigger())
call CameraClearNoiseForPlayer(Player(0))
call UnitRemoveBuffBJ('Bcrs',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function ov))))
endif
endfunction
function oW takes nothing returns nothing
set udg_trigger122=CreateTrigger()
call DisableTrigger(udg_trigger122)
call TriggerRegisterTimerEventPeriodic(udg_trigger122,1.00)
call TriggerAddAction(udg_trigger122,function ow)
endfunction
function ox takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function oX takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function oy takes nothing returns boolean
if(not(udg_integer16==1))then
return false
endif
return true
endfunction
function oY takes nothing returns boolean
if(not(udg_integers13[2]>200))then
return false
endif
return true
endfunction
function oz takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function oZ takes nothing returns boolean
if(not(udg_integers13[2]>0))then
return false
endif
return true
endfunction
function o0 takes nothing returns nothing
if(oZ())then
set udg_integers13[2]=(udg_integers13[2]-1)
if(oY())then
set udg_integer16=GetRandomInt(1,(10000/udg_integers13[2]))
if(oy())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function ox))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function oX)))),bj_UNIT_FACING)
else
call DoNothing()
endif
else
call DoNothing()
endif
else
call DisableTrigger(GetTriggeringTrigger())
call CameraClearNoiseForPlayer(Player(1))
call UnitRemoveBuffBJ('Bcrs',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function oz))))
endif
endfunction
function o1 takes nothing returns nothing
set udg_trigger123=CreateTrigger()
call DisableTrigger(udg_trigger123)
call TriggerRegisterTimerEventPeriodic(udg_trigger123,1.00)
call TriggerAddAction(udg_trigger123,function o0)
endfunction
function o2 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function o3 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function o4 takes nothing returns boolean
if(not(udg_integer16==1))then
return false
endif
return true
endfunction
function o5 takes nothing returns boolean
if(not(udg_integers13[3]>200))then
return false
endif
return true
endfunction
function o6 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function o7 takes nothing returns boolean
if(not(udg_integers13[3]>0))then
return false
endif
return true
endfunction
function o8 takes nothing returns nothing
if(o7())then
set udg_integers13[3]=(udg_integers13[3]-1)
if(o5())then
set udg_integer16=GetRandomInt(1,(10000/udg_integers13[3]))
if(o4())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function o2))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function o3)))),bj_UNIT_FACING)
else
call DoNothing()
endif
else
call DoNothing()
endif
else
call DisableTrigger(GetTriggeringTrigger())
call CameraClearNoiseForPlayer(Player(2))
call UnitRemoveBuffBJ('Bcrs',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function o6))))
endif
endfunction
function o9 takes nothing returns nothing
set udg_trigger124=CreateTrigger()
call DisableTrigger(udg_trigger124)
call TriggerRegisterTimerEventPeriodic(udg_trigger124,1.00)
call TriggerAddAction(udg_trigger124,function o8)
endfunction
function Oa takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function OA takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Ob takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function OB takes nothing returns boolean
if(not(udg_integer16==1))then
return false
endif
return true
endfunction
function Oc takes nothing returns boolean
if(not(udg_integers13[4]>200))then
return false
endif
return true
endfunction
function OC takes nothing returns boolean
if(not(udg_integers13[4]>0))then
return false
endif
return true
endfunction
function Od takes nothing returns nothing
if(OC())then
set udg_integers13[4]=(udg_integers13[4]-1)
if(Oc())then
set udg_integer16=GetRandomInt(1,(10000/udg_integers13[4]))
if(OB())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function OA))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function Ob)))),bj_UNIT_FACING)
else
call DoNothing()
endif
else
call DoNothing()
endif
else
call DisableTrigger(GetTriggeringTrigger())
call CameraClearNoiseForPlayer(Player(3))
call UnitRemoveBuffBJ('Bcrs',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function Oa))))
endif
endfunction
function OD takes nothing returns nothing
set udg_trigger125=CreateTrigger()
call DisableTrigger(udg_trigger125)
call TriggerRegisterTimerEventPeriodic(udg_trigger125,1.00)
call TriggerAddAction(udg_trigger125,function Od)
endfunction
function Oe takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function OE takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Of takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function OF takes nothing returns boolean
if(not(udg_integer16==1))then
return false
endif
return true
endfunction
function Og takes nothing returns boolean
if(not(udg_integers13[5]>200))then
return false
endif
return true
endfunction
function OG takes nothing returns boolean
if(not(udg_integers13[5]>0))then
return false
endif
return true
endfunction
function Oh takes nothing returns nothing
if(OG())then
set udg_integers13[5]=(udg_integers13[5]-1)
if(Og())then
set udg_integer16=GetRandomInt(1,(10000/udg_integers13[5]))
if(OF())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function OE))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function Of)))),bj_UNIT_FACING)
else
call DoNothing()
endif
else
call DoNothing()
endif
else
call DisableTrigger(GetTriggeringTrigger())
call CameraClearNoiseForPlayer(Player(4))
call UnitRemoveBuffBJ('Bcrs',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function Oe))))
endif
endfunction
function OH takes nothing returns nothing
set udg_trigger126=CreateTrigger()
call DisableTrigger(udg_trigger126)
call TriggerRegisterTimerEventPeriodic(udg_trigger126,1.00)
call TriggerAddAction(udg_trigger126,function Oh)
endfunction
function Oi takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function OI takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Oj takes nothing returns boolean
if(not(udg_integer16==1))then
return false
endif
return true
endfunction
function OJ takes nothing returns boolean
if(not(udg_integers13[6]>200))then
return false
endif
return true
endfunction
function Ok takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function OK takes nothing returns boolean
if(not(udg_integers13[6]>0))then
return false
endif
return true
endfunction
function Ol takes nothing returns nothing
if(OK())then
set udg_integers13[6]=(udg_integers13[6]-1)
if(OJ())then
set udg_integer16=GetRandomInt(1,(10000/udg_integers13[6]))
if(Oj())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function Oi))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function OI)))),bj_UNIT_FACING)
else
call DoNothing()
endif
else
call DoNothing()
endif
else
call DisableTrigger(GetTriggeringTrigger())
call CameraClearNoiseForPlayer(Player(5))
call UnitRemoveBuffBJ('Bcrs',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function Ok))))
endif
endfunction
function OL takes nothing returns nothing
set udg_trigger127=CreateTrigger()
call DisableTrigger(udg_trigger127)
call TriggerRegisterTimerEventPeriodic(udg_trigger127,1.00)
call TriggerAddAction(udg_trigger127,function Ol)
endfunction
function Om takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function OM takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function On takes nothing returns boolean
if(not(udg_integer16==1))then
return false
endif
return true
endfunction
function ON takes nothing returns boolean
if(not(udg_integers13[7]>200))then
return false
endif
return true
endfunction
function Oo takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function OO takes nothing returns boolean
if(not(udg_integers13[7]>0))then
return false
endif
return true
endfunction
function Op takes nothing returns nothing
if(OO())then
set udg_integers13[7]=(udg_integers13[7]-1)
if(ON())then
set udg_integer16=GetRandomInt(1,(10000/udg_integers13[7]))
if(On())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function Om))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function OM)))),bj_UNIT_FACING)
else
call DoNothing()
endif
else
call DoNothing()
endif
else
call DisableTrigger(GetTriggeringTrigger())
call CameraClearNoiseForPlayer(Player(6))
call UnitRemoveBuffBJ('Bcrs',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function Oo))))
endif
endfunction
function OP takes nothing returns nothing
set udg_trigger128=CreateTrigger()
call DisableTrigger(udg_trigger128)
call TriggerRegisterTimerEventPeriodic(udg_trigger128,1.00)
call TriggerAddAction(udg_trigger128,function Op)
endfunction
function Oq takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function OQ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function OR takes nothing returns boolean
if(not(udg_integer16==1))then
return false
endif
return true
endfunction
function Os takes nothing returns boolean
if(not(udg_integers13[8]>200))then
return false
endif
return true
endfunction
function OS takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Ot takes nothing returns boolean
if(not(udg_integers13[8]>0))then
return false
endif
return true
endfunction
function OT takes nothing returns nothing
if(Ot())then
set udg_integers13[8]=(udg_integers13[8]-1)
if(Os())then
set udg_integer16=GetRandomInt(1,(10000/udg_integers13[8]))
if(OR())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function Oq))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function OQ)))),bj_UNIT_FACING)
else
call DoNothing()
endif
else
call DoNothing()
endif
else
call DisableTrigger(GetTriggeringTrigger())
call CameraClearNoiseForPlayer(Player(7))
call UnitRemoveBuffBJ('Bcrs',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function OS))))
endif
endfunction
function Ou takes nothing returns nothing
set udg_trigger129=CreateTrigger()
call DisableTrigger(udg_trigger129)
call TriggerRegisterTimerEventPeriodic(udg_trigger129,1.00)
call TriggerAddAction(udg_trigger129,function OT)
endfunction
function OU takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Ov takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function OV takes nothing returns boolean
if(not(udg_integer16==1))then
return false
endif
return true
endfunction
function Ow takes nothing returns boolean
if(not(udg_integers13[9]>200))then
return false
endif
return true
endfunction
function OW takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Ox takes nothing returns boolean
if(not(udg_integers13[9]>0))then
return false
endif
return true
endfunction
function OX takes nothing returns nothing
if(Ox())then
set udg_integers13[9]=(udg_integers13[9]-1)
if(Ow())then
set udg_integer16=GetRandomInt(1,(10000/udg_integers13[9]))
if(OV())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function OU))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function Ov)))),bj_UNIT_FACING)
else
call DoNothing()
endif
else
call DoNothing()
endif
else
call DisableTrigger(GetTriggeringTrigger())
call CameraClearNoiseForPlayer(Player(8))
call UnitRemoveBuffBJ('Bcrs',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function OW))))
endif
endfunction
function Oy takes nothing returns nothing
set udg_trigger130=CreateTrigger()
call DisableTrigger(udg_trigger130)
call TriggerRegisterTimerEventPeriodic(udg_trigger130,1.00)
call TriggerAddAction(udg_trigger130,function OX)
endfunction
function OY takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Oz takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function OZ takes nothing returns boolean
if(not(udg_integer16==1))then
return false
endif
return true
endfunction
function O0 takes nothing returns boolean
if(not(udg_integers13[10]>200))then
return false
endif
return true
endfunction
function O1 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function O2 takes nothing returns boolean
if(not(udg_integers13[10]>0))then
return false
endif
return true
endfunction
function O3 takes nothing returns nothing
if(O2())then
set udg_integers13[10]=(udg_integers13[10]-1)
if(O0())then
set udg_integer16=GetRandomInt(1,(10000/udg_integers13[10]))
if(OZ())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function OY))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function Oz)))),bj_UNIT_FACING)
else
call DoNothing()
endif
else
call DoNothing()
endif
else
call DisableTrigger(GetTriggeringTrigger())
call CameraClearNoiseForPlayer(Player(9))
call UnitRemoveBuffBJ('Bcrs',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function O1))))
endif
endfunction
function O4 takes nothing returns nothing
set udg_trigger131=CreateTrigger()
call DisableTrigger(udg_trigger131)
call TriggerRegisterTimerEventPeriodic(udg_trigger131,1.00)
call TriggerAddAction(udg_trigger131,function O3)
endfunction
function O5 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function O6 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function O7 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function O8 takes nothing returns boolean
if(not(udg_integer16==1))then
return false
endif
return true
endfunction
function O9 takes nothing returns boolean
if(not(udg_integers13[11]>200))then
return false
endif
return true
endfunction
function pa takes nothing returns boolean
if(not(udg_integers13[11]>0))then
return false
endif
return true
endfunction
function pA takes nothing returns nothing
if(pa())then
set udg_integers13[11]=(udg_integers13[11]-1)
if(O9())then
set udg_integer16=GetRandomInt(1,(10000/udg_integers13[11]))
if(O8())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function O6))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function O7)))),bj_UNIT_FACING)
else
call DoNothing()
endif
else
call DoNothing()
endif
else
call DisableTrigger(GetTriggeringTrigger())
call CameraClearNoiseForPlayer(Player(10))
call UnitRemoveBuffBJ('Bcrs',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function O5))))
endif
endfunction
function pb takes nothing returns nothing
set udg_trigger132=CreateTrigger()
call DisableTrigger(udg_trigger132)
call TriggerRegisterTimerEventPeriodic(udg_trigger132,1.00)
call TriggerAddAction(udg_trigger132,function pA)
endfunction
function pB takes nothing returns boolean
return(udg_integers13[1]>0)
endfunction
function pc takes nothing returns boolean
return(udg_integers13[1]>=200)
endfunction
function pC takes nothing returns boolean
return(udg_integers13[2]>0)
endfunction
function pd takes nothing returns boolean
return(udg_integers13[2]>=200)
endfunction
function pD takes nothing returns boolean
return(udg_integers13[3]>0)
endfunction
function pe takes nothing returns boolean
return(udg_integers13[3]>=200)
endfunction
function pE takes nothing returns boolean
return(udg_integers13[4]>0)
endfunction
function pf takes nothing returns boolean
return(udg_integers13[4]>=200)
endfunction
function pF takes nothing returns boolean
return(udg_integers13[5]>0)
endfunction
function pg takes nothing returns boolean
return(udg_integers13[5]>=200)
endfunction
function pG takes nothing returns boolean
return(udg_integers13[6]>0)
endfunction
function ph takes nothing returns boolean
return(udg_integers13[6]>=200)
endfunction
function pH takes nothing returns boolean
return(udg_integers13[7]>0)
endfunction
function pi takes nothing returns boolean
return(udg_integers13[7]>=200)
endfunction
function pI takes nothing returns boolean
return(udg_integers13[8]>0)
endfunction
function pj takes nothing returns boolean
return(udg_integers13[8]>=200)
endfunction
function pJ takes nothing returns boolean
return(udg_integers13[9]>0)
endfunction
function pk takes nothing returns boolean
return(udg_integers13[9]>=200)
endfunction
function pK takes nothing returns boolean
return(udg_integers13[10]>0)
endfunction
function pl takes nothing returns boolean
return(udg_integers13[10]>=200)
endfunction
function pL takes nothing returns boolean
return(udg_integers13[11]>0)
endfunction
function pm takes nothing returns boolean
return(udg_integers13[11]>=200)
endfunction
function pM takes nothing returns nothing
if(pB())then
if(pc())then
call CameraSetTargetNoiseForPlayer(Player(0),(I2R(udg_integers13[1])*5.00),(I2R(udg_integers13[1])/50.00))
else
call CameraSetTargetNoiseForPlayer(Player(0),(I2R(udg_integers13[1])*6.00),(I2R(udg_integers13[1])/3.00))
endif
else
call DoNothing()
endif
if(pC())then
if(pd())then
call CameraSetTargetNoiseForPlayer(Player(1),(I2R(udg_integers13[2])*5.00),(I2R(udg_integers13[2])/50.00))
else
call CameraSetTargetNoiseForPlayer(Player(1),(I2R(udg_integers13[2])*6.00),(I2R(udg_integers13[2])/3.00))
endif
else
call DoNothing()
endif
if(pD())then
if(pe())then
call CameraSetTargetNoiseForPlayer(Player(2),(I2R(udg_integers13[3])*5.00),(I2R(udg_integers13[3])/50.00))
else
call CameraSetTargetNoiseForPlayer(Player(2),(I2R(udg_integers13[3])*6.00),(I2R(udg_integers13[3])/3.00))
endif
else
call DoNothing()
endif
if(pE())then
if(pf())then
call CameraSetTargetNoiseForPlayer(Player(3),(I2R(udg_integers13[4])*5.00),(I2R(udg_integers13[4])/50.00))
else
call CameraSetTargetNoiseForPlayer(Player(3),(I2R(udg_integers13[4])*6.00),(I2R(udg_integers13[4])/3.00))
endif
else
call DoNothing()
endif
if(pF())then
if(pg())then
call CameraSetTargetNoiseForPlayer(Player(4),(I2R(udg_integers13[5])*5.00),(I2R(udg_integers13[5])/50.00))
else
call CameraSetTargetNoiseForPlayer(Player(4),(I2R(udg_integers13[5])*6.00),(I2R(udg_integers13[5])/3.00))
endif
else
call DoNothing()
endif
if(pG())then
if(ph())then
call CameraSetTargetNoiseForPlayer(Player(5),(I2R(udg_integers13[6])*5.00),(I2R(udg_integers13[6])/50.00))
else
call CameraSetTargetNoiseForPlayer(Player(5),(I2R(udg_integers13[6])*6.00),(I2R(udg_integers13[6])/3.00))
endif
else
call DoNothing()
endif
if(pH())then
if(pi())then
call CameraSetTargetNoiseForPlayer(Player(6),(I2R(udg_integers13[7])*5.00),(I2R(udg_integers13[7])/50.00))
else
call CameraSetTargetNoiseForPlayer(Player(6),(I2R(udg_integers13[7])*6.00),(I2R(udg_integers13[7])/3.00))
endif
else
call DoNothing()
endif
if(pI())then
if(pj())then
call CameraSetTargetNoiseForPlayer(Player(7),(I2R(udg_integers13[8])*5.00),(I2R(udg_integers13[8])/50.00))
else
call CameraSetTargetNoiseForPlayer(Player(7),(I2R(udg_integers13[8])*6.00),(I2R(udg_integers13[8])/3.00))
endif
else
call DoNothing()
endif
if(pJ())then
if(pk())then
call CameraSetTargetNoiseForPlayer(Player(8),(I2R(udg_integers13[9])*5.00),(I2R(udg_integers13[9])/50.00))
else
call CameraSetTargetNoiseForPlayer(Player(8),(I2R(udg_integers13[9])*6.00),(I2R(udg_integers13[9])/3.00))
endif
else
call DoNothing()
endif
if(pK())then
if(pl())then
call CameraSetTargetNoiseForPlayer(Player(9),(I2R(udg_integers13[10])*5.00),(I2R(udg_integers13[10])/50.00))
else
call CameraSetTargetNoiseForPlayer(Player(9),(I2R(udg_integers13[10])*6.00),(I2R(udg_integers13[10])/3.00))
endif
else
call DoNothing()
endif
if(pL())then
if(pm())then
call CameraSetTargetNoiseForPlayer(Player(10),(I2R(udg_integers13[11])*5.00),(I2R(udg_integers13[11])/50.00))
else
call CameraSetTargetNoiseForPlayer(Player(10),(I2R(udg_integers13[11])*6.00),(I2R(udg_integers13[11])/3.00))
endif
else
call DoNothing()
endif
endfunction
function pn takes nothing returns nothing
set udg_trigger133=CreateTrigger()
call TriggerAddAction(udg_trigger133,function pM)
endfunction
function pN takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I00R'))then
return false
endif
return true
endfunction
function po takes nothing returns boolean
if(not(UnitHasBuffBJ(GetManipulatingUnit(),'B017')==true))then
return false
endif
return true
endfunction
function pO takes nothing returns boolean
if(not(udg_integers16[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]==6))then
return false
endif
return true
endfunction
function pp takes nothing returns boolean
if(not(IsUnitType(GetManipulatingUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
return true
endfunction
function pP takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(0))
endfunction
function pq takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(1))
endfunction
function pQ takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(2))
endfunction
function pr takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(3))
endfunction
function pR takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(4))
endfunction
function ps takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(5))
endfunction
function pS takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(6))
endfunction
function pt takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(7))
endfunction
function pT takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(8))
endfunction
function pu takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(9))
endfunction
function pU takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(10))
endfunction
function pv takes nothing returns nothing
set udg_integers16[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=(udg_integers16[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]+1)
if(po())then
call UnitRemoveBuffBJ('B017',GetManipulatingUnit())
else
call DoNothing()
endif
if(pO())then
call KillUnit(GetManipulatingUnit())
else
call DoNothing()
endif
if(pp())then
call DoNothing()
else
return
endif
set udg_integers19[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=90
set udg_integers21[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=90
call SetUnitAbilityLevelSwapped('Arej',udg_unit47,udg_integers16[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call IssueTargetOrderBJ(udg_unit47,"rejuvination",GetManipulatingUnit())
if(pP())then
call EnableTrigger(udg_trigger135)
else
call DoNothing()
endif
if(pq())then
call EnableTrigger(udg_trigger136)
else
call DoNothing()
endif
if(pQ())then
call EnableTrigger(udg_trigger137)
else
call DoNothing()
endif
if(pr())then
call EnableTrigger(udg_trigger138)
else
call DoNothing()
endif
if(pR())then
call EnableTrigger(udg_trigger139)
else
call DoNothing()
endif
if(ps())then
call EnableTrigger(udg_trigger140)
else
call DoNothing()
endif
if(pS())then
call EnableTrigger(udg_trigger141)
else
call DoNothing()
endif
if(pt())then
call EnableTrigger(udg_trigger142)
else
call DoNothing()
endif
if(pT())then
call EnableTrigger(udg_trigger143)
else
call DoNothing()
endif
if(pu())then
call EnableTrigger(udg_trigger144)
else
call DoNothing()
endif
if(pU())then
call EnableTrigger(udg_trigger145)
else
call DoNothing()
endif
endfunction
function pV takes nothing returns nothing
set udg_trigger134=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger134,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger134,Condition(function pN))
call TriggerAddAction(udg_trigger134,function pv)
endfunction
function pw takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function pW takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function px takes nothing returns boolean
return(udg_integers16[1]>=4)
endfunction
function pX takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function py takes nothing returns boolean
if(not(udg_integers21[1]>0))then
return false
endif
return true
endfunction
function pY takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function pz takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function pY))),'B017')==true))then
return false
endif
return true
endfunction
function pZ takes nothing returns boolean
if(not(udg_integers19[1]>0))then
return false
endif
return true
endfunction
function p0 takes nothing returns nothing
if(pZ())then
set udg_integers19[1]=(udg_integers19[1]-1)
else
if(pz())then
set udg_integers21[1]=(udg_integers21[1]-1)
if(py())then
call SetCameraFieldForPlayer(Player(0),CAMERA_FIELD_TARGET_DISTANCE,(300.00/I2R(udg_integers16[1])),0.33)
call TriggerSleepAction(0.33)
call SetCameraFieldForPlayer(Player(0),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
else
call SetCameraFieldForPlayer(Player(0),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
call UnitRemoveBuffBJ('B017',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function pW))))
if(px())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function pX))))
else
call DoNothing()
endif
set udg_integers16[1]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"curse",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function pw))))
endif
endif
endfunction
function p1 takes nothing returns nothing
set udg_trigger135=CreateTrigger()
call DisableTrigger(udg_trigger135)
call TriggerRegisterTimerEventPeriodic(udg_trigger135,1.00)
call TriggerAddAction(udg_trigger135,function p0)
endfunction
function p2 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function p3 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function p4 takes nothing returns boolean
return(udg_integers16[2]>=4)
endfunction
function p5 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function p6 takes nothing returns boolean
if(not(udg_integers21[2]>0))then
return false
endif
return true
endfunction
function p7 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function p8 takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function p7))),'B017')==true))then
return false
endif
return true
endfunction
function p9 takes nothing returns boolean
if(not(udg_integers19[2]>0))then
return false
endif
return true
endfunction
function Pa takes nothing returns nothing
if(p9())then
set udg_integers19[2]=(udg_integers19[2]-1)
else
if(p8())then
set udg_integers21[2]=(udg_integers21[2]-1)
if(p6())then
call SetCameraFieldForPlayer(Player(1),CAMERA_FIELD_TARGET_DISTANCE,(300.00/I2R(udg_integers16[2])),0.33)
call TriggerSleepAction(0.33)
call SetCameraFieldForPlayer(Player(1),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
else
call SetCameraFieldForPlayer(Player(1),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
call UnitRemoveBuffBJ('B017',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function p3))))
if(p4())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function p5))))
else
call DoNothing()
endif
set udg_integers16[2]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"curse",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function p2))))
endif
endif
endfunction
function PA takes nothing returns nothing
set udg_trigger136=CreateTrigger()
call DisableTrigger(udg_trigger136)
call TriggerRegisterTimerEventPeriodic(udg_trigger136,1.00)
call TriggerAddAction(udg_trigger136,function Pa)
endfunction
function Pb takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function PB takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Pc takes nothing returns boolean
return(udg_integers16[3]>=4)
endfunction
function PC takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Pd takes nothing returns boolean
if(not(udg_integers21[3]>0))then
return false
endif
return true
endfunction
function PD takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Pe takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function PD))),'B017')==true))then
return false
endif
return true
endfunction
function PE takes nothing returns boolean
if(not(udg_integers19[3]>0))then
return false
endif
return true
endfunction
function Pf takes nothing returns nothing
if(PE())then
set udg_integers19[3]=(udg_integers19[3]-1)
else
if(Pe())then
set udg_integers21[3]=(udg_integers21[3]-1)
if(Pd())then
call SetCameraFieldForPlayer(Player(2),CAMERA_FIELD_TARGET_DISTANCE,(300.00/I2R(udg_integers16[3])),0.33)
call TriggerSleepAction(0.33)
call SetCameraFieldForPlayer(Player(2),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
else
call SetCameraFieldForPlayer(Player(2),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
call UnitRemoveBuffBJ('B017',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function PB))))
if(Pc())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function PC))))
else
call DoNothing()
endif
set udg_integers16[3]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"curse",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function Pb))))
endif
endif
endfunction
function PF takes nothing returns nothing
set udg_trigger137=CreateTrigger()
call DisableTrigger(udg_trigger137)
call TriggerRegisterTimerEventPeriodic(udg_trigger137,1.00)
call TriggerAddAction(udg_trigger137,function Pf)
endfunction
function Pg takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function PG takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Ph takes nothing returns boolean
return(udg_integers16[4]>=4)
endfunction
function PH takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Pi takes nothing returns boolean
if(not(udg_integers21[4]>0))then
return false
endif
return true
endfunction
function PI takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Pj takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function PI))),'B017')==true))then
return false
endif
return true
endfunction
function PJ takes nothing returns boolean
if(not(udg_integers19[4]>0))then
return false
endif
return true
endfunction
function Pk takes nothing returns nothing
if(PJ())then
set udg_integers19[4]=(udg_integers19[4]-1)
else
if(Pj())then
set udg_integers21[4]=(udg_integers21[4]-1)
if(Pi())then
call SetCameraFieldForPlayer(Player(3),CAMERA_FIELD_TARGET_DISTANCE,(300.00/I2R(udg_integers16[4])),0.33)
call TriggerSleepAction(0.33)
call SetCameraFieldForPlayer(Player(3),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
else
call SetCameraFieldForPlayer(Player(3),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
call UnitRemoveBuffBJ('B017',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function PG))))
if(Ph())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function PH))))
else
call DoNothing()
endif
set udg_integers16[4]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"curse",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function Pg))))
endif
endif
endfunction
function PK takes nothing returns nothing
set udg_trigger138=CreateTrigger()
call DisableTrigger(udg_trigger138)
call TriggerRegisterTimerEventPeriodic(udg_trigger138,1.00)
call TriggerAddAction(udg_trigger138,function Pk)
endfunction
function Pl takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function PL takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Pm takes nothing returns boolean
return(udg_integers16[5]>=4)
endfunction
function PM takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Pn takes nothing returns boolean
if(not(udg_integers21[5]>0))then
return false
endif
return true
endfunction
function PN takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Po takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function PN))),'B017')==true))then
return false
endif
return true
endfunction
function PO takes nothing returns boolean
if(not(udg_integers19[5]>0))then
return false
endif
return true
endfunction
function Pp takes nothing returns nothing
if(PO())then
set udg_integers19[5]=(udg_integers19[5]-1)
else
if(Po())then
set udg_integers21[5]=(udg_integers21[5]-1)
if(Pn())then
call SetCameraFieldForPlayer(Player(4),CAMERA_FIELD_TARGET_DISTANCE,(300.00/I2R(udg_integers16[5])),0.33)
call TriggerSleepAction(0.33)
call SetCameraFieldForPlayer(Player(4),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
else
call SetCameraFieldForPlayer(Player(4),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
call UnitRemoveBuffBJ('B017',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function PL))))
if(Pm())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function PM))))
else
call DoNothing()
endif
set udg_integers16[5]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"curse",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function Pl))))
endif
endif
endfunction
function PP takes nothing returns nothing
set udg_trigger139=CreateTrigger()
call DisableTrigger(udg_trigger139)
call TriggerRegisterTimerEventPeriodic(udg_trigger139,1.00)
call TriggerAddAction(udg_trigger139,function Pp)
endfunction
function Pq takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function PQ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Pr takes nothing returns boolean
return(udg_integers16[6]>=4)
endfunction
function PR takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Ps takes nothing returns boolean
if(not(udg_integers21[6]>0))then
return false
endif
return true
endfunction
function PS takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Pt takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function PS))),'B017')==true))then
return false
endif
return true
endfunction
function PT takes nothing returns boolean
if(not(udg_integers19[6]>0))then
return false
endif
return true
endfunction
function Pu takes nothing returns nothing
if(PT())then
set udg_integers19[6]=(udg_integers19[6]-1)
else
if(Pt())then
set udg_integers21[6]=(udg_integers21[6]-1)
if(Ps())then
call SetCameraFieldForPlayer(Player(5),CAMERA_FIELD_TARGET_DISTANCE,(300.00/I2R(udg_integers16[6])),0.33)
call TriggerSleepAction(0.33)
call SetCameraFieldForPlayer(Player(5),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
else
call SetCameraFieldForPlayer(Player(5),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
call UnitRemoveBuffBJ('B017',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function PQ))))
if(Pr())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function PR))))
else
call DoNothing()
endif
set udg_integers16[6]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"curse",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function Pq))))
endif
endif
endfunction
function PU takes nothing returns nothing
set udg_trigger140=CreateTrigger()
call DisableTrigger(udg_trigger140)
call TriggerRegisterTimerEventPeriodic(udg_trigger140,1.00)
call TriggerAddAction(udg_trigger140,function Pu)
endfunction
function Pv takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function PV takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Pw takes nothing returns boolean
return(udg_integers16[7]>=4)
endfunction
function PW takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Px takes nothing returns boolean
if(not(udg_integers21[7]>0))then
return false
endif
return true
endfunction
function PX takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Py takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function PX))),'B017')==true))then
return false
endif
return true
endfunction
function PY takes nothing returns boolean
if(not(udg_integers19[7]>0))then
return false
endif
return true
endfunction
function Pz takes nothing returns nothing
if(PY())then
set udg_integers19[7]=(udg_integers19[7]-1)
else
if(Py())then
set udg_integers21[7]=(udg_integers21[7]-1)
if(Px())then
call SetCameraFieldForPlayer(Player(6),CAMERA_FIELD_TARGET_DISTANCE,(300.00/I2R(udg_integers16[7])),0.33)
call TriggerSleepAction(0.33)
call SetCameraFieldForPlayer(Player(6),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
else
call SetCameraFieldForPlayer(Player(6),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
call UnitRemoveBuffBJ('B017',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function PV))))
if(Pw())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function PW))))
else
call DoNothing()
endif
set udg_integers16[7]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"curse",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function Pv))))
endif
endif
endfunction
function PZ takes nothing returns nothing
set udg_trigger141=CreateTrigger()
call DisableTrigger(udg_trigger141)
call TriggerRegisterTimerEventPeriodic(udg_trigger141,1.00)
call TriggerAddAction(udg_trigger141,function Pz)
endfunction
function P0 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function P1 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function P2 takes nothing returns boolean
return(udg_integers16[8]>=4)
endfunction
function P3 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function P4 takes nothing returns boolean
if(not(udg_integers21[8]>0))then
return false
endif
return true
endfunction
function P5 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function P6 takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function P5))),'B017')==true))then
return false
endif
return true
endfunction
function P7 takes nothing returns boolean
if(not(udg_integers19[8]>0))then
return false
endif
return true
endfunction
function P8 takes nothing returns nothing
if(P7())then
set udg_integers19[8]=(udg_integers19[8]-1)
else
if(P6())then
set udg_integers21[8]=(udg_integers21[8]-1)
if(P4())then
call SetCameraFieldForPlayer(Player(7),CAMERA_FIELD_TARGET_DISTANCE,(300.00/I2R(udg_integers16[8])),0.33)
call TriggerSleepAction(0.33)
call SetCameraFieldForPlayer(Player(7),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
else
call SetCameraFieldForPlayer(Player(7),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
call UnitRemoveBuffBJ('B017',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function P1))))
if(P2())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function P3))))
else
call DoNothing()
endif
set udg_integers16[8]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"curse",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function P0))))
endif
endif
endfunction
function P9 takes nothing returns nothing
set udg_trigger142=CreateTrigger()
call DisableTrigger(udg_trigger142)
call TriggerRegisterTimerEventPeriodic(udg_trigger142,1.00)
call TriggerAddAction(udg_trigger142,function P8)
endfunction
function qa takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function qA takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function qb takes nothing returns boolean
return(udg_integers16[9]>=4)
endfunction
function qB takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function qc takes nothing returns boolean
if(not(udg_integers21[9]>0))then
return false
endif
return true
endfunction
function qC takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function qd takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function qC))),'B017')==true))then
return false
endif
return true
endfunction
function qD takes nothing returns boolean
if(not(udg_integers19[9]>0))then
return false
endif
return true
endfunction
function qe takes nothing returns nothing
if(qD())then
set udg_integers19[9]=(udg_integers19[9]-1)
else
if(qd())then
set udg_integers21[9]=(udg_integers21[9]-1)
if(qc())then
call SetCameraFieldForPlayer(Player(8),CAMERA_FIELD_TARGET_DISTANCE,(300.00/I2R(udg_integers16[9])),0.33)
call TriggerSleepAction(0.33)
call SetCameraFieldForPlayer(Player(8),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
else
call SetCameraFieldForPlayer(Player(8),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
call UnitRemoveBuffBJ('B017',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function qA))))
if(qb())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function qB))))
else
call DoNothing()
endif
set udg_integers16[9]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"curse",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function qa))))
endif
endif
endfunction
function qE takes nothing returns nothing
set udg_trigger143=CreateTrigger()
call DisableTrigger(udg_trigger143)
call TriggerRegisterTimerEventPeriodic(udg_trigger143,1.00)
call TriggerAddAction(udg_trigger143,function qe)
endfunction
function qf takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function qF takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function qg takes nothing returns boolean
return(udg_integers16[10]>=4)
endfunction
function qG takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function qh takes nothing returns boolean
if(not(udg_integers21[10]>0))then
return false
endif
return true
endfunction
function qH takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function qi takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function qH))),'B017')==true))then
return false
endif
return true
endfunction
function qI takes nothing returns boolean
if(not(udg_integers19[10]>0))then
return false
endif
return true
endfunction
function qj takes nothing returns nothing
if(qI())then
set udg_integers19[10]=(udg_integers19[10]-1)
else
if(qi())then
set udg_integers21[10]=(udg_integers21[10]-1)
if(qh())then
call SetCameraFieldForPlayer(Player(9),CAMERA_FIELD_TARGET_DISTANCE,(300.00/I2R(udg_integers16[10])),0.33)
call TriggerSleepAction(0.33)
call SetCameraFieldForPlayer(Player(9),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
else
call SetCameraFieldForPlayer(Player(9),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
call UnitRemoveBuffBJ('B017',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function qF))))
if(qg())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function qG))))
else
call DoNothing()
endif
set udg_integers16[10]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"curse",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function qf))))
endif
endif
endfunction
function qJ takes nothing returns nothing
set udg_trigger144=CreateTrigger()
call DisableTrigger(udg_trigger144)
call TriggerRegisterTimerEventPeriodic(udg_trigger144,1.00)
call TriggerAddAction(udg_trigger144,function qj)
endfunction
function qk takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function qK takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function ql takes nothing returns boolean
return(udg_integers16[11]>=4)
endfunction
function qL takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function qm takes nothing returns boolean
if(not(udg_integers21[11]>0))then
return false
endif
return true
endfunction
function qM takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function qn takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function qM))),'B017')==true))then
return false
endif
return true
endfunction
function qN takes nothing returns boolean
if(not(udg_integers19[11]>0))then
return false
endif
return true
endfunction
function qo takes nothing returns nothing
if(qN())then
set udg_integers19[11]=(udg_integers19[11]-1)
else
if(qn())then
set udg_integers21[11]=(udg_integers21[11]-1)
if(qm())then
call SetCameraFieldForPlayer(Player(10),CAMERA_FIELD_TARGET_DISTANCE,(300.00/I2R(udg_integers16[11])),0.33)
call TriggerSleepAction(0.33)
call SetCameraFieldForPlayer(Player(10),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
else
call SetCameraFieldForPlayer(Player(10),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.33)
call UnitRemoveBuffBJ('B017',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function qK))))
if(ql())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function qL))))
else
call DoNothing()
endif
set udg_integers16[11]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"curse",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function qk))))
endif
endif
endfunction
function qO takes nothing returns nothing
set udg_trigger145=CreateTrigger()
call DisableTrigger(udg_trigger145)
call TriggerRegisterTimerEventPeriodic(udg_trigger145,1.00)
call TriggerAddAction(udg_trigger145,function qo)
endfunction
function qp takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I00S'))then
return false
endif
return true
endfunction
function qP takes nothing returns boolean
if(not(udg_integers17[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]>=40))then
return false
endif
return true
endfunction
function qq takes nothing returns boolean
if(not(IsUnitType(GetManipulatingUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
return true
endfunction
function qQ takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(0))
endfunction
function qr takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(1))
endfunction
function qR takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(2))
endfunction
function qs takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(3))
endfunction
function qS takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(4))
endfunction
function qt takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(5))
endfunction
function qT takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(6))
endfunction
function qu takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(7))
endfunction
function qU takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(8))
endfunction
function qv takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(9))
endfunction
function qV takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(10))
endfunction
function qw takes nothing returns nothing
set udg_integers17[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=(udg_integers17[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]+1)
if(qP())then
call KillUnit(GetManipulatingUnit())
else
call DoNothing()
endif
if(qq())then
call DoNothing()
else
return
endif
set udg_reals06[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=90.00
call SetUnitAbilityLevelSwapped('Ainf',udg_unit47,udg_integers17[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call IssueTargetOrderBJ(udg_unit47,"innerfire",GetManipulatingUnit())
if(qQ())then
call EnableTrigger(udg_trigger147)
else
call DoNothing()
endif
if(qr())then
call EnableTrigger(udg_trigger148)
else
call DoNothing()
endif
if(qR())then
call EnableTrigger(udg_trigger149)
else
call DoNothing()
endif
if(qs())then
call EnableTrigger(udg_trigger150)
else
call DoNothing()
endif
if(qS())then
call EnableTrigger(udg_trigger151)
else
call DoNothing()
endif
if(qt())then
call EnableTrigger(udg_trigger152)
else
call DoNothing()
endif
if(qT())then
call EnableTrigger(udg_trigger153)
else
call DoNothing()
endif
if(qu())then
call EnableTrigger(udg_trigger154)
else
call DoNothing()
endif
if(qU())then
call EnableTrigger(udg_trigger155)
else
call DoNothing()
endif
if(qv())then
call EnableTrigger(udg_trigger156)
else
call DoNothing()
endif
if(qV())then
call EnableTrigger(udg_trigger157)
else
call DoNothing()
endif
endfunction
function qW takes nothing returns nothing
set udg_trigger146=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger146,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger146,Condition(function qp))
call TriggerAddAction(udg_trigger146,function qw)
endfunction
function qx takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function qX takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function qy takes nothing returns boolean
if(not(udg_integers17[1]>=6))then
return false
endif
return true
endfunction
function qY takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function qz takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function qZ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function q0 takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function q1 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function q2 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function q3 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function q4 takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function q5 takes nothing returns boolean
if(not(udg_integers17[1]<20))then
return false
endif
return true
endfunction
function q6 takes nothing returns boolean
if(not(udg_integers17[1]>=10))then
return false
endif
return true
endfunction
function q7 takes nothing returns boolean
if(not(udg_reals06[1]>0.00))then
return false
endif
return true
endfunction
function q8 takes nothing returns nothing
if(q7())then
set udg_reals06[1]=(udg_reals06[1]-0.25)
if(qy())then
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function qX))),GetRandomReal((100.00-(I2R(udg_integers17[1])*2.45)),(100.00+(I2R(udg_integers17[1])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[1])*2.45)),(100.00+(I2R(udg_integers17[1])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[1])*2.45)),(100.00+(I2R(udg_integers17[1])*2.45))))
else
call DoNothing()
endif
if(q6())then
if(q5())then
set udg_integer06=GetRandomInt(1,(100/udg_integers17[1]))
if(q0())then
call PanCameraToTimedLocForPlayer(Player(0),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function qz)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function qZ)))),Player(0),0.23)
call TriggerSleepAction(0.24)
call ResetToGameCameraForPlayer(Player(0),0.00)
else
call DoNothing()
endif
else
call PanCameraToTimedLocForPlayer(Player(0),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function qY)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function q1)))),Player(0),0.23)
set udg_integer06=GetRandomInt(1,100)
if(q4())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function q2))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function q3)))),bj_UNIT_FACING)
else
call DoNothing()
endif
endif
else
call DoNothing()
endif
else
set udg_integers17[1]=0
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function qx))),100,100,100)
call ResetToGameCameraForPlayer(Player(0),2.00)
call DisableTrigger(GetTriggeringTrigger())
endif
endfunction
function q9 takes nothing returns nothing
set udg_trigger147=CreateTrigger()
call DisableTrigger(udg_trigger147)
call TriggerRegisterTimerEventPeriodic(udg_trigger147,0.25)
call TriggerAddAction(udg_trigger147,function q8)
endfunction
function Qa takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function QA takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Qb takes nothing returns boolean
if(not(udg_integers17[2]>=6))then
return false
endif
return true
endfunction
function QB takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Qc takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function QC takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Qd takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function QD takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Qe takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function QE takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Qf takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function QF takes nothing returns boolean
if(not(udg_integers17[2]<20))then
return false
endif
return true
endfunction
function Qg takes nothing returns boolean
if(not(udg_integers17[2]>=10))then
return false
endif
return true
endfunction
function QG takes nothing returns boolean
if(not(udg_reals06[2]>0.00))then
return false
endif
return true
endfunction
function Qh takes nothing returns nothing
if(QG())then
set udg_reals06[2]=(udg_reals06[2]-0.25)
if(Qb())then
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function QA))),GetRandomReal((100.00-(I2R(udg_integers17[2])*2.45)),(100.00+(I2R(udg_integers17[2])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[2])*2.45)),(100.00+(I2R(udg_integers17[2])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[2])*2.45)),(100.00+(I2R(udg_integers17[2])*2.45))))
else
call DoNothing()
endif
if(Qg())then
if(QF())then
set udg_integer06=GetRandomInt(1,(100/udg_integers17[2]))
if(Qd())then
call PanCameraToTimedLocForPlayer(Player(1),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function Qc)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function QC)))),Player(1),0.23)
call TriggerSleepAction(0.24)
call ResetToGameCameraForPlayer(Player(1),0.00)
else
call DoNothing()
endif
else
call PanCameraToTimedLocForPlayer(Player(1),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function QB)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function QD)))),Player(1),0.23)
set udg_integer06=GetRandomInt(1,100)
if(Qf())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function Qe))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function QE)))),bj_UNIT_FACING)
else
call DoNothing()
endif
endif
else
call DoNothing()
endif
else
set udg_integers17[2]=0
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function Qa))),100,100,100)
call ResetToGameCameraForPlayer(Player(1),2.00)
call DisableTrigger(GetTriggeringTrigger())
endif
endfunction
function QH takes nothing returns nothing
set udg_trigger148=CreateTrigger()
call DisableTrigger(udg_trigger148)
call TriggerRegisterTimerEventPeriodic(udg_trigger148,0.25)
call TriggerAddAction(udg_trigger148,function Qh)
endfunction
function Qi takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function QI takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Qj takes nothing returns boolean
if(not(udg_integers17[3]>=6))then
return false
endif
return true
endfunction
function QJ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Qk takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function QK takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Ql takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function QL takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Qm takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function QM takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Qn takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function QN takes nothing returns boolean
if(not(udg_integers17[3]<20))then
return false
endif
return true
endfunction
function Qo takes nothing returns boolean
if(not(udg_integers17[3]>=10))then
return false
endif
return true
endfunction
function QO takes nothing returns boolean
if(not(udg_reals06[3]>0.00))then
return false
endif
return true
endfunction
function Qp takes nothing returns nothing
if(QO())then
set udg_reals06[3]=(udg_reals06[3]-0.25)
if(Qj())then
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function QI))),GetRandomReal((100.00-(I2R(udg_integers17[3])*2.45)),(100.00+(I2R(udg_integers17[3])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[3])*2.45)),(100.00+(I2R(udg_integers17[3])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[3])*2.45)),(100.00+(I2R(udg_integers17[3])*2.45))))
else
call DoNothing()
endif
if(Qo())then
if(QN())then
set udg_integer06=GetRandomInt(1,(100/udg_integers17[3]))
if(Ql())then
call PanCameraToTimedLocForPlayer(Player(2),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function Qk)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function QK)))),Player(2),0.23)
call TriggerSleepAction(0.24)
call ResetToGameCameraForPlayer(Player(2),0.00)
else
call DoNothing()
endif
else
call PanCameraToTimedLocForPlayer(Player(2),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function QJ)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function QL)))),Player(2),0.23)
set udg_integer06=GetRandomInt(1,100)
if(Qn())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function Qm))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function QM)))),bj_UNIT_FACING)
else
call DoNothing()
endif
endif
else
call DoNothing()
endif
else
set udg_integers17[3]=0
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function Qi))),100,100,100)
call ResetToGameCameraForPlayer(Player(2),2.00)
call DisableTrigger(GetTriggeringTrigger())
endif
endfunction
function QP takes nothing returns nothing
set udg_trigger149=CreateTrigger()
call DisableTrigger(udg_trigger149)
call TriggerRegisterTimerEventPeriodic(udg_trigger149,0.25)
call TriggerAddAction(udg_trigger149,function Qp)
endfunction
function Qq takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function QQ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Qr takes nothing returns boolean
if(not(udg_integers17[4]>=6))then
return false
endif
return true
endfunction
function QR takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Qs takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function QS takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Qt takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function QT takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Qu takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function QU takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Qv takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function QV takes nothing returns boolean
if(not(udg_integers17[4]<20))then
return false
endif
return true
endfunction
function Qw takes nothing returns boolean
if(not(udg_integers17[4]>=10))then
return false
endif
return true
endfunction
function QW takes nothing returns boolean
if(not(udg_reals06[4]>0.00))then
return false
endif
return true
endfunction
function Qx takes nothing returns nothing
if(QW())then
set udg_reals06[4]=(udg_reals06[4]-0.25)
if(Qr())then
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function QQ))),GetRandomReal((100.00-(I2R(udg_integers17[4])*2.45)),(100.00+(I2R(udg_integers17[4])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[4])*2.45)),(100.00+(I2R(udg_integers17[4])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[4])*2.45)),(100.00+(I2R(udg_integers17[4])*2.45))))
else
call DoNothing()
endif
if(Qw())then
if(QV())then
set udg_integer06=GetRandomInt(1,(100/udg_integers17[4]))
if(Qt())then
call PanCameraToTimedLocForPlayer(Player(3),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function Qs)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function QS)))),Player(3),0.23)
call TriggerSleepAction(0.24)
call ResetToGameCameraForPlayer(Player(3),0.00)
else
call DoNothing()
endif
else
call PanCameraToTimedLocForPlayer(Player(3),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function QR)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function QT)))),Player(3),0.23)
set udg_integer06=GetRandomInt(1,100)
if(Qv())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function Qu))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function QU)))),bj_UNIT_FACING)
else
call DoNothing()
endif
endif
else
call DoNothing()
endif
else
set udg_integers17[4]=0
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function Qq))),100,100,100)
call ResetToGameCameraForPlayer(Player(3),2.00)
call DisableTrigger(GetTriggeringTrigger())
endif
endfunction
function QX takes nothing returns nothing
set udg_trigger150=CreateTrigger()
call DisableTrigger(udg_trigger150)
call TriggerRegisterTimerEventPeriodic(udg_trigger150,0.25)
call TriggerAddAction(udg_trigger150,function Qx)
endfunction
function Qy takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function QY takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Qz takes nothing returns boolean
if(not(udg_integers17[5]>=6))then
return false
endif
return true
endfunction
function QZ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Q0 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Q1 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Q2 takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function Q3 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Q4 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Q5 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Q6 takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function Q7 takes nothing returns boolean
if(not(udg_integers17[5]<20))then
return false
endif
return true
endfunction
function Q8 takes nothing returns boolean
if(not(udg_integers17[5]>=10))then
return false
endif
return true
endfunction
function Q9 takes nothing returns boolean
if(not(udg_reals06[5]>0.00))then
return false
endif
return true
endfunction
function ra takes nothing returns nothing
if(Q9())then
set udg_reals06[5]=(udg_reals06[5]-0.25)
if(Qz())then
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function QY))),GetRandomReal((100.00-(I2R(udg_integers17[5])*2.45)),(100.00+(I2R(udg_integers17[5])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[5])*2.45)),(100.00+(I2R(udg_integers17[5])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[5])*2.45)),(100.00+(I2R(udg_integers17[5])*2.45))))
else
call DoNothing()
endif
if(Q8())then
if(Q7())then
set udg_integer06=GetRandomInt(1,(100/udg_integers17[5]))
if(Q2())then
call PanCameraToTimedLocForPlayer(Player(4),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function Q0)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function Q1)))),Player(4),0.23)
call TriggerSleepAction(0.24)
call ResetToGameCameraForPlayer(Player(4),0.00)
else
call DoNothing()
endif
else
call PanCameraToTimedLocForPlayer(Player(4),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function QZ)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function Q3)))),Player(4),0.23)
set udg_integer06=GetRandomInt(1,100)
if(Q6())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function Q4))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function Q5)))),bj_UNIT_FACING)
else
call DoNothing()
endif
endif
else
call DoNothing()
endif
else
set udg_integers17[5]=0
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function Qy))),100,100,100)
call ResetToGameCameraForPlayer(Player(4),2.00)
call DisableTrigger(GetTriggeringTrigger())
endif
endfunction
function rA takes nothing returns nothing
set udg_trigger151=CreateTrigger()
call DisableTrigger(udg_trigger151)
call TriggerRegisterTimerEventPeriodic(udg_trigger151,0.25)
call TriggerAddAction(udg_trigger151,function ra)
endfunction
function rb takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rB takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rc takes nothing returns boolean
if(not(udg_integers17[6]>=6))then
return false
endif
return true
endfunction
function rC takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rd takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rD takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function re takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function rE takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rf takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rF takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rg takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function rG takes nothing returns boolean
if(not(udg_integers17[6]<20))then
return false
endif
return true
endfunction
function rh takes nothing returns boolean
if(not(udg_integers17[6]>=10))then
return false
endif
return true
endfunction
function rH takes nothing returns boolean
if(not(udg_reals06[6]>0.00))then
return false
endif
return true
endfunction
function ri takes nothing returns nothing
if(rH())then
set udg_reals06[6]=(udg_reals06[6]-0.25)
if(rc())then
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function rB))),GetRandomReal((100.00-(I2R(udg_integers17[6])*2.45)),(100.00+(I2R(udg_integers17[6])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[6])*2.45)),(100.00+(I2R(udg_integers17[6])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[6])*2.45)),(100.00+(I2R(udg_integers17[6])*2.45))))
else
call DoNothing()
endif
if(rh())then
if(rG())then
set udg_integer06=GetRandomInt(1,(100/udg_integers17[6]))
if(re())then
call PanCameraToTimedLocForPlayer(Player(5),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function rd)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function rD)))),Player(5),0.23)
call TriggerSleepAction(0.24)
call ResetToGameCameraForPlayer(Player(5),0.00)
else
call DoNothing()
endif
else
call PanCameraToTimedLocForPlayer(Player(5),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function rC)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function rE)))),Player(5),0.23)
set udg_integer06=GetRandomInt(1,100)
if(rg())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function rf))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function rF)))),bj_UNIT_FACING)
else
call DoNothing()
endif
endif
else
call DoNothing()
endif
else
set udg_integers17[6]=0
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function rb))),100,100,100)
call ResetToGameCameraForPlayer(Player(5),2.00)
call DisableTrigger(GetTriggeringTrigger())
endif
endfunction
function rI takes nothing returns nothing
set udg_trigger152=CreateTrigger()
call DisableTrigger(udg_trigger152)
call TriggerRegisterTimerEventPeriodic(udg_trigger152,0.25)
call TriggerAddAction(udg_trigger152,function ri)
endfunction
function rj takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rJ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rk takes nothing returns boolean
if(not(udg_integers17[7]>=6))then
return false
endif
return true
endfunction
function rK takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rl takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rL takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rm takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function rM takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rn takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rN takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function ro takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function rO takes nothing returns boolean
if(not(udg_integers17[7]<20))then
return false
endif
return true
endfunction
function rp takes nothing returns boolean
if(not(udg_integers17[7]>=10))then
return false
endif
return true
endfunction
function rP takes nothing returns boolean
if(not(udg_reals06[7]>0.00))then
return false
endif
return true
endfunction
function rq takes nothing returns nothing
if(rP())then
set udg_reals06[7]=(udg_reals06[7]-0.25)
if(rk())then
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function rJ))),GetRandomReal((100.00-(I2R(udg_integers17[7])*2.45)),(100.00+(I2R(udg_integers17[7])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[7])*2.45)),(100.00+(I2R(udg_integers17[7])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[7])*2.45)),(100.00+(I2R(udg_integers17[7])*2.45))))
else
call DoNothing()
endif
if(rp())then
if(rO())then
set udg_integer06=GetRandomInt(1,(100/udg_integers17[7]))
if(rm())then
call PanCameraToTimedLocForPlayer(Player(6),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function rl)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function rL)))),Player(6),0.23)
call TriggerSleepAction(0.24)
call ResetToGameCameraForPlayer(Player(6),0.00)
else
call DoNothing()
endif
else
call PanCameraToTimedLocForPlayer(Player(6),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function rK)))),0.00)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function rM)))),Player(6),0.23)
set udg_integer06=GetRandomInt(1,100)
if(ro())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function rn))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function rN)))),bj_UNIT_FACING)
else
call DoNothing()
endif
endif
else
call DoNothing()
endif
else
set udg_integers17[7]=0
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function rj))),100,100,100)
call ResetToGameCameraForPlayer(Player(6),2.00)
call DisableTrigger(GetTriggeringTrigger())
endif
endfunction
function rQ takes nothing returns nothing
set udg_trigger153=CreateTrigger()
call DisableTrigger(udg_trigger153)
call TriggerRegisterTimerEventPeriodic(udg_trigger153,0.25)
call TriggerAddAction(udg_trigger153,function rq)
endfunction
function rr takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rR takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rs takes nothing returns boolean
if(not(udg_integers17[8]>=6))then
return false
endif
return true
endfunction
function rS takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rt takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rT takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function ru takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function rU takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rv takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rV takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rw takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function rW takes nothing returns boolean
if(not(udg_integers17[8]<20))then
return false
endif
return true
endfunction
function rx takes nothing returns boolean
if(not(udg_integers17[8]>=10))then
return false
endif
return true
endfunction
function rX takes nothing returns boolean
if(not(udg_reals06[8]>0.00))then
return false
endif
return true
endfunction
function ry takes nothing returns nothing
if(rX())then
set udg_reals06[8]=(udg_reals06[8]-0.25)
if(rs())then
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function rR))),GetRandomReal((100.00-(I2R(udg_integers17[8])*2.45)),(100.00+(I2R(udg_integers17[8])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[8])*2.45)),(100.00+(I2R(udg_integers17[8])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[8])*2.45)),(100.00+(I2R(udg_integers17[8])*2.45))))
else
call DoNothing()
endif
if(rx())then
if(rW())then
set udg_integer06=GetRandomInt(1,(100/udg_integers17[8]))
if(ru())then
call PanCameraToTimedLocForPlayer(Player(7),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function rt)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function rT)))),Player(7),0.23)
call TriggerSleepAction(0.24)
call ResetToGameCameraForPlayer(Player(7),0.00)
else
call DoNothing()
endif
else
call PanCameraToTimedLocForPlayer(Player(7),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function rS)))),0.00)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function rU)))),Player(7),0.23)
set udg_integer06=GetRandomInt(1,100)
if(rw())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function rv))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function rV)))),bj_UNIT_FACING)
else
call DoNothing()
endif
endif
else
call DoNothing()
endif
else
set udg_integers17[8]=0
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function rr))),100,100,100)
call ResetToGameCameraForPlayer(Player(7),2.00)
call DisableTrigger(GetTriggeringTrigger())
endif
endfunction
function rY takes nothing returns nothing
set udg_trigger154=CreateTrigger()
call DisableTrigger(udg_trigger154)
call TriggerRegisterTimerEventPeriodic(udg_trigger154,0.25)
call TriggerAddAction(udg_trigger154,function ry)
endfunction
function rz takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function rZ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function r0 takes nothing returns boolean
if(not(udg_integers17[9]>=6))then
return false
endif
return true
endfunction
function r1 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function r2 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function r3 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function r4 takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function r5 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function r6 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function r7 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function r8 takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function r9 takes nothing returns boolean
if(not(udg_integers17[9]<20))then
return false
endif
return true
endfunction
function Ra takes nothing returns boolean
if(not(udg_integers17[9]>=10))then
return false
endif
return true
endfunction
function RA takes nothing returns boolean
if(not(udg_reals06[9]>0.00))then
return false
endif
return true
endfunction
function Rb takes nothing returns nothing
if(RA())then
set udg_reals06[9]=(udg_reals06[9]-0.25)
if(r0())then
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function rZ))),GetRandomReal((100.00-(I2R(udg_integers17[9])*2.45)),(100.00+(I2R(udg_integers17[9])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[9])*2.45)),(100.00+(I2R(udg_integers17[9])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[9])*2.45)),(100.00+(I2R(udg_integers17[9])*2.45))))
else
call DoNothing()
endif
if(Ra())then
if(r9())then
set udg_integer06=GetRandomInt(1,(100/udg_integers17[9]))
if(r4())then
call PanCameraToTimedLocForPlayer(Player(8),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function r2)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function r3)))),Player(8),0.23)
call TriggerSleepAction(0.24)
call ResetToGameCameraForPlayer(Player(8),0.00)
else
call DoNothing()
endif
else
call PanCameraToTimedLocForPlayer(Player(8),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function r1)))),0.00)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function r5)))),Player(8),0.23)
set udg_integer06=GetRandomInt(1,100)
if(r8())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function r6))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function r7)))),bj_UNIT_FACING)
else
call DoNothing()
endif
endif
else
call DoNothing()
endif
else
set udg_integers17[9]=0
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function rz))),100,100,100)
call ResetToGameCameraForPlayer(Player(8),2.00)
call DisableTrigger(GetTriggeringTrigger())
endif
endfunction
function RB takes nothing returns nothing
set udg_trigger155=CreateTrigger()
call DisableTrigger(udg_trigger155)
call TriggerRegisterTimerEventPeriodic(udg_trigger155,0.25)
call TriggerAddAction(udg_trigger155,function Rb)
endfunction
function Rc takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function RC takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Rd takes nothing returns boolean
if(not(udg_integers17[10]>=6))then
return false
endif
return true
endfunction
function RD takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Re takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function RE takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Rf takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function RF takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Rg takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function RG takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Rh takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function RH takes nothing returns boolean
if(not(udg_integers17[10]<20))then
return false
endif
return true
endfunction
function Ri takes nothing returns boolean
if(not(udg_integers17[10]>=10))then
return false
endif
return true
endfunction
function RI takes nothing returns boolean
if(not(udg_reals06[10]>0.00))then
return false
endif
return true
endfunction
function Rj takes nothing returns nothing
if(RI())then
set udg_reals06[10]=(udg_reals06[10]-0.25)
if(Rd())then
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function RC))),GetRandomReal((100.00-(I2R(udg_integers17[10])*2.45)),(100.00+(I2R(udg_integers17[10])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[10])*2.45)),(100.00+(I2R(udg_integers17[10])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[10])*2.45)),(100.00+(I2R(udg_integers17[10])*2.45))))
else
call DoNothing()
endif
if(Ri())then
if(RH())then
set udg_integer06=GetRandomInt(1,(100/udg_integers17[10]))
if(Rf())then
call PanCameraToTimedLocForPlayer(Player(9),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function Re)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function RE)))),Player(9),0.23)
call TriggerSleepAction(0.24)
call ResetToGameCameraForPlayer(Player(9),0.00)
else
call DoNothing()
endif
else
call PanCameraToTimedLocForPlayer(Player(9),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function RD)))),0.00)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function RF)))),Player(9),0.23)
set udg_integer06=GetRandomInt(1,100)
if(Rh())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function Rg))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function RG)))),bj_UNIT_FACING)
else
call DoNothing()
endif
endif
else
call DoNothing()
endif
else
set udg_integers17[10]=0
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function Rc))),100,100,100)
call ResetToGameCameraForPlayer(Player(9),2.00)
call DisableTrigger(GetTriggeringTrigger())
endif
endfunction
function RJ takes nothing returns nothing
set udg_trigger156=CreateTrigger()
call DisableTrigger(udg_trigger156)
call TriggerRegisterTimerEventPeriodic(udg_trigger156,0.25)
call TriggerAddAction(udg_trigger156,function Rj)
endfunction
function Rk takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function RK takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Rl takes nothing returns boolean
if(not(udg_integers17[11]>=6))then
return false
endif
return true
endfunction
function RL takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Rm takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function RM takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Rn takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function RN takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Ro takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function RO takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Rp takes nothing returns boolean
if(not(udg_integer06==1))then
return false
endif
return true
endfunction
function RP takes nothing returns boolean
if(not(udg_integers17[11]<20))then
return false
endif
return true
endfunction
function Rq takes nothing returns boolean
if(not(udg_integers17[11]>=10))then
return false
endif
return true
endfunction
function RQ takes nothing returns boolean
if(not(udg_reals06[11]>0.00))then
return false
endif
return true
endfunction
function Rr takes nothing returns nothing
if(RQ())then
set udg_reals06[11]=(udg_reals06[11]-0.25)
if(Rl())then
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function RK))),GetRandomReal((100.00-(I2R(udg_integers17[11])*2.45)),(100.00+(I2R(udg_integers17[11])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[11])*2.45)),(100.00+(I2R(udg_integers17[11])*2.45))),GetRandomReal((100.00-(I2R(udg_integers17[11])*2.45)),(100.00+(I2R(udg_integers17[11])*2.45))))
else
call DoNothing()
endif
if(Rq())then
if(RP())then
set udg_integer06=GetRandomInt(1,(100/udg_integers17[11]))
if(Rn())then
call PanCameraToTimedLocForPlayer(Player(10),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function Rm)))),0)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function RM)))),Player(10),0.23)
call TriggerSleepAction(0.24)
call ResetToGameCameraForPlayer(Player(10),0.00)
else
call DoNothing()
endif
else
call PanCameraToTimedLocForPlayer(Player(10),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function RL)))),0.00)
call RotateCameraAroundLocBJ(360.00,GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function RN)))),Player(10),0.23)
set udg_integer06=GetRandomInt(1,100)
if(Rp())then
call PlaySoundOnUnitBJ(udg_sound47,100,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function Ro))))
call CreateNUnitsAtLoc(1,'h02K',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function RO)))),bj_UNIT_FACING)
else
call DoNothing()
endif
endif
else
call DoNothing()
endif
else
set udg_integers17[11]=0
call SetUnitScalePercent(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function Rk))),100,100,100)
call ResetToGameCameraForPlayer(Player(10),2.00)
call DisableTrigger(GetTriggeringTrigger())
endif
endfunction
function RR takes nothing returns nothing
set udg_trigger157=CreateTrigger()
call DisableTrigger(udg_trigger157)
call TriggerRegisterTimerEventPeriodic(udg_trigger157,0.25)
call TriggerAddAction(udg_trigger157,function Rr)
endfunction
function Rs takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I00T'))then
return false
endif
return true
endfunction
function RS takes nothing returns boolean
if(not(UnitHasBuffBJ(GetManipulatingUnit(),'B01J')==true))then
return false
endif
return true
endfunction
function Rt takes nothing returns boolean
if(not(udg_integers18[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]>=30))then
return false
endif
return true
endfunction
function RT takes nothing returns boolean
if(not(IsUnitType(GetManipulatingUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
return true
endfunction
function Ru takes nothing returns boolean
return(GetOwningPlayer(GetManipulatingUnit())==Player(0))
endfunction
function RU takes nothing returns nothing
set udg_integers18[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=(udg_integers18[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]+1)
if(RS())then
call UnitRemoveBuffBJ('B01J',GetManipulatingUnit())
else
call DoNothing()
endif
if(Rt())then
call KillUnit(GetManipulatingUnit())
else
call DoNothing()
endif
if(RT())then
call DoNothing()
else
return
endif
set udg_integers20[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=90
set udg_integers22[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=90
call SetUnitAbilityLevelSwapped('Ablo',udg_unit47,udg_integers18[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call IssueTargetOrderBJ(udg_unit47,"bloodlust",GetManipulatingUnit())
if(Ru())then
call EnableTrigger(udg_trigger159)
else
call DoNothing()
endif
endfunction
function Rv takes nothing returns nothing
set udg_trigger158=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger158,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger158,Condition(function Rs))
call TriggerAddAction(udg_trigger158,function RU)
endfunction
function RV takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Rw takes nothing returns boolean
if(not(udg_integers18[1]<=4))then
return false
endif
return true
endfunction
function RW takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Rx takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function RX takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Ry takes nothing returns boolean
if(not(udg_integers18[1]>=15))then
return false
endif
return true
endfunction
function RY takes nothing returns boolean
return(udg_integers18[1]>=20)
endfunction
function Rz takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function RZ takes nothing returns boolean
if(not(udg_integers22[1]>0))then
return false
endif
return true
endfunction
function R0 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function R1 takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function R0))),'B01J')==true))then
return false
endif
return true
endfunction
function R2 takes nothing returns boolean
if(not(udg_integers20[1]>0))then
return false
endif
return true
endfunction
function R3 takes nothing returns nothing
if(R2())then
set udg_integers20[1]=(udg_integers20[1]-1)
else
if(R1())then
set udg_integers22[1]=(udg_integers22[1]-1)
if(RZ())then
if(Rw())then
call SetCameraFieldForPlayer(Player(0),CAMERA_FIELD_TARGET_DISTANCE,(1200.00/I2R(udg_integers18[1])),0.50)
else
call SetCameraFieldForPlayer(Player(0),CAMERA_FIELD_TARGET_DISTANCE,300.00,0.50)
endif
else
call SetCameraFieldForPlayer(Player(0),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.50)
call UnitRemoveBuffBJ('B01J',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function RW))))
if(Ry())then
call IssueTargetOrderBJ(udg_unit47,"sleep",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function Rx))))
call TriggerSleepAction(1.00)
call SetUnitAnimation(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function RX))),"death")
else
call DoNothing()
endif
if(RY())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function Rz))))
else
call DoNothing()
endif
set udg_integers18[1]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"cripple",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function RV))))
endif
endif
endfunction
function R4 takes nothing returns nothing
set udg_trigger159=CreateTrigger()
call DisableTrigger(udg_trigger159)
call TriggerRegisterTimerEventPeriodic(udg_trigger159,1.00)
call TriggerAddAction(udg_trigger159,function R3)
endfunction
function R5 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function R6 takes nothing returns boolean
if(not(udg_integers18[2]<=4))then
return false
endif
return true
endfunction
function R7 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function R8 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function R9 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sa takes nothing returns boolean
if(not(udg_integers18[2]>=15))then
return false
endif
return true
endfunction
function sA takes nothing returns boolean
return(udg_integers18[2]>=20)
endfunction
function sb takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sB takes nothing returns boolean
if(not(udg_integers22[2]>0))then
return false
endif
return true
endfunction
function sc takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sC takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function sc))),'B01J')==true))then
return false
endif
return true
endfunction
function sd takes nothing returns boolean
if(not(udg_integers20[2]>0))then
return false
endif
return true
endfunction
function sD takes nothing returns nothing
if(sd())then
set udg_integers20[2]=(udg_integers20[2]-1)
else
if(sC())then
set udg_integers22[2]=(udg_integers22[2]-1)
if(sB())then
if(R6())then
call SetCameraFieldForPlayer(Player(1),CAMERA_FIELD_TARGET_DISTANCE,(1200.00/I2R(udg_integers18[2])),0.50)
else
call SetCameraFieldForPlayer(Player(1),CAMERA_FIELD_TARGET_DISTANCE,300.00,0.50)
endif
else
call SetCameraFieldForPlayer(Player(1),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.50)
call UnitRemoveBuffBJ('B01J',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function R7))))
if(sa())then
call IssueTargetOrderBJ(udg_unit47,"sleep",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function R8))))
call TriggerSleepAction(1.00)
call SetUnitAnimation(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function R9))),"death")
else
call DoNothing()
endif
if(sA())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function sb))))
else
call DoNothing()
endif
set udg_integers18[2]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"cripple",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function R5))))
endif
endif
endfunction
function se takes nothing returns nothing
set udg_trigger160=CreateTrigger()
call DisableTrigger(udg_trigger160)
call TriggerRegisterTimerEventPeriodic(udg_trigger160,1.00)
call TriggerAddAction(udg_trigger160,function sD)
endfunction
function sE takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sf takes nothing returns boolean
if(not(udg_integers18[3]<=4))then
return false
endif
return true
endfunction
function sF takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sg takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sG takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sh takes nothing returns boolean
if(not(udg_integers18[3]>=15))then
return false
endif
return true
endfunction
function sH takes nothing returns boolean
return(udg_integers18[3]>=20)
endfunction
function si takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sI takes nothing returns boolean
if(not(udg_integers22[3]>0))then
return false
endif
return true
endfunction
function sj takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sJ takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function sj))),'B01J')==true))then
return false
endif
return true
endfunction
function sk takes nothing returns boolean
if(not(udg_integers20[3]>0))then
return false
endif
return true
endfunction
function sK takes nothing returns nothing
if(sk())then
set udg_integers20[3]=(udg_integers20[3]-1)
else
if(sJ())then
set udg_integers22[3]=(udg_integers22[3]-1)
if(sI())then
if(sf())then
call SetCameraFieldForPlayer(Player(2),CAMERA_FIELD_TARGET_DISTANCE,(1200.00/I2R(udg_integers18[3])),0.50)
else
call SetCameraFieldForPlayer(Player(2),CAMERA_FIELD_TARGET_DISTANCE,300.00,0.50)
endif
else
call SetCameraFieldForPlayer(Player(2),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.50)
call UnitRemoveBuffBJ('B01J',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function sF))))
if(sh())then
call IssueTargetOrderBJ(udg_unit47,"sleep",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function sg))))
call TriggerSleepAction(1.00)
call SetUnitAnimation(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function sG))),"death")
else
call DoNothing()
endif
if(sH())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function si))))
else
call DoNothing()
endif
set udg_integers18[3]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"cripple",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function sE))))
endif
endif
endfunction
function sl takes nothing returns nothing
set udg_trigger161=CreateTrigger()
call DisableTrigger(udg_trigger161)
call TriggerRegisterTimerEventPeriodic(udg_trigger161,1.00)
call TriggerAddAction(udg_trigger161,function sK)
endfunction
function sL takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sm takes nothing returns boolean
if(not(udg_integers18[4]<=4))then
return false
endif
return true
endfunction
function sM takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sn takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sN takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function so takes nothing returns boolean
if(not(udg_integers18[4]>=15))then
return false
endif
return true
endfunction
function sO takes nothing returns boolean
return(udg_integers18[4]>=20)
endfunction
function sp takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sP takes nothing returns boolean
if(not(udg_integers22[4]>0))then
return false
endif
return true
endfunction
function sq takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sQ takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function sq))),'B01J')==true))then
return false
endif
return true
endfunction
function sr takes nothing returns boolean
if(not(udg_integers20[4]>0))then
return false
endif
return true
endfunction
function sR takes nothing returns nothing
if(sr())then
set udg_integers20[4]=(udg_integers20[4]-1)
else
if(sQ())then
set udg_integers22[4]=(udg_integers22[4]-1)
if(sP())then
if(sm())then
call SetCameraFieldForPlayer(Player(3),CAMERA_FIELD_TARGET_DISTANCE,(1200.00/I2R(udg_integers18[4])),0.50)
else
call SetCameraFieldForPlayer(Player(3),CAMERA_FIELD_TARGET_DISTANCE,300.00,0.50)
endif
else
call SetCameraFieldForPlayer(Player(3),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.50)
call UnitRemoveBuffBJ('B01J',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function sM))))
if(so())then
call IssueTargetOrderBJ(udg_unit47,"sleep",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function sn))))
call TriggerSleepAction(1.00)
call SetUnitAnimation(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function sN))),"death")
else
call DoNothing()
endif
if(sO())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function sp))))
else
call DoNothing()
endif
set udg_integers18[4]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"cripple",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function sL))))
endif
endif
endfunction
function ss takes nothing returns nothing
set udg_trigger162=CreateTrigger()
call DisableTrigger(udg_trigger162)
call TriggerRegisterTimerEventPeriodic(udg_trigger162,1.00)
call TriggerAddAction(udg_trigger162,function sR)
endfunction
function sS takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function st takes nothing returns boolean
if(not(udg_integers18[5]<=4))then
return false
endif
return true
endfunction
function sT takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function su takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sU takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sv takes nothing returns boolean
if(not(udg_integers18[5]>=15))then
return false
endif
return true
endfunction
function sV takes nothing returns boolean
return(udg_integers18[5]>=20)
endfunction
function sw takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sW takes nothing returns boolean
if(not(udg_integers22[5]>0))then
return false
endif
return true
endfunction
function sx takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function sX takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function sx))),'B01J')==true))then
return false
endif
return true
endfunction
function sy takes nothing returns boolean
if(not(udg_integers20[5]>0))then
return false
endif
return true
endfunction
function sY takes nothing returns nothing
if(sy())then
set udg_integers20[5]=(udg_integers20[5]-1)
else
if(sX())then
set udg_integers22[5]=(udg_integers22[5]-1)
if(sW())then
if(st())then
call SetCameraFieldForPlayer(Player(4),CAMERA_FIELD_TARGET_DISTANCE,(1200.00/I2R(udg_integers18[5])),0.50)
else
call SetCameraFieldForPlayer(Player(4),CAMERA_FIELD_TARGET_DISTANCE,300.00,0.50)
endif
else
call SetCameraFieldForPlayer(Player(4),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.50)
call UnitRemoveBuffBJ('B01J',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function sT))))
if(sv())then
call IssueTargetOrderBJ(udg_unit47,"sleep",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function su))))
call TriggerSleepAction(1.00)
call SetUnitAnimation(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function sU))),"death")
else
call DoNothing()
endif
if(sV())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function sw))))
else
call DoNothing()
endif
set udg_integers18[5]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"cripple",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function sS))))
endif
endif
endfunction
function sz takes nothing returns nothing
set udg_trigger163=CreateTrigger()
call DisableTrigger(udg_trigger163)
call TriggerRegisterTimerEventPeriodic(udg_trigger163,1.00)
call TriggerAddAction(udg_trigger163,function sY)
endfunction
function sZ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function s0 takes nothing returns boolean
if(not(udg_integers18[6]<=4))then
return false
endif
return true
endfunction
function s1 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function s2 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function s3 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function s4 takes nothing returns boolean
if(not(udg_integers18[6]>=15))then
return false
endif
return true
endfunction
function s5 takes nothing returns boolean
return(udg_integers18[6]>=20)
endfunction
function s6 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function s7 takes nothing returns boolean
if(not(udg_integers22[6]>0))then
return false
endif
return true
endfunction
function s8 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function s9 takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function s8))),'B01J')==true))then
return false
endif
return true
endfunction
function Sa takes nothing returns boolean
if(not(udg_integers20[6]>0))then
return false
endif
return true
endfunction
function SA takes nothing returns nothing
if(Sa())then
set udg_integers20[6]=(udg_integers20[6]-1)
else
if(s9())then
set udg_integers22[6]=(udg_integers22[6]-1)
if(s7())then
if(s0())then
call SetCameraFieldForPlayer(Player(5),CAMERA_FIELD_TARGET_DISTANCE,(1200.00/I2R(udg_integers18[6])),0.50)
else
call SetCameraFieldForPlayer(Player(5),CAMERA_FIELD_TARGET_DISTANCE,300.00,0.50)
endif
else
call SetCameraFieldForPlayer(Player(5),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.50)
call UnitRemoveBuffBJ('B01J',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function s1))))
if(s4())then
call IssueTargetOrderBJ(udg_unit47,"sleep",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function s2))))
call TriggerSleepAction(1.00)
call SetUnitAnimation(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function s3))),"death")
else
call DoNothing()
endif
if(s5())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function s6))))
else
call DoNothing()
endif
set udg_integers18[6]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"cripple",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function sZ))))
endif
endif
endfunction
function Sb takes nothing returns nothing
set udg_trigger164=CreateTrigger()
call DisableTrigger(udg_trigger164)
call TriggerRegisterTimerEventPeriodic(udg_trigger164,1.00)
call TriggerAddAction(udg_trigger164,function SA)
endfunction
function SB takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Sc takes nothing returns boolean
if(not(udg_integers18[7]<=4))then
return false
endif
return true
endfunction
function SC takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Sd takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function SD takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Se takes nothing returns boolean
if(not(udg_integers18[7]>=15))then
return false
endif
return true
endfunction
function SE takes nothing returns boolean
return(udg_integers18[7]>=20)
endfunction
function Sf takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function SF takes nothing returns boolean
if(not(udg_integers22[7]>0))then
return false
endif
return true
endfunction
function Sg takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function SG takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function Sg))),'B01J')==true))then
return false
endif
return true
endfunction
function Sh takes nothing returns boolean
if(not(udg_integers20[7]>0))then
return false
endif
return true
endfunction
function SH takes nothing returns nothing
if(Sh())then
set udg_integers20[7]=(udg_integers20[7]-1)
else
if(SG())then
set udg_integers22[7]=(udg_integers22[7]-1)
if(SF())then
if(Sc())then
call SetCameraFieldForPlayer(Player(6),CAMERA_FIELD_TARGET_DISTANCE,(1200.00/I2R(udg_integers18[7])),0.50)
else
call SetCameraFieldForPlayer(Player(6),CAMERA_FIELD_TARGET_DISTANCE,300.00,0.50)
endif
else
call SetCameraFieldForPlayer(Player(6),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.50)
call UnitRemoveBuffBJ('B01J',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function SC))))
if(Se())then
call IssueTargetOrderBJ(udg_unit47,"sleep",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function Sd))))
call TriggerSleepAction(1.00)
call SetUnitAnimation(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function SD))),"death")
else
call DoNothing()
endif
if(SE())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function Sf))))
else
call DoNothing()
endif
set udg_integers18[7]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"cripple",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function SB))))
endif
endif
endfunction
function Si takes nothing returns nothing
set udg_trigger165=CreateTrigger()
call DisableTrigger(udg_trigger165)
call TriggerRegisterTimerEventPeriodic(udg_trigger165,1.00)
call TriggerAddAction(udg_trigger165,function SH)
endfunction
function SI takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Sj takes nothing returns boolean
if(not(udg_integers18[8]<=4))then
return false
endif
return true
endfunction
function SJ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Sk takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function SK takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Sl takes nothing returns boolean
if(not(udg_integers18[8]>=15))then
return false
endif
return true
endfunction
function SL takes nothing returns boolean
return(udg_integers18[8]>=20)
endfunction
function Sm takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function SM takes nothing returns boolean
if(not(udg_integers22[8]>0))then
return false
endif
return true
endfunction
function Sn takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function SN takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function Sn))),'B01J')==true))then
return false
endif
return true
endfunction
function So takes nothing returns boolean
if(not(udg_integers20[8]>0))then
return false
endif
return true
endfunction
function SO takes nothing returns nothing
if(So())then
set udg_integers20[8]=(udg_integers20[8]-1)
else
if(SN())then
set udg_integers22[8]=(udg_integers22[8]-1)
if(SM())then
if(Sj())then
call SetCameraFieldForPlayer(Player(7),CAMERA_FIELD_TARGET_DISTANCE,(1200.00/I2R(udg_integers18[8])),0.50)
else
call SetCameraFieldForPlayer(Player(7),CAMERA_FIELD_TARGET_DISTANCE,300.00,0.50)
endif
else
call SetCameraFieldForPlayer(Player(7),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.50)
call UnitRemoveBuffBJ('B01J',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function SJ))))
if(Sl())then
call IssueTargetOrderBJ(udg_unit47,"sleep",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function Sk))))
call TriggerSleepAction(1.00)
call SetUnitAnimation(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function SK))),"death")
else
call DoNothing()
endif
if(SL())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function Sm))))
else
call DoNothing()
endif
set udg_integers18[8]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"cripple",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function SI))))
endif
endif
endfunction
function Sp takes nothing returns nothing
set udg_trigger166=CreateTrigger()
call DisableTrigger(udg_trigger166)
call TriggerRegisterTimerEventPeriodic(udg_trigger166,1.00)
call TriggerAddAction(udg_trigger166,function SO)
endfunction
function SP takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Sq takes nothing returns boolean
if(not(udg_integers18[9]<=4))then
return false
endif
return true
endfunction
function SQ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Sr takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function SR takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Ss takes nothing returns boolean
if(not(udg_integers18[9]>=15))then
return false
endif
return true
endfunction
function SS takes nothing returns boolean
return(udg_integers18[9]>=20)
endfunction
function St takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function ST takes nothing returns boolean
if(not(udg_integers22[9]>0))then
return false
endif
return true
endfunction
function Su takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function SU takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function Su))),'B01J')==true))then
return false
endif
return true
endfunction
function Sv takes nothing returns boolean
if(not(udg_integers20[9]>0))then
return false
endif
return true
endfunction
function SV takes nothing returns nothing
if(Sv())then
set udg_integers20[9]=(udg_integers20[9]-1)
else
if(SU())then
set udg_integers22[9]=(udg_integers22[9]-1)
if(ST())then
if(Sq())then
call SetCameraFieldForPlayer(Player(8),CAMERA_FIELD_TARGET_DISTANCE,(1200.00/I2R(udg_integers18[9])),0.50)
else
call SetCameraFieldForPlayer(Player(8),CAMERA_FIELD_TARGET_DISTANCE,300.00,0.50)
endif
else
call SetCameraFieldForPlayer(Player(8),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.50)
call UnitRemoveBuffBJ('B01J',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function SQ))))
if(Ss())then
call IssueTargetOrderBJ(udg_unit47,"sleep",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function Sr))))
call TriggerSleepAction(1.00)
call SetUnitAnimation(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function SR))),"death")
else
call DoNothing()
endif
if(SS())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function St))))
else
call DoNothing()
endif
set udg_integers18[9]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"cripple",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function SP))))
endif
endif
endfunction
function Sw takes nothing returns nothing
set udg_trigger167=CreateTrigger()
call DisableTrigger(udg_trigger167)
call TriggerRegisterTimerEventPeriodic(udg_trigger167,1.00)
call TriggerAddAction(udg_trigger167,function SV)
endfunction
function SW takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Sx takes nothing returns boolean
if(not(udg_integers18[10]<=4))then
return false
endif
return true
endfunction
function SX takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Sy takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function SY takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Sz takes nothing returns boolean
if(not(udg_integers18[10]>=15))then
return false
endif
return true
endfunction
function SZ takes nothing returns boolean
return(udg_integers18[10]>=20)
endfunction
function S0 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function S1 takes nothing returns boolean
if(not(udg_integers22[10]>0))then
return false
endif
return true
endfunction
function S2 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function S3 takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function S2))),'B01J')==true))then
return false
endif
return true
endfunction
function S4 takes nothing returns boolean
if(not(udg_integers20[10]>0))then
return false
endif
return true
endfunction
function S5 takes nothing returns nothing
if(S4())then
set udg_integers20[10]=(udg_integers20[10]-1)
else
if(S3())then
set udg_integers22[10]=(udg_integers22[10]-1)
if(S1())then
if(Sx())then
call SetCameraFieldForPlayer(Player(9),CAMERA_FIELD_TARGET_DISTANCE,(1200.00/I2R(udg_integers18[10])),0.50)
else
call SetCameraFieldForPlayer(Player(9),CAMERA_FIELD_TARGET_DISTANCE,300.00,0.50)
endif
else
call SetCameraFieldForPlayer(Player(9),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.50)
call UnitRemoveBuffBJ('B01J',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function SX))))
if(Sz())then
call IssueTargetOrderBJ(udg_unit47,"sleep",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function Sy))))
call TriggerSleepAction(1.00)
call SetUnitAnimation(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function SY))),"death")
else
call DoNothing()
endif
if(SZ())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function S0))))
else
call DoNothing()
endif
set udg_integers18[10]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"cripple",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function SW))))
endif
endif
endfunction
function S6 takes nothing returns nothing
set udg_trigger168=CreateTrigger()
call DisableTrigger(udg_trigger168)
call TriggerRegisterTimerEventPeriodic(udg_trigger168,1.00)
call TriggerAddAction(udg_trigger168,function S5)
endfunction
function S7 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function S8 takes nothing returns boolean
if(not(udg_integers18[11]<=4))then
return false
endif
return true
endfunction
function S9 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function ta takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function tA takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function tb takes nothing returns boolean
if(not(udg_integers18[11]>=15))then
return false
endif
return true
endfunction
function tB takes nothing returns boolean
return(udg_integers18[11]>=20)
endfunction
function tc takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function tC takes nothing returns boolean
if(not(udg_integers22[11]>0))then
return false
endif
return true
endfunction
function td takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function tD takes nothing returns boolean
if(not(UnitHasBuffBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function td))),'B01J')==true))then
return false
endif
return true
endfunction
function te takes nothing returns boolean
if(not(udg_integers20[11]>0))then
return false
endif
return true
endfunction
function tE takes nothing returns nothing
if(te())then
set udg_integers20[11]=(udg_integers20[11]-1)
else
if(tD())then
set udg_integers22[11]=(udg_integers22[11]-1)
if(tC())then
if(S8())then
call SetCameraFieldForPlayer(Player(10),CAMERA_FIELD_TARGET_DISTANCE,(1200.00/I2R(udg_integers18[11])),0.50)
else
call SetCameraFieldForPlayer(Player(10),CAMERA_FIELD_TARGET_DISTANCE,300.00,0.50)
endif
else
call SetCameraFieldForPlayer(Player(10),CAMERA_FIELD_TARGET_DISTANCE,1650.00,0.50)
call UnitRemoveBuffBJ('B01J',GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function S9))))
if(tb())then
call IssueTargetOrderBJ(udg_unit47,"sleep",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function ta))))
call TriggerSleepAction(1.00)
call SetUnitAnimation(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function tA))),"death")
else
call DoNothing()
endif
if(tB())then
call KillUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function tc))))
else
call DoNothing()
endif
set udg_integers18[11]=0
call DisableTrigger(GetTriggeringTrigger())
endif
else
call IssueTargetOrderBJ(udg_unit31,"cripple",GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function S7))))
endif
endif
endfunction
function tf takes nothing returns nothing
set udg_trigger169=CreateTrigger()
call DisableTrigger(udg_trigger169)
call TriggerRegisterTimerEventPeriodic(udg_trigger169,1.00)
call TriggerAddAction(udg_trigger169,function tE)
endfunction
function tF takes nothing returns boolean
if((IsUnitType(GetDyingUnit(),UNIT_TYPE_SAPPER)==true))then
return true
endif
if((IsUnitType(GetDyingUnit(),UNIT_TYPE_ANCIENT)==true))then
return true
endif
return false
endfunction
function tg takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==udg_player02))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_STRUCTURE)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetDyingUnit())!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_MECHANICAL)!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player03))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetDyingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetPlayerSlotState(GetOwningPlayer(GetDyingUnit()))==PLAYER_SLOT_STATE_PLAYING))then
return false
endif
if(not(GetDyingUnit()!=udg_unit01))then
return false
endif
if(not(IsPlayerInForce(GetOwningPlayer(GetDyingUnit()),udg_force01)!=true))then
return false
endif
if(not(GetUnitTypeId(GetDyingUnit())!='h00J'))then
return false
endif
if(not tF())then
return false
endif
return true
endfunction
function tG takes nothing returns boolean
if(not tg())then
return false
endif
return true
endfunction
function th takes nothing returns boolean
return(GetPlayerController(GetOwningPlayer(GetKillingUnitBJ()))==MAP_CONTROL_USER)
endfunction
function tH takes nothing returns boolean
return(CountPlayersInForceBJ(udg_force01)>0)
endfunction
function ti takes nothing returns boolean
return(IsPlayerInForce(GetFilterPlayer(),udg_force01)==true)
endfunction
function tI takes nothing returns boolean
return(GetFilterPlayer()!=udg_player03)
endfunction
function tj takes nothing returns boolean
return GetBooleanAnd(ti(),tI())
endfunction
function tJ takes nothing returns boolean
return(GetFilterPlayer()!=udg_player02)
endfunction
function tk takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function tK takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function tl takes nothing returns boolean
return GetBooleanOr(tk(),tK())
endfunction
function tL takes nothing returns nothing
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers01[GetForLoopIndexA()]=GetItemTypeId(UnitItemInSlotBJ(GetEnumUnit(),GetForLoopIndexA()))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers02[GetForLoopIndexA()]=GetItemCharges(UnitItemInSlotBJ(GetEnumUnit(),GetForLoopIndexA()))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call ReplaceUnitBJ(GetEnumUnit(),udg_integer02,bj_UNIT_STATE_METHOD_RELATIVE)
set udg_unit12=GetLastReplacedUnitBJ()
call SetUnitColor(GetLastReplacedUnitBJ(),ConvertPlayerColor(12))
call SelectUnitAddForPlayer(GetLastReplacedUnitBJ(),udg_player02)
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitAddItemByIdSwapped(udg_integers01[GetForLoopIndexA()],GetLastReplacedUnitBJ())
call UnitDropItemSlotBJ(GetLastReplacedUnitBJ(),GetLastCreatedItem(),GetForLoopIndexA())
call SetItemCharges(UnitItemInSlotBJ(GetLastReplacedUnitBJ(),GetForLoopIndexA()),udg_integers02[GetForLoopIndexA()])
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers01[GetForLoopIndexA()]=GetItemTypeId(null)
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers02[GetForLoopIndexA()]=0
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
function tm takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)!=true)
endfunction
function tM takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function tn takes nothing returns boolean
return GetBooleanAnd(tm(),tM())
endfunction
function tN takes nothing returns nothing
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers01[GetForLoopIndexA()]=GetItemTypeId(UnitItemInSlotBJ(GetEnumUnit(),GetForLoopIndexA()))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers02[GetForLoopIndexA()]=GetItemCharges(UnitItemInSlotBJ(GetEnumUnit(),GetForLoopIndexA()))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call ReplaceUnitBJ(GetEnumUnit(),udg_integer02,bj_UNIT_STATE_METHOD_RELATIVE)
call SetUnitColor(GetLastReplacedUnitBJ(),ConvertPlayerColor(12))
call SelectUnitAddForPlayer(GetLastReplacedUnitBJ(),udg_player02)
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitAddItemByIdSwapped(udg_integers01[GetForLoopIndexA()],GetLastReplacedUnitBJ())
call UnitDropItemSlotBJ(GetLastReplacedUnitBJ(),GetLastCreatedItem(),GetForLoopIndexA())
call SetItemCharges(UnitItemInSlotBJ(GetLastReplacedUnitBJ(),GetForLoopIndexA()),udg_integers02[GetForLoopIndexA()])
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers01[GetForLoopIndexA()]=GetItemTypeId(null)
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers02[GetForLoopIndexA()]=0
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
function to takes nothing returns boolean
if(not(udg_integer03==4))then
return false
endif
return true
endfunction
function tO takes nothing returns boolean
if(not(udg_integer02=='h00B'))then
return false
endif
return true
endfunction
function tp takes nothing returns boolean
if(not(udg_integer02=='h00C'))then
return false
endif
return true
endfunction
function tP takes nothing returns boolean
if(not(udg_integer02=='h00D'))then
return false
endif
return true
endfunction
function tq takes nothing returns boolean
if(not(udg_integer02=='h00G'))then
return false
endif
return true
endfunction
function tQ takes nothing returns boolean
if(not(udg_integer02=='h00H'))then
return false
endif
return true
endfunction
function tr takes nothing returns boolean
if(not(udg_integer02=='h00E'))then
return false
endif
return true
endfunction
function tR takes nothing returns boolean
if(not(udg_integer02=='h00F'))then
return false
endif
return true
endfunction
function ts takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function tS takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02G')
endfunction
function tt takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_force01)>=1))then
return false
endif
if(not(CountUnitsInGroup(udg_group02)==0))then
return false
endif
return true
endfunction
function tT takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02H')
endfunction
function tu takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_force01)>=2))then
return false
endif
if(not(CountUnitsInGroup(udg_group02)==0))then
return false
endif
return true
endfunction
function tU takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_force01)>0))then
return false
endif
return true
endfunction
function tv takes nothing returns nothing
call PlaySoundBJ(udg_sound02)
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUTIN,5.00,"ReplaceableTextures\\CameraMasks\\DiagonalSlash_mask.blp",0.00,50.00,0.00,0.00)
set udg_integers13[GetConvertedPlayerId(udg_player02)]=0
if(th())then
call DisplayTextToForce(GetPlayersAll(),(("|cff009707The Alien Cerebrate, |r"+(udg_strings01[GetConvertedPlayerId(udg_player02)]+" |cff009707has been killed by|r "))+(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+"|cff009707!|r")))
else
call DisplayTextToForce(GetPlayersAll(),("|cff009707The Alien Cerebrate,|r "+(udg_strings01[GetConvertedPlayerId(udg_player02)]+" |cff009707has died!|r")))
endif
call ForceAddPlayerSimple(GetOwningPlayer(GetDyingUnit()),udg_force03)
call SetPlayerName(GetOwningPlayer(GetDyingUnit()),udg_strings02[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))])
call SetPlayerName(GetOwningPlayer(GetDyingUnit()),("|cff808080Dead ("+(udg_strings02[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]+")|r")))
call CustomVictoryBJ(udg_player02,true,false)
if(tU())then
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2855")
call DisableTrigger(udg_trigger33)
call PolledWait(120.00)
if(tH())then
call DoNothing()
else
return
endif
set udg_player02=ForcePickRandomPlayer(GetPlayersMatching(Condition(function tj)))
set udg_integer30=(udg_integer30-1)
call EnableTrigger(udg_trigger33)
call ForceRemovePlayerSimple(udg_player02,udg_force01)
call SetPlayerAllianceStateBJ(Player(11),udg_player02,bj_ALLIANCE_ALLIED_UNITS)
call SetPlayerAllianceStateBJ(udg_player02,Player(11),bj_ALLIANCE_ALLIED)
call DisplayTextToForce(GetPlayersMatching(Condition(function tJ)),"TRIGSTR_2176")
call DisplayTextToForce(GetForceOfPlayer(udg_player02),"TRIGSTR_358")
if(to())then
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerMatching(udg_player02,Condition(function tl)),function tL)
else
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerMatching(udg_player02,Condition(function tn)),function tN)
endif
call SetPlayerUnitAvailableBJ('h01C',false,udg_player02)
call SetPlayerUnitAvailableBJ('h02E',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00D',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00C',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00E',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00G',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00H',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00F',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00K',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00L',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00I',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00N',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00P',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00O',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00J',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00M',false,udg_player02)
if(tO())then
call SetPlayerUnitAvailableBJ('h00D',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00C',true,udg_player02)
else
call DoNothing()
endif
if(tp())then
call SetPlayerUnitAvailableBJ('h00E',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00F',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00D',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00C',false,udg_player02)
else
call DoNothing()
endif
if(tP())then
call SetPlayerUnitAvailableBJ('h00G',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00H',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00D',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00C',false,udg_player02)
else
call DoNothing()
endif
if(tq())then
call SetPlayerUnitAvailableBJ('h00M',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00N',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00G',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00H',false,udg_player02)
else
call DoNothing()
endif
if(tQ())then
call SetPlayerUnitAvailableBJ('h00O',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00P',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00G',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00H',false,udg_player02)
else
call DoNothing()
endif
if(tr())then
call SetPlayerUnitAvailableBJ('h00I',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00J',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00F',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00E',false,udg_player02)
else
call DoNothing()
endif
if(tR())then
call SetPlayerUnitAvailableBJ('h00K',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00L',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00F',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00E',false,udg_player02)
else
call DoNothing()
endif
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect58),function ts)
set udg_group02=GetUnitsInRectMatching(udg_rect58,Condition(function tS))
if(tt())then
set udg_location04=GetRandomLocInRect(udg_rect58)
call CreateNUnitsAtLoc(1,'h02G',udg_player02,udg_location04,bj_UNIT_FACING)
else
call DoNothing()
endif
call DestroyGroup(udg_group02)
set udg_group02=GetUnitsInRectMatching(udg_rect58,Condition(function tT))
if(tu())then
set udg_location04=GetRandomLocInRect(udg_rect58)
call CreateNUnitsAtLoc(1,'h02H',udg_player02,udg_location04,bj_UNIT_FACING)
else
call DoNothing()
endif
call DestroyGroup(udg_group02)
else
call DoNothing()
endif
endfunction
function tV takes nothing returns nothing
set udg_trigger170=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger170,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger170,Condition(function tG))
call TriggerAddAction(udg_trigger170,function tv)
endfunction
function tw takes nothing returns boolean
if(not(IsPlayerInForce(GetOwningPlayer(GetDyingUnit()),udg_force01)==true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_STRUCTURE)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_MECHANICAL)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetDyingUnit())!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player03))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetDyingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetPlayerSlotState(GetOwningPlayer(GetDyingUnit()))==PLAYER_SLOT_STATE_PLAYING))then
return false
endif
if(not(GetDyingUnit()!=udg_unit01))then
return false
endif
return true
endfunction
function tW takes nothing returns boolean
if(not tw())then
return false
endif
return true
endfunction
function tx takes nothing returns boolean
return(GetPlayerController(GetOwningPlayer(GetKillingUnitBJ()))==MAP_CONTROL_USER)
endfunction
function tX takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02G')
endfunction
function ty takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02G')
endfunction
function tY takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02H')
endfunction
function tz takes nothing returns boolean
return GetBooleanOr(ty(),tY())
endfunction
function tZ takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function t0 takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_force01)==0))then
return false
endif
if(not(CountUnitsInGroup(udg_group02)>=1))then
return false
endif
return true
endfunction
function t1 takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02H')
endfunction
function t2 takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02H')
endfunction
function t3 takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function t4 takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_force01)<=1))then
return false
endif
if(not(CountUnitsInGroup(udg_group02)>=1))then
return false
endif
return true
endfunction
function t5 takes nothing returns nothing
call PlaySoundBJ(udg_sound01)
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUTIN,5.00,"ReplaceableTextures\\CameraMasks\\DiagonalSlash_mask.blp",100.00,0.00,0.00,0.00)
set udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
call SetPlayerName(GetOwningPlayer(GetDyingUnit()),udg_strings02[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))])
if(tx())then
call DisplayTextToForce(GetPlayersAll(),(("|cff009707An Alien Spawn,|r "+(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]+" |cff009707has been killed by|r "))+udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]))
else
call DisplayTextToForce(GetPlayersAll(),("|cff009707An Alien Spawn, |r"+(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]+" |cff009707has died!|r")))
endif
call ForceRemovePlayerSimple(GetOwningPlayer(GetDyingUnit()),udg_force01)
call ForceAddPlayerSimple(GetOwningPlayer(GetDyingUnit()),udg_force03)
call CustomVictoryBJ(GetOwningPlayer(GetDyingUnit()),true,false)
call SetPlayerName(GetOwningPlayer(GetDyingUnit()),("|cff808080Dead ("+(udg_strings02[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]+")|r")))
call DisplayTextToForce(GetForceOfPlayer(udg_player02),"TRIGSTR_2493")
set udg_group02=GetUnitsInRectMatching(udg_rect58,Condition(function tX))
if(t0())then
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerMatching(udg_player02,Condition(function tz)),function tZ)
else
call DoNothing()
endif
call DestroyGroup(udg_group02)
set udg_group02=GetUnitsInRectMatching(udg_rect58,Condition(function t1))
if(t4())then
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerMatching(udg_player02,Condition(function t2)),function t3)
else
call DoNothing()
endif
call DestroyGroup(udg_group02)
endfunction
function t6 takes nothing returns nothing
set udg_trigger171=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger171,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger171,Condition(function tW))
call TriggerAddAction(udg_trigger171,function t5)
endfunction
function t7 takes nothing returns boolean
if((IsUnitType(GetKillingUnitBJ(),UNIT_TYPE_ANCIENT)==true))then
return true
endif
if((IsUnitType(GetKillingUnitBJ(),UNIT_TYPE_GIANT)==true))then
return true
endif
if((UnitHasBuffBJ(GetDyingUnit(),'B00B')==true))then
return true
endif
return false
endfunction
function t8 takes nothing returns boolean
if(not(GetDyingUnit()!=udg_unit01))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetDyingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetPlayerSlotState(GetOwningPlayer(GetDyingUnit()))==PLAYER_SLOT_STATE_PLAYING))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_STRUCTURE)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetDyingUnit())!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player03))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetDyingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not t7())then
return false
endif
return true
endfunction
function t9 takes nothing returns boolean
if(not t8())then
return false
endif
return true
endfunction
function Ta takes nothing returns boolean
if(not(udg_integer02=='h00B'))then
return false
endif
return true
endfunction
function TA takes nothing returns boolean
if(not(udg_integer02=='h00D'))then
return false
endif
return true
endfunction
function Tb takes nothing returns boolean
if(not(udg_integer02=='h00C'))then
return false
endif
return true
endfunction
function TB takes nothing returns boolean
if(not(udg_integer02=='h00E'))then
return false
endif
return true
endfunction
function Tc takes nothing returns boolean
if(not(udg_integer02=='h00G'))then
return false
endif
return true
endfunction
function TC takes nothing returns boolean
if(not(udg_integer02=='h00H'))then
return false
endif
return true
endfunction
function Td takes nothing returns boolean
if(not(udg_integer02=='h00F'))then
return false
endif
return true
endfunction
function TD takes nothing returns boolean
if(not(udg_integer02=='h00P'))then
return false
endif
return true
endfunction
function Te takes nothing returns boolean
if(not(udg_integer02=='h00K'))then
return false
endif
return true
endfunction
function TE takes nothing returns boolean
if(not(udg_integer02=='h00L'))then
return false
endif
return true
endfunction
function Tf takes nothing returns boolean
if(not(udg_integer02=='h00I'))then
return false
endif
return true
endfunction
function TF takes nothing returns boolean
if(not(udg_integer02=='h00N'))then
return false
endif
return true
endfunction
function Tg takes nothing returns boolean
if(not(udg_integer02=='h00O'))then
return false
endif
return true
endfunction
function TG takes nothing returns boolean
if(not(udg_integer02=='h00M'))then
return false
endif
return true
endfunction
function Th takes nothing returns boolean
if(not(udg_integer02=='h00J'))then
return false
endif
return true
endfunction
function TH takes nothing returns boolean
if(not(udg_integer02=='h01C'))then
return false
endif
return true
endfunction
function Ti takes nothing returns boolean
if(not(udg_integer02=='h02E'))then
return false
endif
return true
endfunction
function TI takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02G')
endfunction
function Tj takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_force01)>=1))then
return false
endif
if(not(CountUnitsInGroup(udg_group02)==0))then
return false
endif
return true
endfunction
function TJ takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02H')
endfunction
function Tk takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_force01)>=2))then
return false
endif
if(not(CountUnitsInGroup(udg_group02)==0))then
return false
endif
return true
endfunction
function TK takes nothing returns nothing
call SetUnitColor(GetDyingUnit(),ConvertPlayerColor(12))
call CameraClearNoiseForPlayer(GetOwningPlayer(GetDyingUnit()))
call ResetToGameCameraForPlayer(GetOwningPlayer(GetDyingUnit()),3.00)
set udg_integers13[GetConvertedPlayerId(GetTriggerPlayer())]=0
set udg_force02=GetForceOfPlayer(udg_player02)
call DisplayTextToForce(udg_force02,"TRIGSTR_2178")
call DestroyForce(udg_force02)
set udg_force02=GetForceOfPlayer(GetOwningPlayer(GetDyingUnit()))
call DisplayTextToForce(udg_force02,"TRIGSTR_2179")
call DestroyForce(udg_force02)
call ForceRemovePlayerSimple(GetOwningPlayer(GetDyingUnit()),udg_force04)
call ForceAddPlayerSimple(GetOwningPlayer(GetDyingUnit()),udg_force01)
set udg_integer30=(udg_integer30-1)
call SetPlayerAllianceStateBJ(GetOwningPlayer(GetDyingUnit()),Player(11),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(11),GetOwningPlayer(GetDyingUnit()),bj_ALLIANCE_ALLIED_VISION)
set udg_location04=GetUnitLoc(GetDyingUnit())
if(Ta())then
call CreateNUnitsAtLoc(1,'h00Q',GetOwningPlayer(GetDyingUnit()),udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(TA())then
call CreateNUnitsAtLoc(1,'h00R',GetOwningPlayer(GetDyingUnit()),udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(Tb())then
call CreateNUnitsAtLoc(1,'h00S',GetOwningPlayer(GetDyingUnit()),udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(TB())then
call CreateNUnitsAtLoc(1,'h00V',udg_player05,GetUnitLoc(GetDyingUnit()),bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(Tc())then
call CreateNUnitsAtLoc(1,'h00T',GetOwningPlayer(GetDyingUnit()),udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(TC())then
call CreateNUnitsAtLoc(1,'h00U',GetOwningPlayer(GetDyingUnit()),udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(Td())then
call CreateNUnitsAtLoc(1,'h00W',GetOwningPlayer(GetDyingUnit()),udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(TD())then
call CreateNUnitsAtLoc(1,'h010',GetOwningPlayer(GetDyingUnit()),udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(Te())then
call CreateNUnitsAtLoc(1,'h013',GetOwningPlayer(GetDyingUnit()),udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(TE())then
call CreateNUnitsAtLoc(1,'h014',GetOwningPlayer(GetDyingUnit()),udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(Tf())then
call CreateNUnitsAtLoc(1,'h011',GetOwningPlayer(GetDyingUnit()),udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(TF())then
call CreateNUnitsAtLoc(1,'h00X',GetOwningPlayer(GetDyingUnit()),udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(Tg())then
call CreateNUnitsAtLoc(1,'h00Z',GetOwningPlayer(GetDyingUnit()),udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(TG())then
call CreateNUnitsAtLoc(1,'h00Y',GetOwningPlayer(GetDyingUnit()),udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(Th())then
call CreateNUnitsAtLoc(1,'h012',GetOwningPlayer(GetDyingUnit()),udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(TH())then
call CreateNUnitsAtLoc(1,'h01D',GetOwningPlayer(GetDyingUnit()),udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(Ti())then
call CreateNUnitsAtLoc(1,'h02F',GetOwningPlayer(GetDyingUnit()),udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),PLAYER_COLOR_YELLOW)
else
call DoNothing()
endif
call RemoveLocation(udg_location04)
call SetPlayerTechResearchedSwap('Reuv',1,GetOwningPlayer(GetLastCreatedUnit()))
call ForceAddPlayerSimple(GetOwningPlayer(GetLastCreatedUnit()),udg_force01)
call SelectUnitAddForPlayer(GetLastCreatedUnit(),GetOwningPlayer(GetLastCreatedUnit()))
set udg_group02=GetUnitsInRectMatching(udg_rect58,Condition(function TI))
if(Tj())then
set udg_location04=GetRandomLocInRect(udg_rect58)
call CreateNUnitsAtLoc(1,'h02G',udg_player02,udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
else
call DoNothing()
endif
call DestroyGroup(udg_group02)
set udg_group02=GetUnitsInRectMatching(udg_rect58,Condition(function TJ))
if(Tk())then
set udg_location04=GetRandomLocInRect(udg_rect58)
call CreateNUnitsAtLoc(1,'h02H',udg_player02,udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
else
call DoNothing()
endif
call DestroyGroup(udg_group02)
endfunction
function Tl takes nothing returns nothing
set udg_trigger172=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger172,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger172,Condition(function t9))
call TriggerAddAction(udg_trigger172,function TK)
endfunction
function TL takes nothing returns boolean
if(not(GetDyingUnit()!=udg_unit01))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetDyingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetPlayerSlotState(GetOwningPlayer(GetDyingUnit()))==PLAYER_SLOT_STATE_PLAYING))then
return false
endif
if(not(IsPlayerInForce(GetOwningPlayer(GetDyingUnit()),udg_force01)!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player02))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_STRUCTURE)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_MECHANICAL)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetDyingUnit())!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player03))then
return false
endif
if(not(IsUnitType(GetKillingUnitBJ(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(IsUnitType(GetKillingUnitBJ(),UNIT_TYPE_GIANT)!=true))then
return false
endif
if(not(GetOwningPlayer(GetKillingUnitBJ())!=Player(11)))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetKillingUnitBJ()))!=MAP_CONTROL_USER))then
return false
endif
if(not(GetOwningPlayer(GetKillingUnitBJ())!=GetOwningPlayer(GetDyingUnit())))then
return false
endif
return true
endfunction
function Tm takes nothing returns boolean
if(not TL())then
return false
endif
return true
endfunction
function TM takes nothing returns nothing
call PlaySoundBJ(udg_sound49)
call CameraClearNoiseForPlayer(GetOwningPlayer(GetDyingUnit()))
call ResetToGameCameraForPlayer(GetOwningPlayer(GetDyingUnit()),3.00)
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUTIN,5.00,"ReplaceableTextures\\CameraMasks\\DiagonalSlash_mask.blp",0.00,0.00,100.00,0.00)
set udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_integers21[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_reals07[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0.00
set udg_integers22[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_integers19[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_reals06[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0.00
set udg_integers20[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
call ForceRemovePlayerSimple(GetOwningPlayer(GetDyingUnit()),udg_force04)
call ForceAddPlayerSimple(GetOwningPlayer(GetDyingUnit()),udg_force03)
set udg_integer30=(udg_integer30-1)
call SetPlayerName(GetOwningPlayer(GetDyingUnit()),("|cff808080Dead ("+(udg_strings02[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]+")|r")))
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]+"|cff009707, a human, has died.|r"))
call CustomVictoryBJ(GetOwningPlayer(GetDyingUnit()),true,false)
endfunction
function Tn takes nothing returns nothing
set udg_trigger173=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger173,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger173,Condition(function Tm))
call TriggerAddAction(udg_trigger173,function TM)
endfunction
function TN takes nothing returns boolean
if(not(GetDyingUnit()==udg_unit02))then
return false
endif
return true
endfunction
function To takes nothing returns boolean
return(IsPlayerInForce(udg_player03,udg_force01)==false)
endfunction
function TO takes nothing returns nothing
call AddSpecialEffectLocBJ(GetUnitLoc(GetEnumUnit()),"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveUnit(GetEnumUnit())
endfunction
function Tp takes nothing returns boolean
if(not(CountUnitsInGroup(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),GetUnitTypeId(udg_unit02)))>0))then
return false
endif
return true
endfunction
function TP takes nothing returns nothing
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound53)
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUTIN,5.00,"ReplaceableTextures\\CameraMasks\\DiagonalSlash_mask.blp",100.00,0,100.00,0.00)
call PingMinimapLocForForceEx(GetPlayersAll(),GetUnitLoc(GetDyingUnit()),5.00,bj_MINIMAPPINGSTYLE_SIMPLE,100,0.00,100)
call ForceAddPlayerSimple(udg_player03,udg_force03)
if(To())then
set udg_integer30=(udg_integer30-1)
else
call DoNothing()
endif
if(Tp())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]+"|cff0080C0, the AI, has died.  Use it's power memory chip on the Robotic System Manufacturer to revive it.|r"))
call CreateItemLoc('I017',GetUnitLoc(GetDyingUnit()))
call ForceRemovePlayerSimple(udg_player03,udg_force01)
else
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1299")
call TriggerSleepAction(2.00)
call SetPlayerName(udg_player03,udg_strings02[GetConvertedPlayerId(udg_player03)])
call CustomVictoryBJ(udg_player03,true,false)
call SetPlayerName(udg_player03,("|cff808080Dead ("+(udg_strings02[GetConvertedPlayerId(udg_player03)]+")|r")))
call ForGroupBJ(GetUnitsOfPlayerAll(udg_player03),function TO)
endif
endfunction
function Tq takes nothing returns nothing
set udg_trigger174=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger174,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger174,Condition(function TN))
call TriggerAddAction(udg_trigger174,function TP)
endfunction
function TQ takes nothing returns boolean
if(not(GetDyingUnit()!=udg_unit01))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetDyingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetPlayerSlotState(GetOwningPlayer(GetDyingUnit()))==PLAYER_SLOT_STATE_PLAYING))then
return false
endif
if(not(IsPlayerInForce(GetOwningPlayer(GetDyingUnit()),udg_force01)!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player02))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_STRUCTURE)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_MECHANICAL)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetDyingUnit())!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player03))then
return false
endif
if(not(GetOwningPlayer(GetKillingUnitBJ())!=udg_player03))then
return false
endif
if(not(IsUnitType(GetKillingUnitBJ(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetKillingUnitBJ()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetOwningPlayer(GetKillingUnitBJ())==GetOwningPlayer(GetDyingUnit())))then
return false
endif
return true
endfunction
function Tr takes nothing returns boolean
if(not TQ())then
return false
endif
return true
endfunction
function TR takes nothing returns nothing
call PlaySoundBJ(udg_sound49)
call CameraClearNoiseForPlayer(GetOwningPlayer(GetDyingUnit()))
call ResetToGameCameraForPlayer(GetOwningPlayer(GetDyingUnit()),3.00)
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUTIN,5.00,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0.00,0.00,100.00,0.00)
set udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_integers21[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_reals07[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0.00
set udg_integers22[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_integers19[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_reals06[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0.00
set udg_integers20[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
call SetPlayerName(GetOwningPlayer(GetDyingUnit()),udg_strings02[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))])
call SetPlayerName(GetOwningPlayer(GetDyingUnit()),("|cff808080Dead ("+(udg_strings02[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]+")|r")))
call ForceRemovePlayerSimple(GetOwningPlayer(GetDyingUnit()),udg_force04)
call ForceAddPlayerSimple(GetOwningPlayer(GetDyingUnit()),udg_force03)
set udg_integer30=(udg_integer30-1)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]+"|cff009707, a human, has committed suicide!|r"))
call CustomVictoryBJ(GetOwningPlayer(GetDyingUnit()),true,false)
endfunction
function Ts takes nothing returns nothing
set udg_trigger175=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger175,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger175,Condition(function Tr))
call TriggerAddAction(udg_trigger175,function TR)
endfunction
function TS takes nothing returns boolean
if(not(GetDyingUnit()!=udg_unit01))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetDyingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetPlayerSlotState(GetOwningPlayer(GetDyingUnit()))==PLAYER_SLOT_STATE_PLAYING))then
return false
endif
if(not(IsPlayerInForce(GetOwningPlayer(GetDyingUnit()),udg_force01)!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player02))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_STRUCTURE)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_MECHANICAL)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetDyingUnit())!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player03))then
return false
endif
if(not(GetOwningPlayer(GetKillingUnitBJ())==udg_player03))then
return false
endif
if(not(IsUnitType(GetKillingUnitBJ(),UNIT_TYPE_SAPPER)!=true))then
return false
endif
if(not(IsUnitType(GetKillingUnitBJ(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetKillingUnitBJ()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetOwningPlayer(GetKillingUnitBJ())!=GetOwningPlayer(GetDyingUnit())))then
return false
endif
return true
endfunction
function Tt takes nothing returns boolean
if(not TS())then
return false
endif
return true
endfunction
function TT takes nothing returns nothing
call AddSpecialEffectLocBJ(GetUnitLoc(GetEnumUnit()),"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveUnit(GetEnumUnit())
endfunction
function Tu takes nothing returns boolean
if(not(udg_boolean06==false))then
return false
endif
return true
endfunction
function TU takes nothing returns nothing
call PlaySoundBJ(udg_sound50)
call CameraClearNoiseForPlayer(GetOwningPlayer(GetDyingUnit()))
call ResetToGameCameraForPlayer(GetOwningPlayer(GetDyingUnit()),3.00)
set udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_integers21[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_reals07[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0.00
set udg_integers22[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_integers19[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_reals06[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0.00
set udg_integers20[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
call SetPlayerName(GetOwningPlayer(GetDyingUnit()),udg_strings02[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))])
call ForceRemovePlayerSimple(GetOwningPlayer(GetDyingUnit()),udg_force04)
call ForceAddPlayerSimple(GetOwningPlayer(GetDyingUnit()),udg_force03)
set udg_integer30=(udg_integer30-1)
call CustomVictoryBJ(GetOwningPlayer(GetDyingUnit()),true,false)
call SetPlayerName(GetOwningPlayer(GetDyingUnit()),("|cff808080Dead ("+(udg_strings02[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]+")|r")))
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUTIN,8.00,"ReplaceableTextures\\CameraMasks\\DiagonalSlash_mask.blp",50.00,0,0,0.00)
if(Tu())then
set udg_boolean06=true
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1939")
else
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1934")
call TriggerSleepAction(5.00)
call SetPlayerName(udg_player03,udg_strings02[GetConvertedPlayerId(udg_player03)])
call CustomVictoryBJ(udg_player03,true,false)
call SetPlayerName(udg_player03,("|cff808080Dead ("+(udg_strings02[GetConvertedPlayerId(udg_player03)]+")|r")))
call ForGroupBJ(GetUnitsOfPlayerAll(udg_player03),function TT)
endif
endfunction
function Tv takes nothing returns nothing
set udg_trigger176=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger176,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger176,Condition(function Tt))
call TriggerAddAction(udg_trigger176,function TU)
endfunction
function TV takes nothing returns boolean
if(not(GetDyingUnit()!=udg_unit01))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetDyingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetPlayerSlotState(GetOwningPlayer(GetDyingUnit()))==PLAYER_SLOT_STATE_PLAYING))then
return false
endif
if(not(IsPlayerInForce(GetOwningPlayer(GetDyingUnit()),udg_force01)!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player02))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_STRUCTURE)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_MECHANICAL)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetDyingUnit())!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player03))then
return false
endif
if(not(GetOwningPlayer(GetKillingUnitBJ())!=udg_player03))then
return false
endif
if(not(IsPlayerInForce(GetOwningPlayer(GetKillingUnitBJ()),udg_force04)==true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetKillingUnitBJ()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetOwningPlayer(GetKillingUnitBJ())!=GetOwningPlayer(GetDyingUnit())))then
return false
endif
return true
endfunction
function Tw takes nothing returns boolean
if(not TV())then
return false
endif
return true
endfunction
function TW takes nothing returns boolean
return(udg_boolean05==true)
endfunction
function Tx takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(0)))then
return false
endif
return true
endfunction
function TX takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(1)))then
return false
endif
return true
endfunction
function Ty takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(2)))then
return false
endif
return true
endfunction
function TY takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(3)))then
return false
endif
return true
endfunction
function Tz takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(4)))then
return false
endif
return true
endfunction
function TZ takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(5)))then
return false
endif
return true
endfunction
function T0 takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(6)))then
return false
endif
return true
endfunction
function T1 takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(7)))then
return false
endif
return true
endfunction
function T2 takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(8)))then
return false
endif
return true
endfunction
function T3 takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(9)))then
return false
endif
return true
endfunction
function T4 takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(10)))then
return false
endif
return true
endfunction
function T5 takes nothing returns nothing
call CameraClearNoiseForPlayer(GetOwningPlayer(GetDyingUnit()))
call ResetToGameCameraForPlayer(GetOwningPlayer(GetDyingUnit()),3.00)
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUTIN,5.00,"ReplaceableTextures\\CameraMasks\\DiagonalSlash_mask.blp",0.00,0.00,100.00,0.00)
set udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_integers21[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_reals07[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0.00
set udg_integers22[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_integers19[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_reals06[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0.00
set udg_integers20[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]+("|cff009707, a human, has been murdered by |r"+udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))])))
call SetPlayerName(GetOwningPlayer(GetDyingUnit()),udg_strings02[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))])
call CustomVictoryBJ(GetOwningPlayer(GetDyingUnit()),true,false)
call SetPlayerName(GetOwningPlayer(GetDyingUnit()),("|cff808080Dead ("+(udg_strings02[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]+")|r")))
call ForceRemovePlayerSimple(GetOwningPlayer(GetDyingUnit()),udg_force04)
call ForceAddPlayerSimple(GetOwningPlayer(GetDyingUnit()),udg_force03)
set udg_integer30=(udg_integer30-1)
call PlaySoundBJ(udg_sound48)
call TriggerSleepAction(2)
if(TW())then
call DoNothing()
else
return
endif
if(Tx())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cffFF0000-tk red|r"))
call EnableTrigger(udg_trigger185)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger185)
else
call DoNothing()
endif
if(TX())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cff0000FF-tk blue|r"))
call EnableTrigger(udg_trigger186)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger186)
else
call DoNothing()
endif
if(Ty())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cff00FFFF-tk teal|r"))
call EnableTrigger(udg_trigger187)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger187)
else
call DoNothing()
endif
if(TY())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cff800080-tk purple|r"))
call EnableTrigger(udg_trigger188)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger188)
else
call DoNothing()
endif
if(Tz())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cffFFFF00-tk yellow|r"))
call EnableTrigger(udg_trigger189)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger189)
else
call DoNothing()
endif
if(TZ())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cffFF8000-tk orange|r"))
call EnableTrigger(udg_trigger190)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger190)
else
call DoNothing()
endif
if(T0())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cff00FF00-tk green|r"))
call EnableTrigger(udg_trigger191)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger191)
else
call DoNothing()
endif
if(T1())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cffFF80FF-tk pink|r"))
call EnableTrigger(udg_trigger192)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger192)
else
call DoNothing()
endif
if(T2())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cff808080-tk gray|r"))
call EnableTrigger(udg_trigger193)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger193)
else
call DoNothing()
endif
if(T3())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cff8080FF-tk light blue|r"))
call EnableTrigger(udg_trigger194)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger194)
else
call DoNothing()
endif
if(T4())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cff8080FF-tk dark green|r"))
call EnableTrigger(udg_trigger195)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger195)
else
call DoNothing()
endif
endfunction
function T6 takes nothing returns nothing
set udg_trigger177=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger177,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger177,Condition(function Tw))
call TriggerAddAction(udg_trigger177,function T5)
endfunction
function T7 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function T8 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function T9 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function ua takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function uA takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function ub takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function uB takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function uc takes nothing returns boolean
return(GetOwningPlayer(udg_unit33)==GetTriggerPlayer())
endfunction
function uC takes nothing returns boolean
return(GetOwningPlayer(udg_units01[1])==GetTriggerPlayer())
endfunction
function ud takes nothing returns boolean
return(GetOwningPlayer(udg_units01[2])==GetTriggerPlayer())
endfunction
function uD takes nothing returns boolean
return(GetOwningPlayer(udg_units01[3])==GetTriggerPlayer())
endfunction
function ue takes nothing returns boolean
return(GetOwningPlayer(udg_units01[4])==GetTriggerPlayer())
endfunction
function uE takes nothing returns boolean
return(GetOwningPlayer(udg_unit32)==GetTriggerPlayer())
endfunction
function uf takes nothing returns boolean
if(not(IsPlayerInForce(GetTriggerPlayer(),udg_force04)==true))then
return false
endif
return true
endfunction
function uF takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function ug takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function uG takes nothing returns boolean
return GetBooleanOr(uF(),ug())
endfunction
function uh takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function uH takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function ui takes nothing returns boolean
return GetBooleanOr(uh(),uH())
endfunction
function uI takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function uj takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function uJ takes nothing returns boolean
return GetBooleanOr(uI(),uj())
endfunction
function uk takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function uK takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function ul takes nothing returns boolean
return GetBooleanOr(uk(),uK())
endfunction
function uL takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function um takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function uM takes nothing returns boolean
return GetBooleanOr(uL(),um())
endfunction
function un takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function uN takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function uo takes nothing returns boolean
return GetBooleanOr(un(),uN())
endfunction
function uO takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function up takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function uP takes nothing returns boolean
return GetBooleanOr(uO(),up())
endfunction
function uq takes nothing returns boolean
return(GetOwningPlayer(udg_unit33)==GetTriggerPlayer())
endfunction
function uQ takes nothing returns boolean
return(GetOwningPlayer(udg_units01[1])==GetTriggerPlayer())
endfunction
function ur takes nothing returns boolean
return(GetOwningPlayer(udg_units01[2])==GetTriggerPlayer())
endfunction
function uR takes nothing returns boolean
return(GetOwningPlayer(udg_units01[3])==GetTriggerPlayer())
endfunction
function us takes nothing returns boolean
return(GetOwningPlayer(udg_units01[4])==GetTriggerPlayer())
endfunction
function uS takes nothing returns boolean
return(GetOwningPlayer(udg_unit32)==GetTriggerPlayer())
endfunction
function ut takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02G')
endfunction
function uT takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02G')
endfunction
function uu takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02H')
endfunction
function uU takes nothing returns boolean
return GetBooleanOr(uT(),uu())
endfunction
function uv takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function uV takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_force01)==0))then
return false
endif
if(not(CountUnitsInGroup(udg_group02)>=1))then
return false
endif
return true
endfunction
function uw takes nothing returns boolean
if(not uV())then
return false
endif
return true
endfunction
function uW takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02H')
endfunction
function ux takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_force01)<=1))then
return false
endif
if(not(CountUnitsInGroup(udg_group02)>=1))then
return false
endif
return true
endfunction
function uX takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02H')
endfunction
function uy takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function uY takes nothing returns boolean
if(not ux())then
return false
endif
return true
endfunction
function uz takes nothing returns boolean
if(not(IsPlayerInForce(GetTriggerPlayer(),udg_force01)==true))then
return false
endif
return true
endfunction
function uZ takes nothing returns boolean
if(not(IsPlayerInForce(GetTriggerPlayer(),udg_force01)==true))then
return false
endif
if(not(GetTriggerPlayer()==udg_player03))then
return false
endif
return true
endfunction
function u0 takes nothing returns boolean
return(GetOwningPlayer(udg_unit33)==GetTriggerPlayer())
endfunction
function u1 takes nothing returns boolean
return(GetOwningPlayer(udg_units01[1])==GetTriggerPlayer())
endfunction
function u2 takes nothing returns boolean
return(GetOwningPlayer(udg_units01[2])==GetTriggerPlayer())
endfunction
function u3 takes nothing returns boolean
return(GetOwningPlayer(udg_units01[3])==GetTriggerPlayer())
endfunction
function u4 takes nothing returns boolean
return(GetOwningPlayer(udg_units01[4])==GetTriggerPlayer())
endfunction
function u5 takes nothing returns boolean
return(GetOwningPlayer(udg_unit32)==GetTriggerPlayer())
endfunction
function u6 takes nothing returns boolean
if(not uZ())then
return false
endif
return true
endfunction
function u7 takes nothing returns boolean
if(not(GetTriggerPlayer()==udg_player03))then
return false
endif
if(not(IsPlayerInForce(GetTriggerPlayer(),udg_force01)!=true))then
return false
endif
return true
endfunction
function u8 takes nothing returns boolean
return(GetOwningPlayer(udg_unit33)==GetTriggerPlayer())
endfunction
function u9 takes nothing returns boolean
return(GetOwningPlayer(udg_units01[1])==GetTriggerPlayer())
endfunction
function Ua takes nothing returns boolean
return(GetOwningPlayer(udg_units01[2])==GetTriggerPlayer())
endfunction
function UA takes nothing returns boolean
return(GetOwningPlayer(udg_units01[3])==GetTriggerPlayer())
endfunction
function Ub takes nothing returns boolean
return(GetOwningPlayer(udg_units01[4])==GetTriggerPlayer())
endfunction
function UB takes nothing returns boolean
return(GetOwningPlayer(udg_unit32)==GetTriggerPlayer())
endfunction
function Uc takes nothing returns boolean
if(not u7())then
return false
endif
return true
endfunction
function UC takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Ud takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function UD takes nothing returns boolean
return GetBooleanOr(UC(),Ud())
endfunction
function Ue takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function UE takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function Uf takes nothing returns boolean
return GetBooleanOr(Ue(),UE())
endfunction
function UF takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Ug takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function UG takes nothing returns boolean
return GetBooleanOr(UF(),Ug())
endfunction
function Uh takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function UH takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function Ui takes nothing returns boolean
return GetBooleanOr(Uh(),UH())
endfunction
function UI takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Uj takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function UJ takes nothing returns boolean
return GetBooleanOr(UI(),Uj())
endfunction
function Uk takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function UK takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function Ul takes nothing returns boolean
return GetBooleanOr(Uk(),UK())
endfunction
function UL takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Um takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function UM takes nothing returns boolean
return GetBooleanOr(UL(),Um())
endfunction
function Un takes nothing returns boolean
return(GetOwningPlayer(udg_unit33)==GetTriggerPlayer())
endfunction
function UN takes nothing returns boolean
return(GetOwningPlayer(udg_units01[1])==GetTriggerPlayer())
endfunction
function Uo takes nothing returns boolean
return(GetOwningPlayer(udg_units01[2])==GetTriggerPlayer())
endfunction
function UO takes nothing returns boolean
return(GetOwningPlayer(udg_units01[3])==GetTriggerPlayer())
endfunction
function Up takes nothing returns boolean
return(GetOwningPlayer(udg_units01[4])==GetTriggerPlayer())
endfunction
function UP takes nothing returns boolean
return(GetOwningPlayer(udg_unit32)==GetTriggerPlayer())
endfunction
function Uq takes nothing returns boolean
return(CountPlayersInForceBJ(udg_force01)>0)
endfunction
function UQ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Ur takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function UR takes nothing returns boolean
return GetBooleanOr(UQ(),Ur())
endfunction
function Us takes nothing returns nothing
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers01[GetForLoopIndexA()]=GetItemTypeId(UnitItemInSlotBJ(GetEnumUnit(),GetForLoopIndexA()))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers02[GetForLoopIndexA()]=GetItemCharges(UnitItemInSlotBJ(GetEnumUnit(),GetForLoopIndexA()))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call ReplaceUnitBJ(GetEnumUnit(),udg_integer02,bj_UNIT_STATE_METHOD_RELATIVE)
set udg_unit12=GetLastReplacedUnitBJ()
call SetUnitColor(GetLastReplacedUnitBJ(),ConvertPlayerColor(12))
call SelectUnitAddForPlayer(GetLastReplacedUnitBJ(),udg_player02)
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitAddItemByIdSwapped(udg_integers01[GetForLoopIndexA()],GetLastReplacedUnitBJ())
call UnitDropItemSlotBJ(GetLastReplacedUnitBJ(),GetLastCreatedItem(),GetForLoopIndexA())
call SetItemCharges(UnitItemInSlotBJ(GetLastReplacedUnitBJ(),GetForLoopIndexA()),udg_integers02[GetForLoopIndexA()])
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers01[GetForLoopIndexA()]=GetItemTypeId(null)
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers02[GetForLoopIndexA()]=0
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
function US takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)!=true)
endfunction
function Ut takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function UT takes nothing returns boolean
return GetBooleanAnd(US(),Ut())
endfunction
function Uu takes nothing returns nothing
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers01[GetForLoopIndexA()]=GetItemTypeId(UnitItemInSlotBJ(GetEnumUnit(),GetForLoopIndexA()))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers02[GetForLoopIndexA()]=GetItemCharges(UnitItemInSlotBJ(GetEnumUnit(),GetForLoopIndexA()))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call ReplaceUnitBJ(GetEnumUnit(),udg_integer02,bj_UNIT_STATE_METHOD_RELATIVE)
call SetUnitColor(GetLastReplacedUnitBJ(),ConvertPlayerColor(12))
call SelectUnitAddForPlayer(GetLastReplacedUnitBJ(),udg_player02)
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitAddItemByIdSwapped(udg_integers01[GetForLoopIndexA()],GetLastReplacedUnitBJ())
call UnitDropItemSlotBJ(GetLastReplacedUnitBJ(),GetLastCreatedItem(),GetForLoopIndexA())
call SetItemCharges(UnitItemInSlotBJ(GetLastReplacedUnitBJ(),GetForLoopIndexA()),udg_integers02[GetForLoopIndexA()])
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers01[GetForLoopIndexA()]=GetItemTypeId(null)
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers02[GetForLoopIndexA()]=0
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
function UU takes nothing returns boolean
if(not(udg_integer03==4))then
return false
endif
return true
endfunction
function Uv takes nothing returns boolean
if(not(udg_integer02=='h00B'))then
return false
endif
return true
endfunction
function UV takes nothing returns boolean
if(not(udg_integer02=='h00C'))then
return false
endif
return true
endfunction
function Uw takes nothing returns boolean
if(not(udg_integer02=='h00D'))then
return false
endif
return true
endfunction
function UW takes nothing returns boolean
if(not(udg_integer02=='h00H'))then
return false
endif
return true
endfunction
function Ux takes nothing returns boolean
if(not(udg_integer02=='h00G'))then
return false
endif
return true
endfunction
function UX takes nothing returns boolean
if(not(udg_integer02=='h00E'))then
return false
endif
return true
endfunction
function Uy takes nothing returns boolean
if(not(udg_integer02=='h00F'))then
return false
endif
return true
endfunction
function UY takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function Uz takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02G')
endfunction
function UZ takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_force01)>=1))then
return false
endif
if(not(CountUnitsInGroup(udg_group02)==0))then
return false
endif
return true
endfunction
function U0 takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02H')
endfunction
function U1 takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_force01)>=2))then
return false
endif
if(not(CountUnitsInGroup(udg_group02)==0))then
return false
endif
return true
endfunction
function U2 takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_force01)>0))then
return false
endif
return true
endfunction
function U3 takes nothing returns boolean
if(not(GetTriggerPlayer()==udg_player02))then
return false
endif
return true
endfunction
function U4 takes nothing returns nothing
call PlaySoundBJ(udg_sound66)
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUTIN,5.00,"ReplaceableTextures\\CameraMasks\\DiagonalSlash_mask.blp",100.00,100.00,100.00,0.00)
if(uf())then
call ForceRemovePlayerSimple(GetTriggerPlayer(),udg_force04)
call ForceAddPlayerSimple(GetTriggerPlayer(),udg_force03)
set udg_integer30=(udg_integer30-1)
call SetPlayerName(GetTriggerPlayer(),("|cff808080Left ("+(udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]+")|r")))
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetTriggerPlayer())]+"|cff009707, a human, has left the game.|r"))
set udg_integers13[GetConvertedPlayerId(GetTriggerPlayer())]=0
call UnitRemoveItemFromSlotSwapped(1,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function T7))))
call UnitRemoveItemFromSlotSwapped(2,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function T8))))
call UnitRemoveItemFromSlotSwapped(3,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function T9))))
call UnitRemoveItemFromSlotSwapped(4,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function ua))))
call UnitRemoveItemFromSlotSwapped(5,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function uA))))
call UnitRemoveItemFromSlotSwapped(6,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function ub))))
call RemoveUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function uB))))
if(uc())then
call SetUnitOwner(udg_unit33,Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(uC())then
call SetUnitOwner(udg_units01[1],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(ud())then
call SetUnitOwner(udg_units01[2],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(uD())then
call SetUnitOwner(udg_units01[3],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(ue())then
call SetUnitOwner(udg_units01[4],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(uE())then
call SetUnitOwner(udg_unit32,Player(PLAYER_NEUTRAL_PASSIVE),false)
else
call DoNothing()
endif
else
endif
if(uz())then
call ForceRemovePlayerSimple(GetTriggerPlayer(),udg_force01)
call ForceAddPlayerSimple(GetTriggerPlayer(),udg_force03)
call SetPlayerName(GetTriggerPlayer(),("|cff808080Left ("+(udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]+")|r")))
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetTriggerPlayer())]+"|cff009707, a Spawn, has left the game.|r"))
set udg_integers13[GetConvertedPlayerId(GetTriggerPlayer())]=0
call UnitRemoveItemFromSlotSwapped(1,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function uG))))
call UnitRemoveItemFromSlotSwapped(2,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function ui))))
call UnitRemoveItemFromSlotSwapped(3,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function uJ))))
call UnitRemoveItemFromSlotSwapped(4,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function ul))))
call UnitRemoveItemFromSlotSwapped(5,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function uM))))
call UnitRemoveItemFromSlotSwapped(6,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function uo))))
call RemoveUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function uP))))
if(uq())then
call SetUnitOwner(udg_unit33,Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(uQ())then
call SetUnitOwner(udg_units01[1],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(ur())then
call SetUnitOwner(udg_units01[2],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(uR())then
call SetUnitOwner(udg_units01[3],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(us())then
call SetUnitOwner(udg_units01[4],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(uS())then
call SetUnitOwner(udg_unit32,Player(PLAYER_NEUTRAL_PASSIVE),false)
else
call DoNothing()
endif
set udg_group02=GetUnitsInRectMatching(udg_rect58,Condition(function ut))
if(uw())then
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerMatching(udg_player02,Condition(function uU)),function uv)
else
call DoNothing()
endif
call DestroyGroup(udg_group02)
set udg_group02=GetUnitsInRectMatching(udg_rect58,Condition(function uW))
if(uY())then
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerMatching(udg_player02,Condition(function uX)),function uy)
else
call DoNothing()
endif
call DestroyGroup(udg_group02)
else
endif
if(u6())then
call ForceRemovePlayerSimple(GetTriggerPlayer(),udg_force01)
call ForceAddPlayerSimple(GetTriggerPlayer(),udg_force03)
call SetPlayerName(GetTriggerPlayer(),("|cff808080Left ("+(udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]+")|r")))
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetTriggerPlayer())]+"|cff009707, The A.I., has left the game.|r"))
call RemoveUnit(udg_unit02)
if(u0())then
call SetUnitOwner(udg_unit33,Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(u1())then
call SetUnitOwner(udg_units01[1],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(u2())then
call SetUnitOwner(udg_units01[2],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(u3())then
call SetUnitOwner(udg_units01[3],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(u4())then
call SetUnitOwner(udg_units01[4],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(u5())then
call SetUnitOwner(udg_unit32,Player(PLAYER_NEUTRAL_PASSIVE),false)
else
call DoNothing()
endif
else
endif
if(Uc())then
call ForceAddPlayerSimple(GetTriggerPlayer(),udg_force03)
set udg_integer30=(udg_integer30-1)
call SetPlayerName(GetTriggerPlayer(),("|cff808080Left ("+(udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]+")|r")))
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetTriggerPlayer())]+"|cff009707, The A.I., has left the game.|r"))
call RemoveUnit(udg_unit02)
if(u8())then
call SetUnitOwner(udg_unit33,Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(u9())then
call SetUnitOwner(udg_units01[1],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(Ua())then
call SetUnitOwner(udg_units01[2],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(UA())then
call SetUnitOwner(udg_units01[3],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(Ub())then
call SetUnitOwner(udg_units01[4],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(UB())then
call SetUnitOwner(udg_unit32,Player(PLAYER_NEUTRAL_PASSIVE),false)
else
call DoNothing()
endif
else
endif
if(U3())then
call ForceAddPlayerSimple(GetTriggerPlayer(),udg_force03)
call SetPlayerName(GetTriggerPlayer(),("|cff808080Left ("+(udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]+")|r")))
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetTriggerPlayer())]+"|cff009707, The Cerebrate, has left the game.|r"))
set udg_integers13[GetConvertedPlayerId(GetTriggerPlayer())]=0
call UnitRemoveItemFromSlotSwapped(1,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function UD))))
call UnitRemoveItemFromSlotSwapped(2,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function Uf))))
call UnitRemoveItemFromSlotSwapped(3,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function UG))))
call UnitRemoveItemFromSlotSwapped(4,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function Ui))))
call UnitRemoveItemFromSlotSwapped(5,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function UJ))))
call UnitRemoveItemFromSlotSwapped(6,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function Ul))))
call RemoveUnit(GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function UM))))
if(Un())then
call SetUnitOwner(udg_unit33,Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(UN())then
call SetUnitOwner(udg_units01[1],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(Uo())then
call SetUnitOwner(udg_units01[2],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(UO())then
call SetUnitOwner(udg_units01[3],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(Up())then
call SetUnitOwner(udg_units01[4],Player(PLAYER_NEUTRAL_PASSIVE),true)
else
call DoNothing()
endif
if(UP())then
call SetUnitOwner(udg_unit32,Player(PLAYER_NEUTRAL_PASSIVE),false)
else
call DoNothing()
endif
call TriggerSleepAction(5.00)
if(U2())then
call SetPlayerName(udg_player02,udg_strings02[GetConvertedPlayerId(udg_player02)])
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2180")
call DisableTrigger(udg_trigger33)
call PolledWait(120.00)
if(Uq())then
call DoNothing()
else
return
endif
set udg_player02=ForcePickRandomPlayer(udg_force01)
set udg_integer30=(udg_integer30-1)
call EnableTrigger(udg_trigger33)
call ForceRemovePlayerSimple(udg_player02,udg_force01)
call SetPlayerAllianceStateBJ(Player(11),udg_player02,bj_ALLIANCE_ALLIED_UNITS)
call SetPlayerAllianceStateBJ(udg_player02,Player(11),bj_ALLIANCE_ALLIED)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2182")
if(UU())then
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerMatching(udg_player02,Condition(function UR)),function Us)
else
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerMatching(udg_player02,Condition(function UT)),function Uu)
endif
call SetPlayerUnitAvailableBJ('h00M',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00J',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00O',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00N',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00P',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00I',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00K',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00L',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00F',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00H',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00G',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00E',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00C',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00D',false,udg_player02)
call SetPlayerUnitAvailableBJ('h02E',false,udg_player02)
call SetPlayerUnitAvailableBJ('h01C',false,udg_player02)
if(Uv())then
call SetPlayerUnitAvailableBJ('h00D',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00C',true,udg_player02)
else
call DoNothing()
endif
if(UV())then
call SetPlayerUnitAvailableBJ('h00E',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00F',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00D',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00C',false,udg_player02)
else
call DoNothing()
endif
if(Uw())then
call SetPlayerUnitAvailableBJ('h00G',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00H',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00D',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00C',false,udg_player02)
else
call DoNothing()
endif
if(UW())then
call SetPlayerUnitAvailableBJ('h00O',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00P',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00G',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00H',false,udg_player02)
else
call DoNothing()
endif
if(Ux())then
call SetPlayerUnitAvailableBJ('h00M',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00N',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00G',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00H',false,udg_player02)
else
call DoNothing()
endif
if(UX())then
call SetPlayerUnitAvailableBJ('h00I',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00J',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00F',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00E',false,udg_player02)
else
call DoNothing()
endif
if(Uy())then
call SetPlayerUnitAvailableBJ('h00K',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00L',true,udg_player02)
call SetPlayerUnitAvailableBJ('h00F',false,udg_player02)
call SetPlayerUnitAvailableBJ('h00E',false,udg_player02)
else
call DoNothing()
endif
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect58),function UY)
set udg_group02=GetUnitsInRectMatching(udg_rect58,Condition(function Uz))
if(UZ())then
set udg_location04=GetRandomLocInRect(udg_rect58)
call CreateNUnitsAtLoc(1,'h02G',udg_player02,udg_location04,bj_UNIT_FACING)
else
call DoNothing()
endif
call DestroyGroup(udg_group02)
set udg_group02=GetUnitsInRectMatching(udg_rect58,Condition(function U0))
if(U1())then
set udg_location04=GetRandomLocInRect(udg_rect58)
call CreateNUnitsAtLoc(1,'h02H',udg_player02,udg_location04,bj_UNIT_FACING)
else
call DoNothing()
endif
call DestroyGroup(udg_group02)
else
call DoNothing()
endif
else
endif
endfunction
function U5 takes nothing returns nothing
set udg_trigger178=CreateTrigger()
call TriggerRegisterPlayerEventLeave(udg_trigger178,Player(0))
call TriggerRegisterPlayerEventLeave(udg_trigger178,Player(1))
call TriggerRegisterPlayerEventLeave(udg_trigger178,Player(2))
call TriggerRegisterPlayerEventLeave(udg_trigger178,Player(3))
call TriggerRegisterPlayerEventLeave(udg_trigger178,Player(4))
call TriggerRegisterPlayerEventLeave(udg_trigger178,Player(5))
call TriggerRegisterPlayerEventLeave(udg_trigger178,Player(6))
call TriggerRegisterPlayerEventLeave(udg_trigger178,Player(7))
call TriggerRegisterPlayerEventLeave(udg_trigger178,Player(8))
call TriggerRegisterPlayerEventLeave(udg_trigger178,Player(9))
call TriggerRegisterPlayerEventLeave(udg_trigger178,Player(10))
call TriggerAddAction(udg_trigger178,function U4)
endfunction
function U6 takes nothing returns boolean
if(not(GetDyingUnit()==udg_unit01))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetDyingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetPlayerSlotState(GetOwningPlayer(GetDyingUnit()))==PLAYER_SLOT_STATE_PLAYING))then
return false
endif
if(not(IsPlayerInForce(GetOwningPlayer(GetDyingUnit()),udg_force01)!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player02))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_STRUCTURE)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_MECHANICAL)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetDyingUnit())!=true))then
return false
endif
if(not(IsUnitType(GetKillingUnitBJ(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(IsUnitType(GetKillingUnitBJ(),UNIT_TYPE_GIANT)!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player03))then
return false
endif
if(not(GetOwningPlayer(GetKillingUnitBJ())!=Player(11)))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetKillingUnitBJ()))!=MAP_CONTROL_USER))then
return false
endif
if(not(GetOwningPlayer(GetKillingUnitBJ())!=GetOwningPlayer(GetDyingUnit())))then
return false
endif
return true
endfunction
function U7 takes nothing returns boolean
if(not U6())then
return false
endif
return true
endfunction
function U8 takes nothing returns nothing
call PlaySoundBJ(udg_sound49)
call CameraClearNoiseForPlayer(udg_player04)
call ResetToGameCameraForPlayer(udg_player04,3.00)
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUTIN,5.00,"ReplaceableTextures\\CameraMasks\\DiagonalSlash_mask.blp",0.00,0.00,100.00,0.00)
set udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_integers21[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_reals07[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0.00
set udg_integers22[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_integers19[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_reals06[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0.00
set udg_integers20[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
call ForceRemovePlayerSimple(udg_player04,udg_force04)
call ForceAddPlayerSimple(udg_player04,udg_force03)
set udg_integer30=(udg_integer30-1)
call SetPlayerName(udg_player04,("|cff808080Dead ("+(udg_strings02[GetConvertedPlayerId(udg_player04)]+")|r")))
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(udg_player04)]+"|cff009707, a human, has died.|r"))
call CustomVictoryBJ(udg_player04,true,false)
endfunction
function U9 takes nothing returns nothing
set udg_trigger179=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger179,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger179,Condition(function U7))
call TriggerAddAction(udg_trigger179,function U8)
endfunction
function va takes nothing returns boolean
if(not(GetDyingUnit()==udg_unit01))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetDyingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetPlayerSlotState(GetOwningPlayer(GetDyingUnit()))==PLAYER_SLOT_STATE_PLAYING))then
return false
endif
if(not(IsPlayerInForce(GetOwningPlayer(GetDyingUnit()),udg_force01)!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player02))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_STRUCTURE)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_MECHANICAL)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetDyingUnit())!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player03))then
return false
endif
if(not(GetOwningPlayer(GetKillingUnitBJ())!=udg_player03))then
return false
endif
if(not(IsUnitType(GetKillingUnitBJ(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetKillingUnitBJ()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetOwningPlayer(GetKillingUnitBJ())==GetOwningPlayer(GetDyingUnit())))then
return false
endif
return true
endfunction
function vA takes nothing returns boolean
if(not va())then
return false
endif
return true
endfunction
function vb takes nothing returns nothing
call PlaySoundBJ(udg_sound49)
call CameraClearNoiseForPlayer(udg_player04)
call ResetToGameCameraForPlayer(udg_player04,3.00)
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUTIN,5.00,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",0.00,0.00,100.00,0.00)
set udg_integers13[GetConvertedPlayerId(udg_player04)]=0
set udg_integers21[GetConvertedPlayerId(udg_player02)]=0
set udg_reals07[GetConvertedPlayerId(udg_player04)]=0.00
set udg_integers22[GetConvertedPlayerId(udg_player04)]=0
set udg_integers19[GetConvertedPlayerId(udg_player04)]=0
set udg_reals06[GetConvertedPlayerId(udg_player04)]=0.00
set udg_integers20[GetConvertedPlayerId(udg_player04)]=0
call SetPlayerName(udg_player04,udg_strings02[GetConvertedPlayerId(udg_player04)])
call SetPlayerName(udg_player04,("|cff808080Dead ("+(udg_strings02[GetConvertedPlayerId(udg_player04)]+")|r")))
call ForceRemovePlayerSimple(udg_player04,udg_force04)
call ForceAddPlayerSimple(udg_player04,udg_force03)
set udg_integer30=(udg_integer30-1)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(udg_player04)]+"|cff009707, a human, has committed suicide!|r"))
call CustomVictoryBJ(udg_player04,true,false)
endfunction
function vB takes nothing returns nothing
set udg_trigger180=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger180,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger180,Condition(function vA))
call TriggerAddAction(udg_trigger180,function vb)
endfunction
function vc takes nothing returns boolean
if(not(GetDyingUnit()==udg_unit01))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetDyingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetPlayerSlotState(GetOwningPlayer(GetDyingUnit()))==PLAYER_SLOT_STATE_PLAYING))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player02))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_STRUCTURE)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetDyingUnit())!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_MECHANICAL)!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player03))then
return false
endif
if(not(GetOwningPlayer(GetKillingUnitBJ())!=udg_player03))then
return false
endif
if(not(IsPlayerInForce(GetOwningPlayer(GetKillingUnitBJ()),udg_force04)==true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetKillingUnitBJ()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetOwningPlayer(GetKillingUnitBJ())!=GetOwningPlayer(GetDyingUnit())))then
return false
endif
return true
endfunction
function vC takes nothing returns boolean
if(not vc())then
return false
endif
return true
endfunction
function vd takes nothing returns boolean
return(udg_boolean05==true)
endfunction
function vD takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(0)))then
return false
endif
return true
endfunction
function ve takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(1)))then
return false
endif
return true
endfunction
function vE takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(2)))then
return false
endif
return true
endfunction
function vf takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(3)))then
return false
endif
return true
endfunction
function vF takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(4)))then
return false
endif
return true
endfunction
function vg takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(5)))then
return false
endif
return true
endfunction
function vG takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(6)))then
return false
endif
return true
endfunction
function vh takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(7)))then
return false
endif
return true
endfunction
function vH takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(8)))then
return false
endif
return true
endfunction
function vi takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(9)))then
return false
endif
return true
endfunction
function vI takes nothing returns boolean
if(not(GetOwningPlayer(GetKillingUnitBJ())==Player(10)))then
return false
endif
return true
endfunction
function vj takes nothing returns nothing
call CameraClearNoiseForPlayer(udg_player04)
call ResetToGameCameraForPlayer(udg_player04,3.00)
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUTIN,5.00,"ReplaceableTextures\\CameraMasks\\DiagonalSlash_mask.blp",0.00,0.00,100.00,0.00)
set udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_integers21[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_reals07[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0.00
set udg_integers22[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_integers19[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_reals06[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0.00
set udg_integers20[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(udg_player04)]+("|cff009707, a human, has been murdered by |r"+udg_strings01[GetConvertedPlayerId(udg_player04)])))
call SetPlayerName(GetOwningPlayer(GetDyingUnit()),udg_strings02[GetConvertedPlayerId(udg_player04)])
call ForceRemovePlayerSimple(udg_player04,udg_force04)
call ForceAddPlayerSimple(udg_player04,udg_force03)
set udg_integer30=(udg_integer30-1)
call CustomVictoryBJ(udg_player04,true,false)
call SetPlayerName(udg_player04,("|cff808080Dead ("+(udg_strings02[GetConvertedPlayerId(udg_player04)]+")|r")))
call PlaySoundBJ(udg_sound48)
call TriggerSleepAction(2)
if(vd())then
call DoNothing()
else
return
endif
if(vD())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cffFF0000-tk red|r"))
call EnableTrigger(udg_trigger185)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger185)
else
call DoNothing()
endif
if(ve())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cff0000FF-tk blue|r"))
call EnableTrigger(udg_trigger186)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger186)
else
call DoNothing()
endif
if(vE())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cff00FFFF-tk teal|r"))
call EnableTrigger(udg_trigger187)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger187)
else
call DoNothing()
endif
if(vf())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cff800080-tk purple|r"))
call EnableTrigger(udg_trigger188)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger188)
else
call DoNothing()
endif
if(vF())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cffFFFF00-tk yellow|r"))
call EnableTrigger(udg_trigger189)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger189)
else
call DoNothing()
endif
if(vg())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cffFF8000-tk orange|r"))
call EnableTrigger(udg_trigger190)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger190)
else
call DoNothing()
endif
if(vG())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cff00FF00-tk green|r"))
call EnableTrigger(udg_trigger191)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger191)
else
call DoNothing()
endif
if(vh())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cffFF80FF-tk pink|r"))
call EnableTrigger(udg_trigger192)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger192)
else
call DoNothing()
endif
if(vH())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cff808080-tk gray|r"))
call EnableTrigger(udg_trigger193)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger193)
else
call DoNothing()
endif
if(vi())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cff8080FF-tk light blue|r"))
call EnableTrigger(udg_trigger194)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger194)
else
call DoNothing()
endif
if(vI())then
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))]+" has murdered an innocent; to send him/her to the prisoner's quarentine, type |cff8080FF-tk dark green|r"))
call EnableTrigger(udg_trigger195)
call TriggerSleepAction(60.00)
call DisableTrigger(udg_trigger195)
else
call DoNothing()
endif
endfunction
function vJ takes nothing returns nothing
set udg_trigger181=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger181,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger181,Condition(function vC))
call TriggerAddAction(udg_trigger181,function vj)
endfunction
function vk takes nothing returns boolean
if(not(GetDyingUnit()==udg_unit01))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetDyingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetPlayerSlotState(GetOwningPlayer(GetDyingUnit()))==PLAYER_SLOT_STATE_PLAYING))then
return false
endif
if(not(IsPlayerInForce(GetOwningPlayer(GetDyingUnit()),udg_force01)!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player02))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_STRUCTURE)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_MECHANICAL)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetDyingUnit())!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player03))then
return false
endif
if(not(GetOwningPlayer(GetKillingUnitBJ())==udg_player03))then
return false
endif
if(not(IsUnitType(GetKillingUnitBJ(),UNIT_TYPE_SAPPER)!=true))then
return false
endif
if(not(IsUnitType(GetKillingUnitBJ(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetKillingUnitBJ()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetOwningPlayer(GetKillingUnitBJ())!=GetOwningPlayer(GetDyingUnit())))then
return false
endif
return true
endfunction
function vK takes nothing returns boolean
if(not vk())then
return false
endif
return true
endfunction
function vl takes nothing returns nothing
call AddSpecialEffectLocBJ(GetUnitLoc(GetEnumUnit()),"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveUnit(GetEnumUnit())
endfunction
function vL takes nothing returns boolean
if(not(udg_boolean06==false))then
return false
endif
return true
endfunction
function vm takes nothing returns nothing
call PlaySoundBJ(udg_sound50)
call CameraClearNoiseForPlayer(udg_player04)
call ResetToGameCameraForPlayer(udg_player04,3.00)
set udg_integers13[GetConvertedPlayerId(udg_player04)]=0
set udg_integers21[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_reals07[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0.00
set udg_integers22[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_integers19[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
set udg_reals06[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0.00
set udg_integers20[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]=0
call ForceRemovePlayerSimple(udg_player04,udg_force04)
call ForceAddPlayerSimple(udg_player04,udg_force03)
set udg_integer30=(udg_integer30-1)
call SetPlayerName(udg_player04,udg_strings02[GetConvertedPlayerId(udg_player04)])
call CustomVictoryBJ(udg_player04,true,false)
call SetPlayerName(udg_player04,("|cff808080Dead ("+(udg_strings02[GetConvertedPlayerId(udg_player04)]+")|r")))
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUTIN,8.00,"ReplaceableTextures\\CameraMasks\\DiagonalSlash_mask.blp",50.00,0,0,0.00)
if(vL())then
set udg_boolean06=true
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_265")
else
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_167")
call TriggerSleepAction(5.00)
call SetPlayerName(udg_player03,udg_strings02[GetConvertedPlayerId(udg_player03)])
call CustomVictoryBJ(udg_player03,true,false)
call SetPlayerName(udg_player03,("|cff808080Dead ("+(udg_strings02[GetConvertedPlayerId(udg_player03)]+")|r")))
call ForGroupBJ(GetUnitsOfPlayerAll(udg_player03),function vl)
endif
endfunction
function vM takes nothing returns nothing
set udg_trigger182=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger182,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger182,Condition(function vK))
call TriggerAddAction(udg_trigger182,function vm)
endfunction
function vn takes nothing returns boolean
if((IsUnitType(GetKillingUnitBJ(),UNIT_TYPE_ANCIENT)==true))then
return true
endif
if((IsUnitType(GetKillingUnitBJ(),UNIT_TYPE_GIANT)==true))then
return true
endif
if((UnitHasBuffBJ(GetDyingUnit(),'B00B')==true))then
return true
endif
return false
endfunction
function vN takes nothing returns boolean
if(not(GetDyingUnit()==udg_unit01))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetDyingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(GetPlayerSlotState(GetOwningPlayer(GetDyingUnit()))==PLAYER_SLOT_STATE_PLAYING))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_STRUCTURE)!=true))then
return false
endif
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetDyingUnit())!=true))then
return false
endif
if(not(GetOwningPlayer(GetDyingUnit())!=udg_player03))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetDyingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not vn())then
return false
endif
return true
endfunction
function vo takes nothing returns boolean
if(not vN())then
return false
endif
return true
endfunction
function vO takes nothing returns boolean
if(not(udg_integer02=='h00B'))then
return false
endif
return true
endfunction
function vp takes nothing returns boolean
if(not(udg_integer02=='h00D'))then
return false
endif
return true
endfunction
function vP takes nothing returns boolean
if(not(udg_integer02=='h00C'))then
return false
endif
return true
endfunction
function vq takes nothing returns boolean
if(not(udg_integer02=='h00E'))then
return false
endif
return true
endfunction
function vQ takes nothing returns boolean
if(not(udg_integer02=='h00G'))then
return false
endif
return true
endfunction
function vr takes nothing returns boolean
if(not(udg_integer02=='h00H'))then
return false
endif
return true
endfunction
function vR takes nothing returns boolean
if(not(udg_integer02=='h00F'))then
return false
endif
return true
endfunction
function vs takes nothing returns boolean
if(not(udg_integer02=='h00P'))then
return false
endif
return true
endfunction
function vS takes nothing returns boolean
if(not(udg_integer02=='h00K'))then
return false
endif
return true
endfunction
function vt takes nothing returns boolean
if(not(udg_integer02=='h00L'))then
return false
endif
return true
endfunction
function vT takes nothing returns boolean
if(not(udg_integer02=='h00I'))then
return false
endif
return true
endfunction
function vu takes nothing returns boolean
if(not(udg_integer02=='h00N'))then
return false
endif
return true
endfunction
function vU takes nothing returns boolean
if(not(udg_integer02=='h00O'))then
return false
endif
return true
endfunction
function vv takes nothing returns boolean
if(not(udg_integer02=='h00M'))then
return false
endif
return true
endfunction
function vV takes nothing returns boolean
if(not(udg_integer02=='h00J'))then
return false
endif
return true
endfunction
function vw takes nothing returns boolean
if(not(udg_integer02=='h01C'))then
return false
endif
return true
endfunction
function vW takes nothing returns boolean
if(not(udg_integer02=='h02E'))then
return false
endif
return true
endfunction
function vx takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02G')
endfunction
function vX takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_force01)>=1))then
return false
endif
if(not(CountUnitsInGroup(udg_group02)==0))then
return false
endif
return true
endfunction
function vy takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02H')
endfunction
function vY takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_force01)>=2))then
return false
endif
if(not(CountUnitsInGroup(udg_group02)==0))then
return false
endif
return true
endfunction
function vz takes nothing returns nothing
call SetUnitColor(GetDyingUnit(),ConvertPlayerColor(12))
call CameraClearNoiseForPlayer(udg_player04)
call ResetToGameCameraForPlayer(udg_player04,3.00)
set udg_integers13[GetConvertedPlayerId(udg_player04)]=0
set udg_force02=GetForceOfPlayer(udg_player02)
call DisplayTextToForce(udg_force02,"TRIGSTR_1807")
call DestroyForce(udg_force02)
set udg_force02=GetForceOfPlayer(udg_player04)
call DisplayTextToForce(udg_force02,"TRIGSTR_1808")
call DestroyForce(udg_force02)
call ForceRemovePlayerSimple(udg_player04,udg_force04)
call ForceAddPlayerSimple(udg_player04,udg_force01)
set udg_integer30=(udg_integer30-1)
call SetPlayerAllianceStateBJ(udg_player04,Player(11),bj_ALLIANCE_ALLIED)
call SetPlayerAllianceStateBJ(Player(11),udg_player04,bj_ALLIANCE_ALLIED_VISION)
set udg_location04=GetUnitLoc(GetDyingUnit())
if(vO())then
call CreateNUnitsAtLoc(1,'h00Q',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(vp())then
call CreateNUnitsAtLoc(1,'h00R',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(vP())then
call CreateNUnitsAtLoc(1,'h00S',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(vq())then
call CreateNUnitsAtLoc(1,'h00V',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(vQ())then
call CreateNUnitsAtLoc(1,'h00T',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(vr())then
call CreateNUnitsAtLoc(1,'h00U',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(vR())then
call CreateNUnitsAtLoc(1,'h00W',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(vs())then
call CreateNUnitsAtLoc(1,'h010',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(vS())then
call CreateNUnitsAtLoc(1,'h013',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(vt())then
call CreateNUnitsAtLoc(1,'h014',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(vT())then
call CreateNUnitsAtLoc(1,'h011',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(vu())then
call CreateNUnitsAtLoc(1,'h00X',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(vU())then
call CreateNUnitsAtLoc(1,'h00Z',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(vv())then
call CreateNUnitsAtLoc(1,'h00Y',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(vV())then
call CreateNUnitsAtLoc(1,'h012',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(vw())then
call CreateNUnitsAtLoc(1,'h01D',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),ConvertPlayerColor(12))
else
call DoNothing()
endif
if(vW())then
call CreateNUnitsAtLoc(1,'h02F',udg_player04,udg_location04,bj_UNIT_FACING)
call SetUnitColor(GetLastCreatedUnit(),PLAYER_COLOR_YELLOW)
else
call DoNothing()
endif
call RemoveLocation(udg_location04)
call SetPlayerTechResearchedSwap('Reuv',1,GetOwningPlayer(GetLastCreatedUnit()))
call ForceAddPlayerSimple(GetOwningPlayer(GetLastCreatedUnit()),udg_force01)
call SelectUnitAddForPlayer(GetLastCreatedUnit(),GetOwningPlayer(GetLastCreatedUnit()))
set udg_group02=GetUnitsInRectMatching(udg_rect58,Condition(function vx))
if(vX())then
set udg_location04=GetRandomLocInRect(udg_rect58)
call CreateNUnitsAtLoc(1,'h02G',udg_player02,udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
else
call DoNothing()
endif
call DestroyGroup(udg_group02)
set udg_group02=GetUnitsInRectMatching(udg_rect58,Condition(function vy))
if(vY())then
set udg_location04=GetRandomLocInRect(udg_rect58)
call CreateNUnitsAtLoc(1,'h02H',udg_player02,udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
else
call DoNothing()
endif
call DestroyGroup(udg_group02)
endfunction
function vZ takes nothing returns nothing
set udg_trigger183=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger183,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger183,Condition(function vo))
call TriggerAddAction(udg_trigger183,function vz)
endfunction
function v0 takes nothing returns boolean
if(not(GetItemTypeId(GetSoldItem())=='I01B'))then
return false
endif
return true
endfunction
function v1 takes nothing returns boolean
if(not(UnitHasItemOfTypeBJ(GetBuyingUnit(),'I009')==true))then
return false
endif
return true
endfunction
function v2 takes nothing returns boolean
if(not(UnitHasItemOfTypeBJ(GetBuyingUnit(),'I009')==true))then
return false
endif
return true
endfunction
function v3 takes nothing returns boolean
if(not(udg_boolean05==true))then
return false
endif
return true
endfunction
function v4 takes nothing returns nothing
if(v3())then
if(v2())then
call TriggerSleepAction(0.10)
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2376")
set udg_boolean05=false
else
call DoNothing()
endif
else
if(v1())then
call TriggerSleepAction(0.10)
call PlaySoundBJ(udg_sound55)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2375")
set udg_boolean05=true
else
call DoNothing()
endif
endif
endfunction
function v5 takes nothing returns nothing
set udg_trigger184=CreateTrigger()
call TriggerRegisterUnitEvent(udg_trigger184,udg_unit21,EVENT_UNIT_SELL_ITEM)
call TriggerRegisterUnitEvent(udg_trigger184,udg_unit45,EVENT_UNIT_SELL_ITEM)
call TriggerAddCondition(udg_trigger184,Condition(function v0))
call TriggerAddAction(udg_trigger184,function v4)
endfunction
function v6 takes nothing returns boolean
if(not(udg_boolean05==true))then
return false
endif
if(not(IsPlayerInForce(GetTriggerPlayer(),udg_forces01[1])!=true))then
return false
endif
return true
endfunction
function v7 takes nothing returns boolean
if(not v6())then
return false
endif
return true
endfunction
function v8 takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function v9 takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function Va takes nothing returns boolean
return GetBooleanAnd(v8(),v9())
endfunction
function VA takes nothing returns nothing
call ForceRemovePlayerSimple(GetEnumPlayer(),udg_forces01[1])
endfunction
function Vb takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function VB takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function Vc takes nothing returns boolean
return GetBooleanAnd(Vb(),VB())
endfunction
function VC takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_forces01[1])==(CountPlayersInForceBJ(GetPlayersMatching(Condition(function Vc)))/2)))then
return false
endif
return true
endfunction
function Vd takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function VD takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Ve takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function VE takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Vf takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function VF takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Vg takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function VG takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Vh takes nothing returns nothing
call ForceAddPlayerSimple(GetTriggerPlayer(),udg_forces01[1])
call TriggerSleepAction(0.01)
if(VC())then
call ForForce(udg_forces01[1],function VA)
else
call DisplayTextToForce(GetPlayersAll(),(I2S(((CountPlayersInForceBJ(GetPlayersMatching(Condition(function Va)))/2)-CountPlayersInForceBJ(udg_forces01[1])))+" more votes needed."))
return
endif
call DisableTrigger(GetTriggeringTrigger())
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function Vd))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function VD))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[1]+" has been sent to the prisoner's quarentine."))
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitRemoveItemFromSlotSwapped(GetForLoopIndexA(),GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function Ve))))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function VE)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function Vf))),GetRandomLocInRect(udg_rect165))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function VF))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function Vg))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(0),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function VG)))),0)
call EnableTrigger(udg_trigger196)
endfunction
function VH takes nothing returns nothing
set udg_trigger185=CreateTrigger()
call DisableTrigger(udg_trigger185)
call TriggerRegisterPlayerChatEvent(udg_trigger185,Player(1),"-tk red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger185,Player(2),"-tk red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger185,Player(3),"-tk red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger185,Player(4),"-tk red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger185,Player(5),"-tk red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger185,Player(6),"-tk red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger185,Player(7),"-tk red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger185,Player(8),"-tk red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger185,Player(9),"-tk red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger185,Player(10),"-tk red",true)
call TriggerAddCondition(udg_trigger185,Condition(function v7))
call TriggerAddAction(udg_trigger185,function Vh)
endfunction
function Vi takes nothing returns boolean
if(not(udg_boolean05==true))then
return false
endif
if(not(IsPlayerInForce(GetTriggerPlayer(),udg_forces01[2])!=true))then
return false
endif
return true
endfunction
function VI takes nothing returns boolean
if(not Vi())then
return false
endif
return true
endfunction
function Vj takes nothing returns nothing
call ForceRemovePlayerSimple(GetEnumPlayer(),udg_forces01[2])
endfunction
function VJ takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function Vk takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function VK takes nothing returns boolean
return GetBooleanAnd(VJ(),Vk())
endfunction
function Vl takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function VL takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function Vm takes nothing returns boolean
return GetBooleanAnd(Vl(),VL())
endfunction
function VM takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_forces01[2])==(CountPlayersInForceBJ(GetPlayersMatching(Condition(function Vm)))/2)))then
return false
endif
return true
endfunction
function Vn takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function VN takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Vo takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function VO takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Vp takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function VP takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Vq takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function VQ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Vr takes nothing returns nothing
call ForceAddPlayerSimple(GetTriggerPlayer(),udg_forces01[2])
call TriggerSleepAction(0.01)
if(VM())then
call ForForce(udg_forces01[2],function Vj)
else
call DisplayTextToForce(GetPlayersAll(),(I2S(((CountPlayersInForceBJ(GetPlayersMatching(Condition(function VK)))/2)-CountPlayersInForceBJ(udg_forces01[2])))+" more votes needed."))
return
endif
call DisableTrigger(GetTriggeringTrigger())
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function Vn))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function VN))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[2]+" has been sent to the prisoner's quarentine."))
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitRemoveItemFromSlotSwapped(GetForLoopIndexA(),GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function Vo))))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function VO)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function Vp))),GetRandomLocInRect(udg_rect165))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function VP))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function Vq))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(1),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function VQ)))),0)
call EnableTrigger(udg_trigger197)
endfunction
function VR takes nothing returns nothing
set udg_trigger186=CreateTrigger()
call DisableTrigger(udg_trigger186)
call TriggerRegisterPlayerChatEvent(udg_trigger186,Player(0),"-tk blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger186,Player(2),"-tk blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger186,Player(3),"-tk blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger186,Player(4),"-tk blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger186,Player(5),"-tk blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger186,Player(6),"-tk blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger186,Player(7),"-tk blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger186,Player(8),"-tk blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger186,Player(9),"-tk blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger186,Player(10),"-tk blue",true)
call TriggerAddCondition(udg_trigger186,Condition(function VI))
call TriggerAddAction(udg_trigger186,function Vr)
endfunction
function Vs takes nothing returns boolean
if(not(udg_boolean05==true))then
return false
endif
if(not(IsPlayerInForce(GetTriggerPlayer(),udg_forces01[3])!=true))then
return false
endif
return true
endfunction
function VS takes nothing returns boolean
if(not Vs())then
return false
endif
return true
endfunction
function Vt takes nothing returns nothing
call ForceRemovePlayerSimple(GetEnumPlayer(),udg_forces01[3])
endfunction
function VT takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function Vu takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function VU takes nothing returns boolean
return GetBooleanAnd(VT(),Vu())
endfunction
function Vv takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function VV takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function Vw takes nothing returns boolean
return GetBooleanAnd(Vv(),VV())
endfunction
function VW takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_forces01[3])==(CountPlayersInForceBJ(GetPlayersMatching(Condition(function Vw)))/2)))then
return false
endif
return true
endfunction
function Vx takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function VX takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Vy takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function VY takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Vz takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function VZ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function V0 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function V1 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function V2 takes nothing returns nothing
call ForceAddPlayerSimple(GetTriggerPlayer(),udg_forces01[3])
call TriggerSleepAction(0.01)
if(VW())then
call ForForce(udg_forces01[3],function Vt)
else
call DisplayTextToForce(GetPlayersAll(),(I2S(((CountPlayersInForceBJ(GetPlayersMatching(Condition(function VU)))/2)-CountPlayersInForceBJ(udg_forces01[3])))+" more votes needed."))
return
endif
call DisableTrigger(GetTriggeringTrigger())
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function Vx))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function VX))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[3]+" has been sent to the prisoner's quarentine."))
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitRemoveItemFromSlotSwapped(GetForLoopIndexA(),GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function Vy))))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function VY)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function Vz))),GetRandomLocInRect(udg_rect165))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function VZ))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function V0))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(2),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function V1)))),0)
call EnableTrigger(udg_trigger198)
endfunction
function V3 takes nothing returns nothing
set udg_trigger187=CreateTrigger()
call DisableTrigger(udg_trigger187)
call TriggerRegisterPlayerChatEvent(udg_trigger187,Player(0),"-tk teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger187,Player(1),"-tk teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger187,Player(3),"-tk teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger187,Player(4),"-tk teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger187,Player(5),"-tk teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger187,Player(6),"-tk teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger187,Player(7),"-tk teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger187,Player(8),"-tk teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger187,Player(9),"-tk teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger187,Player(10),"-tk teal",true)
call TriggerAddCondition(udg_trigger187,Condition(function VS))
call TriggerAddAction(udg_trigger187,function V2)
endfunction
function V4 takes nothing returns boolean
if(not(udg_boolean05==true))then
return false
endif
if(not(IsPlayerInForce(GetTriggerPlayer(),udg_forces01[4])!=true))then
return false
endif
return true
endfunction
function V5 takes nothing returns boolean
if(not V4())then
return false
endif
return true
endfunction
function V6 takes nothing returns nothing
call ForceRemovePlayerSimple(GetEnumPlayer(),udg_forces01[4])
endfunction
function V7 takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function V8 takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function V9 takes nothing returns boolean
return GetBooleanAnd(V7(),V8())
endfunction
function wa takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function wA takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function wb takes nothing returns boolean
return GetBooleanAnd(wa(),wA())
endfunction
function wB takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_forces01[4])==(CountPlayersInForceBJ(GetPlayersMatching(Condition(function wb)))/2)))then
return false
endif
return true
endfunction
function wc takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wC takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wd takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wD takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wE takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wf takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wF takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wg takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wG takes nothing returns nothing
call ForceAddPlayerSimple(GetTriggerPlayer(),udg_forces01[4])
call TriggerSleepAction(0.01)
if(wB())then
call ForForce(udg_forces01[4],function V6)
else
call DisplayTextToForce(GetPlayersAll(),(I2S(((CountPlayersInForceBJ(GetPlayersMatching(Condition(function V9)))/2)-CountPlayersInForceBJ(udg_forces01[4])))+" more votes needed."))
return
endif
call DisableTrigger(GetTriggeringTrigger())
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function wc))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function wC))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[4]+" has been sent to the prisoner's quarentine."))
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitRemoveItemFromSlotSwapped(GetForLoopIndexA(),GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function wd))))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function wD)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function wE))),GetRandomLocInRect(udg_rect165))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function wf))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function wF))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(3),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function wg)))),0)
call EnableTrigger(udg_trigger199)
endfunction
function wh takes nothing returns nothing
set udg_trigger188=CreateTrigger()
call DisableTrigger(udg_trigger188)
call TriggerRegisterPlayerChatEvent(udg_trigger188,Player(0),"-tk purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger188,Player(1),"-tk purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger188,Player(2),"-tk purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger188,Player(4),"-tk purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger188,Player(5),"-tk purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger188,Player(6),"-tk purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger188,Player(7),"-tk purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger188,Player(8),"-tk purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger188,Player(9),"-tk purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger188,Player(10),"-tk purple",true)
call TriggerAddCondition(udg_trigger188,Condition(function V5))
call TriggerAddAction(udg_trigger188,function wG)
endfunction
function wH takes nothing returns boolean
if(not(udg_boolean05==true))then
return false
endif
if(not(IsPlayerInForce(GetTriggerPlayer(),udg_forces01[5])!=true))then
return false
endif
return true
endfunction
function wi takes nothing returns boolean
if(not wH())then
return false
endif
return true
endfunction
function wI takes nothing returns nothing
call ForceRemovePlayerSimple(GetEnumPlayer(),udg_forces01[5])
endfunction
function wj takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function wJ takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function wk takes nothing returns boolean
return GetBooleanAnd(wj(),wJ())
endfunction
function wK takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function wl takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function wL takes nothing returns boolean
return GetBooleanAnd(wK(),wl())
endfunction
function wm takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_forces01[5])==(CountPlayersInForceBJ(GetPlayersMatching(Condition(function wL)))/2)))then
return false
endif
return true
endfunction
function wM takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wn takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wN takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wo takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wO takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wp takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wP takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wq takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wQ takes nothing returns nothing
call ForceAddPlayerSimple(GetTriggerPlayer(),udg_forces01[5])
call TriggerSleepAction(0.01)
if(wm())then
call ForForce(udg_forces01[5],function wI)
else
call DisplayTextToForce(GetPlayersAll(),(I2S(((CountPlayersInForceBJ(GetPlayersMatching(Condition(function wk)))/2)-CountPlayersInForceBJ(udg_forces01[5])))+" more votes needed."))
return
endif
call DisableTrigger(GetTriggeringTrigger())
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function wM))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function wn))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[5]+" has been sent to the prisoner's quarentine."))
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitRemoveItemFromSlotSwapped(GetForLoopIndexA(),GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function wN))))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function wo)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function wO))),GetRandomLocInRect(udg_rect165))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function wp))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function wP))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(4),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function wq)))),0)
call EnableTrigger(udg_trigger200)
endfunction
function wr takes nothing returns nothing
set udg_trigger189=CreateTrigger()
call DisableTrigger(udg_trigger189)
call TriggerRegisterPlayerChatEvent(udg_trigger189,Player(0),"-tk yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger189,Player(1),"-tk yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger189,Player(2),"-tk yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger189,Player(3),"-tk yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger189,Player(5),"-tk yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger189,Player(6),"-tk yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger189,Player(7),"-tk yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger189,Player(8),"-tk yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger189,Player(9),"-tk yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger189,Player(10),"-tk yellow",true)
call TriggerAddCondition(udg_trigger189,Condition(function wi))
call TriggerAddAction(udg_trigger189,function wQ)
endfunction
function wR takes nothing returns boolean
if(not(udg_boolean05==true))then
return false
endif
if(not(IsPlayerInForce(GetTriggerPlayer(),udg_forces01[6])!=true))then
return false
endif
return true
endfunction
function ws takes nothing returns boolean
if(not wR())then
return false
endif
return true
endfunction
function wS takes nothing returns nothing
call ForceRemovePlayerSimple(GetEnumPlayer(),udg_forces01[6])
endfunction
function wt takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function wT takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function wu takes nothing returns boolean
return GetBooleanAnd(wt(),wT())
endfunction
function wU takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function wv takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function wV takes nothing returns boolean
return GetBooleanAnd(wU(),wv())
endfunction
function ww takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_forces01[6])==(CountPlayersInForceBJ(GetPlayersMatching(Condition(function wV)))/2)))then
return false
endif
return true
endfunction
function wW takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wx takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wX takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wy takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wY takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wz takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function wZ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function w0 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function w1 takes nothing returns nothing
call ForceAddPlayerSimple(GetTriggerPlayer(),udg_forces01[6])
call TriggerSleepAction(0.01)
if(ww())then
call ForForce(udg_forces01[6],function wS)
else
call DisplayTextToForce(GetPlayersAll(),(I2S(((CountPlayersInForceBJ(GetPlayersMatching(Condition(function wu)))/2)-CountPlayersInForceBJ(udg_forces01[6])))+" more votes needed."))
return
endif
call DisableTrigger(GetTriggeringTrigger())
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function wW))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function wx))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[6]+" has been sent to the prisoner's quarentine."))
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitRemoveItemFromSlotSwapped(GetForLoopIndexA(),GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function wX))))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function wy)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function wY))),GetRandomLocInRect(udg_rect165))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function wz))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function wZ))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(5),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function w0)))),0)
call EnableTrigger(udg_trigger201)
endfunction
function w2 takes nothing returns nothing
set udg_trigger190=CreateTrigger()
call DisableTrigger(udg_trigger190)
call TriggerRegisterPlayerChatEvent(udg_trigger190,Player(0),"-tk orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger190,Player(1),"-tk orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger190,Player(2),"-tk orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger190,Player(3),"-tk orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger190,Player(4),"-tk orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger190,Player(6),"-tk orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger190,Player(7),"-tk orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger190,Player(8),"-tk orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger190,Player(9),"-tk orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger190,Player(10),"-tk orange",true)
call TriggerAddCondition(udg_trigger190,Condition(function ws))
call TriggerAddAction(udg_trigger190,function w1)
endfunction
function w3 takes nothing returns boolean
if(not(udg_boolean05==true))then
return false
endif
if(not(IsPlayerInForce(GetTriggerPlayer(),udg_forces01[7])!=true))then
return false
endif
return true
endfunction
function w4 takes nothing returns boolean
if(not w3())then
return false
endif
return true
endfunction
function w5 takes nothing returns nothing
call ForceRemovePlayerSimple(GetEnumPlayer(),udg_forces01[7])
endfunction
function w6 takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function w7 takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function w8 takes nothing returns boolean
return GetBooleanAnd(w6(),w7())
endfunction
function w9 takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function Wa takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function WA takes nothing returns boolean
return GetBooleanAnd(w9(),Wa())
endfunction
function Wb takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_forces01[7])==(CountPlayersInForceBJ(GetPlayersMatching(Condition(function WA)))/2)))then
return false
endif
return true
endfunction
function WB takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Wc takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function WC takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Wd takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function WD takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function We takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function WE takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Wf takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function WF takes nothing returns nothing
call ForceAddPlayerSimple(GetTriggerPlayer(),udg_forces01[7])
call TriggerSleepAction(0.01)
if(Wb())then
call ForForce(udg_forces01[7],function w5)
else
call DisplayTextToForce(GetPlayersAll(),(I2S(((CountPlayersInForceBJ(GetPlayersMatching(Condition(function w8)))/2)-CountPlayersInForceBJ(udg_forces01[7])))+" more votes needed."))
return
endif
call DisableTrigger(GetTriggeringTrigger())
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function WB))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function Wc))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[7]+" has been sent to the prisoner's quarentine."))
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitRemoveItemFromSlotSwapped(GetForLoopIndexA(),GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function WC))))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function Wd)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function WD))),GetRandomLocInRect(udg_rect165))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function We))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function WE))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(6),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function Wf)))),0)
call EnableTrigger(udg_trigger202)
endfunction
function Wg takes nothing returns nothing
set udg_trigger191=CreateTrigger()
call DisableTrigger(udg_trigger191)
call TriggerRegisterPlayerChatEvent(udg_trigger191,Player(0),"-tk green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger191,Player(1),"-tk green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger191,Player(2),"-tk green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger191,Player(3),"-tk green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger191,Player(4),"-tk green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger191,Player(5),"-tk green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger191,Player(7),"-tk green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger191,Player(8),"-tk green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger191,Player(9),"-tk green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger191,Player(10),"-tk green",true)
call TriggerAddCondition(udg_trigger191,Condition(function w4))
call TriggerAddAction(udg_trigger191,function WF)
endfunction
function WG takes nothing returns boolean
if(not(udg_boolean05==true))then
return false
endif
if(not(IsPlayerInForce(GetTriggerPlayer(),udg_forces01[8])!=true))then
return false
endif
return true
endfunction
function Wh takes nothing returns boolean
if(not WG())then
return false
endif
return true
endfunction
function WH takes nothing returns nothing
call ForceRemovePlayerSimple(GetEnumPlayer(),udg_forces01[8])
endfunction
function Wi takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function WI takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function Wj takes nothing returns boolean
return GetBooleanAnd(Wi(),WI())
endfunction
function WJ takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function Wk takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function WK takes nothing returns boolean
return GetBooleanAnd(WJ(),Wk())
endfunction
function Wl takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_forces01[8])==(CountPlayersInForceBJ(GetPlayersMatching(Condition(function WK)))/2)))then
return false
endif
return true
endfunction
function WL takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Wm takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function WM takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Wn takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function WN takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Wo takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function WO takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Wp takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function WP takes nothing returns nothing
call ForceAddPlayerSimple(GetTriggerPlayer(),udg_forces01[8])
call TriggerSleepAction(0.01)
if(Wl())then
call ForForce(udg_forces01[8],function WH)
else
call DisplayTextToForce(GetPlayersAll(),(I2S(((CountPlayersInForceBJ(GetPlayersMatching(Condition(function Wj)))/2)-CountPlayersInForceBJ(udg_forces01[8])))+" more votes needed."))
return
endif
call DisableTrigger(GetTriggeringTrigger())
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function WL))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function Wm))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[8]+" has been sent to the prisoner's quarentine."))
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitRemoveItemFromSlotSwapped(GetForLoopIndexA(),GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function WM))))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function Wn)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function WN))),GetRandomLocInRect(udg_rect165))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function Wo))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function WO))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(7),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function Wp)))),0)
call EnableTrigger(udg_trigger203)
endfunction
function Wq takes nothing returns nothing
set udg_trigger192=CreateTrigger()
call DisableTrigger(udg_trigger192)
call TriggerRegisterPlayerChatEvent(udg_trigger192,Player(0),"-tk pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger192,Player(1),"-tk pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger192,Player(2),"-tk pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger192,Player(3),"-tk pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger192,Player(4),"-tk pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger192,Player(5),"-tk pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger192,Player(6),"-tk pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger192,Player(8),"-tk pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger192,Player(9),"-tk pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger192,Player(10),"-tk pink",true)
call TriggerAddCondition(udg_trigger192,Condition(function Wh))
call TriggerAddAction(udg_trigger192,function WP)
endfunction
function WQ takes nothing returns boolean
if(not(udg_boolean05==true))then
return false
endif
if(not(IsPlayerInForce(GetTriggerPlayer(),udg_forces01[9])!=true))then
return false
endif
return true
endfunction
function Wr takes nothing returns boolean
if(not WQ())then
return false
endif
return true
endfunction
function WR takes nothing returns nothing
call ForceRemovePlayerSimple(GetEnumPlayer(),udg_forces01[9])
endfunction
function Ws takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function WS takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function Wt takes nothing returns boolean
return GetBooleanAnd(Ws(),WS())
endfunction
function WT takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function Wu takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function WU takes nothing returns boolean
return GetBooleanAnd(WT(),Wu())
endfunction
function Wv takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_forces01[9])==(CountPlayersInForceBJ(GetPlayersMatching(Condition(function WU)))/2)))then
return false
endif
return true
endfunction
function WV takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Ww takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function WW takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Wx takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function WX takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Wy takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function WY takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Wz takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function WZ takes nothing returns nothing
call ForceAddPlayerSimple(GetTriggerPlayer(),udg_forces01[9])
call TriggerSleepAction(0.01)
if(Wv())then
call ForForce(udg_forces01[9],function WR)
else
call DisplayTextToForce(GetPlayersAll(),(I2S(((CountPlayersInForceBJ(GetPlayersMatching(Condition(function Wt)))/2)-CountPlayersInForceBJ(udg_forces01[9])))+" more votes needed."))
return
endif
call DisableTrigger(GetTriggeringTrigger())
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function WV))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function Ww))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[9]+" has been sent to the prisoner's quarentine."))
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitRemoveItemFromSlotSwapped(GetForLoopIndexA(),GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function WW))))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function Wx)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function WX))),GetRandomLocInRect(udg_rect165))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function Wy))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function WY))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(8),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function Wz)))),0)
call EnableTrigger(udg_trigger204)
endfunction
function W0 takes nothing returns nothing
set udg_trigger193=CreateTrigger()
call DisableTrigger(udg_trigger193)
call TriggerRegisterPlayerChatEvent(udg_trigger193,Player(0),"-tk gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger193,Player(1),"-tk gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger193,Player(2),"-tk gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger193,Player(3),"-tk gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger193,Player(4),"-tk gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger193,Player(5),"-tk gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger193,Player(6),"-tk gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger193,Player(7),"-tk gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger193,Player(9),"-tk gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger193,Player(10),"-tk gray",true)
call TriggerAddCondition(udg_trigger193,Condition(function Wr))
call TriggerAddAction(udg_trigger193,function WZ)
endfunction
function W1 takes nothing returns boolean
if(not(udg_boolean05==true))then
return false
endif
if(not(IsPlayerInForce(GetTriggerPlayer(),udg_forces01[10])!=true))then
return false
endif
return true
endfunction
function W2 takes nothing returns boolean
if(not W1())then
return false
endif
return true
endfunction
function W3 takes nothing returns nothing
call ForceRemovePlayerSimple(GetEnumPlayer(),udg_forces01[10])
endfunction
function W4 takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function W5 takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function W6 takes nothing returns boolean
return GetBooleanAnd(W4(),W5())
endfunction
function W7 takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function W8 takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function W9 takes nothing returns boolean
return GetBooleanAnd(W7(),W8())
endfunction
function xa takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_forces01[10])==(CountPlayersInForceBJ(GetPlayersMatching(Condition(function W9)))/2)))then
return false
endif
return true
endfunction
function xA takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xb takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xB takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xc takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xC takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xd takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xD takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xe takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xE takes nothing returns nothing
call ForceAddPlayerSimple(GetTriggerPlayer(),udg_forces01[10])
call TriggerSleepAction(0.01)
if(xa())then
call ForForce(udg_forces01[10],function W3)
else
call DisplayTextToForce(GetPlayersAll(),(I2S(((CountPlayersInForceBJ(GetPlayersMatching(Condition(function W6)))/2)-CountPlayersInForceBJ(udg_forces01[10])))+" more votes needed."))
return
endif
call DisableTrigger(GetTriggeringTrigger())
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function xA))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function xb))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[10]+" has been sent to the prisoner's quarentine."))
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitRemoveItemFromSlotSwapped(GetForLoopIndexA(),GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function xB))))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function xc)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function xC))),GetRandomLocInRect(udg_rect165))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function xd))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function xD))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(9),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function xe)))),0)
call EnableTrigger(udg_trigger205)
endfunction
function xf takes nothing returns nothing
set udg_trigger194=CreateTrigger()
call DisableTrigger(udg_trigger194)
call TriggerRegisterPlayerChatEvent(udg_trigger194,Player(0),"-tk light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger194,Player(1),"-tk light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger194,Player(2),"-tk light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger194,Player(3),"-tk light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger194,Player(4),"-tk light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger194,Player(5),"-tk light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger194,Player(6),"-tk light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger194,Player(7),"-tk light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger194,Player(8),"-tk light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger194,Player(10),"-tk light blue",true)
call TriggerAddCondition(udg_trigger194,Condition(function W2))
call TriggerAddAction(udg_trigger194,function xE)
endfunction
function xF takes nothing returns boolean
if(not(udg_boolean05==true))then
return false
endif
if(not(IsPlayerInForce(GetTriggerPlayer(),udg_forces01[11])!=true))then
return false
endif
return true
endfunction
function xg takes nothing returns boolean
if(not xF())then
return false
endif
return true
endfunction
function xG takes nothing returns nothing
call ForceRemovePlayerSimple(GetEnumPlayer(),udg_forces01[11])
endfunction
function xh takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function xH takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function xi takes nothing returns boolean
return GetBooleanAnd(xh(),xH())
endfunction
function xI takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function xj takes nothing returns boolean
return(GetPlayerSlotState(GetFilterPlayer())==PLAYER_SLOT_STATE_PLAYING)
endfunction
function xJ takes nothing returns boolean
return GetBooleanAnd(xI(),xj())
endfunction
function xk takes nothing returns boolean
if(not(CountPlayersInForceBJ(udg_forces01[11])==(CountPlayersInForceBJ(GetPlayersMatching(Condition(function xJ)))/2)))then
return false
endif
return true
endfunction
function xK takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xl takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xL takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xm takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xM takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xn takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xN takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xo takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xO takes nothing returns nothing
call ForceAddPlayerSimple(GetTriggerPlayer(),udg_forces01[11])
call TriggerSleepAction(0.01)
if(xk())then
call ForForce(udg_forces01[11],function xG)
else
call DisplayTextToForce(GetPlayersAll(),(I2S(((CountPlayersInForceBJ(GetPlayersMatching(Condition(function xi)))/2)-CountPlayersInForceBJ(udg_forces01[11])))+" more votes needed."))
return
endif
call DisableTrigger(GetTriggeringTrigger())
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function xK))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function xl))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[11]+" has been sent to the prisoner's quarentine."))
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitRemoveItemFromSlotSwapped(GetForLoopIndexA(),GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function xL))))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function xm)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function xM))),GetRandomLocInRect(udg_rect165))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function xn))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function xN))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(10),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function xo)))),0)
call EnableTrigger(udg_trigger206)
endfunction
function xp takes nothing returns nothing
set udg_trigger195=CreateTrigger()
call DisableTrigger(udg_trigger195)
call TriggerRegisterPlayerChatEvent(udg_trigger195,Player(0),"-tk dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger195,Player(1),"-tk dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger195,Player(2),"-tk dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger195,Player(3),"-tk dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger195,Player(4),"-tk dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger195,Player(5),"-tk dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger195,Player(6),"-tk dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger195,Player(7),"-tk dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger195,Player(8),"-tk dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger195,Player(9),"-tk dark green",true)
call TriggerAddCondition(udg_trigger195,Condition(function xg))
call TriggerAddAction(udg_trigger195,function xO)
endfunction
function xP takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xq takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function xQ takes nothing returns boolean
return GetBooleanOr(xP(),xq())
endfunction
function xr takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xR takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function xs takes nothing returns boolean
return GetBooleanOr(xr(),xR())
endfunction
function xS takes nothing returns boolean
if(not(RectContainsUnit(udg_rect171,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function xQ))))==true))then
return false
endif
if(not(UnitHasItemOfTypeBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function xs))),'I009')==true))then
return false
endif
if(not(IsUnitAliveBJ(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(0))))==true))then
return false
endif
return true
endfunction
function xt takes nothing returns boolean
if(not xS())then
return false
endif
return true
endfunction
function xT takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xu takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xU takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xv takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call PlaySoundBJ(udg_sound55)
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(0))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(0))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[1]+" has been released from the prisoner's quarentine."))
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(0)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(0))),GetRandomLocInRect(udg_rect172))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function xT))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function xu))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(0),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(0),Condition(function xU)))),0)
endfunction
function xV takes nothing returns nothing
set udg_trigger196=CreateTrigger()
call DisableTrigger(udg_trigger196)
call TriggerRegisterPlayerChatEvent(udg_trigger196,Player(1),"-release red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger196,Player(2),"-release red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger196,Player(3),"-release red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger196,Player(4),"-release red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger196,Player(5),"-release red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger196,Player(6),"-release red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger196,Player(7),"-release red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger196,Player(8),"-release red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger196,Player(9),"-release red",true)
call TriggerRegisterPlayerChatEvent(udg_trigger196,Player(10),"-release red",true)
call TriggerAddCondition(udg_trigger196,Condition(function xt))
call TriggerAddAction(udg_trigger196,function xv)
endfunction
function xw takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xW takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function xx takes nothing returns boolean
return GetBooleanOr(xw(),xW())
endfunction
function xX takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function xy takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function xY takes nothing returns boolean
return GetBooleanOr(xX(),xy())
endfunction
function xz takes nothing returns boolean
if(not(RectContainsUnit(udg_rect171,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function xx))))==true))then
return false
endif
if(not(UnitHasItemOfTypeBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function xY))),'I009')==true))then
return false
endif
if(not(IsUnitAliveBJ(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(1))))==true))then
return false
endif
return true
endfunction
function xZ takes nothing returns boolean
if(not xz())then
return false
endif
return true
endfunction
function x0 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function x1 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function x2 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function x3 takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call PlaySoundBJ(udg_sound55)
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(1))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(1))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[2]+" has been released from the prisoner's quarentine."))
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(1)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(1))),GetRandomLocInRect(udg_rect172))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function x0))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function x1))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(1),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(1),Condition(function x2)))),0)
endfunction
function x4 takes nothing returns nothing
set udg_trigger197=CreateTrigger()
call DisableTrigger(udg_trigger197)
call TriggerRegisterPlayerChatEvent(udg_trigger197,Player(0),"-release blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger197,Player(2),"-release blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger197,Player(3),"-release blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger197,Player(4),"-release blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger197,Player(5),"-release blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger197,Player(6),"-release blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger197,Player(7),"-release blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger197,Player(8),"-release blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger197,Player(9),"-release blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger197,Player(10),"-release blue",true)
call TriggerAddCondition(udg_trigger197,Condition(function xZ))
call TriggerAddAction(udg_trigger197,function x3)
endfunction
function x5 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function x6 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function x7 takes nothing returns boolean
return GetBooleanOr(x5(),x6())
endfunction
function x8 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function x9 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function Xa takes nothing returns boolean
return GetBooleanOr(x8(),x9())
endfunction
function XA takes nothing returns boolean
if(not(RectContainsUnit(udg_rect171,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function x7))))==true))then
return false
endif
if(not(UnitHasItemOfTypeBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function Xa))),'I009')==true))then
return false
endif
if(not(IsUnitAliveBJ(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(2))))==true))then
return false
endif
return true
endfunction
function Xb takes nothing returns boolean
if(not XA())then
return false
endif
return true
endfunction
function XB takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Xc takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function XC takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Xd takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call PlaySoundBJ(udg_sound55)
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(2))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(2))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[3]+" has been released from the prisoner's quarentine."))
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(2)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(2))),GetRandomLocInRect(udg_rect172))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function XB))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function Xc))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(2),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(2),Condition(function XC)))),0)
endfunction
function XD takes nothing returns nothing
set udg_trigger198=CreateTrigger()
call DisableTrigger(udg_trigger198)
call TriggerRegisterPlayerChatEvent(udg_trigger198,Player(0),"-release teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger198,Player(1),"-release teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger198,Player(3),"-release teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger198,Player(4),"-release teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger198,Player(5),"-release teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger198,Player(6),"-release teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger198,Player(7),"-release teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger198,Player(8),"-release teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger198,Player(9),"-release teal",true)
call TriggerRegisterPlayerChatEvent(udg_trigger198,Player(10),"-release teal",true)
call TriggerAddCondition(udg_trigger198,Condition(function Xb))
call TriggerAddAction(udg_trigger198,function Xd)
endfunction
function Xe takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function XE takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function Xf takes nothing returns boolean
return GetBooleanOr(Xe(),XE())
endfunction
function XF takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Xg takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function XG takes nothing returns boolean
return GetBooleanOr(XF(),Xg())
endfunction
function Xh takes nothing returns boolean
if(not(RectContainsUnit(udg_rect171,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function Xf))))==true))then
return false
endif
if(not(UnitHasItemOfTypeBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function XG))),'I009')==true))then
return false
endif
if(not(IsUnitAliveBJ(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(3))))==true))then
return false
endif
return true
endfunction
function XH takes nothing returns boolean
if(not Xh())then
return false
endif
return true
endfunction
function Xi takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function XI takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Xj takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function XJ takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call PlaySoundBJ(udg_sound55)
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(3))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(3))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[4]+" has been released from the prisoner's quarentine."))
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(3)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(3))),GetRandomLocInRect(udg_rect172))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function Xi))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function XI))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(3),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(3),Condition(function Xj)))),0)
endfunction
function Xk takes nothing returns nothing
set udg_trigger199=CreateTrigger()
call DisableTrigger(udg_trigger199)
call TriggerRegisterPlayerChatEvent(udg_trigger199,Player(0),"-release purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger199,Player(1),"-release purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger199,Player(2),"-release purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger199,Player(4),"-release purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger199,Player(5),"-release purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger199,Player(6),"-release purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger199,Player(7),"-release purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger199,Player(8),"-release purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger199,Player(9),"-release purple",true)
call TriggerRegisterPlayerChatEvent(udg_trigger199,Player(10),"-release purple",true)
call TriggerAddCondition(udg_trigger199,Condition(function XH))
call TriggerAddAction(udg_trigger199,function XJ)
endfunction
function XK takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Xl takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function XL takes nothing returns boolean
return GetBooleanOr(XK(),Xl())
endfunction
function Xm takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function XM takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function Xn takes nothing returns boolean
return GetBooleanOr(Xm(),XM())
endfunction
function XN takes nothing returns boolean
if(not(RectContainsUnit(udg_rect171,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function XL))))==true))then
return false
endif
if(not(UnitHasItemOfTypeBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function Xn))),'I009')==true))then
return false
endif
if(not(IsUnitAliveBJ(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(4))))==true))then
return false
endif
return true
endfunction
function Xo takes nothing returns boolean
if(not XN())then
return false
endif
return true
endfunction
function XO takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Xp takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function XP takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Xq takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call PlaySoundBJ(udg_sound55)
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(4))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(4))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[5]+" has been released from the prisoner's quarentine."))
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(4)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(4))),GetRandomLocInRect(udg_rect172))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function XO))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function Xp))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(4),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(4),Condition(function XP)))),0)
endfunction
function XQ takes nothing returns nothing
set udg_trigger200=CreateTrigger()
call DisableTrigger(udg_trigger200)
call TriggerRegisterPlayerChatEvent(udg_trigger200,Player(0),"-release yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger200,Player(1),"-release yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger200,Player(2),"-release yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger200,Player(3),"-release yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger200,Player(5),"-release yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger200,Player(6),"-release yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger200,Player(7),"-release yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger200,Player(8),"-release yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger200,Player(9),"-release yellow",true)
call TriggerRegisterPlayerChatEvent(udg_trigger200,Player(10),"-release yellow",true)
call TriggerAddCondition(udg_trigger200,Condition(function Xo))
call TriggerAddAction(udg_trigger200,function Xq)
endfunction
function Xr takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function XR takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function Xs takes nothing returns boolean
return GetBooleanOr(Xr(),XR())
endfunction
function XS takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Xt takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function XT takes nothing returns boolean
return GetBooleanOr(XS(),Xt())
endfunction
function Xu takes nothing returns boolean
if(not(RectContainsUnit(udg_rect171,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function Xs))))==true))then
return false
endif
if(not(UnitHasItemOfTypeBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function XT))),'I009')==true))then
return false
endif
if(not(IsUnitAliveBJ(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(5))))==true))then
return false
endif
return true
endfunction
function XU takes nothing returns boolean
if(not Xu())then
return false
endif
return true
endfunction
function Xv takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function XV takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Xw takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function XW takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call PlaySoundBJ(udg_sound55)
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(5))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(5))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[6]+" has been released from the prisoner's quarentine."))
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(5)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(5))),GetRandomLocInRect(udg_rect172))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function Xv))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function XV))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(5),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(5),Condition(function Xw)))),0)
endfunction
function Xx takes nothing returns nothing
set udg_trigger201=CreateTrigger()
call DisableTrigger(udg_trigger201)
call TriggerRegisterPlayerChatEvent(udg_trigger201,Player(0),"-release orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger201,Player(1),"-release orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger201,Player(2),"-release orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger201,Player(3),"-release orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger201,Player(4),"-release orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger201,Player(6),"-release orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger201,Player(7),"-release orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger201,Player(8),"-release orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger201,Player(9),"-release orange",true)
call TriggerRegisterPlayerChatEvent(udg_trigger201,Player(10),"-release orange",true)
call TriggerAddCondition(udg_trigger201,Condition(function XU))
call TriggerAddAction(udg_trigger201,function XW)
endfunction
function XX takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function Xy takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function XY takes nothing returns boolean
return GetBooleanOr(XX(),Xy())
endfunction
function Xz takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function XZ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function X0 takes nothing returns boolean
return GetBooleanOr(Xz(),XZ())
endfunction
function X1 takes nothing returns boolean
if(not(RectContainsUnit(udg_rect171,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function XY))))==true))then
return false
endif
if(not(UnitHasItemOfTypeBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function X0))),'I009')==true))then
return false
endif
if(not(IsUnitAliveBJ(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(6))))==true))then
return false
endif
return true
endfunction
function X2 takes nothing returns boolean
if(not X1())then
return false
endif
return true
endfunction
function X3 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function X4 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function X5 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function X6 takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call PlaySoundBJ(udg_sound55)
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(6))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(6))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[7]+" has been released from the prisoner's quarentine."))
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(6)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(6))),GetRandomLocInRect(udg_rect172))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function X3))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function X4))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(6),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(6),Condition(function X5)))),0)
endfunction
function X7 takes nothing returns nothing
set udg_trigger202=CreateTrigger()
call DisableTrigger(udg_trigger202)
call TriggerRegisterPlayerChatEvent(udg_trigger202,Player(0),"-release green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger202,Player(1),"-release green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger202,Player(2),"-release green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger202,Player(3),"-release green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger202,Player(4),"-release green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger202,Player(5),"-release green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger202,Player(7),"-release green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger202,Player(8),"-release green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger202,Player(9),"-release green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger202,Player(10),"-release green",true)
call TriggerAddCondition(udg_trigger202,Condition(function X2))
call TriggerAddAction(udg_trigger202,function X6)
endfunction
function X8 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function X9 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function ya takes nothing returns boolean
return GetBooleanOr(X8(),X9())
endfunction
function yA takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yb takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function yB takes nothing returns boolean
return GetBooleanOr(yA(),yb())
endfunction
function yc takes nothing returns boolean
if(not(RectContainsUnit(udg_rect171,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function ya))))==true))then
return false
endif
if(not(UnitHasItemOfTypeBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function yB))),'I009')==true))then
return false
endif
if(not(IsUnitAliveBJ(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(7))))==true))then
return false
endif
return true
endfunction
function yC takes nothing returns boolean
if(not yc())then
return false
endif
return true
endfunction
function yd takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yD takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function ye takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yE takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call PlaySoundBJ(udg_sound55)
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(7))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(7))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[8]+" has been released from the prisoner's quarentine."))
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(7)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(7))),GetRandomLocInRect(udg_rect172))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function yd))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function yD))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(7),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(7),Condition(function ye)))),0)
endfunction
function yf takes nothing returns nothing
set udg_trigger203=CreateTrigger()
call DisableTrigger(udg_trigger203)
call TriggerRegisterPlayerChatEvent(udg_trigger203,Player(0),"-release pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger203,Player(1),"-release pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger203,Player(2),"-release pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger203,Player(3),"-release pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger203,Player(4),"-release pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger203,Player(5),"-release pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger203,Player(6),"-release pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger203,Player(8),"-release pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger203,Player(9),"-release pink",true)
call TriggerRegisterPlayerChatEvent(udg_trigger203,Player(10),"-release pink",true)
call TriggerAddCondition(udg_trigger203,Condition(function yC))
call TriggerAddAction(udg_trigger203,function yE)
endfunction
function yF takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yg takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function yG takes nothing returns boolean
return GetBooleanOr(yF(),yg())
endfunction
function yh takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yH takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function yi takes nothing returns boolean
return GetBooleanOr(yh(),yH())
endfunction
function yI takes nothing returns boolean
if(not(RectContainsUnit(udg_rect171,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function yG))))==true))then
return false
endif
if(not(UnitHasItemOfTypeBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function yi))),'I009')==true))then
return false
endif
if(not(IsUnitAliveBJ(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(8))))==true))then
return false
endif
return true
endfunction
function yj takes nothing returns boolean
if(not yI())then
return false
endif
return true
endfunction
function yJ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yk takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yK takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yl takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call PlaySoundBJ(udg_sound55)
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(8))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(8))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[9]+" has been released from the prisoner's quarentine."))
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(8)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(8))),GetRandomLocInRect(udg_rect172))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function yJ))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function yk))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(8),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(8),Condition(function yK)))),0)
endfunction
function yL takes nothing returns nothing
set udg_trigger204=CreateTrigger()
call DisableTrigger(udg_trigger204)
call TriggerRegisterPlayerChatEvent(udg_trigger204,Player(0),"-release gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger204,Player(1),"-release gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger204,Player(2),"-release gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger204,Player(3),"-release gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger204,Player(4),"-release gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger204,Player(5),"-release gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger204,Player(6),"-release gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger204,Player(7),"-release gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger204,Player(9),"-release gray",true)
call TriggerRegisterPlayerChatEvent(udg_trigger204,Player(10),"-release gray",true)
call TriggerAddCondition(udg_trigger204,Condition(function yj))
call TriggerAddAction(udg_trigger204,function yl)
endfunction
function ym takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yM takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function yn takes nothing returns boolean
return GetBooleanOr(ym(),yM())
endfunction
function yN takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yo takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function yO takes nothing returns boolean
return GetBooleanOr(yN(),yo())
endfunction
function yp takes nothing returns boolean
if(not(RectContainsUnit(udg_rect171,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function yn))))==true))then
return false
endif
if(not(UnitHasItemOfTypeBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function yO))),'I009')==true))then
return false
endif
if(not(IsUnitAliveBJ(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(9))))==true))then
return false
endif
return true
endfunction
function yP takes nothing returns boolean
if(not yp())then
return false
endif
return true
endfunction
function yq takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yQ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yr takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yR takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call PlaySoundBJ(udg_sound55)
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(9))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(9))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[10]+" has been released from the prisoner's quarentine."))
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(9)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(9))),GetRandomLocInRect(udg_rect172))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function yq))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function yQ))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(9),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(9),Condition(function yr)))),0)
endfunction
function ys takes nothing returns nothing
set udg_trigger205=CreateTrigger()
call DisableTrigger(udg_trigger205)
call TriggerRegisterPlayerChatEvent(udg_trigger205,Player(0),"-release light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger205,Player(1),"-release light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger205,Player(2),"-release light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger205,Player(3),"-release light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger205,Player(4),"-release light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger205,Player(5),"-release light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger205,Player(6),"-release light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger205,Player(7),"-release light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger205,Player(8),"-release light blue",true)
call TriggerRegisterPlayerChatEvent(udg_trigger205,Player(10),"-release light blue",true)
call TriggerAddCondition(udg_trigger205,Condition(function yP))
call TriggerAddAction(udg_trigger205,function yR)
endfunction
function yS takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yt takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function yT takes nothing returns boolean
return GetBooleanOr(yS(),yt())
endfunction
function yu takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yU takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function yv takes nothing returns boolean
return GetBooleanOr(yu(),yU())
endfunction
function yV takes nothing returns boolean
if(not(RectContainsUnit(udg_rect171,GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function yT))))==true))then
return false
endif
if(not(UnitHasItemOfTypeBJ(GroupPickRandomUnit(GetUnitsOfPlayerMatching(GetTriggerPlayer(),Condition(function yv))),'I009')==true))then
return false
endif
if(not(IsUnitAliveBJ(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(10))))==true))then
return false
endif
return true
endfunction
function yw takes nothing returns boolean
if(not yV())then
return false
endif
return true
endfunction
function yW takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yx takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yX takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function yy takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call PlaySoundBJ(udg_sound55)
call PauseUnitBJ(true,GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(10))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(10))),true)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[11]+" has been released from the prisoner's quarentine."))
call TriggerSleepAction(2.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(10)))),"Abilities\\Spells\\Human\\MassTeleport\\MassTeleportTarget.mdl")
call SetUnitPositionLoc(GroupPickRandomUnit(GetUnitsInRectOfPlayer(udg_rect53,Player(10))),GetRandomLocInRect(udg_rect172))
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call PauseUnitBJ(false,GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function yW))))
call SetUnitInvulnerable(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function yx))),false)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(Player(10),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerMatching(Player(10),Condition(function yX)))),0)
endfunction
function yY takes nothing returns nothing
set udg_trigger206=CreateTrigger()
call DisableTrigger(udg_trigger206)
call TriggerRegisterPlayerChatEvent(udg_trigger206,Player(0),"-release dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger206,Player(1),"-release dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger206,Player(2),"-release dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger206,Player(3),"-release dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger206,Player(4),"-release dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger206,Player(5),"-release dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger206,Player(6),"-release dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger206,Player(7),"-release dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger206,Player(8),"-release dark green",true)
call TriggerRegisterPlayerChatEvent(udg_trigger206,Player(9),"-release dark green",true)
call TriggerAddCondition(udg_trigger206,Condition(function yw))
call TriggerAddAction(udg_trigger206,function yy)
endfunction
function yz takes nothing returns boolean
if(not(GetTimeOfDay()==12.00))then
return false
endif
if(not(SubStringBJ(GetEventPlayerChatString(),1,1)=="-"))then
return false
endif
return true
endfunction
function yZ takes nothing returns boolean
return(IsItemOwned(GetItemOfTypeFromUnitBJ(GetFilterUnit(),'I009'))==true)
endfunction
function y0 takes nothing returns boolean
return(GetOwningPlayer(GetFilterUnit())==GetTriggerPlayer())
endfunction
function y1 takes nothing returns boolean
if(not(CountUnitsInGroup(udg_group02)>0))then
return false
endif
if(not(CountUnitsInGroup(udg_group03)>0))then
return false
endif
return true
endfunction
function y2 takes nothing returns boolean
if(not y1())then
return false
endif
return true
endfunction
function y3 takes nothing returns boolean
if((SubStringBJ(GetEventPlayerChatString(),9,11)=="red"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),9,12)=="blue"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),9,12)=="teal"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),9,14)=="purple"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),9,14)=="yellow"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),9,14)=="orange"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),9,13)=="green"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),9,12)=="pink"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),9,12)=="gray"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),9,18)=="light blue"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),9,18)=="dark green"))then
return true
endif
return false
endfunction
function y4 takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),2,7)=="target"))then
return false
endif
if(not(SubStringBJ(GetEventPlayerChatString(),2,15)!="target all but"))then
return false
endif
if(not y3())then
return false
endif
return true
endfunction
function y5 takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),9,11)=="red")
endfunction
function y6 takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),9,12)=="blue")
endfunction
function y7 takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),9,12)=="teal")
endfunction
function y8 takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),9,14)=="purple")
endfunction
function y9 takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),9,14)=="yellow")
endfunction
function Ya takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),9,14)=="orange")
endfunction
function YA takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),9,13)=="green")
endfunction
function Yb takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),9,12)=="pink")
endfunction
function YB takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),9,12)=="gray")
endfunction
function Yc takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),9,18)=="light blue")
endfunction
function YC takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),9,18)=="dark green")
endfunction
function Yd takes nothing returns boolean
if(not y4())then
return false
endif
return true
endfunction
function YD takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function Ye takes nothing returns nothing
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_EXTRA),GetEnumPlayer(),bj_ALLIANCE_UNALLIED)
endfunction
function YE takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),2,11)=="target all"))then
return false
endif
if(not(StringLength(GetEventPlayerChatString())==11))then
return false
endif
return true
endfunction
function Yf takes nothing returns boolean
if((SubStringBJ(GetEventPlayerChatString(),11,13)=="red"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),11,14)=="blue"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),11,14)=="teal"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),11,16)=="purple"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),11,16)=="yellow"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),11,16)=="orange"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),11,15)=="green"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),11,14)=="pink"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),11,14)=="gray"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),11,20)=="light blue"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),11,20)=="dark green"))then
return true
endif
return false
endfunction
function YF takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),2,9)=="untarget"))then
return false
endif
if(not(SubStringBJ(GetEventPlayerChatString(),2,17)!="untarget all but"))then
return false
endif
if(not Yf())then
return false
endif
return true
endfunction
function Yg takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),11,13)=="red")
endfunction
function YG takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),11,14)=="blue")
endfunction
function Yh takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),11,14)=="teal")
endfunction
function YH takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),11,16)=="purple")
endfunction
function Yi takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),11,16)=="yellow")
endfunction
function YI takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),11,16)=="orange")
endfunction
function Yj takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),11,15)=="green")
endfunction
function YJ takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),11,14)=="pink")
endfunction
function Yk takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),11,14)=="gray")
endfunction
function YK takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),11,20)=="light blue")
endfunction
function Yl takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),11,20)=="dark green")
endfunction
function YL takes nothing returns boolean
if(not YF())then
return false
endif
return true
endfunction
function Ym takes nothing returns boolean
return(GetPlayerController(GetFilterPlayer())==MAP_CONTROL_USER)
endfunction
function YM takes nothing returns nothing
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_EXTRA),GetEnumPlayer(),bj_ALLIANCE_ALLIED)
endfunction
function Yn takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),2,13)=="untarget all"))then
return false
endif
if(not(StringLength(GetEventPlayerChatString())==13))then
return false
endif
return true
endfunction
function YN takes nothing returns boolean
if((SubStringBJ(GetEventPlayerChatString(),17,19)=="red"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),17,20)=="blue"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),17,20)=="teal"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),17,22)=="purple"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),17,22)=="yellow"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),17,22)=="orange"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),17,21)=="green"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),17,20)=="pink"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),17,20)=="gray"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),17,26)=="light blue"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),17,26)=="dark green"))then
return true
endif
return false
endfunction
function Yo takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),2,15)=="target all but"))then
return false
endif
if(not YN())then
return false
endif
return true
endfunction
function YO takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),17,19)=="red")
endfunction
function Yp takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),17,20)=="blue")
endfunction
function YP takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),17,20)=="teal")
endfunction
function Yq takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),17,22)=="purple")
endfunction
function YQ takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),17,22)=="yellow")
endfunction
function Yr takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),17,22)=="orange")
endfunction
function YR takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),17,21)=="green")
endfunction
function Ys takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),17,20)=="pink")
endfunction
function YS takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),17,20)=="gray")
endfunction
function Yt takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),17,26)=="light blue")
endfunction
function YT takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),17,26)=="dark green")
endfunction
function Yu takes nothing returns boolean
return(GetFilterPlayer()!=ConvertedPlayer(udg_integer12))
endfunction
function YU takes nothing returns nothing
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_EXTRA),GetEnumPlayer(),bj_ALLIANCE_UNALLIED)
endfunction
function Yv takes nothing returns boolean
if(not Yo())then
return false
endif
return true
endfunction
function YV takes nothing returns boolean
if((SubStringBJ(GetEventPlayerChatString(),19,21)=="red"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),19,22)=="blue"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),19,22)=="teal"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),19,24)=="purple"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),19,24)=="yellow"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),19,24)=="orange"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),19,23)=="green"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),19,22)=="pink"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),19,22)=="gray"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),19,28)=="light blue"))then
return true
endif
if((SubStringBJ(GetEventPlayerChatString(),19,28)=="dark green"))then
return true
endif
return false
endfunction
function Yw takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),2,17)=="untarget all but"))then
return false
endif
if(not YV())then
return false
endif
return true
endfunction
function YW takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),19,21)=="red")
endfunction
function Yx takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),19,22)=="blue")
endfunction
function YX takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),19,22)=="teal")
endfunction
function Yy takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),19,24)=="purple")
endfunction
function YY takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),19,24)=="yellow")
endfunction
function Yz takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),19,24)=="orange")
endfunction
function YZ takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),19,23)=="green")
endfunction
function Y0 takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),19,22)=="pink")
endfunction
function Y1 takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),19,22)=="gray")
endfunction
function Y2 takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),19,28)=="light blue")
endfunction
function Y3 takes nothing returns boolean
return(SubStringBJ(GetEventPlayerChatString(),19,28)=="dark green")
endfunction
function Y4 takes nothing returns boolean
return(GetFilterPlayer()!=ConvertedPlayer(udg_integer12))
endfunction
function Y5 takes nothing returns nothing
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_EXTRA),GetEnumPlayer(),bj_ALLIANCE_ALLIED)
endfunction
function Y6 takes nothing returns boolean
if(not Yw())then
return false
endif
return true
endfunction
function Y7 takes nothing returns nothing
set udg_group02=GetUnitsInRectMatching(udg_rect37,Condition(function yZ))
set udg_group03=GetUnitsInRectMatching(udg_rect37,Condition(function y0))
if(y2())then
call DestroyGroup(udg_group02)
call DestroyGroup(udg_group03)
else
call DestroyGroup(udg_group02)
call DestroyGroup(udg_group03)
return
endif
if(Yd())then
if(y5())then
set udg_integer12=1
else
call DoNothing()
endif
if(y6())then
set udg_integer12=2
else
call DoNothing()
endif
if(y7())then
set udg_integer12=3
else
call DoNothing()
endif
if(y8())then
set udg_integer12=4
else
call DoNothing()
endif
if(y9())then
set udg_integer12=5
else
call DoNothing()
endif
if(Ya())then
set udg_integer12=6
else
call DoNothing()
endif
if(YA())then
set udg_integer12=7
else
call DoNothing()
endif
if(Yb())then
set udg_integer12=8
else
call DoNothing()
endif
if(YB())then
set udg_integer12=9
else
call DoNothing()
endif
if(Yc())then
set udg_integer12=10
else
call DoNothing()
endif
if(YC())then
set udg_integer12=11
else
call DoNothing()
endif
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_EXTRA),ConvertedPlayer(udg_integer12),bj_ALLIANCE_UNALLIED)
call DisplayTextToForce(GetPlayersAll(),("|cff009707Security Guns now targeting |r"+udg_strings01[udg_integer12]))
else
call DoNothing()
endif
if(YE())then
set udg_force02=GetPlayersMatching(Condition(function YD))
call ForForce(udg_force02,function Ye)
call DestroyForce(udg_force02)
call DisplayTextToForce(GetPlayersAll(),("|cff009707Security Guns now targeting |r"+"all personel."))
else
call DoNothing()
endif
if(YL())then
if(Yg())then
set udg_integer12=1
else
call DoNothing()
endif
if(YG())then
set udg_integer12=2
else
call DoNothing()
endif
if(Yh())then
set udg_integer12=3
else
call DoNothing()
endif
if(YH())then
set udg_integer12=4
else
call DoNothing()
endif
if(Yi())then
set udg_integer12=5
else
call DoNothing()
endif
if(YI())then
set udg_integer12=6
else
call DoNothing()
endif
if(Yj())then
set udg_integer12=7
else
call DoNothing()
endif
if(YJ())then
set udg_integer12=8
else
call DoNothing()
endif
if(Yk())then
set udg_integer12=9
else
call DoNothing()
endif
if(YK())then
set udg_integer12=10
else
call DoNothing()
endif
if(Yl())then
set udg_integer12=11
else
call DoNothing()
endif
call SetPlayerAllianceStateBJ(Player(bj_PLAYER_NEUTRAL_EXTRA),ConvertedPlayer(udg_integer12),bj_ALLIANCE_ALLIED)
call DisplayTextToForce(GetPlayersAll(),("|cff009707Security Guns now untargeting |r"+udg_strings01[udg_integer12]))
else
call DoNothing()
endif
if(Yn())then
set udg_force02=GetPlayersMatching(Condition(function Ym))
call ForForce(udg_force02,function YM)
call DestroyForce(udg_force02)
call DisplayTextToForce(GetPlayersAll(),("|cff009707Security Guns now untargeting |r"+"all personel."))
else
call DoNothing()
endif
if(Yv())then
if(YO())then
set udg_integer12=1
else
call DoNothing()
endif
if(Yp())then
set udg_integer12=2
else
call DoNothing()
endif
if(YP())then
set udg_integer12=3
else
call DoNothing()
endif
if(Yq())then
set udg_integer12=4
else
call DoNothing()
endif
if(YQ())then
set udg_integer12=5
else
call DoNothing()
endif
if(Yr())then
set udg_integer12=6
else
call DoNothing()
endif
if(YR())then
set udg_integer12=7
else
call DoNothing()
endif
if(Ys())then
set udg_integer12=8
else
call DoNothing()
endif
if(YS())then
set udg_integer12=9
else
call DoNothing()
endif
if(Yt())then
set udg_integer12=10
else
call DoNothing()
endif
if(YT())then
set udg_integer12=11
else
call DoNothing()
endif
set udg_force02=GetPlayersMatching(Condition(function Yu))
call ForForce(udg_force02,function YU)
call DestroyForce(udg_force02)
call DisplayTextToForce(GetPlayersAll(),("|cff009707Security Guns now targeting everyone but |r"+udg_strings01[udg_integer12]))
else
call DoNothing()
endif
if(Y6())then
if(YW())then
set udg_integer12=1
else
call DoNothing()
endif
if(Yx())then
set udg_integer12=2
else
call DoNothing()
endif
if(YX())then
set udg_integer12=3
else
call DoNothing()
endif
if(Yy())then
set udg_integer12=4
else
call DoNothing()
endif
if(YY())then
set udg_integer12=5
else
call DoNothing()
endif
if(Yz())then
set udg_integer12=6
else
call DoNothing()
endif
if(YZ())then
set udg_integer12=7
else
call DoNothing()
endif
if(Y0())then
set udg_integer12=8
else
call DoNothing()
endif
if(Y1())then
set udg_integer12=9
else
call DoNothing()
endif
if(Y2())then
set udg_integer12=10
else
call DoNothing()
endif
if(Y3())then
set udg_integer12=11
else
call DoNothing()
endif
set udg_force02=GetPlayersMatching(Condition(function Y4))
call ForForce(udg_force02,function Y5)
call DestroyForce(udg_force02)
call DisplayTextToForce(GetPlayersAll(),("|cff009707Security Guns now untargeting everyone but |r"+udg_strings01[udg_integer12]))
else
call DoNothing()
endif
endfunction
function Y8 takes nothing returns nothing
set udg_trigger207=CreateTrigger()
call TriggerRegisterPlayerChatEvent(udg_trigger207,Player(0),"-",false)
call TriggerRegisterPlayerChatEvent(udg_trigger207,Player(1),"-",false)
call TriggerRegisterPlayerChatEvent(udg_trigger207,Player(2),"-",false)
call TriggerRegisterPlayerChatEvent(udg_trigger207,Player(3),"-",false)
call TriggerRegisterPlayerChatEvent(udg_trigger207,Player(4),"-",false)
call TriggerRegisterPlayerChatEvent(udg_trigger207,Player(5),"-",false)
call TriggerRegisterPlayerChatEvent(udg_trigger207,Player(6),"-",false)
call TriggerRegisterPlayerChatEvent(udg_trigger207,Player(7),"-",false)
call TriggerRegisterPlayerChatEvent(udg_trigger207,Player(8),"-",false)
call TriggerRegisterPlayerChatEvent(udg_trigger207,Player(9),"-",false)
call TriggerRegisterPlayerChatEvent(udg_trigger207,Player(10),"-",false)
call TriggerAddCondition(udg_trigger207,Condition(function yz))
call TriggerAddAction(udg_trigger207,function Y7)
endfunction
function Y9 takes nothing returns boolean
if(not(GetTimeOfDay()==12.00))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetEnteringUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
return true
endfunction
function za takes nothing returns boolean
if(not Y9())then
return false
endif
return true
endfunction
function zA takes nothing returns nothing
call UnitShareVisionBJ(true,GetEnumUnit(),GetOwningPlayer(GetEnteringUnit()))
endfunction
function zb takes nothing returns nothing
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'o001'),function zA)
endfunction
function zB takes nothing returns nothing
set udg_trigger208=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger208,udg_rect38)
call TriggerAddCondition(udg_trigger208,Condition(function za))
call TriggerAddAction(udg_trigger208,function zb)
endfunction
function zc takes nothing returns boolean
if(not(GetPlayerController(GetOwningPlayer(GetLeavingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(IsUnitType(GetLeavingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetLeavingUnit())!=true))then
return false
endif
return true
endfunction
function zC takes nothing returns boolean
if(not zc())then
return false
endif
return true
endfunction
function zd takes nothing returns nothing
call UnitShareVisionBJ(false,GetEnumUnit(),GetOwningPlayer(GetLeavingUnit()))
endfunction
function zD takes nothing returns nothing
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'o001'),function zd)
endfunction
function ze takes nothing returns nothing
set udg_trigger209=CreateTrigger()
call TriggerRegisterLeaveRectSimple(udg_trigger209,udg_rect38)
call TriggerAddCondition(udg_trigger209,Condition(function zC))
call TriggerAddAction(udg_trigger209,function zD)
endfunction
function zE takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetEnteringUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(udg_boolean03!=true))then
return false
endif
return true
endfunction
function zf takes nothing returns boolean
if(not zE())then
return false
endif
return true
endfunction
function zF takes nothing returns nothing
set udg_force02=GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit()))
call DisplayTextToForce(udg_force02,"TRIGSTR_2317")
call DestroyForce(udg_force02)
call SetUnitOwner(udg_unit33,GetOwningPlayer(GetEnteringUnit()),true)
set udg_location04=GetUnitLoc(udg_unit33)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),udg_location04,0)
call RemoveLocation(udg_location04)
endfunction
function zg takes nothing returns nothing
set udg_trigger210=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger210,udg_rect39)
call TriggerAddCondition(udg_trigger210,Condition(function zf))
call TriggerAddAction(udg_trigger210,function zF)
endfunction
function zG takes nothing returns boolean
if(not(IsUnitType(GetLeavingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetLeavingUnit())!=true))then
return false
endif
return true
endfunction
function zh takes nothing returns boolean
if(not zG())then
return false
endif
return true
endfunction
function zH takes nothing returns nothing
call SetUnitOwner(udg_unit33,Player(PLAYER_NEUTRAL_PASSIVE),true)
endfunction
function zi takes nothing returns nothing
set udg_trigger211=CreateTrigger()
call TriggerRegisterLeaveRectSimple(udg_trigger211,udg_rect39)
call TriggerAddCondition(udg_trigger211,Condition(function zh))
call TriggerAddAction(udg_trigger211,function zH)
endfunction
function zI takes nothing returns boolean
if(not(IsUnitAliveBJ(udg_unit28)==true))then
return false
endif
return true
endfunction
function zj takes nothing returns boolean
if(not(GetTimeOfDay()==12.00))then
return false
endif
return true
endfunction
function zJ takes nothing returns nothing
if(zj())then
call UnitRemoveBuffBJ('B00B',GetEnteringUnit())
call UnitRemoveBuffBJ('BIpv',GetEnteringUnit())
call UnitRemoveBuffBJ('Binf',GetEnteringUnit())
call UnitRemoveBuffBJ('B01P',GetEnteringUnit())
call SetUnitLifePercentBJ(GetEnteringUnit(),100)
call CameraClearNoiseForPlayer(GetOwningPlayer(GetEnteringUnit()))
call ResetToGameCameraForPlayer(GetOwningPlayer(GetEnteringUnit()),3.00)
set udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetEnteringUnit()))]=0
set udg_integers21[GetConvertedPlayerId(GetOwningPlayer(GetEnteringUnit()))]=0
set udg_reals07[GetConvertedPlayerId(GetOwningPlayer(GetEnteringUnit()))]=0.00
set udg_integers22[GetConvertedPlayerId(GetOwningPlayer(GetEnteringUnit()))]=0
call DisableTrigger(GetTriggeringTrigger())
call TriggerExecute(udg_trigger213)
call SetDoodadAnimationRectBJ("Stand Alternate",'JOgr',udg_rect34)
call PolledWait(1.49)
call SetDoodadAnimationRectBJ("Stand",'JOgr',udg_rect34)
else
set udg_force02=GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit()))
call DisplayTextToForce(udg_force02,"TRIGSTR_2318")
call DestroyForce(udg_force02)
endif
endfunction
function zk takes nothing returns nothing
set udg_trigger212=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger212,udg_rect33)
call TriggerAddCondition(udg_trigger212,Condition(function zI))
call TriggerAddAction(udg_trigger212,function zJ)
endfunction
function zK takes nothing returns nothing
call CreateTextTagLocBJ("TRIGSTR_550",GetRectCenter(udg_rect33),0,20.00,100.00,0.00,100.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),2.50)
call TriggerSleepAction(2.60)
call CreateTextTagLocBJ("TRIGSTR_1520",GetRectCenter(udg_rect33),0,20.00,100.00,0.00,100.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call TriggerSleepAction(1.10)
call CreateTextTagLocBJ("TRIGSTR_1984",GetRectCenter(udg_rect33),0,20.00,100.00,0.00,100.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call TriggerSleepAction(1.10)
call CreateTextTagLocBJ("TRIGSTR_1991",GetRectCenter(udg_rect33),0,20.00,100.00,0.00,100.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call TriggerSleepAction(1.10)
call CreateTextTagLocBJ("TRIGSTR_1993",GetRectCenter(udg_rect33),0,20.00,100.00,0.00,100.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call TriggerSleepAction(1.10)
call CreateTextTagLocBJ("TRIGSTR_1997",GetRectCenter(udg_rect33),0,20.00,100.00,0.00,100.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call TriggerSleepAction(1.10)
call CreateTextTagLocBJ("TRIGSTR_2012",GetRectCenter(udg_rect33),0,20.00,100.00,0.00,100.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call TriggerSleepAction(1.10)
call CreateTextTagLocBJ("TRIGSTR_2441",GetRectCenter(udg_rect33),0,20.00,100.00,0.00,100.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call TriggerSleepAction(1.10)
call EnableTrigger(udg_trigger212)
endfunction
function zl takes nothing returns nothing
set udg_trigger213=CreateTrigger()
call TriggerAddAction(udg_trigger213,function zK)
endfunction
function zL takes nothing returns boolean
if(not(IsUnitIllusionBJ(GetEnteringUnit())==false))then
return false
endif
if(not(IsUnitAliveBJ(udg_unit15)==true))then
return false
endif
if(not(GetTimeOfDay()==12.00))then
return false
endif
return true
endfunction
function zm takes nothing returns boolean
if(not zL())then
return false
endif
return true
endfunction
function zM takes nothing returns boolean
if(not(GetOwningPlayer(GetEnteringUnit())==udg_player02))then
return false
endif
return true
endfunction
function zn takes nothing returns boolean
if(not(GetOwningPlayer(GetEnteringUnit())==udg_player03))then
return false
endif
return true
endfunction
function zN takes nothing returns boolean
if(not(IsPlayerInForce(GetOwningPlayer(GetEnteringUnit()),udg_force01)==true))then
return false
endif
return true
endfunction
function zo takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())=='h017'))then
return false
endif
return true
endfunction
function zO takes nothing returns boolean
if(not(IsPlayerInForce(GetOwningPlayer(GetEnteringUnit()),udg_force04)==true))then
return false
endif
return true
endfunction
function zp takes nothing returns nothing
if(zM())then
call PlaySoundBJ(udg_sound52)
call DisableTrigger(GetTriggeringTrigger())
call TriggerExecute(udg_trigger215)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetEnteringUnit()))]+"'s blood test reveals signs of infection!"))
call SetDoodadAnimationRectBJ("Stand Alternate",'JOgr',udg_rect35)
call PolledWait(1.49)
call SetDoodadAnimationRectBJ("Stand",'JOgr',udg_rect35)
else
call DoNothing()
endif
if(zn())then
call CreateTextTagLocBJ("TRIGSTR_1591",GetRectCenter(udg_rect32),0,10,100.00,0.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),2.50)
call SetDoodadAnimationRectBJ("Stand Alternate",'JOgr',udg_rect35)
call PolledWait(1.49)
call SetDoodadAnimationRectBJ("Stand",'JOgr',udg_rect35)
else
call DoNothing()
endif
if(zN())then
call PlaySoundBJ(udg_sound52)
call DisableTrigger(GetTriggeringTrigger())
call TriggerExecute(udg_trigger215)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetEnteringUnit()))]+"'s blood test reveals signs of partial infection!"))
call SetDoodadAnimationRectBJ("Stand Alternate",'JOgr',udg_rect35)
call PolledWait(1.49)
call SetDoodadAnimationRectBJ("Stand",'JOgr',udg_rect35)
else
call DoNothing()
endif
if(zO())then
if(zo())then
call PlaySoundBJ(udg_sound55)
call DisableTrigger(GetTriggeringTrigger())
call TriggerExecute(udg_trigger215)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetEnteringUnit()))]+"'s blood test reveals 100% of holy divinity."))
call SetDoodadAnimationRectBJ("Stand Alternate",'JOgr',udg_rect35)
call PolledWait(1.49)
call SetDoodadAnimationRectBJ("Stand",'JOgr',udg_rect35)
else
call PlaySoundBJ(udg_sound55)
call DisableTrigger(GetTriggeringTrigger())
call TriggerExecute(udg_trigger215)
call DisplayTextToForce(GetPlayersAll(),(udg_strings01[GetConvertedPlayerId(GetOwningPlayer(GetEnteringUnit()))]+"'s blood test reveals no signs of infection."))
call SetDoodadAnimationRectBJ("Stand Alternate",'JOgr',udg_rect35)
call PolledWait(1.49)
call SetDoodadAnimationRectBJ("Stand",'JOgr',udg_rect35)
endif
else
call DoNothing()
endif
endfunction
function zP takes nothing returns nothing
set udg_trigger214=CreateTrigger()
call DisableTrigger(udg_trigger214)
call TriggerRegisterEnterRectSimple(udg_trigger214,udg_rect32)
call TriggerAddCondition(udg_trigger214,Condition(function zm))
call TriggerAddAction(udg_trigger214,function zp)
endfunction
function zq takes nothing returns nothing
call CreateTextTagLocBJ("TRIGSTR_1735",GetRectCenter(udg_rect32),0,20.00,100.00,0.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),2.50)
call TriggerSleepAction(2.60)
call CreateTextTagLocBJ("TRIGSTR_2055",GetRectCenter(udg_rect32),0,20.00,100.00,0.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call TriggerSleepAction(1.10)
call CreateTextTagLocBJ("TRIGSTR_2056",GetRectCenter(udg_rect32),0,20.00,100.00,0.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call TriggerSleepAction(1.10)
call CreateTextTagLocBJ("TRIGSTR_2057",GetRectCenter(udg_rect32),0,20.00,100.00,0.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call TriggerSleepAction(1.10)
call CreateTextTagLocBJ("TRIGSTR_2058",GetRectCenter(udg_rect32),0,20.00,100.00,0.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call TriggerSleepAction(1.10)
call EnableTrigger(udg_trigger214)
endfunction
function zQ takes nothing returns nothing
set udg_trigger215=CreateTrigger()
call TriggerAddAction(udg_trigger215,function zq)
endfunction
function zr takes nothing returns boolean
if((GetUnitTypeId(GetAttackedUnitBJ())=='e006'))then
return true
endif
if((GetUnitTypeId(GetAttackedUnitBJ())=='e001'))then
return true
endif
return false
endfunction
function zR takes nothing returns boolean
if(not zr())then
return false
endif
return true
endfunction
function zs takes nothing returns nothing
if(zR())then
call IssueTargetOrderBJ(GetAttackedUnitBJ(),"attack",GetAttacker())
else
call DoNothing()
endif
endfunction
function zS takes nothing returns nothing
set udg_trigger216=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger216,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddAction(udg_trigger216,function zs)
endfunction
function zt takes nothing returns boolean
if((GetUnitTypeId(GetAttackedUnitBJ())=='h02Q'))then
return true
endif
if((GetUnitTypeId(GetAttackedUnitBJ())=='h01E'))then
return true
endif
if((GetUnitTypeId(GetAttackedUnitBJ())=='h02O'))then
return true
endif
if((GetUnitTypeId(GetAttackedUnitBJ())=='h01F'))then
return true
endif
if((GetUnitTypeId(GetAttackedUnitBJ())=='h02P'))then
return true
endif
return false
endfunction
function zT takes nothing returns boolean
if(not(GetOwningPlayer(GetAttackedUnitBJ())==Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not zt())then
return false
endif
return true
endfunction
function zu takes nothing returns boolean
if(not zT())then
return false
endif
return true
endfunction
function zU takes nothing returns nothing
if(zu())then
call IssueTargetOrderBJ(GetAttackedUnitBJ(),"attack",GetAttacker())
else
call DoNothing()
endif
endfunction
function zv takes nothing returns nothing
set udg_trigger217=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger217,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddAction(udg_trigger217,function zU)
endfunction
function zV takes nothing returns boolean
if(not(GetItemTypeId(GetSoldItem())=='I018'))then
return false
endif
return true
endfunction
function zw takes nothing returns boolean
return(GetPlayerController(GetOwningPlayer(GetFilterUnit()))==MAP_CONTROL_USER)
endfunction
function zW takes nothing returns boolean
return(GetPlayerSlotState(GetOwningPlayer(GetFilterUnit()))==PLAYER_SLOT_STATE_PLAYING)
endfunction
function zx takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function zX takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SUMMONED)==false)
endfunction
function zy takes nothing returns boolean
return(IsUnitIllusionBJ(GetFilterUnit())==false)
endfunction
function zY takes nothing returns boolean
return GetBooleanAnd(zX(),zy())
endfunction
function zz takes nothing returns boolean
return GetBooleanAnd(zx(),zY())
endfunction
function zZ takes nothing returns boolean
return GetBooleanAnd(zW(),zz())
endfunction
function z0 takes nothing returns boolean
return GetBooleanAnd(zw(),zZ())
endfunction
function z1 takes nothing returns boolean
return(udg_integers10[GetConvertedPlayerId(GetOwningPlayer(GetEnumUnit()))]==0)
endfunction
function z2 takes nothing returns nothing
if(z1())then
call PingMinimapLocForForceEx(GetPlayersAll(),GetUnitLoc(GetEnumUnit()),5.00,bj_MINIMAPPINGSTYLE_SIMPLE,udg_reals01[GetConvertedPlayerId(GetOwningPlayer(GetEnumUnit()))],udg_reals02[GetConvertedPlayerId(GetOwningPlayer(GetEnumUnit()))],udg_reals03[GetConvertedPlayerId(GetOwningPlayer(GetEnumUnit()))])
else
call PingMinimapLocForForceEx(GetPlayersAll(),GetUnitLoc(GetEnumUnit()),5.00,bj_MINIMAPPINGSTYLE_SIMPLE,50.00,33.00,0.00)
endif
endfunction
function z3 takes nothing returns nothing
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2319")
call TriggerSleepAction(5.00)
call ForGroupBJ(GetUnitsInRectMatching(udg_rect29,Condition(function z0)),function z2)
endfunction
function z4 takes nothing returns nothing
set udg_trigger218=CreateTrigger()
call TriggerRegisterUnitEvent(udg_trigger218,udg_unit21,EVENT_UNIT_SELL_ITEM)
call TriggerAddCondition(udg_trigger218,Condition(function zV))
call TriggerAddAction(udg_trigger218,function z3)
endfunction
function z5 takes nothing returns boolean
if(not(GetItemTypeId(GetSoldItem())=='I019'))then
return false
endif
return true
endfunction
function z6 takes nothing returns boolean
return(GetPlayerController(GetOwningPlayer(GetFilterUnit()))==MAP_CONTROL_USER)
endfunction
function z7 takes nothing returns boolean
return(GetPlayerSlotState(GetOwningPlayer(GetFilterUnit()))==PLAYER_SLOT_STATE_PLAYING)
endfunction
function z8 takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function z9 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SUMMONED)==false)
endfunction
function Za takes nothing returns boolean
return(IsUnitIllusionBJ(GetFilterUnit())==false)
endfunction
function ZA takes nothing returns boolean
return GetBooleanAnd(z9(),Za())
endfunction
function Zb takes nothing returns boolean
return GetBooleanAnd(z8(),ZA())
endfunction
function ZB takes nothing returns boolean
return GetBooleanAnd(z7(),Zb())
endfunction
function Zc takes nothing returns boolean
return GetBooleanAnd(z6(),ZB())
endfunction
function ZC takes nothing returns boolean
return(udg_integers10[GetConvertedPlayerId(GetOwningPlayer(GetEnumUnit()))]==0)
endfunction
function Zd takes nothing returns nothing
if(ZC())then
call PingMinimapLocForForceEx(GetPlayersAll(),GetUnitLoc(GetEnumUnit()),5.00,bj_MINIMAPPINGSTYLE_SIMPLE,udg_reals01[GetConvertedPlayerId(GetOwningPlayer(GetEnumUnit()))],udg_reals02[GetConvertedPlayerId(GetOwningPlayer(GetEnumUnit()))],udg_reals03[GetConvertedPlayerId(GetOwningPlayer(GetEnumUnit()))])
else
call PingMinimapLocForForceEx(GetPlayersAll(),GetUnitLoc(GetEnumUnit()),5.00,bj_MINIMAPPINGSTYLE_SIMPLE,50.00,33.00,0.00)
endif
endfunction
function ZD takes nothing returns nothing
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2021")
call TriggerSleepAction(5.00)
call ForGroupBJ(GetUnitsInRectMatching(udg_rect30,Condition(function Zc)),function Zd)
endfunction
function Ze takes nothing returns nothing
set udg_trigger219=CreateTrigger()
call TriggerRegisterUnitEvent(udg_trigger219,udg_unit45,EVENT_UNIT_SELL_ITEM)
call TriggerAddCondition(udg_trigger219,Condition(function z5))
call TriggerAddAction(udg_trigger219,function ZD)
endfunction
function ZE takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),(500.00/GetUnitLifePercent(udg_unit33)))
endfunction
function Zf takes nothing returns nothing
call CameraClearNoiseForPlayer(GetEnumPlayer())
endfunction
function ZF takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call PlaySoundBJ(udg_sound58)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2321")
call ForForce(GetPlayersAll(),function ZE)
call EnableTrigger(udg_trigger375)
call EnableTrigger(udg_trigger376)
call EnableTrigger(udg_trigger377)
call EnableTrigger(udg_trigger378)
call TriggerSleepAction(8.00)
call DisableTrigger(udg_trigger375)
call DisableTrigger(udg_trigger376)
call DisableTrigger(udg_trigger377)
call DisableTrigger(udg_trigger378)
call ForForce(GetPlayersAll(),function Zf)
call ConditionalTriggerExecute(udg_trigger133)
call EnableTrigger(GetTriggeringTrigger())
endfunction
function Zg takes nothing returns nothing
set udg_trigger220=CreateTrigger()
call TriggerRegisterUnitEvent(udg_trigger220,udg_unit33,EVENT_UNIT_DAMAGED)
call TriggerAddAction(udg_trigger220,function ZF)
endfunction
function ZG takes nothing returns nothing
call CameraClearNoiseForPlayer(GetEnumPlayer())
endfunction
function Zh takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function ZH takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function Zi takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function ZI takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function Zj takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function ZJ takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function Zk takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function ZK takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function Zl takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function ZL takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function Zm takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function ZM takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function Zn takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function ZN takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function Zo takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function ZO takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function Zp takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function ZP takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function Zq takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function ZQ takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function Zr takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function ZR takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetEnumUnit()),bj_UNIT_FACING)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function Zs takes nothing returns nothing
set udg_integer25=1
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2322")
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUTIN,6.00,"ReplaceableTextures\\CameraMasks\\White_mask.blp",80.00,33.00,10.00,0)
call PlaySoundBJ(udg_sound60)
call PauseUnitBJ(false,udg_unit04)
call DisableTrigger(udg_trigger306)
call CinematicFilterGenericBJ(2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",100.00,100.00,100.00,100.00,100.00,100.00,100.00,100.00)
call ResetToGameCameraForPlayer(GetOwningPlayer(GetDyingUnit()),3.00)
call ForForce(GetPlayersAll(),function ZG)
call ConditionalTriggerExecute(udg_trigger133)
call CreateNUnitsAtLoc(1,'n01B',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetDyingUnit()),bj_UNIT_FACING)
call UnitDamagePointLoc(GetDyingUnit(),1.00,200.00,GetUnitLoc(GetDyingUnit()),10000.00,ATTACK_TYPE_CHAOS,DAMAGE_TYPE_DEMOLITION)
call UnitDamagePointLoc(GetDyingUnit(),1.50,400.00,GetUnitLoc(GetDyingUnit()),8000.00,ATTACK_TYPE_CHAOS,DAMAGE_TYPE_DEMOLITION)
call UnitDamagePointLoc(GetDyingUnit(),2.00,600.00,GetUnitLoc(GetDyingUnit()),6000.00,ATTACK_TYPE_CHAOS,DAMAGE_TYPE_DEMOLITION)
call UnitDamagePointLoc(GetDyingUnit(),2.50,800.00,GetUnitLoc(GetDyingUnit()),4000.00,ATTACK_TYPE_CHAOS,DAMAGE_TYPE_DEMOLITION)
call UnitDamagePointLoc(GetDyingUnit(),3.00,1000.00,GetUnitLoc(GetDyingUnit()),2000.00,ATTACK_TYPE_CHAOS,DAMAGE_TYPE_DEMOLITION)
call ForGroupBJ(GetUnitsInRectAll(udg_rect46),function Zh)
call ForGroupBJ(GetUnitsInRectAll(udg_rect47),function ZH)
call ForGroupBJ(GetUnitsInRectAll(udg_rect48),function Zi)
call ForGroupBJ(GetUnitsInRectAll(udg_rect49),function ZI)
call ForGroupBJ(GetUnitsInRectAll(udg_rect113),function Zj)
call ForGroupBJ(GetUnitsInRectAll(udg_rect112),function ZJ)
call ForGroupBJ(GetUnitsInRectAll(udg_rect114),function Zk)
call ForGroupBJ(GetUnitsInRectAll(udg_rect53),function ZK)
call ForGroupBJ(GetUnitsInRectAll(udg_rect40),function Zl)
call ForGroupBJ(GetUnitsInRectAll(udg_rect41),function ZL)
call ForGroupBJ(GetUnitsInRectAll(udg_rect42),function Zm)
call ForGroupBJ(GetUnitsInRectAll(udg_rect51),function ZM)
call ForGroupBJ(GetUnitsInRectAll(udg_rect52),function Zn)
call ForGroupBJ(GetUnitsInRectAll(udg_rect31),function ZN)
call ForGroupBJ(GetUnitsInRectAll(udg_rect50),function Zo)
call ForGroupBJ(GetUnitsInRectAll(udg_rect121),function ZO)
call ForGroupBJ(GetUnitsInRectAll(udg_rect122),function Zp)
call ForGroupBJ(GetUnitsInRectAll(udg_rect123),function ZP)
call ForGroupBJ(GetUnitsInRectAll(udg_rect124),function Zq)
call ForGroupBJ(GetUnitsInRectAll(udg_rect43),function ZQ)
call ForGroupBJ(GetUnitsInRectAll(udg_rect44),function Zr)
call ForGroupBJ(GetUnitsInRectAll(udg_rect45),function ZR)
endfunction
function ZS takes nothing returns nothing
set udg_trigger221=CreateTrigger()
call TriggerRegisterUnitEvent(udg_trigger221,udg_unit33,EVENT_UNIT_DEATH)
call TriggerAddAction(udg_trigger221,function Zs)
endfunction
function Zt takes nothing returns boolean
if(not(GetItemTypeId(GetSoldItem())=='I01O'))then
return false
endif
return true
endfunction
function ZT takes nothing returns boolean
if(not(IsPlayerInForce(GetOwningPlayer(GetBuyingUnit()),udg_force01)==true))then
return false
endif
return true
endfunction
function Zu takes nothing returns boolean
if(not(udg_integer03>=4))then
return false
endif
return true
endfunction
function ZU takes nothing returns nothing
if(Zu())then
if(ZT())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetBuyingUnit())),"TRIGSTR_2326")
else
call DisableTrigger(GetTriggeringTrigger())
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2324")
call StartTimerBJ(udg_timer04,false,180.00)
call CreateTimerDialogBJ(GetLastCreatedTimerBJ(),"TRIGSTR_2325")
set udg_timerdialog03=GetLastCreatedTimerDialogBJ()
call TriggerSleepAction(1.00)
call EnableTrigger(udg_trigger224)
endif
else
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetBuyingUnit())),"TRIGSTR_2323")
endif
endfunction
function Zv takes nothing returns nothing
set udg_trigger222=CreateTrigger()
call TriggerRegisterUnitEvent(udg_trigger222,udg_unit21,EVENT_UNIT_SELL_ITEM)
call TriggerAddCondition(udg_trigger222,Condition(function Zt))
call TriggerAddAction(udg_trigger222,function ZU)
endfunction
function ZV takes nothing returns boolean
if(not(GetItemTypeId(GetSoldItem())=='I01O'))then
return false
endif
return true
endfunction
function Zw takes nothing returns boolean
if(not(IsPlayerInForce(GetOwningPlayer(GetBuyingUnit()),udg_force01)==true))then
return false
endif
return true
endfunction
function ZW takes nothing returns nothing
if(Zw())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetBuyingUnit())),"TRIGSTR_2328")
else
call DisableTrigger(GetTriggeringTrigger())
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2327")
call PauseTimerBJ(false,udg_timer04)
call TriggerSleepAction(1.00)
call EnableTrigger(udg_trigger224)
endif
endfunction
function Zx takes nothing returns nothing
set udg_trigger223=CreateTrigger()
call DisableTrigger(udg_trigger223)
call TriggerRegisterUnitEvent(udg_trigger223,udg_unit21,EVENT_UNIT_SELL_ITEM)
call TriggerAddCondition(udg_trigger223,Condition(function ZV))
call TriggerAddAction(udg_trigger223,function ZW)
endfunction
function ZX takes nothing returns boolean
if(not(GetItemTypeId(GetSoldItem())=='I01O'))then
return false
endif
return true
endfunction
function Zy takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call PlaySoundBJ(udg_sound55)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2329")
call PauseTimerBJ(true,udg_timer04)
call TriggerSleepAction(1.00)
call EnableTrigger(udg_trigger223)
endfunction
function ZY takes nothing returns nothing
set udg_trigger224=CreateTrigger()
call DisableTrigger(udg_trigger224)
call TriggerRegisterUnitEvent(udg_trigger224,udg_unit21,EVENT_UNIT_SELL_ITEM)
call TriggerAddCondition(udg_trigger224,Condition(function ZX))
call TriggerAddAction(udg_trigger224,function Zy)
endfunction
function Zz takes nothing returns nothing
call DestroyTimerDialogBJ(udg_timerdialog03)
call KillUnit(udg_unit33)
endfunction
function ZZ takes nothing returns nothing
set udg_trigger225=CreateTrigger()
call TriggerRegisterTimerExpireEventBJ(udg_trigger225,udg_timer04)
call TriggerAddAction(udg_trigger225,function Zz)
endfunction
function Z0 takes nothing returns boolean
if(not(GetItemTypeId(GetSoldItem())=='I01C'))then
return false
endif
return true
endfunction
function Z1 takes nothing returns boolean
if(not(RectContainsUnit(udg_rect63,udg_unit33)==true))then
return false
endif
if(not(udg_integer24==0))then
return false
endif
return true
endfunction
function Z2 takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),25.00)
endfunction
function Z3 takes nothing returns boolean
return(udg_integer24==1)
endfunction
function Z4 takes nothing returns nothing
call CameraClearNoiseForPlayer(GetEnumPlayer())
endfunction
function Z5 takes nothing returns boolean
if(not Z1())then
return false
endif
return true
endfunction
function Z6 takes nothing returns boolean
if(not(udg_integer03>=2))then
return false
endif
return true
endfunction
function Z7 takes nothing returns nothing
if(Z6())then
if(Z5())then
call DisableTrigger(GetTriggeringTrigger())
set udg_boolean04=true
call ForForce(GetPlayersAll(),function Z2)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2332")
call TriggerSleepAction(20.00)
if(Z3())then
return
else
call DoNothing()
endif
call SetUnitOwner(udg_unit33,Player(PLAYER_NEUTRAL_PASSIVE),true)
call SetUnitPositionLoc(udg_unit33,GetRectCenter(udg_rect141))
call ForForce(GetPlayersAll(),function Z4)
call ConditionalTriggerExecute(udg_trigger133)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2333")
call PingMinimapLocForForceEx(GetPlayersAll(),GetRectCenter(udg_rect136),7.00,bj_MINIMAPPINGSTYLE_SIMPLE,50.00,50.00,100)
call SetTerrainTypeBJ(GetRectCenter(udg_rect138),'Ysqd',-1,6,1)
call SetTerrainTypeBJ(GetRectCenter(udg_rect139),'Yblm',-1,3,1)
call UnitRemoveAbilityBJ('Aloc',udg_unit29)
call SetUnitVertexColorBJ(udg_unit29,100,100,100,0.00)
call UnitRemoveAbilityBJ('Aloc',udg_unit48)
call SetUnitVertexColorBJ(udg_unit48,100,100,100,0.00)
call EnableTrigger(udg_trigger227)
call EnableTrigger(udg_trigger228)
call EnableTrigger(udg_trigger229)
call DisableTrigger(udg_trigger210)
else
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetBuyingUnit())),"TRIGSTR_2331")
endif
else
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetBuyingUnit())),"TRIGSTR_2330")
endif
endfunction
function Z8 takes nothing returns nothing
set udg_trigger226=CreateTrigger()
call TriggerRegisterUnitEvent(udg_trigger226,udg_unit21,EVENT_UNIT_SELL_ITEM)
call TriggerAddCondition(udg_trigger226,Condition(function Z0))
call TriggerAddAction(udg_trigger226,function Z7)
endfunction
function Z9 takes nothing returns boolean
if(not(GetItemTypeId(GetSoldItem())=='I01C'))then
return false
endif
return true
endfunction
function aaa takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),25.00)
endfunction
function aaA takes nothing returns boolean
return(udg_integer24==1)
endfunction
function aab takes nothing returns nothing
call CameraClearNoiseForPlayer(GetEnumPlayer())
endfunction
function aaB takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call DisableTrigger(udg_trigger228)
call DisableTrigger(udg_trigger229)
call ForForce(GetPlayersAll(),function aaa)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2334")
call TriggerSleepAction(20.00)
if(aaA())then
return
else
call DoNothing()
endif
set udg_boolean04=false
call SetUnitPositionLoc(udg_unit33,GetRectCenter(udg_rect109))
call ForForce(GetPlayersAll(),function aab)
call ConditionalTriggerExecute(udg_trigger133)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2335")
call SetTerrainTypeBJ(GetRectCenter(udg_rect138),'Idtr',-1,1,1)
call UnitAddAbilityBJ('Aloc',udg_unit29)
call SetUnitVertexColorBJ(udg_unit29,100,100,100,100.00)
call UnitAddAbilityBJ('Aloc',udg_unit48)
call SetUnitVertexColorBJ(udg_unit48,100,100,100,100.00)
call EnableTrigger(udg_trigger226)
call EnableTrigger(udg_trigger210)
endfunction
function aac takes nothing returns nothing
set udg_trigger227=CreateTrigger()
call DisableTrigger(udg_trigger227)
call TriggerRegisterUnitEvent(udg_trigger227,udg_unit21,EVENT_UNIT_SELL_ITEM)
call TriggerAddCondition(udg_trigger227,Condition(function Z9))
call TriggerAddAction(udg_trigger227,function aaB)
endfunction
function aaC takes nothing returns boolean
if(not(IsUnitAliveBJ(udg_unit33)==true))then
return false
endif
return true
endfunction
function aad takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect137))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetRectCenter(udg_rect137),0)
endfunction
function aaD takes nothing returns nothing
set udg_trigger228=CreateTrigger()
call DisableTrigger(udg_trigger228)
call TriggerRegisterEnterRectSimple(udg_trigger228,udg_rect139)
call TriggerAddCondition(udg_trigger228,Condition(function aaC))
call TriggerAddAction(udg_trigger228,function aad)
endfunction
function aae takes nothing returns boolean
if(not(IsUnitAliveBJ(udg_unit33)==true))then
return false
endif
return true
endfunction
function aaE takes nothing returns nothing
call SetUnitPositionLoc(GetEnteringUnit(),GetRandomLocInRect(udg_rect140))
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetRectCenter(udg_rect140),0)
endfunction
function aaf takes nothing returns nothing
set udg_trigger229=CreateTrigger()
call DisableTrigger(udg_trigger229)
call TriggerRegisterEnterRectSimple(udg_trigger229,udg_rect136)
call TriggerAddCondition(udg_trigger229,Condition(function aae))
call TriggerAddAction(udg_trigger229,function aaE)
endfunction
function aaF takes nothing returns nothing
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2336")
endfunction
function aag takes nothing returns nothing
set udg_trigger230=CreateTrigger()
call TriggerRegisterUnitEvent(udg_trigger230,udg_unit28,EVENT_UNIT_DEATH)
call TriggerAddAction(udg_trigger230,function aaF)
endfunction
function aaG takes nothing returns nothing
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2337")
call PauseTimerBJ(true,udg_timer05)
call DestroyTimerDialogBJ(udg_timerdialog04)
endfunction
function aah takes nothing returns nothing
set udg_trigger231=CreateTrigger()
call TriggerRegisterUnitEvent(udg_trigger231,udg_unit15,EVENT_UNIT_DEATH)
call TriggerAddAction(udg_trigger231,function aaG)
endfunction
function aaH takes nothing returns nothing
call PlaySoundBJ(udg_sound55)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1460")
call TriggerSleepAction(1.00)
call DestroyTimerDialogBJ(udg_timerdialog04)
call EnableTrigger(udg_trigger214)
call SetUnitVertexColorBJ(udg_unit18,100,0.00,0.00,0.00)
call UnitRemoveAbilityBJ('Aloc',udg_unit18)
endfunction
function aai takes nothing returns nothing
set udg_trigger232=CreateTrigger()
call TriggerRegisterTimerExpireEventBJ(udg_trigger232,udg_timer05)
call TriggerAddAction(udg_trigger232,function aaH)
endfunction
function aaI takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I00L'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h02V'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h047'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h01F'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h03S'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h03Y'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h03Z'))then
return false
endif
return true
endfunction
function aaj takes nothing returns boolean
if(not aaI())then
return false
endif
return true
endfunction
function aaJ takes nothing returns boolean
return(IsUnitType(GetManipulatingUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function aak takes nothing returns boolean
if(not(GetOwningPlayer(GetManipulatingUnit())==udg_player02))then
return false
endif
return true
endfunction
function aaK takes nothing returns boolean
if(not(GetOwningPlayer(GetManipulatingUnit())==udg_player02))then
return false
endif
return true
endfunction
function aal takes nothing returns boolean
if((udg_integer02=='h00D'))then
return true
endif
if((udg_integer02=='h00G'))then
return true
endif
if((udg_integer02=='h00H'))then
return true
endif
if((udg_integer02=='h00P'))then
return true
endif
if((udg_integer02=='h00N'))then
return true
endif
if((udg_integer02=='h00O'))then
return true
endif
if((udg_integer02=='h00M'))then
return true
endif
return false
endfunction
function aaL takes nothing returns boolean
if(not aal())then
return false
endif
return true
endfunction
function aam takes nothing returns boolean
if((GetOwningPlayer(GetManipulatingUnit())==udg_player02))then
return true
endif
if((GetOwningPlayer(GetManipulatingUnit())==Player(11)))then
return true
endif
if((IsPlayerInForce(GetOwningPlayer(GetManipulatingUnit()),udg_force01)==true))then
return true
endif
return false
endfunction
function aaM takes nothing returns boolean
if(not aam())then
return false
endif
return true
endfunction
function aan takes nothing returns nothing
call UnitAddAbilityBJ('S003',GetManipulatingUnit())
if(aaJ())then
call SetUnitAbilityLevelSwapped('S003',GetManipulatingUnit(),3)
else
call SetUnitAbilityLevelSwapped('S003',GetManipulatingUnit(),1)
endif
if(aak())then
call DisableTrigger(udg_trigger57)
else
call DoNothing()
endif
call PolledWait(30.00)
call UnitAddAbilityBJ('S000',GetManipulatingUnit())
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),1)
if(aaM())then
call UnitAddTypeBJ(UNIT_TYPE_ANCIENT,GetManipulatingUnit())
call UnitAddAbilityBJ('A00G',GetManipulatingUnit())
if(aaL())then
call UnitAddAbilityBJ('A072',GetManipulatingUnit())
if(aaK())then
call DisableTrigger(udg_trigger57)
call UnitAddAbilityBJ('A01R',GetManipulatingUnit())
else
endif
else
call UnitAddAbilityBJ('A071',GetManipulatingUnit())
endif
else
call DoNothing()
endif
endfunction
function aaN takes nothing returns nothing
set udg_trigger233=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger233,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger233,Condition(function aaj))
call TriggerAddAction(udg_trigger233,function aan)
endfunction
function aao takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I028'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h02V'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h047'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h01F'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h03S'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h03Y'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h03Z'))then
return false
endif
return true
endfunction
function aaO takes nothing returns boolean
if(not aao())then
return false
endif
return true
endfunction
function aap takes nothing returns boolean
return(IsUnitType(GetManipulatingUnit(),UNIT_TYPE_ANCIENT)==true)
endfunction
function aaP takes nothing returns boolean
if(not(GetOwningPlayer(GetManipulatingUnit())==udg_player02))then
return false
endif
return true
endfunction
function aaq takes nothing returns boolean
if(not(GetOwningPlayer(GetManipulatingUnit())==udg_player02))then
return false
endif
return true
endfunction
function aaQ takes nothing returns boolean
if((udg_integer02=='h00D'))then
return true
endif
if((udg_integer02=='h00G'))then
return true
endif
if((udg_integer02=='h00H'))then
return true
endif
if((udg_integer02=='h00P'))then
return true
endif
if((udg_integer02=='h00N'))then
return true
endif
if((udg_integer02=='h00O'))then
return true
endif
if((udg_integer02=='h00M'))then
return true
endif
return false
endfunction
function aar takes nothing returns boolean
if(not aaQ())then
return false
endif
return true
endfunction
function aaR takes nothing returns boolean
if((GetOwningPlayer(GetManipulatingUnit())==udg_player02))then
return true
endif
if((GetOwningPlayer(GetManipulatingUnit())==Player(11)))then
return true
endif
if((IsPlayerInForce(GetOwningPlayer(GetManipulatingUnit()),udg_force01)==true))then
return true
endif
return false
endfunction
function aas takes nothing returns boolean
if(not aaR())then
return false
endif
return true
endfunction
function aaS takes nothing returns nothing
call UnitAddAbilityBJ('S003',GetManipulatingUnit())
if(aap())then
call SetUnitAbilityLevelSwapped('S003',GetManipulatingUnit(),4)
else
call SetUnitAbilityLevelSwapped('S003',GetManipulatingUnit(),2)
endif
if(aaP())then
call DisableTrigger(udg_trigger57)
else
call DoNothing()
endif
call PolledWait(30.00)
call UnitAddAbilityBJ('S000',GetManipulatingUnit())
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),1)
if(aas())then
call UnitAddTypeBJ(UNIT_TYPE_ANCIENT,GetManipulatingUnit())
if(aar())then
call UnitAddAbilityBJ('A072',GetManipulatingUnit())
if(aaq())then
call DisableTrigger(udg_trigger57)
call UnitAddAbilityBJ('A01R',GetManipulatingUnit())
else
endif
else
call UnitAddAbilityBJ('A071',GetManipulatingUnit())
endif
else
call DoNothing()
endif
endfunction
function aat takes nothing returns nothing
set udg_trigger234=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger234,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger234,Condition(function aaO))
call TriggerAddAction(udg_trigger234,function aaS)
endfunction
function aaT takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h03Y'))then
return false
endif
if(not(GetOwningPlayer(GetAttackedUnitBJ())==udg_player02))then
return false
endif
return true
endfunction
function aau takes nothing returns nothing
call AdjustPlayerStateBJ(-1,udg_player02,PLAYER_STATE_RESOURCE_LUMBER)
endfunction
function aaU takes nothing returns nothing
set udg_trigger235=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger235,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddCondition(udg_trigger235,Condition(function aaT))
call TriggerAddAction(udg_trigger235,function aau)
endfunction
function aav takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I00J'))then
return false
endif
return true
endfunction
function aaV takes nothing returns boolean
if(not(UnitHasBuffBJ(GetFilterUnit(),'Bcri')==true))then
return false
endif
return true
endfunction
function aaw takes nothing returns boolean
if(not(udg_boolean02==true))then
return false
endif
return true
endfunction
function aaW takes nothing returns nothing
if(aaV())then
set udg_boolean02=true
else
call DoNothing()
endif
call PolledWait(30.00)
if(aaw())then
set udg_boolean02=false
else
call DoNothing()
endif
endfunction
function aax takes nothing returns nothing
set udg_trigger236=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger236,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger236,Condition(function aav))
call TriggerAddAction(udg_trigger236,function aaW)
endfunction
function aaX takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I00I'))then
return false
endif
return true
endfunction
function aay takes nothing returns boolean
return(GetPlayerState(GetOwningPlayer(GetManipulatingUnit()),PLAYER_STATE_RESOURCE_GOLD)>300)
endfunction
function aaY takes nothing returns nothing
call PolledWait(0.01)
if(aay())then
call SetPlayerStateBJ(GetOwningPlayer(GetManipulatingUnit()),PLAYER_STATE_RESOURCE_GOLD,300)
else
call DoNothing()
endif
endfunction
function aaz takes nothing returns nothing
set udg_trigger237=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger237,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger237,Condition(function aaX))
call TriggerAddAction(udg_trigger237,function aaY)
endfunction
function aaZ takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I00O'))then
return false
endif
return true
endfunction
function aa0 takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='e002')
endfunction
function aa1 takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='e003')
endfunction
function aa2 takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='e005')
endfunction
function aa3 takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='e004')
endfunction
function aa4 takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h01R')
endfunction
function aa5 takes nothing returns boolean
return GetBooleanOr(aa3(),aa4())
endfunction
function aa6 takes nothing returns boolean
return GetBooleanOr(aa2(),aa5())
endfunction
function aa7 takes nothing returns boolean
return GetBooleanOr(aa1(),aa6())
endfunction
function aa8 takes nothing returns boolean
return GetBooleanOr(aa0(),aa7())
endfunction
function aa9 takes nothing returns nothing
call KillUnit(GetEnumUnit())
endfunction
function aAa takes nothing returns nothing
call ForGroupBJ(GetUnitsInRangeOfLocMatching(325.00,GetUnitLoc(GetManipulatingUnit()),Condition(function aa8)),function aa9)
endfunction
function aAA takes nothing returns nothing
set udg_trigger238=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger238,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger238,Condition(function aaZ))
call TriggerAddAction(udg_trigger238,function aAa)
endfunction
function aAb takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I01E'))then
return false
endif
return true
endfunction
function aAB takes nothing returns boolean
return(IsUnitDeadBJ(GetFilterUnit())==true)
endfunction
function aAc takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function aAC takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h02K')
endfunction
function aAd takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function aAD takes nothing returns nothing
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRangeOfLocMatching(225.00,GetUnitLoc(GetManipulatingUnit()),Condition(function aAB)),function aAc)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRangeOfLocMatching(225.00,GetUnitLoc(GetManipulatingUnit()),Condition(function aAC)),function aAd)
endfunction
function aAe takes nothing returns nothing
set udg_trigger239=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger239,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger239,Condition(function aAb))
call TriggerAddAction(udg_trigger239,function aAD)
endfunction
function aAE takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I02A'))then
return false
endif
return true
endfunction
function aAf takes nothing returns nothing
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),("|cff009707Alcohol Level: |r"+I2S(udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])))
endfunction
function aAF takes nothing returns nothing
set udg_trigger240=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger240,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger240,Condition(function aAE))
call TriggerAddAction(udg_trigger240,function aAf)
endfunction
function aAg takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I00G'))then
return false
endif
return true
endfunction
function aAG takes nothing returns nothing
call UnitRemoveBuffBJ('B00B',GetManipulatingUnit())
call UnitRemoveBuffBJ('BIpv',GetManipulatingUnit())
call UnitRemoveBuffBJ('Binf',GetManipulatingUnit())
call UnitRemoveBuffBJ('B01P',GetManipulatingUnit())
set udg_integers13[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=0
set udg_integers21[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=0
set udg_reals07[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=0.00
set udg_integers22[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=0
endfunction
function aAh takes nothing returns nothing
set udg_trigger241=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger241,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger241,Condition(function aAg))
call TriggerAddAction(udg_trigger241,function aAG)
endfunction
function aAH takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I021'))then
return false
endif
return true
endfunction
function aAi takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='n00K')
endfunction
function aAI takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
call AddSpecialEffectLocBJ(GetUnitLoc(GetEnumUnit()),"Abilities\\Spells\\Demon\\DarkPortal\\DarkPortalTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call CreateItemLoc('I00Y',GetUnitLoc(GetEnumUnit()))
endfunction
function aAj takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='n00L')
endfunction
function aAJ takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
call AddSpecialEffectLocBJ(GetUnitLoc(GetEnumUnit()),"Abilities\\Spells\\Demon\\DarkPortal\\DarkPortalTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call CreateItemLoc('I00Z',GetUnitLoc(GetEnumUnit()))
endfunction
function aAk takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='n00D')
endfunction
function aAK takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='nglm')
endfunction
function aAl takes nothing returns boolean
return GetBooleanOr(aAk(),aAK())
endfunction
function aAL takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
call AddSpecialEffectLocBJ(GetUnitLoc(GetEnumUnit()),"Abilities\\Spells\\Demon\\DarkPortal\\DarkPortalTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
endfunction
function aAm takes nothing returns boolean
if(not(RectContainsItem(udg_item01,udg_rect154)==true))then
return false
endif
return true
endfunction
function aAM takes nothing returns nothing
call ForGroupBJ(GetUnitsInRangeOfLocMatching(225.00,GetUnitLoc(GetManipulatingUnit()),Condition(function aAi)),function aAI)
call ForGroupBJ(GetUnitsInRangeOfLocMatching(225.00,GetUnitLoc(GetManipulatingUnit()),Condition(function aAj)),function aAJ)
call ForGroupBJ(GetUnitsInRangeOfLocMatching(225.00,GetUnitLoc(GetManipulatingUnit()),Condition(function aAl)),function aAL)
call MoveRectToLoc(udg_rect154,GetUnitLoc(GetManipulatingUnit()))
if(aAm())then
call AddSpecialEffectLocBJ(GetItemLoc(udg_item01),"Abilities\\Spells\\Demon\\DarkPortal\\DarkPortalTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call DisableTrigger(udg_trigger256)
call PauseTimerBJ(true,udg_timer06)
call CreateItemLoc('I010',GetItemLoc(udg_item01))
call RemoveItem(udg_item01)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2593")
call PlaySoundBJ(udg_sound55)
else
endif
endfunction
function aAn takes nothing returns nothing
set udg_trigger242=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger242,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger242,Condition(function aAH))
call TriggerAddAction(udg_trigger242,function aAM)
endfunction
function aAN takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I01M'))then
return false
endif
return true
endfunction
function aAo takes nothing returns boolean
if(not(udg_integer13==1))then
return false
endif
return true
endfunction
function aAO takes nothing returns boolean
if(not(GetOwningPlayer(GetManipulatingUnit())==udg_player02))then
return false
endif
return true
endfunction
function aAp takes nothing returns boolean
if(not(udg_integer13==1))then
return false
endif
return true
endfunction
function aAP takes nothing returns boolean
if(not(IsPlayerInForce(GetOwningPlayer(GetManipulatingUnit()),udg_force01)==true))then
return false
endif
return true
endfunction
function aAq takes nothing returns boolean
if(not(IsPlayerInForce(GetOwningPlayer(GetManipulatingUnit()),udg_force04)==true))then
return false
endif
return true
endfunction
function aAQ takes nothing returns nothing
set udg_integer13=GetRandomInt(1,3)
if(aAO())then
if(aAo())then
call CreateTextTagUnitBJ("TRIGSTR_2183",GetManipulatingUnit(),0,10,100,0.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),2.50)
else
call CreateTextTagUnitBJ("TRIGSTR_2184",GetManipulatingUnit(),0,10,0.00,100.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),2.50)
endif
else
call DoNothing()
endif
if(aAP())then
if(aAp())then
call CreateTextTagUnitBJ("TRIGSTR_2186",GetManipulatingUnit(),0,10,80.00,33.00,10.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),2.50)
else
call CreateTextTagUnitBJ("TRIGSTR_2185",GetManipulatingUnit(),0,10,0.00,100.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),2.50)
endif
else
call DoNothing()
endif
if(aAq())then
call CreateTextTagUnitBJ("TRIGSTR_2187",GetManipulatingUnit(),0,10,0.00,100.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),2.50)
else
call DoNothing()
endif
endfunction
function aAr takes nothing returns nothing
set udg_trigger243=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger243,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger243,Condition(function aAN))
call TriggerAddAction(udg_trigger243,function aAQ)
endfunction
function aAR takes nothing returns boolean
if((GetUnitTypeId(GetSpellAbilityUnit())=='n00K'))then
return true
endif
if((GetUnitTypeId(GetSpellAbilityUnit())=='n00L'))then
return true
endif
if((GetUnitTypeId(GetSpellAbilityUnit())=='n01L'))then
return true
endif
return false
endfunction
function aAs takes nothing returns boolean
if(not aAR())then
return false
endif
return true
endfunction
function aAS takes nothing returns boolean
if(not(GetSpellAbilityId()=='A03V'))then
return false
endif
return true
endfunction
function aAt takes nothing returns boolean
if(not(GetSpellAbilityId()=='A007'))then
return false
endif
return true
endfunction
function aAT takes nothing returns boolean
if(not(GetSpellAbilityId()=='A09B'))then
return false
endif
return true
endfunction
function aAu takes nothing returns nothing
if(aAS())then
set udg_unit11=GetSpellAbilityUnit()
call UnitApplyTimedLifeBJ(4.00,'BTLF',udg_unit11)
call CreateTextTagUnitBJ("TRIGSTR_1567",udg_unit11,3.00,10,100,100,100,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call PolledWait(1.00)
call CreateTextTagUnitBJ("TRIGSTR_1763",udg_unit11,3.00,10,100,100,100,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call PolledWait(1.00)
call CreateTextTagUnitBJ("TRIGSTR_1804",udg_unit11,3.00,10,100,100,100,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call PolledWait(1.00)
call CreateTextTagUnitBJ("TRIGSTR_1878",udg_unit11,3.00,10,100,100,100,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
else
call DoNothing()
endif
if(aAt())then
set udg_unit11=GetSpellAbilityUnit()
call UnitApplyTimedLifeBJ(4.00,'BTLF',udg_unit11)
call CreateTextTagUnitBJ("TRIGSTR_1957",udg_unit11,0,10,0.00,100,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call PolledWait(1.00)
call CreateTextTagUnitBJ("TRIGSTR_1958",udg_unit11,0,10,0.00,100,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call PolledWait(1.00)
call CreateTextTagUnitBJ("TRIGSTR_2028",udg_unit11,0,10,0.00,100,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call PolledWait(1.00)
call CreateTextTagUnitBJ("TRIGSTR_2285",udg_unit11,0,10,0.00,100,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
else
call DoNothing()
endif
if(aAT())then
set udg_unit11=GetSpellAbilityUnit()
call UnitApplyTimedLifeBJ(4.00,'BTLF',udg_unit11)
call CreateTextTagUnitBJ("TRIGSTR_2286",udg_unit11,0,10,0.00,0.00,100.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call PolledWait(1.00)
call CreateTextTagUnitBJ("TRIGSTR_2287",udg_unit11,0,10,0.00,0.00,100.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call PolledWait(1.00)
call CreateTextTagUnitBJ("TRIGSTR_2338",udg_unit11,0,10,0.00,0.00,100.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call PolledWait(1.00)
call CreateTextTagUnitBJ("TRIGSTR_2339",udg_unit11,0,10,0.00,0.00,100.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
else
call DoNothing()
endif
endfunction
function aAU takes nothing returns nothing
set udg_trigger244=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger244,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger244,Condition(function aAs))
call TriggerAddAction(udg_trigger244,function aAu)
endfunction
function aAv takes nothing returns boolean
if(not(GetUnitTypeId(GetSpellAbilityUnit())=='n01N'))then
return false
endif
if(not(GetSpellAbilityId()=='A03V'))then
return false
endif
return true
endfunction
function aAV takes nothing returns boolean
if(not aAv())then
return false
endif
return true
endfunction
function aAw takes nothing returns nothing
set udg_unit11=GetSpellAbilityUnit()
call UnitApplyTimedLifeBJ(4.00,'BTLF',udg_unit11)
call CreateTextTagUnitBJ("TRIGSTR_2623",udg_unit11,3.00,10,100,0.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call PolledWait(1.00)
call CreateTextTagUnitBJ("TRIGSTR_2624",udg_unit11,3.00,10,100,0.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call PolledWait(1.00)
call CreateTextTagUnitBJ("TRIGSTR_2625",udg_unit11,3.00,10,100,0.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
call PolledWait(1.00)
call CreateTextTagUnitBJ("TRIGSTR_2626",udg_unit11,3.00,10,100,0.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),1.00)
endfunction
function aAW takes nothing returns nothing
set udg_trigger245=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger245,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger245,Condition(function aAV))
call TriggerAddAction(udg_trigger245,function aAw)
endfunction
function aAx takes nothing returns boolean
if((GetUnitTypeId(GetDyingUnit())=='n00K'))then
return true
endif
if((GetUnitTypeId(GetDyingUnit())=='n00F'))then
return true
endif
return false
endfunction
function aAX takes nothing returns boolean
if(not aAx())then
return false
endif
return true
endfunction
function aAy takes nothing returns boolean
return(GetOwningPlayer(GetDyingUnit())==udg_player03)
endfunction
function aAY takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())!='n00F'))then
return false
endif
return true
endfunction
function aAz takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),15.00)
endfunction
function aAZ takes nothing returns boolean
return(RectContainsUnit(udg_rect30,GetDyingUnit())!=true)
endfunction
function aA0 takes nothing returns boolean
return(GetDestructableTypeId(GetEnumDestructable())!='B00C')
endfunction
function aA1 takes nothing returns nothing
if(aA0())then
call KillDestructable(GetEnumDestructable())
else
call DoNothing()
endif
endfunction
function aA2 takes nothing returns nothing
call UnitDamageTargetBJ(GetDyingUnit(),GetEnumUnit(),200.00,ATTACK_TYPE_MAGIC,DAMAGE_TYPE_NORMAL)
endfunction
function aA3 takes nothing returns nothing
call UnitDamageTargetBJ(GetDyingUnit(),GetEnumUnit(),800.00,ATTACK_TYPE_MAGIC,DAMAGE_TYPE_NORMAL)
endfunction
function aA4 takes nothing returns nothing
call UnitDamageTargetBJ(GetDyingUnit(),GetEnumUnit(),5000.00,ATTACK_TYPE_MAGIC,DAMAGE_TYPE_NORMAL)
endfunction
function aA5 takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function aA6 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_GROUND)==true)
endfunction
function aA7 takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)!=true)
endfunction
function aA8 takes nothing returns boolean
return GetBooleanAnd(aA6(),aA7())
endfunction
function aA9 takes nothing returns boolean
return GetBooleanAnd(aA5(),aA8())
endfunction
function aba takes nothing returns nothing
set udg_integer19=(udg_integer19+1)
set udg_units02[udg_integer19]=GetEnumUnit()
set udg_integers12[udg_integer19]=R2I(AngleBetweenPoints(GetUnitLoc(GetDyingUnit()),GetUnitLoc(GetEnumUnit())))
call AddSpecialEffectTargetUnitBJ("chest",GetEnumUnit(),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrikeDamageTarget.mdl")
set udg_effects09[udg_integer19]=GetLastCreatedEffectBJ()
endfunction
function abA takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),10.00)
endfunction
function abb takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),6.00)
endfunction
function abB takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),3.00)
endfunction
function abc takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),1.00)
endfunction
function abC takes nothing returns nothing
call CameraClearNoiseForPlayer(GetEnumPlayer())
endfunction
function abd takes nothing returns nothing
call MoveRectToLoc(udg_rect158,GetUnitLoc(GetDyingUnit()))
call MoveRectToLoc(udg_rect154,GetUnitLoc(GetDyingUnit()))
call MoveRectToLoc(udg_rect155,GetUnitLoc(GetDyingUnit()))
call MoveRectToLoc(udg_rect156,GetUnitLoc(GetDyingUnit()))
call MoveRectToLoc(udg_rect157,GetUnitLoc(GetDyingUnit()))
call TriggerSleepAction(0.25)
if(aAY())then
if(aAy())then
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2386")
else
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2387")
endif
else
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1923")
endif
call ForForce(GetPlayersAll(),function aAz)
if(aAZ())then
call SetUnitLifeBJ(udg_unit33,(GetUnitStateSwap(UNIT_STATE_LIFE,udg_unit33)-5000.00))
else
call DoNothing()
endif
call EnumDestructablesInRectAll(udg_rect158,function aA1)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect156),function aA2)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect155),function aA3)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect154),function aA4)
set udg_integer19=0
call ForGroupBJ(GetUnitsInRangeOfLocMatching(1000.00,GetUnitLoc(GetDyingUnit()),Condition(function aA9)),function aba)
call EnableTrigger(udg_trigger249)
set udg_real02=35.00
call AddSpecialEffectLocBJ(GetRectCenter(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike.mdl")
call AddSpecialEffectLocBJ(GetRectCenter(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call TriggerSleepAction(0.35)
set udg_real02=18.00
call TriggerSleepAction(0.65)
call ForForce(GetPlayersAll(),function abA)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call TriggerSleepAction(0.50)
set udg_real02=10.00
call TriggerSleepAction(0.50)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call ForForce(GetPlayersAll(),function abb)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call TriggerSleepAction(0.30)
set udg_real02=2.00
call TriggerSleepAction(0.20)
call DisableTrigger(udg_trigger249)
call TriggerSleepAction(0.50)
call ForForce(GetPlayersAll(),function abB)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call TriggerSleepAction(1.00)
call ForForce(GetPlayersAll(),function abc)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call TriggerSleepAction(1.00)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call ForForce(GetPlayersAll(),function abC)
call ConditionalTriggerExecute(udg_trigger133)
call TriggerSleepAction(3.00)
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=udg_integer19
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call DestroyEffectBJ(udg_effects09[GetForLoopIndexA()])
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
function abD takes nothing returns nothing
set udg_trigger246=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger246,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger246,Condition(function aAX))
call TriggerAddAction(udg_trigger246,function abd)
endfunction
function abe takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='n01N'))then
return false
endif
return true
endfunction
function abE takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),15.00)
endfunction
function abf takes nothing returns boolean
return(RectContainsUnit(udg_rect30,GetDyingUnit())!=true)
endfunction
function abF takes nothing returns boolean
return(GetDestructableTypeId(GetEnumDestructable())!='B00C')
endfunction
function abg takes nothing returns nothing
if(abF())then
call KillDestructable(GetEnumDestructable())
else
call DoNothing()
endif
endfunction
function abG takes nothing returns nothing
call UnitDamageTargetBJ(GetDyingUnit(),GetEnumUnit(),200.00,ATTACK_TYPE_MAGIC,DAMAGE_TYPE_NORMAL)
endfunction
function abh takes nothing returns nothing
call UnitDamageTargetBJ(GetDyingUnit(),GetEnumUnit(),800.00,ATTACK_TYPE_MAGIC,DAMAGE_TYPE_NORMAL)
endfunction
function abH takes nothing returns nothing
call UnitDamageTargetBJ(GetDyingUnit(),GetEnumUnit(),5000.00,ATTACK_TYPE_MAGIC,DAMAGE_TYPE_NORMAL)
endfunction
function abi takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function abI takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_GROUND)==true)
endfunction
function abj takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)!=true)
endfunction
function abJ takes nothing returns boolean
return GetBooleanAnd(abI(),abj())
endfunction
function abk takes nothing returns boolean
return GetBooleanAnd(abi(),abJ())
endfunction
function abK takes nothing returns nothing
set udg_integer19=(udg_integer19+1)
set udg_units02[udg_integer19]=GetEnumUnit()
set udg_integers12[udg_integer19]=R2I(AngleBetweenPoints(GetUnitLoc(GetDyingUnit()),GetUnitLoc(GetEnumUnit())))
call AddSpecialEffectTargetUnitBJ("chest",GetEnumUnit(),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrikeDamageTarget.mdl")
set udg_effects09[udg_integer19]=GetLastCreatedEffectBJ()
endfunction
function abl takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),10.00)
endfunction
function abL takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),6.00)
endfunction
function abm takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),3.00)
endfunction
function abM takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),1.00)
endfunction
function abn takes nothing returns nothing
call CameraClearNoiseForPlayer(GetEnumPlayer())
endfunction
function abN takes nothing returns nothing
call MoveRectToLoc(udg_rect158,GetUnitLoc(GetDyingUnit()))
call MoveRectToLoc(udg_rect154,GetUnitLoc(GetDyingUnit()))
call MoveRectToLoc(udg_rect155,GetUnitLoc(GetDyingUnit()))
call MoveRectToLoc(udg_rect156,GetUnitLoc(GetDyingUnit()))
call MoveRectToLoc(udg_rect157,GetUnitLoc(GetDyingUnit()))
call TriggerSleepAction(0.25)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2125")
call ForForce(GetPlayersAll(),function abE)
if(abf())then
call SetUnitLifeBJ(udg_unit33,(GetUnitStateSwap(UNIT_STATE_LIFE,udg_unit33)-5000.00))
else
call DoNothing()
endif
call EnumDestructablesInRectAll(udg_rect158,function abg)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect156),function abG)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect155),function abh)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect154),function abH)
call SetTerrainTypeBJ(GetRectCenter(udg_rect155),'Cpos',-1,2,0)
set udg_integer19=0
call ForGroupBJ(GetUnitsInRangeOfLocMatching(1000.00,GetUnitLoc(GetDyingUnit()),Condition(function abk)),function abK)
call EnableTrigger(udg_trigger249)
set udg_real02=35.00
call AddSpecialEffectLocBJ(GetRectCenter(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike.mdl")
call AddSpecialEffectLocBJ(GetRectCenter(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect157),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call TriggerSleepAction(0.35)
set udg_real02=18.00
call TriggerSleepAction(0.65)
call ForForce(GetPlayersAll(),function abl)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call TriggerSleepAction(0.50)
set udg_real02=10.00
call TriggerSleepAction(0.50)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call ForForce(GetPlayersAll(),function abL)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call TriggerSleepAction(0.30)
set udg_real02=2.00
call TriggerSleepAction(0.20)
call DisableTrigger(udg_trigger249)
call TriggerSleepAction(0.50)
call ForForce(GetPlayersAll(),function abm)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call TriggerSleepAction(1.00)
call ForForce(GetPlayersAll(),function abM)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call TriggerSleepAction(1.00)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect158),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call ForForce(GetPlayersAll(),function abn)
call ConditionalTriggerExecute(udg_trigger133)
call TriggerSleepAction(3.00)
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=udg_integer19
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call DestroyEffectBJ(udg_effects09[GetForLoopIndexA()])
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
function abo takes nothing returns nothing
set udg_trigger247=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger247,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger247,Condition(function abe))
call TriggerAddAction(udg_trigger247,function abN)
endfunction
function abO takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='n00L'))then
return false
endif
return true
endfunction
function abp takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),15.00)
endfunction
function abP takes nothing returns boolean
return(RectContainsUnit(udg_rect30,GetDyingUnit())!=true)
endfunction
function abq takes nothing returns boolean
return(GetDestructableTypeId(GetEnumDestructable())!='B00C')
endfunction
function abQ takes nothing returns nothing
if(abq())then
call KillDestructable(GetEnumDestructable())
else
call DoNothing()
endif
endfunction
function abr takes nothing returns nothing
call UnitDamageTargetBJ(GetDyingUnit(),GetEnumUnit(),800.00,ATTACK_TYPE_MAGIC,DAMAGE_TYPE_NORMAL)
endfunction
function abR takes nothing returns nothing
call UnitDamageTargetBJ(GetDyingUnit(),GetEnumUnit(),5000.00,ATTACK_TYPE_MAGIC,DAMAGE_TYPE_NORMAL)
endfunction
function abs takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function abS takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_GROUND)==true)
endfunction
function abt takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)!=true)
endfunction
function abT takes nothing returns boolean
return GetBooleanAnd(abS(),abt())
endfunction
function abu takes nothing returns boolean
return GetBooleanAnd(abs(),abT())
endfunction
function abU takes nothing returns nothing
set udg_integer19=(udg_integer19+1)
set udg_units02[udg_integer19]=GetEnumUnit()
set udg_integers12[udg_integer19]=R2I(AngleBetweenPoints(GetUnitLoc(GetDyingUnit()),GetUnitLoc(GetEnumUnit())))
call AddSpecialEffectTargetUnitBJ("chest",GetEnumUnit(),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrikeDamageTarget.mdl")
set udg_effects09[udg_integer19]=GetLastCreatedEffectBJ()
endfunction
function abv takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),10.00)
endfunction
function abV takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),6.00)
endfunction
function abw takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),3.00)
endfunction
function abW takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetEnumPlayer(),1.00)
endfunction
function abx takes nothing returns nothing
call CameraClearNoiseForPlayer(GetEnumPlayer())
endfunction
function abX takes nothing returns nothing
call MoveRectToLoc(udg_rect154,GetUnitLoc(GetDyingUnit()))
call MoveRectToLoc(udg_rect155,GetUnitLoc(GetDyingUnit()))
call MoveRectToLoc(udg_rect156,GetUnitLoc(GetDyingUnit()))
call TriggerSleepAction(0.25)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2391")
call ForForce(GetPlayersAll(),function abp)
if(abP())then
call SetUnitLifeBJ(udg_unit33,(GetUnitStateSwap(UNIT_STATE_LIFE,udg_unit33)-5000.00))
else
call DoNothing()
endif
call EnumDestructablesInRectAll(udg_rect155,function abQ)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect155),function abr)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect154),function abR)
call CreateNUnitsAtLoc(1,'h03W',GetOwningPlayer(GetDyingUnit()),PolarProjectionBJ(GetUnitLoc(GetDyingUnit()),128.00,45.00),45.00)
call CreateNUnitsAtLoc(1,'h03W',GetOwningPlayer(GetDyingUnit()),PolarProjectionBJ(GetUnitLoc(GetDyingUnit()),128.00,90.00),90.00)
call CreateNUnitsAtLoc(1,'h03W',GetOwningPlayer(GetDyingUnit()),PolarProjectionBJ(GetUnitLoc(GetDyingUnit()),128.00,135.00),135.00)
call CreateNUnitsAtLoc(1,'h03W',GetOwningPlayer(GetDyingUnit()),PolarProjectionBJ(GetUnitLoc(GetDyingUnit()),128.00,180.00),180.00)
call CreateNUnitsAtLoc(1,'h03W',GetOwningPlayer(GetDyingUnit()),PolarProjectionBJ(GetUnitLoc(GetDyingUnit()),128.00,225.00),225.00)
call CreateNUnitsAtLoc(1,'h03W',GetOwningPlayer(GetDyingUnit()),PolarProjectionBJ(GetUnitLoc(GetDyingUnit()),128.00,270.00),270.00)
call CreateNUnitsAtLoc(1,'h03W',GetOwningPlayer(GetDyingUnit()),PolarProjectionBJ(GetUnitLoc(GetDyingUnit()),128.00,315.00),315.00)
call CreateNUnitsAtLoc(1,'h03W',GetOwningPlayer(GetDyingUnit()),PolarProjectionBJ(GetUnitLoc(GetDyingUnit()),128.00,360.00),360.00)
call EnableTrigger(udg_trigger250)
set udg_integer19=0
call ForGroupBJ(GetUnitsInRangeOfLocMatching(1000.00,GetUnitLoc(GetDyingUnit()),Condition(function abu)),function abU)
call EnableTrigger(udg_trigger249)
set udg_real02=35.00
call CreateNUnitsAtLoc(5,'h024',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect155),bj_UNIT_FACING)
call AddSpecialEffectLocBJ(GetRectCenter(udg_rect154),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike.mdl")
call AddSpecialEffectLocBJ(GetRectCenter(udg_rect154),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call CreateNUnitsAtLoc(1,'e008',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect155),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e008',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect155),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e008',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect155),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e008',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect155),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e007',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect155),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e007',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect155),bj_UNIT_FACING)
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect156),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect156),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect156),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect156),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect156),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect156),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect156),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call TriggerSleepAction(0.35)
set udg_real02=18.00
call TriggerSleepAction(0.65)
call ForForce(GetPlayersAll(),function abv)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call TriggerSleepAction(0.50)
set udg_real02=10.00
call TriggerSleepAction(0.50)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call ForForce(GetPlayersAll(),function abV)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call TriggerSleepAction(0.30)
set udg_real02=2.00
call TriggerSleepAction(0.20)
call DisableTrigger(udg_trigger249)
call TriggerSleepAction(0.50)
call ForForce(GetPlayersAll(),function abw)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call TriggerSleepAction(1.00)
call ForForce(GetPlayersAll(),function abW)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
call TriggerSleepAction(1.00)
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call AddSpecialEffectLocBJ(GetRandomLocInRect(udg_rect155),"Abilities\\Spells\\Human\\FlameStrike\\FlameStrike2.mdl")
call ForForce(GetPlayersAll(),function abx)
call ConditionalTriggerExecute(udg_trigger133)
call TriggerSleepAction(3.00)
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=udg_integer19
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call DestroyEffectBJ(udg_effects09[GetForLoopIndexA()])
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
function aby takes nothing returns nothing
set udg_trigger248=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger248,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger248,Condition(function abO))
call TriggerAddAction(udg_trigger248,function abX)
endfunction
function abY takes nothing returns nothing
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=udg_integer19
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call SetUnitPositionLoc(udg_units02[GetForLoopIndexA()],PolarProjectionBJ(GetUnitLoc(udg_units02[GetForLoopIndexA()]),udg_real02,I2R(udg_integers12[GetForLoopIndexA()])))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
function abz takes nothing returns nothing
set udg_trigger249=CreateTrigger()
call DisableTrigger(udg_trigger249)
call TriggerRegisterTimerEventPeriodic(udg_trigger249,0.04)
call TriggerAddAction(udg_trigger249,function abY)
endfunction
function abZ takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SUMMONED)==false)
endfunction
function ab0 takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function ab1 takes nothing returns boolean
return(false==false)
endfunction
function ab2 takes nothing returns boolean
return GetBooleanAnd(ab0(),ab1())
endfunction
function ab3 takes nothing returns boolean
return GetBooleanAnd(abZ(),ab2())
endfunction
function ab4 takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h03W')
endfunction
function ab5 takes nothing returns boolean
return(GetUnitTypeId(GetFilterUnit())=='h03W')
endfunction
function ab6 takes nothing returns nothing
set udg_location03=GetUnitLoc(GetEnumUnit())
call UnitDamageTargetBJ(GroupPickRandomUnit(GetUnitsInRangeOfLocMatching(55.00,udg_location03,Condition(function ab4))),GetEnumUnit(),200.00,ATTACK_TYPE_NORMAL,DAMAGE_TYPE_NORMAL)
call KillUnit(GroupPickRandomUnit(GetUnitsInRangeOfLocMatching(55.00,udg_location03,Condition(function ab5))))
call AddSpecialEffectTargetUnitBJ("origin",GetEnumUnit(),"Objects\\Spawnmodels\\Undead\\UCancelDeath\\UCancelDeath.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
endfunction
function ab7 takes nothing returns nothing
set udg_location01=GetUnitLoc(GetEnumUnit())
set udg_location02=PolarProjectionBJ(udg_location01,55.00,GetUnitFacing(GetEnumUnit()))
call SetUnitPositionLoc(GetEnumUnit(),udg_location02)
set udg_player06=GetOwningPlayer(GetEnumUnit())
set udg_group03=GetUnitsInRangeOfLocMatching(55.00,udg_location02,Condition(function ab3))
call ForGroupBJ(udg_group03,function ab6)
call DestroyGroup(udg_group03)
call RemoveLocation(udg_location01)
call RemoveLocation(udg_location02)
call RemoveLocation(udg_location03)
endfunction
function ab8 takes nothing returns nothing
set udg_group02=GetUnitsOfTypeIdAll('h03W')
call ForGroupBJ(udg_group02,function ab7)
call DestroyGroup(udg_group02)
endfunction
function ab9 takes nothing returns nothing
set udg_trigger250=CreateTrigger()
call DisableTrigger(udg_trigger250)
call TriggerRegisterTimerEventPeriodic(udg_trigger250,0.08)
call TriggerAddAction(udg_trigger250,function ab8)
endfunction
function aBa takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h03W'))then
return false
endif
return true
endfunction
function aBA takes nothing returns boolean
if(not(IsUnitGroupEmptyBJ(udg_group02)==true))then
return false
endif
return true
endfunction
function aBb takes nothing returns nothing
call RemoveUnit(GetDyingUnit())
set udg_group02=GetUnitsOfTypeIdAll('h03W')
if(aBA())then
call DisableTrigger(udg_trigger250)
else
call DoNothing()
endif
call DestroyGroup(udg_group02)
endfunction
function aBB takes nothing returns nothing
set udg_trigger251=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger251,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger251,Condition(function aBa))
call TriggerAddAction(udg_trigger251,function aBb)
endfunction
function aBc takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='n018'))then
return false
endif
return true
endfunction
function aBC takes nothing returns boolean
return(GetDestructableTypeId(GetEnumDestructable())!='B00K')
endfunction
function aBd takes nothing returns nothing
if(aBC())then
call KillDestructable(GetEnumDestructable())
else
call DoNothing()
endif
endfunction
function aBD takes nothing returns nothing
call UnitDamageTargetBJ(GetDyingUnit(),GetEnumUnit(),200.00,ATTACK_TYPE_MAGIC,DAMAGE_TYPE_NORMAL)
endfunction
function aBe takes nothing returns nothing
call UnitDamageTargetBJ(GetDyingUnit(),GetEnumUnit(),800.00,ATTACK_TYPE_MAGIC,DAMAGE_TYPE_NORMAL)
endfunction
function aBE takes nothing returns nothing
call UnitDamageTargetBJ(GetDyingUnit(),GetEnumUnit(),5000.00,ATTACK_TYPE_MAGIC,DAMAGE_TYPE_NORMAL)
endfunction
function aBf takes nothing returns nothing
call MoveRectToLoc(udg_rect154,GetUnitLoc(GetDyingUnit()))
call MoveRectToLoc(udg_rect155,GetUnitLoc(GetDyingUnit()))
call MoveRectToLoc(udg_rect156,GetUnitLoc(GetDyingUnit()))
call TriggerSleepAction(0.15)
call EnumDestructablesInRectAll(udg_rect156,function aBd)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect156),function aBD)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect155),function aBe)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect154),function aBE)
call SetTerrainTypeBJ(GetRectCenter(udg_rect155),'Cpos',-1,3,0)
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect156),bj_UNIT_FACING)
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect156),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect156),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect156),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect156),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect156),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
call CreateDestructableLoc('B00K',GetRandomLocInRect(udg_rect156),GetRandomDirectionDeg(),1.00,GetRandomInt(0,5))
endfunction
function aBF takes nothing returns nothing
set udg_trigger252=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger252,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger252,Condition(function aBc))
call TriggerAddAction(udg_trigger252,function aBf)
endfunction
function aBg takes nothing returns boolean
if(not(IsUnitAliveBJ(udg_unit33)==true))then
return false
endif
return true
endfunction
function aBG takes nothing returns nothing
call PlaySoundBJ(udg_sound57)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2398")
set udg_location04=GetRectCenter(udg_rect111)
call PingMinimapLocForForceEx(GetPlayersAll(),udg_location04,5.00,bj_MINIMAPPINGSTYLE_ATTACK,80.00,33.00,10.00)
call CreateItemLoc('I010',udg_location04)
call RemoveLocation(udg_location04)
endfunction
function aBh takes nothing returns nothing
set udg_trigger253=CreateTrigger()
call TriggerRegisterTimerEventSingle(udg_trigger253,GetRandomReal(600.00,1800.00))
call TriggerAddCondition(udg_trigger253,Condition(function aBg))
call TriggerAddAction(udg_trigger253,function aBG)
endfunction
function aBH takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I010'))then
return false
endif
return true
endfunction
function aBi takes nothing returns nothing
call CreateItemLoc('I02S',GetUnitLoc(GetManipulatingUnit()))
set udg_item01=GetLastCreatedItem()
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2399")
set udg_location04=GetUnitLoc(GetManipulatingUnit())
call PingMinimapLocForForceEx(GetPlayersAll(),udg_location04,2.00,bj_MINIMAPPINGSTYLE_ATTACK,100,100,100)
call RemoveLocation(udg_location04)
call PlaySoundBJ(udg_sound59)
call TriggerSleepAction(1.00)
call StartTimerBJ(udg_timer06,false,GetRandomReal(30.00,90.00))
call EnableTrigger(udg_trigger256)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(1.94)
call StopSoundBJ(udg_sound52,false)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(1.94)
call StopSoundBJ(udg_sound52,false)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(1.94)
call StopSoundBJ(udg_sound52,false)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(1.94)
call StopSoundBJ(udg_sound52,false)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(1.94)
call StopSoundBJ(udg_sound52,false)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(1.94)
call StopSoundBJ(udg_sound52,false)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(1.94)
call StopSoundBJ(udg_sound52,false)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(1.94)
call StopSoundBJ(udg_sound52,false)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(1.94)
call StopSoundBJ(udg_sound52,false)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(1.94)
call StopSoundBJ(udg_sound52,false)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(1.94)
call StopSoundBJ(udg_sound52,false)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(1.94)
call StopSoundBJ(udg_sound52,false)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(1.94)
call StopSoundBJ(udg_sound52,false)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(1.94)
call StopSoundBJ(udg_sound52,false)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(1.94)
call StopSoundBJ(udg_sound52,false)
call PlaySoundBJ(udg_sound52)
endfunction
function aBI takes nothing returns nothing
set udg_trigger254=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger254,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger254,Condition(function aBH))
call TriggerAddAction(udg_trigger254,function aBi)
endfunction
function aBj takes nothing returns boolean
return(udg_integer20==0)
endfunction
function aBJ takes nothing returns boolean
return(RectContainsUnit(udg_rect30,GetDyingUnit())!=true)
endfunction
function aBk takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetOwningPlayer(GetEnumUnit()),200.00)
call CameraSetTargetNoiseForPlayer(GetOwningPlayer(GetEnumUnit()),100.00,200.00)
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function aBK takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetOwningPlayer(GetEnumUnit()),100.00)
call CameraSetTargetNoiseForPlayer(GetOwningPlayer(GetEnumUnit()),20.00,200.00)
endfunction
function aBl takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetOwningPlayer(GetEnumUnit()),50.00)
call CameraSetTargetNoiseForPlayer(GetOwningPlayer(GetEnumUnit()),10.00,200.00)
endfunction
function aBL takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetOwningPlayer(GetEnumUnit()),25.00)
call CameraSetTargetNoiseForPlayer(GetOwningPlayer(GetEnumUnit()),5.00,200.00)
endfunction
function aBm takes nothing returns boolean
if(not(RectContainsUnit(udg_rect48,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBM takes nothing returns boolean
if(not(RectContainsUnit(udg_rect49,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBn takes nothing returns boolean
if(not(RectContainsUnit(udg_rect53,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBN takes nothing returns boolean
if(not(RectContainsUnit(udg_rect43,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBo takes nothing returns boolean
if(not(RectContainsUnit(udg_rect44,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBO takes nothing returns boolean
if(not(RectContainsUnit(udg_rect45,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBp takes nothing returns boolean
if(not(RectContainsUnit(udg_rect40,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBP takes nothing returns boolean
if(not(RectContainsUnit(udg_rect41,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBq takes nothing returns boolean
if(not(RectContainsUnit(udg_rect42,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBQ takes nothing returns boolean
if(not(RectContainsUnit(udg_rect46,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBr takes nothing returns boolean
if(not(RectContainsUnit(udg_rect47,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBR takes nothing returns boolean
if(not(RectContainsUnit(udg_rect113,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBs takes nothing returns boolean
if(not(RectContainsUnit(udg_rect112,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBS takes nothing returns boolean
if(not(RectContainsUnit(udg_rect114,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBt takes nothing returns boolean
if(not(RectContainsUnit(udg_rect50,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBT takes nothing returns boolean
if(not(RectContainsUnit(udg_rect31,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBu takes nothing returns boolean
if(not(RectContainsUnit(udg_rect51,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBU takes nothing returns boolean
if(not(RectContainsUnit(udg_rect52,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBv takes nothing returns boolean
if(not(RectContainsUnit(udg_rect121,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBV takes nothing returns boolean
if(not(RectContainsUnit(udg_rect122,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBw takes nothing returns boolean
if(not(RectContainsUnit(udg_rect123,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBW takes nothing returns boolean
if(not(RectContainsUnit(udg_rect124,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBx takes nothing returns boolean
if(not(udg_booleans03[1]==false))then
return false
endif
return true
endfunction
function aBX takes nothing returns nothing
call UnitDamageTargetBJ(GetLastCreatedUnit(),GetEnumUnit(),3500.00,ATTACK_TYPE_NORMAL,DAMAGE_TYPE_NORMAL)
endfunction
function aBy takes nothing returns nothing
call UnitDamageTargetBJ(GetLastCreatedUnit(),GetEnumUnit(),35000.00,ATTACK_TYPE_NORMAL,DAMAGE_TYPE_NORMAL)
endfunction
function aBY takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[1])=='h01G'))then
return false
endif
return true
endfunction
function aBz takes nothing returns boolean
if(not(RectContainsUnit(udg_rect116,udg_unit09)==true))then
return false
endif
return true
endfunction
function aBZ takes nothing returns boolean
if(not(udg_booleans03[2]==false))then
return false
endif
return true
endfunction
function aB0 takes nothing returns nothing
call UnitDamageTargetBJ(GetLastCreatedUnit(),GetEnumUnit(),3500.00,ATTACK_TYPE_NORMAL,DAMAGE_TYPE_NORMAL)
endfunction
function aB1 takes nothing returns nothing
call UnitDamageTargetBJ(GetLastCreatedUnit(),GetEnumUnit(),35000.00,ATTACK_TYPE_NORMAL,DAMAGE_TYPE_NORMAL)
endfunction
function aB2 takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[2])=='h01G'))then
return false
endif
return true
endfunction
function aB3 takes nothing returns boolean
if(not(RectContainsUnit(udg_rect117,udg_unit09)==true))then
return false
endif
return true
endfunction
function aB4 takes nothing returns boolean
if(not(udg_booleans03[3]==false))then
return false
endif
return true
endfunction
function aB5 takes nothing returns nothing
call UnitDamageTargetBJ(GetLastCreatedUnit(),GetEnumUnit(),3500.00,ATTACK_TYPE_NORMAL,DAMAGE_TYPE_NORMAL)
endfunction
function aB6 takes nothing returns nothing
call UnitDamageTargetBJ(GetLastCreatedUnit(),GetEnumUnit(),35000.00,ATTACK_TYPE_NORMAL,DAMAGE_TYPE_NORMAL)
endfunction
function aB7 takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[3])=='h01G'))then
return false
endif
return true
endfunction
function aB8 takes nothing returns boolean
if(not(RectContainsUnit(udg_rect118,udg_unit09)==true))then
return false
endif
return true
endfunction
function aB9 takes nothing returns boolean
if(not(udg_booleans03[4]==false))then
return false
endif
return true
endfunction
function aca takes nothing returns nothing
call UnitDamageTargetBJ(GetLastCreatedUnit(),GetEnumUnit(),3500.00,ATTACK_TYPE_NORMAL,DAMAGE_TYPE_NORMAL)
endfunction
function acA takes nothing returns nothing
call UnitDamageTargetBJ(GetLastCreatedUnit(),GetEnumUnit(),35000.00,ATTACK_TYPE_NORMAL,DAMAGE_TYPE_NORMAL)
endfunction
function acb takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[4])=='h01G'))then
return false
endif
return true
endfunction
function acB takes nothing returns boolean
if(not(RectContainsUnit(udg_rect119,udg_unit09)==true))then
return false
endif
return true
endfunction
function acc takes nothing returns boolean
if(not(RectContainsUnit(udg_rect159,udg_unit09)==true))then
return false
endif
return true
endfunction
function acC takes nothing returns boolean
if(not(RectContainsUnit(udg_rect160,udg_unit09)==true))then
return false
endif
return true
endfunction
function acd takes nothing returns nothing
call DisableTrigger(udg_trigger256)
call RemoveLocation(udg_location05)
if(aBj())then
set udg_location05=GetItemLoc(udg_item01)
else
set udg_location05=GetUnitLoc(udg_unit08)
endif
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),udg_location05,bj_UNIT_FACING)
set udg_unit09=GetLastCreatedUnit()
call RemoveItem(udg_item01)
if(aBJ())then
call SetUnitLifeBJ(udg_unit33,(GetUnitStateSwap(UNIT_STATE_LIFE,udg_unit33)-35000.00))
else
call DoNothing()
endif
call SetUnitTimeScalePercent(GetLastCreatedUnit(),30.00)
call PlaySoundBJ(udg_sound60)
call CreateTextTagLocBJ("TRIGSTR_2123",udg_location05,3.00,10,100,0.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),5.00)
call CinematicFilterGenericBJ(12.00,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",80.00,33.00,10.00,0.00,0,0,0,100.00)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRangeOfLocAll(1000.00,udg_location05),function aBk)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRangeOfLocAll(10000.00,udg_location05),function aBK)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRangeOfLocAll(25000.00,udg_location05),function aBl)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRangeOfLocAll(50000.00,udg_location05),function aBL)
call TriggerSleepAction(1.00)
if(aBm())then
call EnableTrigger(udg_trigger262)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger262)
call EnableTrigger(udg_trigger263)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger263)
else
endif
if(aBM())then
call EnableTrigger(udg_trigger263)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger263)
call EnableTrigger(udg_trigger262)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger262)
else
endif
if(aBn())then
call EnableTrigger(udg_trigger261)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger261)
else
endif
if(aBN())then
call EnableTrigger(udg_trigger264)
call TriggerSleepAction(3.50)
call EnableTrigger(udg_trigger265)
call TriggerSleepAction(3.50)
call EnableTrigger(udg_trigger266)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger264)
call DisableTrigger(udg_trigger265)
call DisableTrigger(udg_trigger266)
else
endif
if(aBo())then
call EnableTrigger(udg_trigger265)
call TriggerSleepAction(3.50)
call EnableTrigger(udg_trigger264)
call EnableTrigger(udg_trigger266)
call TriggerSleepAction(7.00)
call DisableTrigger(udg_trigger264)
call DisableTrigger(udg_trigger265)
call DisableTrigger(udg_trigger266)
else
endif
if(aBO())then
call EnableTrigger(udg_trigger266)
call TriggerSleepAction(3.50)
call EnableTrigger(udg_trigger265)
call TriggerSleepAction(3.50)
call EnableTrigger(udg_trigger264)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger264)
call DisableTrigger(udg_trigger265)
call DisableTrigger(udg_trigger266)
else
endif
if(aBp())then
call EnableTrigger(udg_trigger267)
call TriggerSleepAction(3.50)
call EnableTrigger(udg_trigger268)
call TriggerSleepAction(3.50)
call EnableTrigger(udg_trigger269)
call TriggerSleepAction(5.25)
call DisableTrigger(udg_trigger267)
call DisableTrigger(udg_trigger268)
call DisableTrigger(udg_trigger269)
else
endif
if(aBP())then
call EnableTrigger(udg_trigger268)
call TriggerSleepAction(3.50)
call EnableTrigger(udg_trigger267)
call EnableTrigger(udg_trigger269)
call TriggerSleepAction(7.00)
call DisableTrigger(udg_trigger267)
call DisableTrigger(udg_trigger268)
call DisableTrigger(udg_trigger269)
else
endif
if(aBq())then
call EnableTrigger(udg_trigger269)
call TriggerSleepAction(3.50)
call EnableTrigger(udg_trigger268)
call TriggerSleepAction(3.50)
call EnableTrigger(udg_trigger267)
call TriggerSleepAction(5.25)
call DisableTrigger(udg_trigger267)
call DisableTrigger(udg_trigger268)
call DisableTrigger(udg_trigger269)
else
endif
if(aBQ())then
call EnableTrigger(udg_trigger270)
call TriggerSleepAction(3.50)
call EnableTrigger(udg_trigger271)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger270)
call TriggerSleepAction(17.50)
call DisableTrigger(udg_trigger271)
else
endif
if(aBr())then
call EnableTrigger(udg_trigger271)
call TriggerSleepAction(7.00)
call EnableTrigger(udg_trigger270)
call TriggerSleepAction(7.00)
call DisableTrigger(udg_trigger270)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger271)
else
endif
if(aBR())then
call EnableTrigger(udg_trigger276)
call TriggerSleepAction(1.50)
call EnableTrigger(udg_trigger277)
call TriggerSleepAction(2.00)
call DisableTrigger(udg_trigger276)
call EnableTrigger(udg_trigger278)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger278)
call TriggerSleepAction(12.50)
call DisableTrigger(udg_trigger277)
else
endif
if(aBs())then
call EnableTrigger(udg_trigger277)
call TriggerSleepAction(5.25)
call EnableTrigger(udg_trigger276)
call EnableTrigger(udg_trigger278)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger276)
call DisableTrigger(udg_trigger278)
call TriggerSleepAction(8.75)
call DisableTrigger(udg_trigger277)
else
endif
if(aBS())then
call EnableTrigger(udg_trigger278)
call TriggerSleepAction(1.50)
call EnableTrigger(udg_trigger277)
call TriggerSleepAction(2.00)
call DisableTrigger(udg_trigger278)
call EnableTrigger(udg_trigger276)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger276)
call TriggerSleepAction(12.50)
call DisableTrigger(udg_trigger277)
else
endif
if(aBt())then
call EnableTrigger(udg_trigger279)
call TriggerSleepAction(5.25)
call EnableTrigger(udg_trigger280)
call TriggerSleepAction(12.25)
call DisableTrigger(udg_trigger279)
call DisableTrigger(udg_trigger280)
else
endif
if(aBT())then
call EnableTrigger(udg_trigger280)
call TriggerSleepAction(5.25)
call EnableTrigger(udg_trigger279)
call TriggerSleepAction(12.25)
call DisableTrigger(udg_trigger279)
call DisableTrigger(udg_trigger280)
else
endif
if(aBu())then
call EnableTrigger(udg_trigger281)
call TriggerSleepAction(1.40)
call EnableTrigger(udg_trigger282)
call TriggerSleepAction(0.70)
call DisableTrigger(udg_trigger281)
call TriggerSleepAction(1.40)
call DisableTrigger(udg_trigger282)
else
endif
if(aBU())then
call EnableTrigger(udg_trigger282)
call TriggerSleepAction(1.40)
call EnableTrigger(udg_trigger281)
call TriggerSleepAction(1.40)
call DisableTrigger(udg_trigger281)
call TriggerSleepAction(0.70)
call DisableTrigger(udg_trigger282)
else
endif
if(aBv())then
call EnableTrigger(udg_trigger272)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger272)
call EnableTrigger(udg_trigger273)
call TriggerSleepAction(7.00)
call DisableTrigger(udg_trigger273)
call EnableTrigger(udg_trigger274)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger274)
call EnableTrigger(udg_trigger275)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger275)
else
endif
if(aBV())then
call EnableTrigger(udg_trigger273)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger273)
call EnableTrigger(udg_trigger272)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger272)
call EnableTrigger(udg_trigger274)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger274)
call EnableTrigger(udg_trigger275)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger275)
else
endif
if(aBw())then
call EnableTrigger(udg_trigger274)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger274)
call EnableTrigger(udg_trigger275)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger275)
call EnableTrigger(udg_trigger273)
call TriggerSleepAction(7.00)
call DisableTrigger(udg_trigger273)
call EnableTrigger(udg_trigger272)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger272)
else
endif
if(aBW())then
call EnableTrigger(udg_trigger275)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger275)
call EnableTrigger(udg_trigger274)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger274)
call EnableTrigger(udg_trigger273)
call TriggerSleepAction(7.00)
call DisableTrigger(udg_trigger273)
call EnableTrigger(udg_trigger272)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger272)
else
endif
if(aBz())then
if(aBY())then
if(aBx())then
call KillUnit(udg_units01[1])
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),udg_locations01[1],bj_UNIT_FACING)
call EnableTrigger(udg_trigger277)
call TriggerSleepAction(5.25)
call EnableTrigger(udg_trigger276)
call EnableTrigger(udg_trigger278)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger276)
call DisableTrigger(udg_trigger278)
call TriggerSleepAction(8.75)
call DisableTrigger(udg_trigger277)
else
call KillUnit(udg_units01[1])
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect59),bj_UNIT_FACING)
call EnableTrigger(udg_trigger283)
call TriggerSleepAction(17.50)
call DisableTrigger(udg_trigger283)
endif
else
call CreateNUnitsAtLoc(1,'n01B',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(udg_units01[1]),bj_UNIT_FACING)
call MoveRectToLoc(udg_rect156,GetUnitLoc(udg_units01[1]))
call MoveRectToLoc(udg_rect155,GetUnitLoc(udg_units01[1]))
call ForGroupBJ(GetUnitsInRectAll(udg_rect156),function aBX)
call ForGroupBJ(GetUnitsInRectAll(udg_rect155),function aBy)
call KillUnit(udg_units01[1])
endif
else
endif
if(aB3())then
if(aB2())then
if(aBZ())then
call KillUnit(udg_units01[2])
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),udg_locations01[2],bj_UNIT_FACING)
call EnableTrigger(udg_trigger277)
call TriggerSleepAction(5.25)
call EnableTrigger(udg_trigger276)
call EnableTrigger(udg_trigger278)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger276)
call DisableTrigger(udg_trigger278)
call TriggerSleepAction(8.75)
call DisableTrigger(udg_trigger277)
else
call KillUnit(udg_units01[2])
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect60),bj_UNIT_FACING)
call EnableTrigger(udg_trigger283)
call TriggerSleepAction(17.50)
call DisableTrigger(udg_trigger283)
endif
else
call CreateNUnitsAtLoc(1,'n01B',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(udg_units01[2]),bj_UNIT_FACING)
call MoveRectToLoc(udg_rect156,GetUnitLoc(udg_units01[2]))
call MoveRectToLoc(udg_rect155,GetUnitLoc(udg_units01[2]))
call ForGroupBJ(GetUnitsInRectAll(udg_rect156),function aB0)
call ForGroupBJ(GetUnitsInRectAll(udg_rect155),function aB1)
call KillUnit(udg_units01[2])
endif
else
endif
if(aB8())then
if(aB7())then
if(aB4())then
call KillUnit(udg_units01[3])
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),udg_locations01[3],bj_UNIT_FACING)
call EnableTrigger(udg_trigger277)
call TriggerSleepAction(5.25)
call EnableTrigger(udg_trigger276)
call EnableTrigger(udg_trigger278)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger276)
call DisableTrigger(udg_trigger278)
call TriggerSleepAction(8.75)
call DisableTrigger(udg_trigger277)
else
call KillUnit(udg_units01[3])
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect61),bj_UNIT_FACING)
call EnableTrigger(udg_trigger283)
call TriggerSleepAction(17.50)
call DisableTrigger(udg_trigger283)
endif
else
call CreateNUnitsAtLoc(1,'n01B',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(udg_units01[3]),bj_UNIT_FACING)
call MoveRectToLoc(udg_rect156,GetUnitLoc(udg_units01[3]))
call MoveRectToLoc(udg_rect155,GetUnitLoc(udg_units01[3]))
call ForGroupBJ(GetUnitsInRectAll(udg_rect156),function aB5)
call ForGroupBJ(GetUnitsInRectAll(udg_rect155),function aB6)
call KillUnit(udg_units01[3])
endif
else
endif
if(acB())then
if(acb())then
if(aB9())then
call KillUnit(udg_units01[4])
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),udg_locations01[4],bj_UNIT_FACING)
call EnableTrigger(udg_trigger277)
call TriggerSleepAction(5.25)
call EnableTrigger(udg_trigger276)
call EnableTrigger(udg_trigger278)
call TriggerSleepAction(3.50)
call DisableTrigger(udg_trigger276)
call DisableTrigger(udg_trigger278)
call TriggerSleepAction(8.75)
call DisableTrigger(udg_trigger277)
else
call KillUnit(udg_units01[4])
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect62),bj_UNIT_FACING)
call EnableTrigger(udg_trigger283)
call TriggerSleepAction(17.50)
call DisableTrigger(udg_trigger283)
endif
else
call CreateNUnitsAtLoc(1,'n01B',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(udg_units01[4]),bj_UNIT_FACING)
call MoveRectToLoc(udg_rect156,GetUnitLoc(udg_units01[4]))
call MoveRectToLoc(udg_rect155,GetUnitLoc(udg_units01[4]))
call ForGroupBJ(GetUnitsInRectAll(udg_rect156),function aca)
call ForGroupBJ(GetUnitsInRectAll(udg_rect155),function acA)
call KillUnit(udg_units01[4])
endif
else
endif
if(acc())then
call EnableTrigger(udg_trigger283)
call TriggerSleepAction(17.50)
call DisableTrigger(udg_trigger283)
else
endif
if(acC())then
call EnableTrigger(udg_trigger284)
call TriggerSleepAction(17.50)
call DisableTrigger(udg_trigger284)
else
endif
endfunction
function acD takes nothing returns nothing
set udg_trigger255=CreateTrigger()
call TriggerRegisterTimerExpireEventBJ(udg_trigger255,udg_timer06)
call TriggerAddAction(udg_trigger255,function acd)
endfunction
function ace takes nothing returns boolean
if(not(udg_integer20==0))then
return false
endif
return true
endfunction
function acE takes nothing returns nothing
if(ace())then
set udg_location04=GetItemLoc(udg_item01)
call CreateTextTagLocBJ("TRIGSTR_2346",udg_location04,3.00,10,100,0.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),0.20)
call RemoveLocation(udg_location04)
else
call CreateTextTagUnitBJ("TRIGSTR_2372",udg_unit08,3.00,10,100,0.00,0.00,0)
call SetTextTagPermanentBJ(GetLastCreatedTextTag(),false)
call SetTextTagLifespanBJ(GetLastCreatedTextTag(),0.20)
endif
endfunction
function acf takes nothing returns nothing
set udg_trigger256=CreateTrigger()
call DisableTrigger(udg_trigger256)
call TriggerRegisterTimerEventPeriodic(udg_trigger256,0.25)
call TriggerAddAction(udg_trigger256,function acE)
endfunction
function acF takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='n019'))then
return false
endif
return true
endfunction
function acg takes nothing returns nothing
call CameraClearNoiseForPlayer(GetEnumPlayer())
endfunction
function acG takes nothing returns nothing
call ForForce(GetPlayersAll(),function acg)
call ConditionalTriggerExecute(udg_trigger133)
endfunction
function ach takes nothing returns nothing
set udg_trigger257=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger257,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger257,Condition(function acF))
call TriggerAddAction(udg_trigger257,function acG)
endfunction
function acH takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_GROUND)==true)
endfunction
function aci takes nothing returns boolean
if(not(GetTerrainTypeBJ(GetUnitLoc(GetEnumUnit()))=='Cpos'))then
return false
endif
return true
endfunction
function acI takes nothing returns nothing
if(aci())then
call SetUnitLifeBJ(GetEnumUnit(),(GetUnitStateSwap(UNIT_STATE_LIFE,GetEnumUnit())-20.00))
call AddSpecialEffectTargetUnitBJ("head",GetEnumUnit(),"Abilities\\Spells\\NightElf\\Immolation\\ImmolationDamage.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
else
endif
endfunction
function acj takes nothing returns nothing
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectMatching(GetPlayableMapRect(),Condition(function acH)),function acI)
endfunction
function acJ takes nothing returns nothing
set udg_trigger258=CreateTrigger()
call TriggerRegisterTimerEventPeriodic(udg_trigger258,1.00)
call TriggerAddAction(udg_trigger258,function acj)
endfunction
function ack takes nothing returns boolean
if(not(GetManipulatedItem()==udg_item01))then
return false
endif
return true
endfunction
function acK takes nothing returns nothing
set udg_integer20=1
set udg_unit08=GetManipulatingUnit()
endfunction
function acl takes nothing returns nothing
set udg_trigger259=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger259,EVENT_PLAYER_UNIT_PICKUP_ITEM)
call TriggerAddCondition(udg_trigger259,Condition(function ack))
call TriggerAddAction(udg_trigger259,function acK)
endfunction
function acL takes nothing returns boolean
if(not(GetManipulatedItem()==udg_item01))then
return false
endif
return true
endfunction
function acm takes nothing returns nothing
set udg_integer20=0
endfunction
function acM takes nothing returns nothing
set udg_trigger260=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger260,EVENT_PLAYER_UNIT_DROP_ITEM)
call TriggerAddCondition(udg_trigger260,Condition(function acL))
call TriggerAddAction(udg_trigger260,function acm)
endfunction
function acn takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect53)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function acN takes nothing returns nothing
set udg_trigger261=CreateTrigger()
call DisableTrigger(udg_trigger261)
call TriggerRegisterTimerEventPeriodic(udg_trigger261,0.35)
call TriggerAddAction(udg_trigger261,function acn)
endfunction
function aco takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect48)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function acO takes nothing returns nothing
set udg_trigger262=CreateTrigger()
call DisableTrigger(udg_trigger262)
call TriggerRegisterTimerEventPeriodic(udg_trigger262,0.35)
call TriggerAddAction(udg_trigger262,function aco)
endfunction
function acp takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect49)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function acP takes nothing returns nothing
set udg_trigger263=CreateTrigger()
call DisableTrigger(udg_trigger263)
call TriggerRegisterTimerEventPeriodic(udg_trigger263,0.35)
call TriggerAddAction(udg_trigger263,function acp)
endfunction
function acq takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect43)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function acQ takes nothing returns nothing
set udg_trigger264=CreateTrigger()
call DisableTrigger(udg_trigger264)
call TriggerRegisterTimerEventPeriodic(udg_trigger264,0.35)
call TriggerAddAction(udg_trigger264,function acq)
endfunction
function acr takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect44)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function acR takes nothing returns nothing
set udg_trigger265=CreateTrigger()
call DisableTrigger(udg_trigger265)
call TriggerRegisterTimerEventPeriodic(udg_trigger265,0.35)
call TriggerAddAction(udg_trigger265,function acr)
endfunction
function acs takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect45)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function acS takes nothing returns nothing
set udg_trigger266=CreateTrigger()
call DisableTrigger(udg_trigger266)
call TriggerRegisterTimerEventPeriodic(udg_trigger266,0.35)
call TriggerAddAction(udg_trigger266,function acs)
endfunction
function act takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect40)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function acT takes nothing returns nothing
set udg_trigger267=CreateTrigger()
call DisableTrigger(udg_trigger267)
call TriggerRegisterTimerEventPeriodic(udg_trigger267,0.35)
call TriggerAddAction(udg_trigger267,function act)
endfunction
function acu takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect41)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function acU takes nothing returns nothing
set udg_trigger268=CreateTrigger()
call DisableTrigger(udg_trigger268)
call TriggerRegisterTimerEventPeriodic(udg_trigger268,0.35)
call TriggerAddAction(udg_trigger268,function acu)
endfunction
function acv takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect42)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function acV takes nothing returns nothing
set udg_trigger269=CreateTrigger()
call DisableTrigger(udg_trigger269)
call TriggerRegisterTimerEventPeriodic(udg_trigger269,0.35)
call TriggerAddAction(udg_trigger269,function acv)
endfunction
function acw takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect46)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function acW takes nothing returns nothing
set udg_trigger270=CreateTrigger()
call DisableTrigger(udg_trigger270)
call TriggerRegisterTimerEventPeriodic(udg_trigger270,0.35)
call TriggerAddAction(udg_trigger270,function acw)
endfunction
function acx takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect47)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function acX takes nothing returns nothing
set udg_trigger271=CreateTrigger()
call DisableTrigger(udg_trigger271)
call TriggerRegisterTimerEventPeriodic(udg_trigger271,0.35)
call TriggerAddAction(udg_trigger271,function acx)
endfunction
function acy takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect121)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function acY takes nothing returns nothing
set udg_trigger272=CreateTrigger()
call DisableTrigger(udg_trigger272)
call TriggerRegisterTimerEventPeriodic(udg_trigger272,0.35)
call TriggerAddAction(udg_trigger272,function acy)
endfunction
function acz takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect122)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function acZ takes nothing returns nothing
set udg_trigger273=CreateTrigger()
call DisableTrigger(udg_trigger273)
call TriggerRegisterTimerEventPeriodic(udg_trigger273,0.35)
call TriggerAddAction(udg_trigger273,function acz)
endfunction
function ac0 takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect123)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function ac1 takes nothing returns nothing
set udg_trigger274=CreateTrigger()
call DisableTrigger(udg_trigger274)
call TriggerRegisterTimerEventPeriodic(udg_trigger274,0.35)
call TriggerAddAction(udg_trigger274,function ac0)
endfunction
function ac2 takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect124)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function ac3 takes nothing returns nothing
set udg_trigger275=CreateTrigger()
call DisableTrigger(udg_trigger275)
call TriggerRegisterTimerEventPeriodic(udg_trigger275,0.35)
call TriggerAddAction(udg_trigger275,function ac2)
endfunction
function ac4 takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect113)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function ac5 takes nothing returns nothing
set udg_trigger276=CreateTrigger()
call DisableTrigger(udg_trigger276)
call TriggerRegisterTimerEventPeriodic(udg_trigger276,0.35)
call TriggerAddAction(udg_trigger276,function ac4)
endfunction
function ac6 takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect112)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function ac7 takes nothing returns nothing
set udg_trigger277=CreateTrigger()
call DisableTrigger(udg_trigger277)
call TriggerRegisterTimerEventPeriodic(udg_trigger277,0.35)
call TriggerAddAction(udg_trigger277,function ac6)
endfunction
function ac8 takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect114)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function ac9 takes nothing returns nothing
set udg_trigger278=CreateTrigger()
call DisableTrigger(udg_trigger278)
call TriggerRegisterTimerEventPeriodic(udg_trigger278,0.35)
call TriggerAddAction(udg_trigger278,function ac8)
endfunction
function aCa takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect50)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function aCA takes nothing returns nothing
set udg_trigger279=CreateTrigger()
call DisableTrigger(udg_trigger279)
call TriggerRegisterTimerEventPeriodic(udg_trigger279,0.35)
call TriggerAddAction(udg_trigger279,function aCa)
endfunction
function aCb takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect31)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function aCB takes nothing returns nothing
set udg_trigger280=CreateTrigger()
call DisableTrigger(udg_trigger280)
call TriggerRegisterTimerEventPeriodic(udg_trigger280,0.35)
call TriggerAddAction(udg_trigger280,function aCb)
endfunction
function aCc takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect51)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function aCC takes nothing returns nothing
set udg_trigger281=CreateTrigger()
call DisableTrigger(udg_trigger281)
call TriggerRegisterTimerEventPeriodic(udg_trigger281,0.35)
call TriggerAddAction(udg_trigger281,function aCc)
endfunction
function aCd takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect52)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function aCD takes nothing returns nothing
set udg_trigger282=CreateTrigger()
call DisableTrigger(udg_trigger282)
call TriggerRegisterTimerEventPeriodic(udg_trigger282,0.35)
call TriggerAddAction(udg_trigger282,function aCd)
endfunction
function aCe takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect159)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function aCE takes nothing returns nothing
set udg_trigger283=CreateTrigger()
call DisableTrigger(udg_trigger283)
call TriggerRegisterTimerEventPeriodic(udg_trigger283,0.35)
call TriggerAddAction(udg_trigger283,function aCe)
endfunction
function aCf takes nothing returns nothing
set udg_location04=GetRandomLocInRect(udg_rect160)
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
endfunction
function aCF takes nothing returns nothing
set udg_trigger284=CreateTrigger()
call DisableTrigger(udg_trigger284)
call TriggerRegisterTimerEventPeriodic(udg_trigger284,0.35)
call TriggerAddAction(udg_trigger284,function aCf)
endfunction
function aCg takes nothing returns boolean
if(not(GetItemType(GetManipulatedItem())==ITEM_TYPE_POWERUP))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h01D'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h02F'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00Q'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00R'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00S'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00V'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00T'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00U'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00W'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h013'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h014'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h011'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00X'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h010'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00Z'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h012'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00Y'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00D'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00C'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00B'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00E'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00G'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00H'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00F'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00P'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00K'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00L'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00I'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00M'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00N'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00O'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h00J'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h01C'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h02E'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h02V'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h047'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h03S'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h03Z'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h01F'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h03Y'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h017'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h03M'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())!='h027'))then
return false
endif
return true
endfunction
function aCG takes nothing returns boolean
if(not aCg())then
return false
endif
return true
endfunction
function aCh takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I007')
endfunction
function aCH takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I003')
endfunction
function aCi takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I005')
endfunction
function aCI takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I002')
endfunction
function aCj takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I015')
endfunction
function aCJ takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I00A')
endfunction
function aCk takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I001')
endfunction
function aCK takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I004')
endfunction
function aCl takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I01I')
endfunction
function aCL takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I006')
endfunction
function aCm takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I02O')
endfunction
function aCM takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I000')
endfunction
function aCn takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I00D')
endfunction
function aCN takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I02N')
endfunction
function aCo takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I02P')
endfunction
function aCO takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I008')
endfunction
function aCp takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I013')
endfunction
function aCP takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I00C')
endfunction
function aCq takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I00B')
endfunction
function aCQ takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I011')
endfunction
function aCr takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I012')
endfunction
function aCR takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I02N')
endfunction
function aCs takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I02P')
endfunction
function aCS takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I006')
endfunction
function aCt takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I02O')
endfunction
function aCT takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I00D')
endfunction
function aCu takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I007')
endfunction
function aCU takes nothing returns boolean
return GetBooleanOr(aCT(),aCu())
endfunction
function aCv takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I001')
endfunction
function aCV takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I015')
endfunction
function aCw takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I002')
endfunction
function aCW takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I008')
endfunction
function aCx takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I000')
endfunction
function aCX takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I01I')
endfunction
function aCy takes nothing returns boolean
return GetBooleanOr(aCx(),aCX())
endfunction
function aCY takes nothing returns boolean
return GetBooleanOr(aCW(),aCy())
endfunction
function aCz takes nothing returns boolean
return GetBooleanOr(aCw(),aCY())
endfunction
function aCZ takes nothing returns boolean
return GetBooleanOr(aCV(),aCz())
endfunction
function aC0 takes nothing returns boolean
return GetBooleanOr(aCv(),aCZ())
endfunction
function aC1 takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I004')
endfunction
function aC2 takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I003')
endfunction
function aC3 takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I005')
endfunction
function aC4 takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I00A')
endfunction
function aC5 takes nothing returns boolean
return(GetItemTypeId(GetManipulatedItem())=='I013')
endfunction
function aC6 takes nothing returns boolean
return GetBooleanOr(aC4(),aC5())
endfunction
function aC7 takes nothing returns boolean
return GetBooleanOr(aC3(),aC6())
endfunction
function aC8 takes nothing returns boolean
return GetBooleanOr(aC2(),aC7())
endfunction
function aC9 takes nothing returns boolean
return GetBooleanOr(aC1(),aC8())
endfunction
function ada takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I00C'))then
return false
endif
return true
endfunction
function adA takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I00B'))then
return false
endif
return true
endfunction
function adb takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I011'))then
return false
endif
return true
endfunction
function adB takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I012'))then
return false
endif
return true
endfunction
function adc takes nothing returns boolean
return(GetManipulatingUnit()==udg_unit01)
endfunction
function adC takes nothing returns boolean
return(udg_player04!=udg_player02)
endfunction
function add takes nothing returns boolean
return(IsPlayerInForce(udg_player04,udg_force01)!=true)
endfunction
function adD takes nothing returns boolean
return GetBooleanAnd(adC(),add())
endfunction
function ade takes nothing returns boolean
if(not(GetUnitTypeId(GetManipulatingUnit())=='h005'))then
return false
endif
return true
endfunction
function adE takes nothing returns boolean
return(GetUnitTypeId(GetManipulatingUnit())=='h003')
endfunction
function adf takes nothing returns boolean
return(GetUnitTypeId(GetManipulatingUnit())=='h004')
endfunction
function adF takes nothing returns boolean
return(GetUnitTypeId(GetManipulatingUnit())=='h02B')
endfunction
function adg takes nothing returns boolean
return(GetUnitTypeId(GetManipulatingUnit())=='h016')
endfunction
function adG takes nothing returns boolean
return(GetUnitTypeId(GetManipulatingUnit())=='h000')
endfunction
function adh takes nothing returns boolean
if(not(GetUnitTypeId(GetManipulatingUnit())=='h008'))then
return false
endif
return true
endfunction
function adH takes nothing returns boolean
return(GetUnitTypeId(GetManipulatingUnit())=='h02Z')
endfunction
function adi takes nothing returns boolean
if(not(GetUnitTypeId(GetManipulatingUnit())=='h009'))then
return false
endif
return true
endfunction
function adI takes nothing returns boolean
if(not(GetUnitTypeId(GetManipulatingUnit())=='h03E'))then
return false
endif
return true
endfunction
function adj takes nothing returns boolean
return(GetUnitTypeId(GetManipulatingUnit())=='h04G')
endfunction
function adJ takes nothing returns boolean
return(GetUnitTypeId(GetManipulatingUnit())=='h002')
endfunction
function adk takes nothing returns boolean
return(GetUnitTypeId(GetManipulatingUnit())=='h04D')
endfunction
function adK takes nothing returns boolean
return(GetUnitTypeId(GetManipulatingUnit())=='h015')
endfunction
function adl takes nothing returns boolean
return(GetUnitTypeId(GetManipulatingUnit())=='h04F')
endfunction
function adL takes nothing returns boolean
if(not(GetOwningPlayer(GetManipulatingUnit())==udg_player02))then
return false
endif
return true
endfunction
function adm takes nothing returns boolean
if((udg_integer02=='h00D'))then
return true
endif
if((udg_integer02=='h00G'))then
return true
endif
if((udg_integer02=='h00H'))then
return true
endif
if((udg_integer02=='h00P'))then
return true
endif
if((udg_integer02=='h00N'))then
return true
endif
if((udg_integer02=='h00O'))then
return true
endif
if((udg_integer02=='h00M'))then
return true
endif
return false
endfunction
function adM takes nothing returns boolean
if(not adm())then
return false
endif
return true
endfunction
function adn takes nothing returns boolean
if((GetOwningPlayer(GetManipulatingUnit())==udg_player02))then
return true
endif
if((GetOwningPlayer(GetManipulatingUnit())==Player(11)))then
return true
endif
if((IsPlayerInForce(GetOwningPlayer(GetManipulatingUnit()),udg_force01)==true))then
return true
endif
return false
endfunction
function adN takes nothing returns boolean
if(not adn())then
return false
endif
return true
endfunction
function ado takes nothing returns nothing
call UnitAddAbilityBJ('S000',GetManipulatingUnit())
if(aCh())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),2)
else
call DoNothing()
endif
if(aCH())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),3)
else
call DoNothing()
endif
if(aCi())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),4)
else
call DoNothing()
endif
if(aCI())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),5)
else
call DoNothing()
endif
if(aCj())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),6)
else
call DoNothing()
endif
if(aCJ())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),7)
else
call DoNothing()
endif
if(aCk())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),8)
else
call DoNothing()
endif
if(aCK())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),9)
else
call DoNothing()
endif
if(aCl())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),10)
else
call DoNothing()
endif
if(aCL())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),11)
else
call DoNothing()
endif
if(aCm())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),12)
else
call DoNothing()
endif
if(aCM())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),13)
else
call DoNothing()
endif
if(aCn())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),14)
else
call DoNothing()
endif
if(aCN())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),15)
else
call DoNothing()
endif
if(aCo())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),16)
else
call DoNothing()
endif
if(aCO())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),17)
else
call DoNothing()
endif
if(aCp())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),18)
else
call DoNothing()
endif
if(aCP())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),20)
else
call DoNothing()
endif
if(aCq())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),21)
else
call DoNothing()
endif
if(aCQ())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),22)
else
call DoNothing()
endif
if(aCr())then
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),23)
else
call DoNothing()
endif
call TriggerSleepAction(0.05)
call DestroyEffectBJ(udg_effects01[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call DestroyEffectBJ(udg_effects02[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call DestroyEffectBJ(udg_effects03[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call DestroyEffectBJ(udg_effects04[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call DestroyEffectBJ(udg_effects05[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call DestroyEffectBJ(udg_effects06[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call DestroyEffectBJ(udg_effects07[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call DestroyEffectBJ(udg_effects08[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
if(aCR())then
call AddSpecialEffectTargetUnitBJ("weapon",GetManipulatingUnit(),"BruteShotSmall.mdx")
else
call DoNothing()
endif
if(aCs())then
call AddSpecialEffectTargetUnitBJ("weapon",GetManipulatingUnit(),"war3mapImported\\Konstrukt_MinigunAttachment.MDX")
else
call DoNothing()
endif
if(aCS())then
call AddSpecialEffectTargetUnitBJ("weapon",GetManipulatingUnit(),"war3mapImported\\Konstrukt_SniperAttachment.MDX")
else
call DoNothing()
endif
if(aCt())then
call AddSpecialEffectTargetUnitBJ("weapon",GetManipulatingUnit(),"ChainSaw.mdx")
else
call DoNothing()
endif
if(aCU())then
call AddSpecialEffectTargetUnitBJ("weapon",GetManipulatingUnit(),"war3mapImported\\Konstrukt_AssaultRifleAttachment.MDX")
else
call DoNothing()
endif
if(aC0())then
call AddSpecialEffectTargetUnitBJ("weapon",GetManipulatingUnit(),"war3mapImported\\Konstrukt_FlameThrowerAttachment.MDX")
else
call DoNothing()
endif
if(aC9())then
call AddSpecialEffectTargetUnitBJ("weapon",GetManipulatingUnit(),"war3mapImported\\Konstrukt_ShotgunAttachment.MDX")
else
call DoNothing()
endif
set udg_effects01[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
if(ada())then
call SetUnitColor(GetManipulatingUnit(),PLAYER_COLOR_YELLOW)
call AddSpecialEffectTargetUnitBJ("weapon",GetManipulatingUnit(),"angelsword.mdx")
set udg_effects01[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("chest",GetManipulatingUnit(),"ailles1.mdx")
set udg_effects02[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("right hand",GetManipulatingUnit(),"Abilities\\Weapons\\FaerieDragonMissile\\FaerieDragonMissile.mdl")
set udg_effects03[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("left hand",GetManipulatingUnit(),"Abilities\\Weapons\\FaerieDragonMissile\\FaerieDragonMissile.mdl")
set udg_effects04[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("right foot",GetManipulatingUnit(),"Abilities\\Weapons\\FaerieDragonMissile\\FaerieDragonMissile.mdl")
set udg_effects05[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("left foot",GetManipulatingUnit(),"Abilities\\Weapons\\FaerieDragonMissile\\FaerieDragonMissile.mdl")
set udg_effects06[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("weapon",GetManipulatingUnit(),"Abilities\\Spells\\Other\\HealingSpray\\HealBottleMissile.mdl")
set udg_effects07[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("overhead",GetManipulatingUnit(),"Abilities\\Spells\\Items\\AIta\\CrystalBallCaster.mdl")
set udg_effects08[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
else
endif
if(adA())then
call SetUnitColor(GetManipulatingUnit(),PLAYER_COLOR_AQUA)
call AddSpecialEffectTargetUnitBJ("weapon",GetManipulatingUnit(),"GiantSword.mdx")
set udg_effects01[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("chest",GetManipulatingUnit(),"ailles2.mdx")
set udg_effects02[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("head",GetManipulatingUnit(),"Horns.mdx")
set udg_effects03[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("right hand",GetManipulatingUnit(),"Environment\\UndeadBuildingFire\\UndeadLargeBuildingFire2.mdl")
set udg_effects04[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("left hand",GetManipulatingUnit(),"Environment\\UndeadBuildingFire\\UndeadLargeBuildingFire2.mdl")
set udg_effects05[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("right foot",GetManipulatingUnit(),"Environment\\UndeadBuildingFire\\UndeadLargeBuildingFire2.mdl")
set udg_effects06[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("left foot",GetManipulatingUnit(),"Environment\\UndeadBuildingFire\\UndeadLargeBuildingFire2.mdl")
set udg_effects07[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("chest",GetManipulatingUnit(),"Abilities\\Spells\\Items\\AIso\\BIsvTarget.mdl")
set udg_effects08[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
else
endif
if(adb())then
call SetUnitColor(GetManipulatingUnit(),PLAYER_COLOR_GREEN)
call AddSpecialEffectTargetUnitBJ("head",GetManipulatingUnit(),"Abilities\\Spells\\Undead\\DeathCoil\\DeathCoilMissile.mdl")
set udg_effects01[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("chest",GetManipulatingUnit(),"BlackWings.mdx")
set udg_effects02[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
else
endif
if(adB())then
call AddSpecialEffectTargetUnitBJ("weapon",GetManipulatingUnit(),"war3mapImported\\Konstrukt_FlameThrowerAttachment.MDX")
set udg_effects01[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("left hand",GetManipulatingUnit(),"Abilities\\Weapons\\FrostWyrmMissile\\FrostWyrmMissile.mdl")
set udg_effects02[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("right hand",GetManipulatingUnit(),"Abilities\\Weapons\\RedDragonBreath\\RedDragonMissile.mdl")
set udg_effects03[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("origin",GetManipulatingUnit(),"Abilities\\Spells\\Orc\\LightningShield\\LightningShieldTarget.mdl")
set udg_effects04[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
call AddSpecialEffectTargetUnitBJ("overhead",GetManipulatingUnit(),"Abilities\\Spells\\Human\\MagicSentry\\MagicSentryCaster.mdl")
set udg_effects05[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))]=GetLastCreatedEffectBJ()
else
endif
if(adN())then
if(adc())then
if(adD())then
return
else
call DoNothing()
endif
else
call DoNothing()
endif
call UnitAddTypeBJ(UNIT_TYPE_ANCIENT,GetManipulatingUnit())
if(ade())then
call SetUnitAbilityLevelSwapped('A015',GetManipulatingUnit(),2)
call SetUnitAbilityLevelSwapped('A014',GetManipulatingUnit(),2)
else
endif
if(adE())then
call SetUnitAbilityLevelSwapped('A018',GetManipulatingUnit(),2)
else
call DoNothing()
endif
if(adf())then
call SetUnitAbilityLevelSwapped('A00C',GetManipulatingUnit(),2)
else
call DoNothing()
endif
if(adF())then
call SetUnitAbilityLevelSwapped('A05G',GetManipulatingUnit(),2)
else
call DoNothing()
endif
if(adg())then
call SetUnitAbilityLevelSwapped('A00M',GetManipulatingUnit(),2)
else
call DoNothing()
endif
if(adG())then
call SetUnitAbilityLevelSwapped('A07W',GetManipulatingUnit(),2)
else
call DoNothing()
endif
if(adh())then
call SetUnitAbilityLevelSwapped('A00E',GetManipulatingUnit(),2)
call SetUnitAbilityLevelSwapped('A00F',GetManipulatingUnit(),2)
else
endif
if(adH())then
call SetUnitAbilityLevelSwapped('A084',GetManipulatingUnit(),2)
else
call DoNothing()
endif
if(adi())then
call SetUnitAbilityLevelSwapped('A00A',GetManipulatingUnit(),2)
call SetUnitAbilityLevelSwapped('A00B',GetManipulatingUnit(),2)
else
endif
if(adI())then
call SetUnitAbilityLevelSwapped('A05V',GetManipulatingUnit(),2)
call SetUnitAbilityLevelSwapped('A07Y',GetManipulatingUnit(),2)
else
endif
if(adj())then
call SetUnitAbilityLevelSwapped('A092',GetManipulatingUnit(),2)
else
call DoNothing()
endif
if(adJ())then
call SetUnitAbilityLevelSwapped('A00D',GetManipulatingUnit(),2)
else
call DoNothing()
endif
if(adk())then
call SetUnitAbilityLevelSwapped('A09J',GetManipulatingUnit(),2)
else
call DoNothing()
endif
if(adK())then
call SetUnitAbilityLevelSwapped('A003',GetManipulatingUnit(),2)
else
call DoNothing()
endif
if(adl())then
call SetUnitAbilityLevelSwapped('A003',GetManipulatingUnit(),2)
else
call DoNothing()
endif
if(adM())then
call UnitAddAbilityBJ('A072',GetManipulatingUnit())
if(adL())then
call DisableTrigger(udg_trigger57)
call UnitAddAbilityBJ('A01R',GetManipulatingUnit())
else
endif
else
call UnitAddAbilityBJ('A071',GetManipulatingUnit())
endif
else
call DoNothing()
endif
endfunction
function adO takes nothing returns nothing
set udg_trigger285=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger285,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger285,Condition(function aCG))
call TriggerAddAction(udg_trigger285,function ado)
endfunction
function adp takes nothing returns boolean
if(not(GetUnitTypeId(GetSummonedUnit())=='e00A'))then
return false
endif
return true
endfunction
function adP takes nothing returns nothing
call SetUnitOwner(GetSummonedUnit(),Player(PLAYER_NEUTRAL_PASSIVE),true)
endfunction
function adq takes nothing returns nothing
set udg_trigger286=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger286,EVENT_PLAYER_UNIT_SUMMON)
call TriggerAddCondition(udg_trigger286,Condition(function adp))
call TriggerAddAction(udg_trigger286,function adP)
endfunction
function adQ takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h04G'))then
return false
endif
return true
endfunction
function adr takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h006'))then
return false
endif
return true
endfunction
function adR takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h009'))then
return false
endif
return true
endfunction
function ads takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h015'))then
return false
endif
return true
endfunction
function adS takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h04D'))then
return false
endif
return true
endfunction
function adt takes nothing returns nothing
if(adQ())then
call PlaySoundOnUnitBJ(udg_sound44,100,GetAttacker())
call AddSpecialEffectTargetUnitBJ("weapon",GetAttacker(),"Abilities\\Spells\\Undead\\CarrionSwarm\\CarrionSwarmDamage.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
else
call DoNothing()
endif
if(adr())then
call StopSoundBJ(udg_sound41,false)
call PlaySoundOnUnitBJ(udg_sound41,100,GetAttacker())
call AddSpecialEffectTargetUnitBJ("weapon",GetAttacker(),"war3mapImported\\Konstrukt_ShotgunEffektAttachment.MDX")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
else
call DoNothing()
endif
if(adR())then
call StopSoundBJ(udg_sound42,false)
call PlaySoundOnUnitBJ(udg_sound42,100,GetAttacker())
call AddSpecialEffectTargetUnitBJ("weapon",GetAttacker(),"war3mapImported\\Konstrukt_ShotgunEffektAttachment.MDX")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
else
call DoNothing()
endif
if(ads())then
call StopSoundBJ(udg_sound43,false)
call PlaySoundOnUnitBJ(udg_sound43,100,GetAttacker())
call AddSpecialEffectTargetUnitBJ("weapon",GetAttacker(),"war3mapImported\\Konstrukt_ShotgunEffektAttachment.MDX")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
else
call DoNothing()
endif
if(adS())then
call StopSoundBJ(udg_sound45,false)
call PlaySoundOnUnitBJ(udg_sound45,100,GetAttacker())
call AddSpecialEffectTargetUnitBJ("weapon",GetAttacker(),"war3mapImported\\Konstrukt_ShotgunEffektAttachment.MDX")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
else
call DoNothing()
endif
endfunction
function adT takes nothing returns nothing
set udg_trigger287=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger287,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddAction(udg_trigger287,function adt)
endfunction
function adu takes nothing returns boolean
if(not(GetUnitStateSwap(UNIT_STATE_MANA,GetEnumUnit())>=25.00))then
return false
endif
if(not(GetUnitCurrentOrder(GetEnumUnit())!=String2OrderIdBJ("attack")))then
return false
endif
return true
endfunction
function adU takes nothing returns boolean
if(not adu())then
return false
endif
return true
endfunction
function adv takes nothing returns nothing
if(adU())then
call SetUnitManaBJ(GetEnumUnit(),(GetUnitStateSwap(UNIT_STATE_MANA,GetEnumUnit())+1))
else
call DoNothing()
endif
endfunction
function adV takes nothing returns nothing
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(GetEnumPlayer(),'h016'),function adv)
endfunction
function adw takes nothing returns nothing
call ForForce(GetPlayersByMapControl(MAP_CONTROL_USER),function adV)
endfunction
function adW takes nothing returns nothing
set udg_trigger288=CreateTrigger()
call TriggerRegisterTimerEventPeriodic(udg_trigger288,1.00)
call TriggerAddAction(udg_trigger288,function adw)
endfunction
function adx takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h007'))then
return false
endif
return true
endfunction
function adX takes nothing returns boolean
if(not(udg_integer14==50))then
return false
endif
return true
endfunction
function ady takes nothing returns boolean
if(not(udg_integer14==16))then
return false
endif
return true
endfunction
function adY takes nothing returns boolean
if(not(UnitHasBuffBJ(GetAttacker(),'B00Z')==true))then
return false
endif
return true
endfunction
function adz takes nothing returns nothing
if(adY())then
set udg_integer14=GetRandomInt(1,33)
if(ady())then
call RemoveItem(GetItemOfTypeFromUnitBJ(GetAttacker(),'I008'))
call CreateNUnitsAtLoc(1,'n01N',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetAttacker()),bj_UNIT_FACING)
call IssueImmediateOrder(GetLastCreatedUnit(),"roar")
else
endif
else
set udg_integer14=GetRandomInt(1,100)
if(adX())then
call RemoveItem(GetItemOfTypeFromUnitBJ(GetAttacker(),'I008'))
call CreateNUnitsAtLoc(1,'n01N',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetAttacker()),bj_UNIT_FACING)
call IssueImmediateOrder(GetLastCreatedUnit(),"roar")
else
endif
endif
endfunction
function adZ takes nothing returns nothing
set udg_trigger289=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger289,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddCondition(udg_trigger289,Condition(function adx))
call TriggerAddAction(udg_trigger289,function adz)
endfunction
function ad0 takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I00C'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h017'))then
return false
endif
return true
endfunction
function ad1 takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I001'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h000'))then
return false
endif
return true
endfunction
function ad2 takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I004'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h008'))then
return false
endif
return true
endfunction
function ad3 takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I000'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h002'))then
return false
endif
return true
endfunction
function ad4 takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I00B'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h03M'))then
return false
endif
return true
endfunction
function ad5 takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I02N'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h04F'))then
return false
endif
return true
endfunction
function ad6 takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I002'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h004'))then
return false
endif
return true
endfunction
function ad7 takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I02P'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h04D'))then
return false
endif
return true
endfunction
function ad8 takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I015'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h02B'))then
return false
endif
return true
endfunction
function ad9 takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I003'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h005'))then
return false
endif
return true
endfunction
function aDa takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I007'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h006'))then
return false
endif
return true
endfunction
function aDA takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I005'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h003'))then
return false
endif
return true
endfunction
function aDb takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I008'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h007'))then
return false
endif
return true
endfunction
function aDB takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I00A'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h016'))then
return false
endif
return true
endfunction
function aDc takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I02O'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h04G'))then
return false
endif
return true
endfunction
function aDC takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I00D'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h015'))then
return false
endif
return true
endfunction
function aDd takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I006'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h009'))then
return false
endif
return true
endfunction
function aDD takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I01I'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h02Z'))then
return false
endif
return true
endfunction
function aDe takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I013'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h03E'))then
return false
endif
return true
endfunction
function aDE takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I011'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h027'))then
return false
endif
return true
endfunction
function aDf takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I012'))then
return false
endif
if(not(GetUnitTypeId(GetManipulatingUnit())=='h028'))then
return false
endif
return true
endfunction
function aDF takes nothing returns boolean
if(ad0())then
return true
endif
if(ad1())then
return true
endif
if(ad2())then
return true
endif
if(ad3())then
return true
endif
if(ad4())then
return true
endif
if(ad5())then
return true
endif
if(ad6())then
return true
endif
if(ad7())then
return true
endif
if(ad8())then
return true
endif
if(ad9())then
return true
endif
if(aDa())then
return true
endif
if(aDA())then
return true
endif
if(aDb())then
return true
endif
if(aDB())then
return true
endif
if(aDc())then
return true
endif
if(aDC())then
return true
endif
if(aDd())then
return true
endif
if(aDD())then
return true
endif
if(aDe())then
return true
endif
if(aDE())then
return true
endif
if(aDf())then
return true
endif
return false
endfunction
function aDg takes nothing returns boolean
if(not(GetUnitCurrentOrder(GetManipulatingUnit())!=String2OrderIdBJ("")))then
return false
endif
if(not aDF())then
return false
endif
return true
endfunction
function aDG takes nothing returns boolean
if(not aDg())then
return false
endif
return true
endfunction
function aDh takes nothing returns boolean
return(GetManipulatingUnit()==udg_unit01)
endfunction
function aDH takes nothing returns boolean
return(udg_player04!=udg_player02)
endfunction
function aDi takes nothing returns boolean
return(IsPlayerInForce(udg_player04,udg_force01)!=true)
endfunction
function aDI takes nothing returns boolean
return GetBooleanAnd(aDH(),aDi())
endfunction
function aDj takes nothing returns boolean
if((GetOwningPlayer(GetManipulatingUnit())==udg_player02))then
return true
endif
if((IsPlayerInForce(GetOwningPlayer(GetManipulatingUnit()),udg_force01)==true))then
return true
endif
return false
endfunction
function aDJ takes nothing returns boolean
if(not(GetOwningPlayer(GetManipulatingUnit())==udg_player02))then
return false
endif
return true
endfunction
function aDk takes nothing returns boolean
if((udg_integer02=='h00D'))then
return true
endif
if((udg_integer02=='h00G'))then
return true
endif
if((udg_integer02=='h00H'))then
return true
endif
if((udg_integer02=='h00P'))then
return true
endif
if((udg_integer02=='h00N'))then
return true
endif
if((udg_integer02=='h00O'))then
return true
endif
if((udg_integer02=='h00M'))then
return true
endif
return false
endfunction
function aDK takes nothing returns boolean
if(not aDk())then
return false
endif
return true
endfunction
function aDl takes nothing returns boolean
if(not aDj())then
return false
endif
return true
endfunction
function aDL takes nothing returns nothing
call UnitAddAbilityBJ('S000',GetManipulatingUnit())
call SetUnitAbilityLevelSwapped('S000',GetManipulatingUnit(),1)
call DestroyEffectBJ(udg_effects01[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call DestroyEffectBJ(udg_effects02[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call DestroyEffectBJ(udg_effects03[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call DestroyEffectBJ(udg_effects04[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call DestroyEffectBJ(udg_effects05[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call DestroyEffectBJ(udg_effects06[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call DestroyEffectBJ(udg_effects07[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call DestroyEffectBJ(udg_effects08[GetConvertedPlayerId(GetOwningPlayer(GetManipulatingUnit()))])
call TriggerSleepAction(0.05)
if(aDl())then
if(aDh())then
if(aDI())then
return
else
call DoNothing()
endif
else
call DoNothing()
endif
call UnitAddAbilityBJ('A00G',GetManipulatingUnit())
call UnitAddTypeBJ(UNIT_TYPE_ANCIENT,GetManipulatingUnit())
if(aDK())then
call UnitAddAbilityBJ('A072',GetManipulatingUnit())
if(aDJ())then
call DisableTrigger(udg_trigger57)
call UnitAddAbilityBJ('A01R',GetManipulatingUnit())
else
endif
else
call UnitAddAbilityBJ('A071',GetManipulatingUnit())
endif
else
call DoNothing()
endif
endfunction
function aDm takes nothing returns nothing
set udg_trigger290=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger290,EVENT_PLAYER_UNIT_DROP_ITEM)
call TriggerAddCondition(udg_trigger290,Condition(function aDG))
call TriggerAddAction(udg_trigger290,function aDL)
endfunction
function aDM takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h008'))then
return false
endif
return true
endfunction
function aDn takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h008'))then
return false
endif
if(not(GetUnitStateSwap(UNIT_STATE_MANA,GetAttacker())<=1.99))then
return false
endif
return true
endfunction
function aDN takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h04F'))then
return false
endif
return true
endfunction
function aDo takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h04F'))then
return false
endif
if(not(GetUnitStateSwap(UNIT_STATE_MANA,GetAttacker())<=4.99))then
return false
endif
return true
endfunction
function aDO takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h005'))then
return false
endif
return true
endfunction
function aDp takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h005'))then
return false
endif
if(not(GetUnitStateSwap(UNIT_STATE_MANA,GetAttacker())<=1.99))then
return false
endif
return true
endfunction
function aDP takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h003'))then
return false
endif
return true
endfunction
function aDq takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h003'))then
return false
endif
if(not(GetUnitStateSwap(UNIT_STATE_MANA,GetAttacker())<=0.49))then
return false
endif
return true
endfunction
function aDQ takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h016'))then
return false
endif
return true
endfunction
function aDr takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h016'))then
return false
endif
if(not(GetUnitStateSwap(UNIT_STATE_MANA,GetAttacker())<=1.99))then
return false
endif
return true
endfunction
function aDR takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h002'))then
return false
endif
return true
endfunction
function aDs takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h002'))then
return false
endif
if(not(GetUnitStateSwap(UNIT_STATE_MANA,GetAttacker())<=0.49))then
return false
endif
return true
endfunction
function aDS takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h004'))then
return false
endif
return true
endfunction
function aDt takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h004'))then
return false
endif
if(not(GetUnitStateSwap(UNIT_STATE_MANA,GetAttacker())<=0.49))then
return false
endif
return true
endfunction
function aDT takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h02Z'))then
return false
endif
return true
endfunction
function aDu takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h02Z'))then
return false
endif
if(not(GetUnitStateSwap(UNIT_STATE_MANA,GetAttacker())<=0.24))then
return false
endif
return true
endfunction
function aDU takes nothing returns nothing
if(aDn())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetAttacker())),"TRIGSTR_2190")
call PlaySoundOnUnitBJ(udg_sound61,100,GetAttacker())
call PauseUnitBJ(true,GetAttacker())
call IssueImmediateOrderBJ(GetAttacker(),"stop")
call PauseUnitBJ(false,GetAttacker())
else
if(aDM())then
call SetUnitManaBJ(GetAttacker(),(GetUnitStateSwap(UNIT_STATE_MANA,GetAttacker())-2.00))
else
call DoNothing()
endif
endif
if(aDo())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetAttacker())),"TRIGSTR_2191")
call PlaySoundOnUnitBJ(udg_sound61,100,GetAttacker())
call PauseUnitBJ(true,GetAttacker())
call IssueImmediateOrderBJ(GetAttacker(),"stop")
call PauseUnitBJ(false,GetAttacker())
else
if(aDN())then
call SetUnitManaBJ(GetAttacker(),(GetUnitStateSwap(UNIT_STATE_MANA,GetAttacker())-5.00))
else
call DoNothing()
endif
endif
if(aDp())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetAttacker())),"TRIGSTR_2193")
call PlaySoundOnUnitBJ(udg_sound61,100,GetAttacker())
call PauseUnitBJ(true,GetAttacker())
call IssueImmediateOrderBJ(GetAttacker(),"stop")
call PauseUnitBJ(false,GetAttacker())
else
if(aDO())then
call SetUnitManaBJ(GetAttacker(),(GetUnitStateSwap(UNIT_STATE_MANA,GetAttacker())-2.00))
else
call DoNothing()
endif
endif
if(aDq())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetAttacker())),"TRIGSTR_2194")
call PlaySoundOnUnitBJ(udg_sound61,100,GetAttacker())
call PauseUnitBJ(true,GetAttacker())
call IssueImmediateOrderBJ(GetAttacker(),"stop")
call PauseUnitBJ(false,GetAttacker())
else
if(aDP())then
call SetUnitManaBJ(GetAttacker(),(GetUnitStateSwap(UNIT_STATE_MANA,GetAttacker())-0.50))
else
call DoNothing()
endif
endif
if(aDr())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetAttacker())),"TRIGSTR_2195")
call PlaySoundOnUnitBJ(udg_sound61,100,GetAttacker())
call PauseUnitBJ(true,GetAttacker())
call IssueImmediateOrderBJ(GetAttacker(),"stop")
call PauseUnitBJ(false,GetAttacker())
else
if(aDQ())then
call SetUnitManaBJ(GetAttacker(),(GetUnitStateSwap(UNIT_STATE_MANA,GetAttacker())-2.00))
else
call DoNothing()
endif
endif
if(aDs())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetAttacker())),"TRIGSTR_2196")
call PlaySoundOnUnitBJ(udg_sound61,100,GetAttacker())
call PauseUnitBJ(true,GetAttacker())
call IssueImmediateOrderBJ(GetAttacker(),"stop")
call PauseUnitBJ(false,GetAttacker())
else
if(aDR())then
call SetUnitManaBJ(GetAttacker(),(GetUnitStateSwap(UNIT_STATE_MANA,GetAttacker())-0.50))
else
call DoNothing()
endif
endif
if(aDt())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetAttacker())),"TRIGSTR_2197")
call PlaySoundOnUnitBJ(udg_sound61,100,GetAttacker())
call PauseUnitBJ(true,GetAttacker())
call IssueImmediateOrderBJ(GetAttacker(),"stop")
call PauseUnitBJ(false,GetAttacker())
else
if(aDS())then
call SetUnitManaBJ(GetAttacker(),(GetUnitStateSwap(UNIT_STATE_MANA,GetAttacker())-0.50))
else
call DoNothing()
endif
endif
if(aDu())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetAttacker())),"TRIGSTR_2198")
call PlaySoundOnUnitBJ(udg_sound61,100,GetAttacker())
call PauseUnitBJ(true,GetAttacker())
call IssueImmediateOrderBJ(GetAttacker(),"stop")
call PauseUnitBJ(false,GetAttacker())
else
if(aDT())then
call SetUnitManaBJ(GetAttacker(),(GetUnitStateSwap(UNIT_STATE_MANA,GetAttacker())-0.25))
else
call DoNothing()
endif
endif
endfunction
function aDv takes nothing returns nothing
set udg_trigger291=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger291,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddAction(udg_trigger291,function aDU)
endfunction
function aDV takes nothing returns boolean
if(not(GetIssuedOrderIdBJ()==String2OrderIdBJ("attackground")))then
return false
endif
return true
endfunction
function aDw takes nothing returns boolean
if(not(GetUnitTypeId(GetOrderedUnit())=='h04F'))then
return false
endif
if(not(GetUnitStateSwap(UNIT_STATE_MANA,GetOrderedUnit())<=4.99))then
return false
endif
return true
endfunction
function aDW takes nothing returns boolean
if(not(GetUnitTypeId(GetOrderedUnit())=='h04F'))then
return false
endif
return true
endfunction
function aDx takes nothing returns boolean
return(GetUnitCurrentOrder(GetOrderedUnit())==String2OrderIdBJ("attackground"))
endfunction
function aDX takes nothing returns boolean
if(not aDw())then
return false
endif
return true
endfunction
function aDy takes nothing returns nothing
if(aDX())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetOrderedUnit())),"TRIGSTR_523")
call PlaySoundOnUnitBJ(udg_sound61,100,GetOrderedUnit())
call PauseUnitBJ(true,GetOrderedUnit())
call IssueImmediateOrderBJ(GetOrderedUnit(),"stop")
call PauseUnitBJ(false,GetOrderedUnit())
else
if(aDW())then
call SetUnitManaBJ(GetOrderedUnit(),(GetUnitStateSwap(UNIT_STATE_MANA,GetOrderedUnit())-5.00))
else
call DoNothing()
endif
call PolledWait(2.00)
if(aDx())then
call TriggerExecute(GetTriggeringTrigger())
else
call DoNothing()
endif
endif
endfunction
function aDY takes nothing returns nothing
set udg_trigger292=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger292,EVENT_PLAYER_UNIT_ISSUED_POINT_ORDER)
call TriggerAddCondition(udg_trigger292,Condition(function aDV))
call TriggerAddAction(udg_trigger292,function aDy)
endfunction
function aDz takes nothing returns boolean
if(not(GetSpellAbilityId()=='A07X'))then
return false
endif
return true
endfunction
function aDZ takes nothing returns nothing
call UnitRemoveBuffsExBJ(bj_BUFF_POLARITY_NEGATIVE,bj_BUFF_RESIST_EITHER,GetSpellTargetUnit(),false,false)
endfunction
function aD0 takes nothing returns nothing
set udg_trigger293=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger293,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger293,Condition(function aDz))
call TriggerAddAction(udg_trigger293,function aDZ)
endfunction
function aD1 takes nothing returns boolean
if(not(GetSpellAbilityId()=='A00J'))then
return false
endif
return true
endfunction
function aD2 takes nothing returns boolean
return(udg_integer16==1)
endfunction
function aD3 takes nothing returns boolean
return(udg_integer16==2)
endfunction
function aD4 takes nothing returns boolean
return(udg_integer16==3)
endfunction
function aD5 takes nothing returns boolean
return(udg_integer16==4)
endfunction
function aD6 takes nothing returns boolean
return(udg_integer16==5)
endfunction
function aD7 takes nothing returns boolean
return(udg_integer16==6)
endfunction
function aD8 takes nothing returns boolean
return(udg_integer16==7)
endfunction
function aD9 takes nothing returns boolean
return(udg_integer16==8)
endfunction
function aea takes nothing returns boolean
return(udg_integer16==9)
endfunction
function aeA takes nothing returns boolean
return(udg_integer16==10)
endfunction
function aeb takes nothing returns boolean
return(udg_integer16==11)
endfunction
function aeB takes nothing returns boolean
return(udg_integer16==12)
endfunction
function aec takes nothing returns boolean
return(udg_integer16==13)
endfunction
function aeC takes nothing returns boolean
return(udg_integer16==14)
endfunction
function aed takes nothing returns boolean
return(udg_integer16==15)
endfunction
function aeD takes nothing returns boolean
return(udg_integer16==16)
endfunction
function aee takes nothing returns nothing
set udg_integer16=GetRandomInt(1,16)
if(aD2())then
call CreateItemLoc('I02T',GetUnitLoc(GetSpellAbilityUnit()))
else
call DoNothing()
endif
if(aD3())then
call CreateItemLoc('I02U',GetUnitLoc(GetSpellAbilityUnit()))
else
call DoNothing()
endif
if(aD4())then
call CreateItemLoc('I02V',GetUnitLoc(GetSpellAbilityUnit()))
else
call DoNothing()
endif
if(aD5())then
call CreateItemLoc('I02W',GetUnitLoc(GetSpellAbilityUnit()))
else
call DoNothing()
endif
if(aD6())then
call CreateItemLoc('I02X',GetUnitLoc(GetSpellAbilityUnit()))
else
call DoNothing()
endif
if(aD7())then
call CreateItemLoc('I02Y',GetUnitLoc(GetSpellAbilityUnit()))
else
call DoNothing()
endif
if(aD8())then
call CreateItemLoc('I02Z',GetUnitLoc(GetSpellAbilityUnit()))
else
call DoNothing()
endif
if(aD9())then
call CreateItemLoc('I030',GetUnitLoc(GetSpellAbilityUnit()))
else
call DoNothing()
endif
if(aea())then
call CreateItemLoc('I031',GetUnitLoc(GetSpellAbilityUnit()))
else
call DoNothing()
endif
if(aeA())then
call CreateItemLoc('I032',GetUnitLoc(GetSpellAbilityUnit()))
else
call DoNothing()
endif
if(aeb())then
call CreateItemLoc('I033',GetUnitLoc(GetSpellAbilityUnit()))
else
call DoNothing()
endif
if(aeB())then
call CreateItemLoc('I034',GetUnitLoc(GetSpellAbilityUnit()))
else
call DoNothing()
endif
if(aec())then
call CreateItemLoc('I035',GetUnitLoc(GetSpellAbilityUnit()))
else
call DoNothing()
endif
if(aeC())then
call CreateItemLoc('I036',GetUnitLoc(GetSpellAbilityUnit()))
else
call DoNothing()
endif
if(aed())then
call CreateItemLoc('I037',GetUnitLoc(GetSpellAbilityUnit()))
else
call DoNothing()
endif
if(aeD())then
call CreateItemLoc('I038',GetUnitLoc(GetSpellAbilityUnit()))
else
call DoNothing()
endif
endfunction
function aeE takes nothing returns nothing
set udg_trigger294=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger294,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger294,Condition(function aD1))
call TriggerAddAction(udg_trigger294,function aee)
endfunction
function aef takes nothing returns boolean
if(not(GetSpellAbilityId()=='A05V'))then
return false
endif
return true
endfunction
function aeF takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function aeg takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_GROUND)==true)
endfunction
function aeG takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)!=true)
endfunction
function aeh takes nothing returns boolean
return(GetFilterUnit()!=GetSpellAbilityUnit())
endfunction
function aeH takes nothing returns boolean
return GetBooleanAnd(aeG(),aeh())
endfunction
function aei takes nothing returns boolean
return GetBooleanAnd(aeg(),aeH())
endfunction
function aeI takes nothing returns boolean
return GetBooleanAnd(aeF(),aei())
endfunction
function aej takes nothing returns nothing
call UnitDamageTargetBJ(GetSpellAbilityUnit(),GetEnumUnit(),75.00,ATTACK_TYPE_NORMAL,DAMAGE_TYPE_NORMAL)
set udg_integer19=(udg_integer19+1)
set udg_units02[udg_integer19]=GetEnumUnit()
set udg_integers12[udg_integer19]=R2I(AngleBetweenPoints(GetUnitLoc(GetSpellAbilityUnit()),GetUnitLoc(GetEnumUnit())))
endfunction
function aeJ takes nothing returns boolean
if(not(IsUnitType(GetSpellAbilityUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
return true
endfunction
function aek takes nothing returns boolean
return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction
function aeK takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_GROUND)==true)
endfunction
function ael takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)!=true)
endfunction
function aeL takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_ANCIENT)!=true)
endfunction
function aem takes nothing returns boolean
return GetBooleanAnd(ael(),aeL())
endfunction
function aeM takes nothing returns boolean
return GetBooleanAnd(aeK(),aem())
endfunction
function aen takes nothing returns boolean
return GetBooleanAnd(aek(),aeM())
endfunction
function aeN takes nothing returns nothing
call UnitDamageTargetBJ(GetSpellAbilityUnit(),GetEnumUnit(),50.00,ATTACK_TYPE_NORMAL,DAMAGE_TYPE_NORMAL)
set udg_integer19=(udg_integer19+1)
set udg_units02[udg_integer19]=GetEnumUnit()
set udg_integers12[udg_integer19]=R2I(AngleBetweenPoints(GetUnitLoc(GetSpellAbilityUnit()),GetUnitLoc(GetEnumUnit())))
endfunction
function aeo takes nothing returns boolean
if(not(IsUnitType(GetSpellAbilityUnit(),UNIT_TYPE_ANCIENT)==true))then
return false
endif
return true
endfunction
function aeO takes nothing returns nothing
if(aeJ())then
set udg_integer19=0
call TriggerSleepAction(0.23)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRangeOfLocMatching(500.00,GetUnitLoc(GetSpellAbilityUnit()),Condition(function aeI)),function aej)
call EnableTrigger(udg_trigger249)
set udg_real02=35.00
call TriggerSleepAction(0.23)
set udg_real02=18.00
call TriggerSleepAction(0.77)
set udg_real02=10.00
call TriggerSleepAction(0.53)
set udg_real02=2.00
call TriggerSleepAction(0.13)
call DisableTrigger(udg_trigger249)
else
call DoNothing()
endif
if(aeo())then
set udg_integer19=0
call TriggerSleepAction(0.23)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRangeOfLocMatching(500.00,GetUnitLoc(GetSpellAbilityUnit()),Condition(function aen)),function aeN)
call EnableTrigger(udg_trigger249)
set udg_real02=35.00
call TriggerSleepAction(0.23)
set udg_real02=18.00
call TriggerSleepAction(0.77)
set udg_real02=10.00
call TriggerSleepAction(0.53)
set udg_real02=2.00
call TriggerSleepAction(0.13)
call DisableTrigger(udg_trigger249)
else
call DoNothing()
endif
endfunction
function aep takes nothing returns nothing
set udg_trigger295=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger295,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger295,Condition(function aef))
call TriggerAddAction(udg_trigger295,function aeO)
endfunction
function aeP takes nothing returns boolean
if(not(GetSpellAbilityId()=='A090'))then
return false
endif
return true
endfunction
function aeq takes nothing returns nothing
set udg_integer21=(udg_integer21+1)
call TriggerSleepAction(12.00)
set udg_integer21=(udg_integer21-1)
endfunction
function aeQ takes nothing returns nothing
set udg_trigger296=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger296,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger296,Condition(function aeP))
call TriggerAddAction(udg_trigger296,function aeq)
endfunction
function aer takes nothing returns boolean
if(not(GetUnitTypeId(GetOrderedUnit())=='h03M'))then
return false
endif
if(not(UnitHasBuffBJ(GetOrderedUnit(),'B01M')==true))then
return false
endif
if(not(GetIssuedOrderIdBJ()==String2OrderIdBJ("attack")))then
return false
endif
return true
endfunction
function aeR takes nothing returns boolean
if(not aer())then
return false
endif
return true
endfunction
function aes takes nothing returns boolean
if(not(udg_integer21>1))then
return false
endif
return true
endfunction
function aeS takes nothing returns boolean
if(not(udg_integer21>1))then
return false
endif
return true
endfunction
function aet takes nothing returns boolean
if(not(udg_integer22==1))then
return false
endif
return true
endfunction
function aeT takes nothing returns nothing
set udg_integer22=GetRandomInt(1,2)
if(aet())then
call CreateNUnitsAtLoc(1,'h04K',GetOwningPlayer(GetOrderedUnit()),PolarProjectionBJ(GetUnitLoc(GetOrderTargetUnit()),GetRandomReal(256.00,512.00),GetRandomReal(0,360.00)),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),20.00,30.00,100.00,50.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GetLastCreatedUnit()),"Abilities\\Spells\\Undead\\RaiseSkeletonWarrior\\RaiseSkeleton.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrderBJ(GetLastCreatedUnit(),"attack",GetOrderTargetUnit())
if(aeS())then
call CreateNUnitsAtLoc(1,'h04K',udg_player03,PolarProjectionBJ(GetUnitLoc(GetOrderTargetUnit()),GetRandomReal(256.00,512.00),GetRandomReal(0,360.00)),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),20.00,30.00,100.00,50.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GetLastCreatedUnit()),"Abilities\\Spells\\NightElf\\ManaBurn\\ManaBurnTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrderBJ(GetLastCreatedUnit(),"attack",GetOrderTargetUnit())
else
return
endif
else
call CreateNUnitsAtLoc(1,'h04L',GetOwningPlayer(GetOrderedUnit()),PolarProjectionBJ(GetUnitLoc(GetOrderTargetUnit()),GetRandomReal(256.00,512.00),GetRandomReal(0,360.00)),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),50.00,100.00,30.00,50.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GetLastCreatedUnit()),"Abilities\\Spells\\Undead\\RaiseSkeletonWarrior\\RaiseSkeleton.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrderBJ(GetLastCreatedUnit(),"attack",GetOrderTargetUnit())
if(aes())then
call CreateNUnitsAtLoc(1,'h04L',GetOwningPlayer(GetOrderedUnit()),PolarProjectionBJ(GetUnitLoc(GetOrderTargetUnit()),GetRandomReal(256.00,512.00),GetRandomReal(0,360.00)),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),50.00,100.00,30.00,50.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GetLastCreatedUnit()),"Abilities\\Spells\\NightElf\\ManaBurn\\ManaBurnTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrderBJ(GetLastCreatedUnit(),"attack",GetOrderTargetUnit())
else
return
endif
endif
endfunction
function aeu takes nothing returns nothing
set udg_trigger297=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger297,EVENT_PLAYER_UNIT_ISSUED_TARGET_ORDER)
call TriggerAddCondition(udg_trigger297,Condition(function aeR))
call TriggerAddAction(udg_trigger297,function aeT)
endfunction
function aeU takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h03M'))then
return false
endif
if(not(UnitHasBuffBJ(GetAttacker(),'B01M')==true))then
return false
endif
return true
endfunction
function aev takes nothing returns boolean
if(not aeU())then
return false
endif
return true
endfunction
function aeV takes nothing returns boolean
if(not(udg_integer21>1))then
return false
endif
return true
endfunction
function aew takes nothing returns boolean
if(not(udg_integer21>1))then
return false
endif
return true
endfunction
function aeW takes nothing returns boolean
if(not(udg_integer22==1))then
return false
endif
return true
endfunction
function aex takes nothing returns nothing
set udg_integer22=GetRandomInt(1,2)
if(aeW())then
call CreateNUnitsAtLoc(1,'h04K',GetOwningPlayer(GetAttacker()),PolarProjectionBJ(GetUnitLoc(GetAttackedUnitBJ()),GetRandomReal(256.00,512.00),GetRandomReal(0,360.00)),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),20.00,30.00,100.00,50.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GetLastCreatedUnit()),"Abilities\\Spells\\Undead\\RaiseSkeletonWarrior\\RaiseSkeleton.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrderBJ(GetLastCreatedUnit(),"attack",GetAttackedUnitBJ())
if(aew())then
call CreateNUnitsAtLoc(1,'h04K',udg_player03,PolarProjectionBJ(GetUnitLoc(GetAttackedUnitBJ()),GetRandomReal(256.00,512.00),GetRandomReal(0,360.00)),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),20.00,30.00,100.00,50.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GetLastCreatedUnit()),"Abilities\\Spells\\NightElf\\ManaBurn\\ManaBurnTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrderBJ(GetLastCreatedUnit(),"attack",GetAttackedUnitBJ())
else
return
endif
else
call CreateNUnitsAtLoc(1,'h04L',GetOwningPlayer(GetAttacker()),PolarProjectionBJ(GetUnitLoc(GetAttackedUnitBJ()),GetRandomReal(256.00,512.00),GetRandomReal(0,360.00)),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),50.00,100.00,30.00,50.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GetLastCreatedUnit()),"Abilities\\Spells\\Undead\\RaiseSkeletonWarrior\\RaiseSkeleton.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrderBJ(GetLastCreatedUnit(),"attack",GetAttackedUnitBJ())
if(aeV())then
call CreateNUnitsAtLoc(1,'h04L',udg_player03,PolarProjectionBJ(GetUnitLoc(GetAttackedUnitBJ()),GetRandomReal(256.00,512.00),GetRandomReal(0,360.00)),bj_UNIT_FACING)
call SetUnitVertexColorBJ(GetLastCreatedUnit(),50.00,100.00,30.00,50.00)
call AddSpecialEffectLocBJ(GetUnitLoc(GetLastCreatedUnit()),"Abilities\\Spells\\NightElf\\ManaBurn\\ManaBurnTarget.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call IssueTargetOrderBJ(GetLastCreatedUnit(),"attack",GetAttackedUnitBJ())
else
return
endif
endif
endfunction
function aeX takes nothing returns nothing
set udg_trigger298=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger298,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddCondition(udg_trigger298,Condition(function aev))
call TriggerAddAction(udg_trigger298,function aex)
endfunction
function aey takes nothing returns boolean
if((GetUnitTypeId(GetAttacker())=='h04K'))then
return true
endif
if((GetUnitTypeId(GetAttacker())=='h04L'))then
return true
endif
return false
endfunction
function aeY takes nothing returns boolean
if(not aey())then
return false
endif
return true
endfunction
function aez takes nothing returns nothing
call AddSpecialEffectLocBJ(GetUnitLoc(GetAttacker()),"Abilities\\Spells\\Undead\\Possession\\PossessionMissile.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call TriggerSleepAction(0.80)
call RemoveUnit(GetAttacker())
endfunction
function aeZ takes nothing returns nothing
set udg_trigger299=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger299,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddCondition(udg_trigger299,Condition(function aeY))
call TriggerAddAction(udg_trigger299,function aez)
endfunction
function ae0 takes nothing returns boolean
if((GetUnitTypeId(GetDyingUnit())=='h04K'))then
return true
endif
if((GetUnitTypeId(GetDyingUnit())=='h04L'))then
return true
endif
return false
endfunction
function ae1 takes nothing returns boolean
if(not ae0())then
return false
endif
return true
endfunction
function ae2 takes nothing returns nothing
call AddSpecialEffectLocBJ(GetUnitLoc(GetDyingUnit()),"Abilities\\Spells\\Undead\\Possession\\PossessionMissile.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
call RemoveUnit(GetDyingUnit())
endfunction
function ae3 takes nothing returns nothing
set udg_trigger300=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger300,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger300,Condition(function ae1))
call TriggerAddAction(udg_trigger300,function ae2)
endfunction
function ae4 takes nothing returns boolean
if(not(udg_integer15>=25))then
return false
endif
if(not(udg_integer15<=30))then
return false
endif
return true
endfunction
function ae5 takes nothing returns boolean
if(not ae4())then
return false
endif
return true
endfunction
function ae6 takes nothing returns nothing
set udg_integer15=0
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2200")
call StartTimerBJ(udg_timer01,false,90.00)
call CreateTimerDialogBJ(GetLastCreatedTimerBJ(),"TRIGSTR_2201")
set udg_timerdialog01=GetLastCreatedTimerDialogBJ()
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(82.00)
call DestroyTimerDialogBJ(udg_timerdialog01)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2202")
call TriggerSleepAction(2)
call CreateNUnitsAtLoc(1,'n01A',Player(PLAYER_NEUTRAL_AGGRESSIVE),GetRandomLocInRect(udg_rect120),bj_UNIT_FACING)
call UnitApplyTimedLifeBJ(90.00,'BTLF',GetLastCreatedUnit())
set udg_unit04=GetLastCreatedUnit()
call EnableTrigger(udg_trigger302)
call StartTimerBJ(udg_timer01,false,90.00)
call CreateTimerDialogBJ(GetLastCreatedTimerBJ(),"TRIGSTR_2203")
set udg_timerdialog01=GetLastCreatedTimerDialogBJ()
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound62)
call TriggerSleepAction(80.00)
call DisableTrigger(udg_trigger302)
call DisableTrigger(udg_trigger306)
call CinematicFilterGenericBJ(2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",100,100,100,100,100.00,100.00,100.00,100.00)
call DestroyTimerDialogBJ(udg_timerdialog01)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2204")
call PlaySoundBJ(udg_sound55)
call TriggerSleepAction(2)
set udg_integer15=GetRandomInt(1,100)
call TriggerSleepAction(GetRandomReal(120.00,1200.00))
call ConditionalTriggerExecute(GetTriggeringTrigger())
call ConditionalTriggerExecute(udg_trigger308)
call ConditionalTriggerExecute(udg_trigger309)
call ConditionalTriggerExecute(udg_trigger312)
call ConditionalTriggerExecute(udg_trigger315)
endfunction
function ae7 takes nothing returns nothing
set udg_trigger301=CreateTrigger()
call TriggerRegisterTimerEventSingle(udg_trigger301,GetRandomReal(120.00,1200.00))
call TriggerAddCondition(udg_trigger301,Condition(function ae5))
call TriggerAddAction(udg_trigger301,function ae6)
endfunction
function ae8 takes nothing returns nothing
call PingMinimapLocForForceEx(GetPlayersAll(),GetUnitLoc(udg_unit04),1,bj_MINIMAPPINGSTYLE_SIMPLE,100,10.00,100)
endfunction
function ae9 takes nothing returns nothing
set udg_trigger302=CreateTrigger()
call DisableTrigger(udg_trigger302)
call TriggerRegisterTimerEventPeriodic(udg_trigger302,1.10)
call TriggerAddAction(udg_trigger302,function ae8)
endfunction
function aEa takes nothing returns boolean
if(not(GetUnitTypeId(GetEventDamageSource())=='n01A'))then
return false
endif
return true
endfunction
function aEA takes nothing returns nothing
call PauseUnitBJ(true,udg_unit33)
call TriggerSleepAction(1.00)
call SetUnitPositionLoc(udg_unit33,GetUnitLoc(udg_unit04))
call EnableTrigger(udg_trigger306)
endfunction
function aEb takes nothing returns nothing
set udg_trigger303=CreateTrigger()
call TriggerRegisterUnitEvent(udg_trigger303,udg_unit33,EVENT_UNIT_DAMAGED)
call TriggerAddCondition(udg_trigger303,Condition(function aEa))
call TriggerAddAction(udg_trigger303,function aEA)
endfunction
function aEB takes nothing returns boolean
if(not(GetUnitTypeId(GetEventDamageSource())=='n01A'))then
return false
endif
return true
endfunction
function aEc takes nothing returns nothing
call TriggerSleepAction(1.00)
call EnableTrigger(udg_trigger307)
call EnableTrigger(udg_trigger305)
call TriggerSleepAction(12.00)
call DisableTrigger(udg_trigger307)
call DisableTrigger(udg_trigger305)
call KillUnit(udg_unit20)
endfunction
function aEC takes nothing returns nothing
set udg_trigger304=CreateTrigger()
call TriggerRegisterUnitEvent(udg_trigger304,udg_unit20,EVENT_UNIT_DAMAGED)
call TriggerAddCondition(udg_trigger304,Condition(function aEB))
call TriggerAddAction(udg_trigger304,function aEc)
endfunction
function aEd takes nothing returns nothing
call SetTerrainTypeBJ(GetRandomLocInRect(udg_rect30),'Dlvc',-1,GetRandomInt(2,9),0)
call SetTerrainTypeBJ(GetRandomLocInRect(udg_rect30),'Dlav',-1,GetRandomInt(1,8),0)
endfunction
function aED takes nothing returns nothing
set udg_trigger305=CreateTrigger()
call DisableTrigger(udg_trigger305)
call TriggerRegisterTimerEventPeriodic(udg_trigger305,2.00)
call TriggerAddAction(udg_trigger305,function aEd)
endfunction
function aEe takes nothing returns boolean
return(RectContainsUnit(udg_rect120,GetFilterUnit())!=true)
endfunction
function aEE takes nothing returns boolean
return(RectContainsUnit(udg_rect147,GetFilterUnit())!=true)
endfunction
function aEf takes nothing returns boolean
return GetBooleanAnd(aEe(),aEE())
endfunction
function aEF takes nothing returns boolean
return(GetPlayerController(GetOwningPlayer(GetFilterUnit()))==MAP_CONTROL_USER)
endfunction
function aEg takes nothing returns boolean
return GetBooleanAnd(aEf(),aEF())
endfunction
function aEG takes nothing returns nothing
call RotateCameraAroundLocBJ(360.00,GetCameraTargetPositionLoc(),GetOwningPlayer(GetEnumUnit()),3.00)
endfunction
function aEh takes nothing returns nothing
call CinematicFilterGenericBJ(2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",GetRandomReal(0,100.00),GetRandomReal(0,100.00),GetRandomReal(0,100.00),GetRandomReal(0,30.00),GetRandomReal(0,100.00),GetRandomReal(0,100.00),GetRandomReal(0,100.00),GetRandomReal(0,30.00))
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectMatching(udg_rect29,Condition(function aEg)),function aEG)
endfunction
function aEH takes nothing returns nothing
set udg_trigger306=CreateTrigger()
call DisableTrigger(udg_trigger306)
call TriggerRegisterTimerEventPeriodic(udg_trigger306,3.00)
call TriggerAddAction(udg_trigger306,function aEh)
endfunction
function aEi takes nothing returns boolean
return(GetPlayerController(GetOwningPlayer(GetFilterUnit()))==MAP_CONTROL_USER)
endfunction
function aEI takes nothing returns nothing
call RotateCameraAroundLocBJ(360.00,GetCameraTargetPositionLoc(),GetOwningPlayer(GetEnumUnit()),3.00)
endfunction
function aEj takes nothing returns nothing
call CinematicFilterGenericBJ(2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\DreamFilter_Mask.blp",GetRandomReal(0,100.00),GetRandomReal(0,100.00),GetRandomReal(0,100.00),GetRandomReal(0,30.00),GetRandomReal(0,100.00),GetRandomReal(0,100.00),GetRandomReal(0,100.00),GetRandomReal(0,30.00))
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectMatching(udg_rect30,Condition(function aEi)),function aEI)
endfunction
function aEJ takes nothing returns nothing
set udg_trigger307=CreateTrigger()
call DisableTrigger(udg_trigger307)
call TriggerRegisterTimerEventPeriodic(udg_trigger307,3.00)
call TriggerAddAction(udg_trigger307,function aEj)
endfunction
function aEk takes nothing returns boolean
if(not(udg_integer15>=1))then
return false
endif
if(not(udg_integer15<=12))then
return false
endif
return true
endfunction
function aEK takes nothing returns boolean
if(not aEk())then
return false
endif
return true
endfunction
function aEl takes nothing returns nothing
set udg_integer15=0
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2205")
call StartTimerBJ(udg_timer01,false,90.00)
call CreateTimerDialogBJ(GetLastCreatedTimerBJ(),"TRIGSTR_2206")
set udg_timerdialog01=GetLastCreatedTimerDialogBJ()
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(82.00)
call DestroyTimerDialogBJ(udg_timerdialog01)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2207")
call TriggerSleepAction(2)
call CreateNUnitsAtLoc(1,'h032',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect120),bj_UNIT_FACING)
call IssuePointOrderLocBJ(GetLastCreatedUnit(),"stampede",PolarProjectionBJ(GetUnitLoc(GetLastCreatedUnit()),128.00,270.00))
call UnitApplyTimedLifeBJ(91.00,'BTLF',GetLastCreatedUnit())
call StartTimerBJ(udg_timer01,false,90.00)
call CreateTimerDialogBJ(GetLastCreatedTimerBJ(),"TRIGSTR_2208")
set udg_timerdialog01=GetLastCreatedTimerDialogBJ()
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound62)
call TriggerSleepAction(81.00)
call DestroyTimerDialogBJ(udg_timerdialog01)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2209")
call PlaySoundBJ(udg_sound55)
call TriggerSleepAction(2)
set udg_integer15=GetRandomInt(1,100)
call TriggerSleepAction(GetRandomReal(120.00,1200.00))
call ConditionalTriggerExecute(udg_trigger301)
call ConditionalTriggerExecute(GetTriggeringTrigger())
call ConditionalTriggerExecute(udg_trigger309)
call ConditionalTriggerExecute(udg_trigger312)
call ConditionalTriggerExecute(udg_trigger315)
endfunction
function aEL takes nothing returns nothing
set udg_trigger308=CreateTrigger()
call TriggerRegisterTimerEventSingle(udg_trigger308,GetRandomReal(120.00,1200.00))
call TriggerAddCondition(udg_trigger308,Condition(function aEK))
call TriggerAddAction(udg_trigger308,function aEl)
endfunction
function aEm takes nothing returns boolean
if(not(udg_integer15>=13))then
return false
endif
if(not(udg_integer15<=24))then
return false
endif
return true
endfunction
function aEM takes nothing returns boolean
if(not aEm())then
return false
endif
return true
endfunction
function aEn takes nothing returns nothing
call PauseUnitBJ(false,GetEnumUnit())
call ResetUnitAnimation(GetEnumUnit())
endfunction
function aEN takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function aEo takes nothing returns nothing
call UnitRemoveAbilityBJ('A07P',GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(GetEnumPlayer(),'h00Z')))
endfunction
function aEO takes nothing returns boolean
if(not(udg_integer02=='h00O'))then
return false
endif
return true
endfunction
function aEp takes nothing returns nothing
set udg_integer15=0
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2210")
call StartTimerBJ(udg_timer01,false,60.00)
call CreateTimerDialogBJ(GetLastCreatedTimerBJ(),"TRIGSTR_2211")
set udg_timerdialog01=GetLastCreatedTimerDialogBJ()
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(52.00)
call DestroyTimerDialogBJ(udg_timerdialog01)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2212")
call TriggerSleepAction(2)
call EnableWeatherEffect(udg_weathereffects01[1],true)
call EnableWeatherEffect(udg_weathereffects01[2],true)
call EnableWeatherEffect(udg_weathereffects01[3],true)
call EnableWeatherEffect(udg_weathereffects01[4],true)
call ConditionalTriggerExecute(udg_trigger323)
call PauseUnitBJ(true,udg_units01[1])
call PauseUnitBJ(true,udg_units01[2])
call PauseUnitBJ(true,udg_units01[3])
call PauseUnitBJ(true,udg_units01[4])
set udg_boolean03=true
call StartTimerBJ(udg_timer01,false,240.00)
call CreateTimerDialogBJ(GetLastCreatedTimerBJ(),"TRIGSTR_2213")
set udg_timerdialog01=GetLastCreatedTimerDialogBJ()
call PlaySoundBJ(udg_sound52)
call EnableTrigger(udg_trigger311)
call SetTerrainFogExBJ(0,0.00,4000.00,0,10.00,10.00,100.00)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(232.00)
call DestroyTimerDialogBJ(udg_timerdialog01)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2214")
call PlaySoundBJ(udg_sound55)
call TriggerSleepAction(2)
set udg_boolean03=false
call DisableTrigger(udg_trigger311)
call PauseUnitBJ(false,udg_units01[1])
call PauseUnitBJ(false,udg_units01[2])
call PauseUnitBJ(false,udg_units01[3])
call PauseUnitBJ(false,udg_units01[4])
call PlaySoundBJ(udg_sound24)
call SetTimeOfDay(12)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerAll(Player(bj_PLAYER_NEUTRAL_EXTRA)),function aEn)
call ForGroupBJ(GetUnitsOfTypeIdAll('u002'),function aEN)
if(aEO())then
call UnitRemoveAbilityBJ('A07P',GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(udg_player02,'h00O')))
call ForForce(udg_force01,function aEo)
else
call DoNothing()
endif
call ResetTerrainFogBJ()
call EnableWeatherEffect(udg_weathereffects01[1],false)
call EnableWeatherEffect(udg_weathereffects01[2],false)
call EnableWeatherEffect(udg_weathereffects01[3],false)
call EnableWeatherEffect(udg_weathereffects01[4],false)
call TriggerSleepAction(2)
set udg_integer15=GetRandomInt(1,100)
call TriggerSleepAction(GetRandomReal(120.00,1200.00))
call ConditionalTriggerExecute(udg_trigger301)
call ConditionalTriggerExecute(udg_trigger308)
call ConditionalTriggerExecute(GetTriggeringTrigger())
call ConditionalTriggerExecute(udg_trigger312)
call ConditionalTriggerExecute(udg_trigger315)
endfunction
function aEP takes nothing returns nothing
set udg_trigger309=CreateTrigger()
call TriggerRegisterTimerEventSingle(udg_trigger309,GetRandomReal(120.00,1200.00))
call TriggerAddCondition(udg_trigger309,Condition(function aEM))
call TriggerAddAction(udg_trigger309,function aEp)
endfunction
function aEq takes nothing returns boolean
if(not(GetTimeOfDay()==24.00))then
return false
endif
return true
endfunction
function aEQ takes nothing returns nothing
call UnitShareVisionBJ(false,GetEnumUnit(),GetEnumPlayer())
endfunction
function aEr takes nothing returns nothing
call PauseUnitBJ(true,GetEnumUnit())
call ForForce(GetPlayersAll(),function aEQ)
endfunction
function aER takes nothing returns nothing
call CreateNUnitsAtLoc(1,'u002',GetEnumPlayer(),GetRandomLocInRect(udg_rect58),bj_UNIT_FACING)
endfunction
function aEs takes nothing returns nothing
call PauseUnitBJ(false,GetEnumUnit())
endfunction
function aES takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function aEt takes nothing returns nothing
call SetTimeOfDay(24.00)
call PlaySoundBJ(udg_sound25)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerAll(Player(10)),function aEr)
call ForForce(GetPlayersAll(),function aER)
call TriggerSleepAction(240.00)
call SetTimeOfDay(12.00)
call PlaySoundBJ(udg_sound24)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerAll(Player(10)),function aEs)
call ForGroupBJ(GetUnitsOfTypeIdAll('u002'),function aES)
endfunction
function aET takes nothing returns nothing
set udg_trigger310=CreateTrigger()
call TriggerAddCondition(udg_trigger310,Condition(function aEq))
call TriggerAddAction(udg_trigger310,function aEt)
endfunction
function aEu takes nothing returns nothing
call AddLightningLoc("MBUR",GetRandomLocInRect(udg_rect120),GetRandomLocInRect(udg_rect120))
set udg_lightnings01[1]=GetLastCreatedLightningBJ()
call AddLightningLoc("AFOD",GetRandomLocInRect(udg_rect120),GetRandomLocInRect(udg_rect120))
set udg_lightnings01[2]=GetLastCreatedLightningBJ()
call AddLightningLoc("MFPB",GetRandomLocInRect(udg_rect120),GetRandomLocInRect(udg_rect120))
set udg_lightnings01[3]=GetLastCreatedLightningBJ()
call AddLightningLoc("CLPB",GetRandomLocInRect(udg_rect120),GetRandomLocInRect(udg_rect120))
set udg_lightnings01[4]=GetLastCreatedLightningBJ()
call AddLightningLoc("SPLK",GetRandomLocInRect(udg_rect120),GetRandomLocInRect(udg_rect120))
set udg_lightnings01[5]=GetLastCreatedLightningBJ()
call TriggerSleepAction(0.15)
call DestroyLightning(udg_lightnings01[1])
call DestroyLightning(udg_lightnings01[2])
call DestroyLightning(udg_lightnings01[3])
call DestroyLightning(udg_lightnings01[4])
call DestroyLightning(udg_lightnings01[5])
endfunction
function aEU takes nothing returns nothing
set udg_trigger311=CreateTrigger()
call DisableTrigger(udg_trigger311)
call TriggerRegisterTimerEventPeriodic(udg_trigger311,0.30)
call TriggerAddAction(udg_trigger311,function aEu)
endfunction
function aEv takes nothing returns boolean
if(not(udg_integer15>=31))then
return false
endif
if(not(udg_integer15<=40))then
return false
endif
return true
endfunction
function aEV takes nothing returns boolean
if(not aEv())then
return false
endif
return true
endfunction
function aEw takes nothing returns nothing
set udg_integer15=0
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_185")
call StartTimerBJ(udg_timer01,false,90.00)
call CreateTimerDialogBJ(GetLastCreatedTimerBJ(),"TRIGSTR_218")
set udg_timerdialog01=GetLastCreatedTimerDialogBJ()
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(82.00)
call DestroyTimerDialogBJ(udg_timerdialog01)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_835")
call PlaySoundBJ(udg_sound52)
call TriggerSleepAction(2)
call CreateNUnitsAtLoc(1,'h04S',Player(PLAYER_NEUTRAL_AGGRESSIVE),GetRandomLocInRect(udg_rect120),bj_UNIT_FACING)
call PlaySoundBJ(udg_sound62)
call TriggerSleepAction(2)
set udg_integer15=GetRandomInt(1,100)
call TriggerSleepAction(GetRandomReal(120.00,1200.00))
call ConditionalTriggerExecute(udg_trigger301)
call ConditionalTriggerExecute(udg_trigger308)
call ConditionalTriggerExecute(udg_trigger309)
call ConditionalTriggerExecute(GetTriggeringTrigger())
call ConditionalTriggerExecute(udg_trigger315)
endfunction
function aEW takes nothing returns nothing
set udg_trigger312=CreateTrigger()
call TriggerRegisterTimerEventSingle(udg_trigger312,GetRandomReal(120.00,1200.00))
call TriggerAddCondition(udg_trigger312,Condition(function aEV))
call TriggerAddAction(udg_trigger312,function aEw)
endfunction
function aEx takes nothing returns nothing
call IssuePointOrderLocBJ(GetEnumUnit(),"patrol",GetRandomLocInRect(udg_rect120))
endfunction
function aEX takes nothing returns nothing
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_AGGRESSIVE),'h04S'),function aEx)
endfunction
function aEy takes nothing returns nothing
set udg_trigger313=CreateTrigger()
call DisableTrigger(udg_trigger313)
call TriggerRegisterTimerEventPeriodic(udg_trigger313,GetRandomReal(3.00,12.00))
call TriggerAddAction(udg_trigger313,function aEX)
endfunction
function aEY takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h04S'))then
return false
endif
return true
endfunction
function aEz takes nothing returns boolean
if(not(CountUnitsInGroup(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_AGGRESSIVE),'h04S'))<=0))then
return false
endif
return true
endfunction
function aEZ takes nothing returns nothing
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_1126")
call PlaySoundBJ(udg_sound55)
if(aEz())then
call DisableTrigger(udg_trigger313)
else
call DoNothing()
endif
endfunction
function aE0 takes nothing returns nothing
set udg_trigger314=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger314,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger314,Condition(function aEY))
call TriggerAddAction(udg_trigger314,function aEZ)
endfunction
function aE1 takes nothing returns boolean
if(not(udg_integer15>=31))then
return false
endif
if(not(udg_integer15<=100))then
return false
endif
return true
endfunction
function aE2 takes nothing returns boolean
if(not aE1())then
return false
endif
return true
endfunction
function aE3 takes nothing returns nothing
set udg_integer15=GetRandomInt(1,100)
call TriggerSleepAction(GetRandomReal(120.00,1200.00))
call ConditionalTriggerExecute(udg_trigger301)
call ConditionalTriggerExecute(udg_trigger308)
call ConditionalTriggerExecute(udg_trigger309)
call ConditionalTriggerExecute(udg_trigger312)
call ConditionalTriggerExecute(GetTriggeringTrigger())
endfunction
function aE4 takes nothing returns nothing
set udg_trigger315=CreateTrigger()
call TriggerRegisterTimerEventSingle(udg_trigger315,GetRandomReal(120.00,1200.00))
call TriggerAddCondition(udg_trigger315,Condition(function aE2))
call TriggerAddAction(udg_trigger315,function aE3)
endfunction
function aE5 takes nothing returns boolean
if(not(udg_integer18==1))then
return false
endif
if(not(IsUnitAliveBJ(udg_unit33)==true))then
return false
endif
return true
endfunction
function aE6 takes nothing returns nothing
call PlaySoundBJ(udg_sound55)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2215")
set udg_integer18=0
endfunction
function aE7 takes nothing returns nothing
set udg_trigger316=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger316,udg_rect54)
call TriggerAddCondition(udg_trigger316,Condition(function aE5))
call TriggerAddAction(udg_trigger316,function aE6)
endfunction
function aE8 takes nothing returns boolean
if(not(udg_integer18==1))then
return false
endif
if(not(IsUnitAliveBJ(udg_unit20)==true))then
return false
endif
return true
endfunction
function aE9 takes nothing returns nothing
call PlaySoundBJ(udg_sound55)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2595")
set udg_integer18=0
endfunction
function afa takes nothing returns nothing
set udg_trigger317=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger317,udg_rect152)
call TriggerAddCondition(udg_trigger317,Condition(function aE8))
call TriggerAddAction(udg_trigger317,function aE9)
endfunction
function afA takes nothing returns boolean
if(not(udg_integer18==0))then
return false
endif
if(not(IsUnitAliveBJ(udg_unit33)==true))then
return false
endif
return true
endfunction
function afb takes nothing returns nothing
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2216")
set udg_integer18=1
endfunction
function afB takes nothing returns nothing
set udg_trigger318=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger318,udg_rect55)
call TriggerAddCondition(udg_trigger318,Condition(function afA))
call TriggerAddAction(udg_trigger318,function afb)
endfunction
function afc takes nothing returns boolean
if(not(udg_integer18==0))then
return false
endif
if(not(IsUnitAliveBJ(udg_unit20)==true))then
return false
endif
return true
endfunction
function afC takes nothing returns nothing
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2596")
set udg_integer18=1
endfunction
function afd takes nothing returns nothing
set udg_trigger319=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger319,udg_rect153)
call TriggerAddCondition(udg_trigger319,Condition(function afc))
call TriggerAddAction(udg_trigger319,function afC)
endfunction
function afD takes nothing returns boolean
if(not(GetPlayerState(GetEnumPlayer(),PLAYER_STATE_RESOURCE_GOLD)<300))then
return false
endif
return true
endfunction
function afe takes nothing returns nothing
if(afD())then
call AdjustPlayerStateBJ(1,GetEnumPlayer(),PLAYER_STATE_RESOURCE_GOLD)
else
endif
endfunction
function afE takes nothing returns boolean
if(not(udg_integer18==0))then
return false
endif
return true
endfunction
function aff takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_SAPPER)==true)
endfunction
function afF takes nothing returns nothing
call KillUnit(GetEnumUnit())
endfunction
function afg takes nothing returns boolean
return(GetPlayerState(GetEnumPlayer(),PLAYER_STATE_RESOURCE_GOLD)==150)
endfunction
function afG takes nothing returns boolean
return(GetPlayerState(GetEnumPlayer(),PLAYER_STATE_RESOURCE_GOLD)==75)
endfunction
function afh takes nothing returns boolean
return(GetPlayerState(GetEnumPlayer(),PLAYER_STATE_RESOURCE_GOLD)==30)
endfunction
function afH takes nothing returns boolean
if(not(GetPlayerState(GetEnumPlayer(),PLAYER_STATE_RESOURCE_GOLD)!=0))then
return false
endif
return true
endfunction
function afi takes nothing returns nothing
if(afH())then
call AdjustPlayerStateBJ(-1,GetEnumPlayer(),PLAYER_STATE_RESOURCE_GOLD)
if(afg())then
call DisplayTextToForce(GetForceOfPlayer(GetEnumPlayer()),"TRIGSTR_2400")
else
call DoNothing()
endif
if(afG())then
call DisplayTextToForce(GetForceOfPlayer(GetEnumPlayer()),"TRIGSTR_2402")
else
call DoNothing()
endif
if(afh())then
call DisplayTextToForce(GetForceOfPlayer(GetEnumPlayer()),"TRIGSTR_2404")
else
call DoNothing()
endif
else
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerMatching(GetEnumPlayer(),Condition(function aff)),function afF)
endif
endfunction
function afI takes nothing returns boolean
if(not(udg_integer18==1))then
return false
endif
return true
endfunction
function afj takes nothing returns nothing
if(afE())then
call ForForce(udg_force04,function afe)
else
endif
if(afI())then
call ForForce(udg_force04,function afi)
else
endif
endfunction
function afJ takes nothing returns nothing
set udg_trigger320=CreateTrigger()
call TriggerRegisterTimerEventPeriodic(udg_trigger320,1.50)
call TriggerAddAction(udg_trigger320,function afj)
endfunction
function afk takes nothing returns boolean
if(not(IsUnitAliveBJ(udg_unit33)==true))then
return false
endif
if(not(GetTimeOfDay()==24.00))then
return false
endif
if(not(udg_boolean03==false))then
return false
endif
return true
endfunction
function afK takes nothing returns boolean
if(not afk())then
return false
endif
return true
endfunction
function afl takes nothing returns nothing
call PauseUnitBJ(false,GetEnumUnit())
call ResetUnitAnimation(GetEnumUnit())
endfunction
function afL takes nothing returns nothing
call UnitShareVisionBJ(false,GetEnumUnit(),GetEnumPlayer())
endfunction
function afm takes nothing returns nothing
call ForGroupBJ(GetUnitsOfTypeIdAll('o001'),function afL)
endfunction
function afM takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function afn takes nothing returns nothing
call UnitRemoveAbilityBJ('A07P',GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(GetEnumPlayer(),'h00Z')))
endfunction
function afN takes nothing returns boolean
if(not(udg_integer02=='h00O'))then
return false
endif
return true
endfunction
function afo takes nothing returns nothing
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2217")
call PlaySoundBJ(udg_sound24)
call SetTimeOfDay(12.00)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerAll(Player(bj_PLAYER_NEUTRAL_EXTRA)),function afl)
call ForForce(GetPlayersByMapControl(MAP_CONTROL_USER),function afm)
call ForGroupBJ(GetUnitsOfTypeIdAll('u002'),function afM)
if(afN())then
call UnitRemoveAbilityBJ('A07P',GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(udg_player02,'h00O')))
call ForForce(udg_force01,function afn)
else
call DoNothing()
endif
endfunction
function afO takes nothing returns nothing
set udg_trigger321=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger321,udg_rect56)
call TriggerAddCondition(udg_trigger321,Condition(function afK))
call TriggerAddAction(udg_trigger321,function afo)
endfunction
function afp takes nothing returns boolean
if(not(IsUnitAliveBJ(udg_unit20)==true))then
return false
endif
if(not(GetTimeOfDay()==24.00))then
return false
endif
if(not(udg_boolean03==false))then
return false
endif
return true
endfunction
function afP takes nothing returns boolean
if(not afp())then
return false
endif
return true
endfunction
function afq takes nothing returns nothing
call PauseUnitBJ(false,GetEnumUnit())
call ResetUnitAnimation(GetEnumUnit())
endfunction
function afQ takes nothing returns nothing
call UnitShareVisionBJ(false,GetEnumUnit(),GetEnumPlayer())
endfunction
function afr takes nothing returns nothing
call ForGroupBJ(GetUnitsOfTypeIdAll('o001'),function afQ)
endfunction
function afR takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function afs takes nothing returns nothing
call UnitRemoveAbilityBJ('A07P',GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(GetEnumPlayer(),'h00Z')))
endfunction
function afS takes nothing returns boolean
if(not(udg_integer02=='h00O'))then
return false
endif
return true
endfunction
function aft takes nothing returns nothing
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2597")
call PlaySoundBJ(udg_sound24)
call SetTimeOfDay(12.00)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerAll(Player(bj_PLAYER_NEUTRAL_EXTRA)),function afq)
call ForForce(GetPlayersByMapControl(MAP_CONTROL_USER),function afr)
call ForGroupBJ(GetUnitsOfTypeIdAll('u002'),function afR)
if(afS())then
call UnitRemoveAbilityBJ('A07P',GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(udg_player02,'h00O')))
call ForForce(udg_force01,function afs)
else
call DoNothing()
endif
endfunction
function afT takes nothing returns nothing
set udg_trigger322=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger322,udg_rect150)
call TriggerAddCondition(udg_trigger322,Condition(function afP))
call TriggerAddAction(udg_trigger322,function aft)
endfunction
function afu takes nothing returns boolean
if(not(IsUnitAliveBJ(udg_unit33)==true))then
return false
endif
if(not(GetTimeOfDay()==12.00))then
return false
endif
if(not(udg_boolean03==false))then
return false
endif
return true
endfunction
function afU takes nothing returns boolean
if(not afu())then
return false
endif
return true
endfunction
function afv takes nothing returns nothing
call PauseUnitBJ(true,GetEnumUnit())
call SetUnitAnimation(GetEnumUnit(),"attack")
endfunction
function afV takes nothing returns nothing
call UnitShareVisionBJ(false,GetEnumUnit(),GetEnumPlayer())
endfunction
function afw takes nothing returns nothing
call ForGroupBJ(GetUnitsOfTypeIdAll('o001'),function afV)
endfunction
function afW takes nothing returns nothing
call CreateNUnitsAtLoc(1,'u002',GetEnumPlayer(),GetRandomLocInRect(udg_rect58),bj_UNIT_FACING)
endfunction
function afx takes nothing returns nothing
call UnitAddAbilityBJ('A07P',GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(GetEnumPlayer(),'h00Z')))
endfunction
function afX takes nothing returns boolean
if(not(udg_integer02=='h00O'))then
return false
endif
return true
endfunction
function afy takes nothing returns nothing
call PlaySoundBJ(udg_sound25)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2218")
call SetTimeOfDay(24.00)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerAll(Player(bj_PLAYER_NEUTRAL_EXTRA)),function afv)
call ForForce(GetPlayersByMapControl(MAP_CONTROL_USER),function afw)
call ForForce(GetPlayersAll(),function afW)
if(afX())then
call UnitAddAbilityBJ('A07P',GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(udg_player02,'h00O')))
call ForForce(udg_force01,function afx)
else
call DoNothing()
endif
call SetTimeOfDay(24.00)
endfunction
function afY takes nothing returns nothing
set udg_trigger323=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger323,udg_rect57)
call TriggerAddCondition(udg_trigger323,Condition(function afU))
call TriggerAddAction(udg_trigger323,function afy)
endfunction
function afz takes nothing returns boolean
if(not(IsUnitAliveBJ(udg_unit20)==true))then
return false
endif
if(not(GetTimeOfDay()==12.00))then
return false
endif
if(not(udg_boolean03==false))then
return false
endif
return true
endfunction
function afZ takes nothing returns boolean
if(not afz())then
return false
endif
return true
endfunction
function af0 takes nothing returns nothing
call PauseUnitBJ(true,GetEnumUnit())
call SetUnitAnimation(GetEnumUnit(),"attack")
endfunction
function af1 takes nothing returns nothing
call UnitShareVisionBJ(false,GetEnumUnit(),GetEnumPlayer())
endfunction
function af2 takes nothing returns nothing
call ForGroupBJ(GetUnitsOfTypeIdAll('o001'),function af1)
endfunction
function af3 takes nothing returns nothing
call CreateNUnitsAtLoc(1,'u002',GetEnumPlayer(),GetRandomLocInRect(udg_rect58),bj_UNIT_FACING)
endfunction
function af4 takes nothing returns nothing
call UnitAddAbilityBJ('A07P',GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(GetEnumPlayer(),'h00Z')))
endfunction
function af5 takes nothing returns boolean
if(not(udg_integer02=='h00O'))then
return false
endif
return true
endfunction
function af6 takes nothing returns nothing
call PlaySoundBJ(udg_sound25)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2599")
call SetTimeOfDay(24.00)
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsOfPlayerAll(Player(bj_PLAYER_NEUTRAL_EXTRA)),function af0)
call ForForce(GetPlayersByMapControl(MAP_CONTROL_USER),function af2)
call ForForce(GetPlayersAll(),function af3)
if(af5())then
call UnitAddAbilityBJ('A07P',GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(udg_player02,'h00O')))
call ForForce(udg_force01,function af4)
else
call DoNothing()
endif
call SetTimeOfDay(24.00)
endfunction
function af7 takes nothing returns nothing
set udg_trigger324=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger324,udg_rect151)
call TriggerAddCondition(udg_trigger324,Condition(function afZ))
call TriggerAddAction(udg_trigger324,function af6)
endfunction
function af8 takes nothing returns boolean
if(not(GetPlayerController(GetOwningPlayer(GetEnteringUnit()))==MAP_CONTROL_USER))then
return false
endif
return true
endfunction
function af9 takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFa takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFA takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFb takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFB takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFc takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFC takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFd takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFD takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFe takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFE takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFf takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFF takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFg takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFG takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFh takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFH takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFi takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFI takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFj takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFJ takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFk takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFK takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFl takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFL takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFm takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFM takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFn takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFN takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFo takes nothing returns boolean
return(RectContainsUnit(udg_rect125,GetEnteringUnit())==true)
endfunction
function aFO takes nothing returns boolean
if(not(IsPlayerInForce(GetOwningPlayer(GetEnteringUnit()),udg_force01)==true))then
return false
endif
return true
endfunction
function aFp takes nothing returns boolean
if(not(udg_integer03>=4))then
return false
endif
return true
endfunction
function aFP takes nothing returns nothing
if(aFp())then
if(aFO())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_2223")
else
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2220")
call TriggerSleepAction(1.00)
if(af9())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFa())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFA())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFb())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFB())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFc())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFC())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFd())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFD())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFe())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFE())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFf())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFF())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFg())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFG())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFh())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFH())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFi())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFI())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFj())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFJ())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFk())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFK())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFl())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFL())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFm())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFM())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFn())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFN())then
call DoNothing()
else
return
endif
call TriggerSleepAction(1.00)
if(aFo())then
call DoNothing()
else
return
endif
call DisableTrigger(GetTriggeringTrigger())
call TriggerSleepAction(1.00)
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2221")
call StartTimerBJ(udg_timer02,false,120.00)
call CreateTimerDialogBJ(GetLastCreatedTimerBJ(),"TRIGSTR_2222")
set udg_timerdialog02=GetLastCreatedTimerDialogBJ()
call TriggerSleepAction(1.00)
call TriggerExecute(udg_trigger326)
endif
else
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_2219")
endif
endfunction
function aFq takes nothing returns nothing
set udg_trigger325=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger325,udg_rect125)
call TriggerAddCondition(udg_trigger325,Condition(function af8))
call TriggerAddAction(udg_trigger325,function aFP)
endfunction
function aFQ takes nothing returns nothing
endfunction
function aFr takes nothing returns nothing
set udg_trigger326=CreateTrigger()
call DisableTrigger(udg_trigger326)
call TriggerAddAction(udg_trigger326,function aFQ)
endfunction
function aFR takes nothing returns nothing
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function aFs takes nothing returns boolean
return(udg_boolean04==true)
endfunction
function aFS takes nothing returns nothing
call CameraClearNoiseForPlayer(GetEnumPlayer())
endfunction
function aFt takes nothing returns nothing
set udg_integer24=1
call DestroyTimerDialogBJ(udg_timerdialog02)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2224")
call KillUnit(udg_unit20)
call ForGroupBJ(GetUnitsInRectAll(udg_rect30),function aFR)
call CreateNUnitsAtLoc(1,'n019',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(udg_unit20),bj_UNIT_FACING)
call UnitDamagePointLoc(udg_unit20,1.00,200.00,GetUnitLoc(udg_unit20),10000.00,ATTACK_TYPE_CHAOS,DAMAGE_TYPE_DEMOLITION)
call UnitDamagePointLoc(udg_unit20,1.50,400.00,GetUnitLoc(udg_unit20),8000.00,ATTACK_TYPE_CHAOS,DAMAGE_TYPE_DEMOLITION)
call UnitDamagePointLoc(udg_unit20,2.00,600.00,GetUnitLoc(udg_unit20),6000.00,ATTACK_TYPE_CHAOS,DAMAGE_TYPE_DEMOLITION)
call UnitDamagePointLoc(udg_unit20,2.50,800.00,GetUnitLoc(udg_unit20),4000.00,ATTACK_TYPE_CHAOS,DAMAGE_TYPE_DEMOLITION)
call UnitDamagePointLoc(udg_unit20,3.00,1000.00,GetUnitLoc(udg_unit20),2000.00,ATTACK_TYPE_CHAOS,DAMAGE_TYPE_DEMOLITION)
if(aFs())then
call KillUnit(udg_unit33)
else
call DoNothing()
endif
call DisableTrigger(udg_trigger307)
call CinematicFilterGenericBJ(2,BLEND_MODE_BLEND,"ReplaceableTextures\\CameraMasks\\White_mask.blp",100.00,100.00,100.00,100.00,100.00,100.00,100.00,100.00)
call ResetToGameCameraForPlayer(GetOwningPlayer(GetDyingUnit()),3.00)
call ForForce(GetPlayersAll(),function aFS)
call ConditionalTriggerExecute(udg_trigger133)
endfunction
function aFT takes nothing returns nothing
set udg_trigger327=CreateTrigger()
call TriggerRegisterTimerExpireEventBJ(udg_trigger327,udg_timer02)
call TriggerAddAction(udg_trigger327,function aFt)
endfunction
function aFu takes nothing returns boolean
if(not(GetPlayerController(GetOwningPlayer(GetEnteringUnit()))==MAP_CONTROL_USER))then
return false
endif
return true
endfunction
function aFU takes nothing returns nothing
call PauseTimerBJ(false,udg_timer03)
endfunction
function aFv takes nothing returns nothing
set udg_trigger328=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger328,udg_rect128)
call TriggerAddCondition(udg_trigger328,Condition(function aFu))
call TriggerAddAction(udg_trigger328,function aFU)
endfunction
function aFV takes nothing returns boolean
if(not(GetPlayerController(GetOwningPlayer(GetLeavingUnit()))==MAP_CONTROL_USER))then
return false
endif
return true
endfunction
function aFw takes nothing returns nothing
call PauseTimerBJ(true,udg_timer03)
endfunction
function aFW takes nothing returns nothing
set udg_trigger329=CreateTrigger()
call TriggerRegisterLeaveRectSimple(udg_trigger329,udg_rect128)
call TriggerAddCondition(udg_trigger329,Condition(function aFV))
call TriggerAddAction(udg_trigger329,function aFw)
endfunction
function aFx takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call SetUnitAnimation(udg_unit37,"Morph Defend")
call TriggerSleepAction(1.21)
call SetUnitInvulnerable(udg_unit37,false)
call SetUnitOwner(udg_unit37,Player(PLAYER_NEUTRAL_AGGRESSIVE),true)
call TriggerSleepAction(2.00)
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2225")
call PingMinimapLocForForceEx(GetPlayersAll(),GetUnitLoc(udg_unit37),5.00,bj_MINIMAPPINGSTYLE_SIMPLE,100,0.00,100)
call KillDestructable(udg_destructable01)
call KillDestructable(udg_destructable02)
call KillDestructable(udg_destructable03)
call EnableTrigger(udg_trigger331)
call EnableTrigger(udg_trigger332)
call EnableTrigger(udg_trigger333)
call EnableTrigger(udg_trigger334)
call EnableTrigger(udg_trigger335)
call EnableTrigger(udg_trigger336)
call EnableTrigger(udg_trigger337)
call EnableTrigger(udg_trigger338)
call TriggerSleepAction(2)
call IssuePointOrderLocBJ(udg_unit37,"patrol",GetRandomLocInRect(udg_rect30))
endfunction
function aFX takes nothing returns nothing
set udg_trigger330=CreateTrigger()
call TriggerRegisterTimerExpireEventBJ(udg_trigger330,udg_timer03)
call TriggerAddAction(udg_trigger330,function aFx)
endfunction
function aFy takes nothing returns nothing
call IssuePointOrderLocBJ(GetEnumUnit(),"patrol",GetRandomLocInRect(udg_rect30))
endfunction
function aFY takes nothing returns nothing
call IssuePointOrderLocBJ(GetEnumUnit(),"patrol",GetRandomLocInRect(udg_rect30))
endfunction
function aFz takes nothing returns nothing
call IssuePointOrderLocBJ(udg_unit37,"patrol",GetRandomLocInRect(udg_rect30))
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_AGGRESSIVE),'h01E'),function aFy)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_AGGRESSIVE),'h037'),function aFY)
endfunction
function aFZ takes nothing returns nothing
set udg_trigger331=CreateTrigger()
call DisableTrigger(udg_trigger331)
call TriggerRegisterTimerEventPeriodic(udg_trigger331,12.00)
call TriggerAddAction(udg_trigger331,function aFz)
endfunction
function aF0 takes nothing returns boolean
if(not(udg_integers03[1]<50))then
return false
endif
return true
endfunction
function aF1 takes nothing returns nothing
call CreateNUnitsAtLoc(1,'h01E',Player(PLAYER_NEUTRAL_AGGRESSIVE),GetRectCenter(udg_rect129),bj_UNIT_FACING)
call IssuePointOrderLocBJ(GetLastCreatedUnit(),"patrol",GetRandomLocInRect(udg_rect30))
set udg_integers03[1]=(udg_integers03[1]+1)
endfunction
function aF2 takes nothing returns nothing
set udg_trigger332=CreateTrigger()
call DisableTrigger(udg_trigger332)
call TriggerRegisterTimerEventPeriodic(udg_trigger332,8.70)
call TriggerAddCondition(udg_trigger332,Condition(function aF0))
call TriggerAddAction(udg_trigger332,function aF1)
endfunction
function aF3 takes nothing returns boolean
if(not(udg_integers03[1]<50))then
return false
endif
return true
endfunction
function aF4 takes nothing returns nothing
call CreateNUnitsAtLoc(1,'h01E',Player(PLAYER_NEUTRAL_AGGRESSIVE),GetRectCenter(udg_rect130),bj_UNIT_FACING)
call IssuePointOrderLocBJ(GetLastCreatedUnit(),"patrol",GetRandomLocInRect(udg_rect30))
set udg_integers03[1]=(udg_integers03[1]+1)
endfunction
function aF5 takes nothing returns nothing
set udg_trigger333=CreateTrigger()
call DisableTrigger(udg_trigger333)
call TriggerRegisterTimerEventPeriodic(udg_trigger333,8.80)
call TriggerAddCondition(udg_trigger333,Condition(function aF3))
call TriggerAddAction(udg_trigger333,function aF4)
endfunction
function aF6 takes nothing returns boolean
if(not(udg_integers03[1]<50))then
return false
endif
return true
endfunction
function aF7 takes nothing returns nothing
call CreateNUnitsAtLoc(1,'h01E',Player(PLAYER_NEUTRAL_AGGRESSIVE),GetRectCenter(udg_rect131),bj_UNIT_FACING)
call IssuePointOrderLocBJ(GetLastCreatedUnit(),"patrol",GetRandomLocInRect(udg_rect30))
set udg_integers03[1]=(udg_integers03[1]+1)
endfunction
function aF8 takes nothing returns nothing
set udg_trigger334=CreateTrigger()
call DisableTrigger(udg_trigger334)
call TriggerRegisterTimerEventPeriodic(udg_trigger334,8.90)
call TriggerAddCondition(udg_trigger334,Condition(function aF6))
call TriggerAddAction(udg_trigger334,function aF7)
endfunction
function aF9 takes nothing returns boolean
if(not(udg_integers03[1]<50))then
return false
endif
return true
endfunction
function aga takes nothing returns nothing
call CreateNUnitsAtLoc(1,'h01E',Player(PLAYER_NEUTRAL_AGGRESSIVE),GetRectCenter(udg_rect132),bj_UNIT_FACING)
call IssuePointOrderLocBJ(GetLastCreatedUnit(),"patrol",GetRandomLocInRect(udg_rect30))
set udg_integers03[1]=(udg_integers03[1]+1)
endfunction
function agA takes nothing returns nothing
set udg_trigger335=CreateTrigger()
call DisableTrigger(udg_trigger335)
call TriggerRegisterTimerEventPeriodic(udg_trigger335,9.00)
call TriggerAddCondition(udg_trigger335,Condition(function aF9))
call TriggerAddAction(udg_trigger335,function aga)
endfunction
function agb takes nothing returns boolean
if(not(udg_integers03[2]<10))then
return false
endif
return true
endfunction
function agB takes nothing returns nothing
call CreateNUnitsAtLoc(1,'h037',Player(PLAYER_NEUTRAL_AGGRESSIVE),GetRectCenter(udg_rect133),bj_UNIT_FACING)
call IssuePointOrderLocBJ(GetLastCreatedUnit(),"patrol",GetRandomLocInRect(udg_rect30))
set udg_integers03[2]=(udg_integers03[2]+1)
endfunction
function agc takes nothing returns nothing
set udg_trigger336=CreateTrigger()
call DisableTrigger(udg_trigger336)
call TriggerRegisterTimerEventPeriodic(udg_trigger336,14.00)
call TriggerAddCondition(udg_trigger336,Condition(function agb))
call TriggerAddAction(udg_trigger336,function agB)
endfunction
function agC takes nothing returns boolean
if(not(udg_integers03[2]<10))then
return false
endif
return true
endfunction
function agd takes nothing returns nothing
call CreateNUnitsAtLoc(1,'h037',Player(PLAYER_NEUTRAL_AGGRESSIVE),GetRectCenter(udg_rect134),bj_UNIT_FACING)
call IssuePointOrderLocBJ(GetLastCreatedUnit(),"patrol",GetRandomLocInRect(udg_rect30))
set udg_integers03[2]=(udg_integers03[2]+1)
endfunction
function agD takes nothing returns nothing
set udg_trigger337=CreateTrigger()
call DisableTrigger(udg_trigger337)
call TriggerRegisterTimerEventPeriodic(udg_trigger337,14.50)
call TriggerAddCondition(udg_trigger337,Condition(function agC))
call TriggerAddAction(udg_trigger337,function agd)
endfunction
function age takes nothing returns boolean
if(not(udg_integers03[2]<10))then
return false
endif
return true
endfunction
function agE takes nothing returns nothing
call CreateNUnitsAtLoc(1,'h037',Player(PLAYER_NEUTRAL_AGGRESSIVE),GetRectCenter(udg_rect135),bj_UNIT_FACING)
call IssuePointOrderLocBJ(GetLastCreatedUnit(),"patrol",GetRandomLocInRect(udg_rect30))
set udg_integers03[2]=(udg_integers03[2]+1)
endfunction
function agf takes nothing returns nothing
set udg_trigger338=CreateTrigger()
call DisableTrigger(udg_trigger338)
call TriggerRegisterTimerEventPeriodic(udg_trigger338,15.00)
call TriggerAddCondition(udg_trigger338,Condition(function age))
call TriggerAddAction(udg_trigger338,function agE)
endfunction
function agF takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(PLAYER_NEUTRAL_AGGRESSIVE)))then
return false
endif
return true
endfunction
function agg takes nothing returns nothing
call KillUnit(GetEnumUnit())
endfunction
function agG takes nothing returns nothing
call KillUnit(GetEnumUnit())
endfunction
function agh takes nothing returns nothing
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2226")
call PlaySoundBJ(udg_sound55)
call TriggerSleepAction(0.50)
call DisableTrigger(udg_trigger331)
call DisableTrigger(udg_trigger332)
call DisableTrigger(udg_trigger333)
call DisableTrigger(udg_trigger334)
call DisableTrigger(udg_trigger335)
call DisableTrigger(udg_trigger336)
call DisableTrigger(udg_trigger337)
call DisableTrigger(udg_trigger338)
call PlaySoundBJ(udg_sound02)
call TriggerSleepAction(0.50)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h03F'),function agg)
call StopSoundBJ(udg_sound02,false)
call PlaySoundBJ(udg_sound02)
call TriggerSleepAction(0.50)
call StopSoundBJ(udg_sound02,false)
call PlaySoundBJ(udg_sound02)
call TriggerSleepAction(0.50)
call StopSoundBJ(udg_sound02,false)
call PlaySoundBJ(udg_sound02)
call TriggerSleepAction(0.50)
call ForGroupBJ(GetUnitsOfPlayerAndTypeId(Player(PLAYER_NEUTRAL_PASSIVE),'h03C'),function agG)
call StopSoundBJ(udg_sound02,false)
call PlaySoundBJ(udg_sound02)
endfunction
function agH takes nothing returns nothing
set udg_trigger339=CreateTrigger()
call TriggerRegisterUnitEvent(udg_trigger339,udg_unit37,EVENT_UNIT_DEATH)
call TriggerAddCondition(udg_trigger339,Condition(function agF))
call TriggerAddAction(udg_trigger339,function agh)
endfunction
function agi takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(PLAYER_NEUTRAL_AGGRESSIVE)))then
return false
endif
return true
endfunction
function agI takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h01E'))then
return false
endif
return true
endfunction
function agj takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h037'))then
return false
endif
return true
endfunction
function agJ takes nothing returns nothing
if(agI())then
set udg_integers03[1]=(udg_integers03[1]-1)
else
endif
if(agj())then
set udg_integers03[2]=(udg_integers03[2]-1)
else
endif
endfunction
function agk takes nothing returns nothing
set udg_trigger340=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger340,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddCondition(udg_trigger340,Condition(function agi))
call TriggerAddAction(udg_trigger340,function agJ)
endfunction
function agK takes nothing returns boolean
if(not(IsUnitType(GetOrderedUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
if(not(IsUnitType(GetOrderedUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(IsUnitType(GetOrderedUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitType(GetOrderedUnit(),UNIT_TYPE_MECHANICAL)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetOrderedUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetOrderedUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(IsPlayerInForce(GetOwningPlayer(GetOrderedUnit()),udg_force04)==true))then
return false
endif
if(not(GetOrderTargetUnit()==udg_unit36))then
return false
endif
if(not(RectContainsUnit(udg_rect142,GetOrderedUnit())==true))then
return false
endif
return true
endfunction
function agl takes nothing returns boolean
if(not agK())then
return false
endif
return true
endfunction
function agL takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
set udg_integers11[GetConvertedPlayerId(GetOwningPlayer(GetOrderedUnit()))]=GetUnitTypeId(GetOrderedUnit())
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers04[GetForLoopIndexA()]=GetItemTypeId(UnitItemInSlotBJ(GetOrderedUnit(),GetForLoopIndexA()))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers05[GetForLoopIndexA()]=GetItemCharges(UnitItemInSlotBJ(GetOrderedUnit(),GetForLoopIndexA()))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call RemoveUnit(GetOrderedUnit())
call SetUnitOwner(udg_unit36,GetOwningPlayer(GetOrderedUnit()),true)
call EnableTrigger(udg_trigger345)
endfunction
function agm takes nothing returns nothing
set udg_trigger341=CreateTrigger()
call DisableTrigger(udg_trigger341)
call TriggerRegisterAnyUnitEventBJ(udg_trigger341,EVENT_PLAYER_UNIT_ISSUED_TARGET_ORDER)
call TriggerAddCondition(udg_trigger341,Condition(function agl))
call TriggerAddAction(udg_trigger341,function agL)
endfunction
function agM takes nothing returns boolean
if(not(IsUnitType(GetOrderedUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
if(not(IsUnitType(GetOrderedUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(IsUnitType(GetOrderedUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitType(GetOrderedUnit(),UNIT_TYPE_MECHANICAL)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetOrderedUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetOrderedUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(IsPlayerInForce(GetOwningPlayer(GetOrderedUnit()),udg_force04)==true))then
return false
endif
if(not(GetOrderTargetUnit()==udg_unit30))then
return false
endif
if(not(RectContainsUnit(udg_rect143,GetOrderedUnit())==true))then
return false
endif
return true
endfunction
function agn takes nothing returns boolean
if(not agM())then
return false
endif
return true
endfunction
function agN takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
set udg_integers11[GetConvertedPlayerId(GetOwningPlayer(GetOrderedUnit()))]=GetUnitTypeId(GetOrderedUnit())
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers06[GetForLoopIndexA()]=GetItemTypeId(UnitItemInSlotBJ(GetOrderedUnit(),GetForLoopIndexA()))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers07[GetForLoopIndexA()]=GetItemCharges(UnitItemInSlotBJ(GetOrderedUnit(),GetForLoopIndexA()))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call RemoveUnit(GetOrderedUnit())
call SetUnitOwner(udg_unit30,GetOwningPlayer(GetOrderedUnit()),true)
call EnableTrigger(udg_trigger346)
endfunction
function ago takes nothing returns nothing
set udg_trigger342=CreateTrigger()
call DisableTrigger(udg_trigger342)
call TriggerRegisterAnyUnitEventBJ(udg_trigger342,EVENT_PLAYER_UNIT_ISSUED_TARGET_ORDER)
call TriggerAddCondition(udg_trigger342,Condition(function agn))
call TriggerAddAction(udg_trigger342,function agN)
endfunction
function agO takes nothing returns boolean
if(not(IsUnitType(GetOrderedUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
if(not(IsUnitType(GetOrderedUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(IsUnitType(GetOrderedUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitType(GetOrderedUnit(),UNIT_TYPE_MECHANICAL)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetOrderedUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetOrderedUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(IsPlayerInForce(GetOwningPlayer(GetOrderedUnit()),udg_force04)==true))then
return false
endif
if(not(GetOrderTargetUnit()==udg_unit59))then
return false
endif
if(not(RectContainsUnit(udg_rect144,GetOrderedUnit())==true))then
return false
endif
return true
endfunction
function agp takes nothing returns boolean
if(not agO())then
return false
endif
return true
endfunction
function agP takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
set udg_integers11[GetConvertedPlayerId(GetOwningPlayer(GetOrderedUnit()))]=GetUnitTypeId(GetOrderedUnit())
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers08[GetForLoopIndexA()]=GetItemTypeId(UnitItemInSlotBJ(GetOrderedUnit(),GetForLoopIndexA()))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers09[GetForLoopIndexA()]=GetItemCharges(UnitItemInSlotBJ(GetOrderedUnit(),GetForLoopIndexA()))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call RemoveUnit(GetOrderedUnit())
call SetUnitOwner(udg_unit59,GetOwningPlayer(GetOrderedUnit()),true)
call EnableTrigger(udg_trigger347)
endfunction
function agq takes nothing returns nothing
set udg_trigger343=CreateTrigger()
call DisableTrigger(udg_trigger343)
call TriggerRegisterAnyUnitEventBJ(udg_trigger343,EVENT_PLAYER_UNIT_ISSUED_TARGET_ORDER)
call TriggerAddCondition(udg_trigger343,Condition(function agp))
call TriggerAddAction(udg_trigger343,function agP)
endfunction
function agQ takes nothing returns boolean
if(not(IsUnitType(GetOrderedUnit(),UNIT_TYPE_SAPPER)==true))then
return false
endif
if(not(IsUnitType(GetOrderedUnit(),UNIT_TYPE_ANCIENT)!=true))then
return false
endif
if(not(IsUnitType(GetOrderedUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitType(GetOrderedUnit(),UNIT_TYPE_MECHANICAL)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetOrderedUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetOrderedUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(IsPlayerInForce(GetOwningPlayer(GetOrderedUnit()),udg_force04)==true))then
return false
endif
if(not(GetOrderTargetUnit()==udg_unit61))then
return false
endif
if(not(RectContainsUnit(udg_rect174,GetOrderedUnit())==true))then
return false
endif
return true
endfunction
function agr takes nothing returns boolean
if(not agQ())then
return false
endif
return true
endfunction
function agR takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
set udg_integers11[GetConvertedPlayerId(GetOwningPlayer(GetOrderedUnit()))]=GetUnitTypeId(GetOrderedUnit())
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers24[GetForLoopIndexA()]=GetItemTypeId(UnitItemInSlotBJ(GetOrderedUnit(),GetForLoopIndexA()))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers23[GetForLoopIndexA()]=GetItemCharges(UnitItemInSlotBJ(GetOrderedUnit(),GetForLoopIndexA()))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call RemoveUnit(GetOrderedUnit())
call SetUnitOwner(udg_unit61,GetOwningPlayer(GetOrderedUnit()),true)
call EnableTrigger(udg_trigger348)
endfunction
function ags takes nothing returns nothing
set udg_trigger344=CreateTrigger()
call DisableTrigger(udg_trigger344)
call TriggerRegisterAnyUnitEventBJ(udg_trigger344,EVENT_PLAYER_UNIT_ISSUED_TARGET_ORDER)
call TriggerAddCondition(udg_trigger344,Condition(function agr))
call TriggerAddAction(udg_trigger344,function agR)
endfunction
function agS takes nothing returns boolean
if(not(GetSpellAbilityId()=='A02K'))then
return false
endif
return true
endfunction
function agt takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call MoveRectToLoc(udg_rect142,GetUnitLoc(udg_unit36))
call CreateNUnitsAtLoc(1,udg_integers11[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))],GetOwningPlayer(GetSpellAbilityUnit()),PolarProjectionBJ(GetUnitLoc(udg_unit36),100.00,(GetUnitFacing(udg_unit36)-180.00)),bj_UNIT_FACING)
call SelectUnitAddForPlayer(GetLastCreatedUnit(),GetOwningPlayer(GetSpellAbilityUnit()))
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitAddItemByIdSwapped(udg_integers04[GetForLoopIndexA()],GetLastCreatedUnit())
call UnitDropItemSlotBJ(GetLastCreatedUnit(),GetLastCreatedItem(),GetForLoopIndexA())
call SetItemCharges(UnitItemInSlotBJ(GetLastCreatedUnit(),GetForLoopIndexA()),udg_integers05[GetForLoopIndexA()])
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call SetUnitOwner(udg_unit36,Player(PLAYER_NEUTRAL_PASSIVE),true)
call EnableTrigger(udg_trigger341)
endfunction
function agT takes nothing returns nothing
set udg_trigger345=CreateTrigger()
call DisableTrigger(udg_trigger345)
call TriggerRegisterUnitEvent(udg_trigger345,udg_unit36,EVENT_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger345,Condition(function agS))
call TriggerAddAction(udg_trigger345,function agt)
endfunction
function agu takes nothing returns boolean
if(not(GetSpellAbilityId()=='A02K'))then
return false
endif
return true
endfunction
function agU takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call MoveRectToLoc(udg_rect143,GetUnitLoc(udg_unit30))
call CreateNUnitsAtLoc(1,udg_integers11[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))],GetOwningPlayer(GetSpellAbilityUnit()),PolarProjectionBJ(GetUnitLoc(udg_unit30),100.00,(GetUnitFacing(udg_unit30)-180.00)),bj_UNIT_FACING)
call SelectUnitAddForPlayer(GetLastCreatedUnit(),GetOwningPlayer(GetSpellAbilityUnit()))
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitAddItemByIdSwapped(udg_integers06[GetForLoopIndexA()],GetLastCreatedUnit())
call UnitDropItemSlotBJ(GetLastCreatedUnit(),GetLastCreatedItem(),GetForLoopIndexA())
call SetItemCharges(UnitItemInSlotBJ(GetLastCreatedUnit(),GetForLoopIndexA()),udg_integers07[GetForLoopIndexA()])
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call SetUnitOwner(udg_unit30,Player(PLAYER_NEUTRAL_PASSIVE),true)
call EnableTrigger(udg_trigger342)
endfunction
function agv takes nothing returns nothing
set udg_trigger346=CreateTrigger()
call DisableTrigger(udg_trigger346)
call TriggerRegisterUnitEvent(udg_trigger346,udg_unit30,EVENT_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger346,Condition(function agu))
call TriggerAddAction(udg_trigger346,function agU)
endfunction
function agV takes nothing returns boolean
if(not(GetSpellAbilityId()=='A02K'))then
return false
endif
return true
endfunction
function agw takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call MoveRectToLoc(udg_rect144,GetUnitLoc(udg_unit59))
call CreateNUnitsAtLoc(1,udg_integers11[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))],GetOwningPlayer(GetSpellAbilityUnit()),GetUnitLoc(udg_unit59),bj_UNIT_FACING)
call SelectUnitAddForPlayer(GetLastCreatedUnit(),GetOwningPlayer(GetSpellAbilityUnit()))
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitAddItemByIdSwapped(udg_integers08[GetForLoopIndexA()],GetLastCreatedUnit())
call UnitDropItemSlotBJ(GetLastCreatedUnit(),GetLastCreatedItem(),GetForLoopIndexA())
call SetItemCharges(UnitItemInSlotBJ(GetLastCreatedUnit(),GetForLoopIndexA()),udg_integers09[GetForLoopIndexA()])
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call SetUnitOwner(udg_unit59,Player(PLAYER_NEUTRAL_PASSIVE),true)
call EnableTrigger(udg_trigger343)
endfunction
function agW takes nothing returns nothing
set udg_trigger347=CreateTrigger()
call DisableTrigger(udg_trigger347)
call TriggerRegisterUnitEvent(udg_trigger347,udg_unit59,EVENT_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger347,Condition(function agV))
call TriggerAddAction(udg_trigger347,function agw)
endfunction
function agx takes nothing returns boolean
if(not(GetSpellAbilityId()=='A02K'))then
return false
endif
return true
endfunction
function agX takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call MoveRectToLoc(udg_rect174,GetUnitLoc(udg_unit61))
call CreateNUnitsAtLoc(1,udg_integers11[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))],GetOwningPlayer(GetSpellAbilityUnit()),GetUnitLoc(udg_unit61),bj_UNIT_FACING)
call SelectUnitAddForPlayer(GetLastCreatedUnit(),GetOwningPlayer(GetSpellAbilityUnit()))
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=6
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call UnitAddItemByIdSwapped(udg_integers24[GetForLoopIndexA()],GetLastCreatedUnit())
call UnitDropItemSlotBJ(GetLastCreatedUnit(),GetLastCreatedItem(),GetForLoopIndexA())
call SetItemCharges(UnitItemInSlotBJ(GetLastCreatedUnit(),GetForLoopIndexA()),udg_integers23[GetForLoopIndexA()])
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call SetUnitOwner(udg_unit61,Player(PLAYER_NEUTRAL_PASSIVE),true)
call EnableTrigger(udg_trigger344)
endfunction
function agy takes nothing returns nothing
set udg_trigger348=CreateTrigger()
call DisableTrigger(udg_trigger348)
call TriggerRegisterUnitEvent(udg_trigger348,udg_unit61,EVENT_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger348,Condition(function agx))
call TriggerAddAction(udg_trigger348,function agX)
endfunction
function agY takes nothing returns boolean
if(not(GetSpellAbilityId()=='A052'))then
return false
endif
return true
endfunction
function agz takes nothing returns nothing
call CreateNUnitsAtLoc(1,'n00F',GetOwningPlayer(GetSpellAbilityUnit()),GetRandomLocInRect(udg_rect30),bj_UNIT_FACING)
endfunction
function agZ takes nothing returns nothing
set udg_trigger349=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger349,EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(udg_trigger349,Condition(function agY))
call TriggerAddAction(udg_trigger349,function agz)
endfunction
function ag0 takes nothing returns boolean
return(GetUnitCurrentOrder(udg_unit33)==String2OrderIdBJ("stop"))
endfunction
function ag1 takes nothing returns nothing
call EnableTrigger(udg_trigger351)
call DisableTrigger(GetTriggeringTrigger())
loop
exitwhen(ag0())
call TriggerSleepAction(RMaxBJ(bj_WAIT_FOR_COND_MIN_INTERVAL,1.50))
endloop
call DisableTrigger(udg_trigger351)
call EnableTrigger(GetTriggeringTrigger())
endfunction
function ag2 takes nothing returns nothing
set udg_trigger350=CreateTrigger()
call TriggerRegisterUnitEvent(udg_trigger350,udg_unit33,EVENT_UNIT_ISSUED_POINT_ORDER)
call TriggerRegisterUnitEvent(udg_trigger350,udg_unit33,EVENT_UNIT_ISSUED_TARGET_ORDER)
call TriggerAddAction(udg_trigger350,function ag1)
endfunction
function ag3 takes nothing returns nothing
set udg_location04=GetUnitLoc(udg_unit33)
call MoveRectToLoc(udg_rect100,udg_location04)
call RemoveLocation(udg_location04)
endfunction
function ag4 takes nothing returns nothing
set udg_trigger351=CreateTrigger()
call DisableTrigger(udg_trigger351)
call TriggerRegisterTimerEventPeriodic(udg_trigger351,0.25)
call TriggerAddAction(udg_trigger351,function ag3)
endfunction
function ag5 takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='h01G'))then
return false
endif
return true
endfunction
function ag6 takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[1])=='h01G'))then
return false
endif
if(not(RectContainsUnit(udg_rect83,udg_units01[1])==true))then
return false
endif
if(not(udg_booleans03[1]==false))then
return false
endif
if(not(udg_booleans04[1]==false))then
return false
endif
return true
endfunction
function ag7 takes nothing returns boolean
if(not ag6())then
return false
endif
return true
endfunction
function ag8 takes nothing returns nothing
if(ag7())then
set udg_location04=GetRectCenter(udg_rect69)
call SetUnitPositionLoc(GetEnteringUnit(),udg_location04)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetRectCenter(udg_rect69),0)
call RemoveLocation(udg_location04)
else
endif
endfunction
function ag9 takes nothing returns nothing
set udg_trigger352=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger352,udg_rect83)
call TriggerAddCondition(udg_trigger352,Condition(function ag5))
call TriggerAddAction(udg_trigger352,function ag8)
endfunction
function aGa takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='h01G'))then
return false
endif
return true
endfunction
function aGA takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[2])=='h01G'))then
return false
endif
if(not(RectContainsUnit(udg_rect85,udg_units01[2])==true))then
return false
endif
if(not(udg_booleans03[2]==false))then
return false
endif
if(not(udg_booleans04[2]==false))then
return false
endif
return true
endfunction
function aGb takes nothing returns boolean
if(not aGA())then
return false
endif
return true
endfunction
function aGB takes nothing returns nothing
if(aGb())then
set udg_location04=GetRectCenter(udg_rect70)
call SetUnitPositionLoc(GetEnteringUnit(),udg_location04)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),udg_location04,0)
call RemoveLocation(udg_location04)
else
endif
endfunction
function aGc takes nothing returns nothing
set udg_trigger353=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger353,udg_rect85)
call TriggerAddCondition(udg_trigger353,Condition(function aGa))
call TriggerAddAction(udg_trigger353,function aGB)
endfunction
function aGC takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='h01G'))then
return false
endif
return true
endfunction
function aGd takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[3])=='h01G'))then
return false
endif
if(not(RectContainsUnit(udg_rect163,udg_units01[3])==true))then
return false
endif
if(not(udg_booleans03[3]==false))then
return false
endif
if(not(udg_booleans04[3]==false))then
return false
endif
return true
endfunction
function aGD takes nothing returns boolean
if(not aGd())then
return false
endif
return true
endfunction
function aGe takes nothing returns nothing
if(aGD())then
set udg_location04=GetRectCenter(udg_rect71)
call SetUnitPositionLoc(GetEnteringUnit(),udg_location04)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),udg_location04,0)
call RemoveLocation(udg_location04)
else
endif
endfunction
function aGE takes nothing returns nothing
set udg_trigger354=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger354,udg_rect163)
call TriggerAddCondition(udg_trigger354,Condition(function aGC))
call TriggerAddAction(udg_trigger354,function aGe)
endfunction
function aGf takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='h01G'))then
return false
endif
return true
endfunction
function aGF takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[4])=='h01G'))then
return false
endif
if(not(RectContainsUnit(udg_rect162,udg_units01[4])==true))then
return false
endif
if(not(udg_booleans03[4]==false))then
return false
endif
if(not(udg_booleans04[4]==false))then
return false
endif
return true
endfunction
function aGg takes nothing returns boolean
if(not aGF())then
return false
endif
return true
endfunction
function aGG takes nothing returns nothing
if(aGg())then
set udg_location04=GetRectCenter(udg_rect72)
call SetUnitPositionLoc(GetEnteringUnit(),udg_location04)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),udg_location04,0)
call RemoveLocation(udg_location04)
else
endif
endfunction
function aGh takes nothing returns nothing
set udg_trigger355=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger355,udg_rect162)
call TriggerAddCondition(udg_trigger355,Condition(function aGf))
call TriggerAddAction(udg_trigger355,function aGG)
endfunction
function aGH takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='h01G'))then
return false
endif
return true
endfunction
function aGi takes nothing returns boolean
if(not(RectContainsUnit(udg_rect101,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[1])=='h01G'))then
return false
endif
if(not(RectContainsUnit(udg_rect101,udg_units01[1])==true))then
return false
endif
if(not(udg_booleans03[1]==true))then
return false
endif
if(not(udg_booleans04[1]==false))then
return false
endif
return true
endfunction
function aGI takes nothing returns boolean
if(not aGi())then
return false
endif
return true
endfunction
function aGj takes nothing returns boolean
if(not(RectContainsUnit(udg_rect102,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[2])=='h01G'))then
return false
endif
if(not(RectContainsUnit(udg_rect102,udg_units01[2])==true))then
return false
endif
if(not(udg_booleans03[2]==true))then
return false
endif
if(not(udg_booleans04[2]==false))then
return false
endif
return true
endfunction
function aGJ takes nothing returns boolean
if(not aGj())then
return false
endif
return true
endfunction
function aGk takes nothing returns boolean
if(not(RectContainsUnit(udg_rect103,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[3])=='h01G'))then
return false
endif
if(not(RectContainsUnit(udg_rect103,udg_units01[3])==true))then
return false
endif
if(not(udg_booleans03[3]==true))then
return false
endif
if(not(udg_booleans04[3]==false))then
return false
endif
return true
endfunction
function aGK takes nothing returns boolean
if(not aGk())then
return false
endif
return true
endfunction
function aGl takes nothing returns boolean
if(not(RectContainsUnit(udg_rect104,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[4])=='h01G'))then
return false
endif
if(not(RectContainsUnit(udg_rect104,udg_units01[4])==true))then
return false
endif
if(not(udg_booleans03[4]==true))then
return false
endif
if(not(udg_booleans04[4]==false))then
return false
endif
return true
endfunction
function aGL takes nothing returns boolean
if(not aGl())then
return false
endif
return true
endfunction
function aGm takes nothing returns nothing
if(aGI())then
set udg_location04=GetRectCenter(udg_rect69)
call SetUnitPositionLoc(GetEnteringUnit(),udg_location04)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),udg_location04,0)
call RemoveLocation(udg_location04)
else
endif
if(aGJ())then
set udg_location04=GetRectCenter(udg_rect70)
call SetUnitPositionLoc(GetEnteringUnit(),udg_location04)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),udg_location04,0)
call RemoveLocation(udg_location04)
else
endif
if(aGK())then
set udg_location04=GetRectCenter(udg_rect71)
call SetUnitPositionLoc(GetEnteringUnit(),udg_location04)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),udg_location04,0)
call RemoveLocation(udg_location04)
else
endif
if(aGL())then
set udg_location04=GetRectCenter(udg_rect72)
call SetUnitPositionLoc(GetEnteringUnit(),udg_location04)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),udg_location04,0)
call RemoveLocation(udg_location04)
else
endif
endfunction
function aGM takes nothing returns nothing
set udg_trigger356=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger356,udg_rect101)
call TriggerRegisterEnterRectSimple(udg_trigger356,udg_rect102)
call TriggerRegisterEnterRectSimple(udg_trigger356,udg_rect103)
call TriggerRegisterEnterRectSimple(udg_trigger356,udg_rect104)
call TriggerAddCondition(udg_trigger356,Condition(function aGH))
call TriggerAddAction(udg_trigger356,function aGm)
endfunction
function aGn takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[1])=='h01G'))then
return false
endif
if(not(udg_booleans05[1]==false))then
return false
endif
return true
endfunction
function aGN takes nothing returns boolean
if(not aGn())then
return false
endif
return true
endfunction
function aGo takes nothing returns boolean
if(not(RectContainsUnit(udg_rect82,udg_units01[1])==true))then
return false
endif
return true
endfunction
function aGO takes nothing returns nothing
if(aGo())then
set udg_location04=GetRectCenter(udg_rect88)
call SetUnitPositionLoc(GetEnteringUnit(),udg_location04)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),udg_location04,0)
call RemoveLocation(udg_location04)
else
set udg_location04=GetRectCenter(udg_rect105)
call SetUnitPositionLoc(GetEnteringUnit(),udg_location04)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),udg_location04,0)
call RemoveLocation(udg_location04)
endif
endfunction
function aGp takes nothing returns nothing
set udg_trigger357=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger357,udg_rect65)
call TriggerAddCondition(udg_trigger357,Condition(function aGN))
call TriggerAddAction(udg_trigger357,function aGO)
endfunction
function aGP takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[2])=='h01G'))then
return false
endif
if(not(udg_booleans05[2]==false))then
return false
endif
return true
endfunction
function aGq takes nothing returns boolean
if(not aGP())then
return false
endif
return true
endfunction
function aGQ takes nothing returns boolean
if(not(RectContainsUnit(udg_rect84,udg_units01[2])==true))then
return false
endif
return true
endfunction
function aGr takes nothing returns nothing
if(aGQ())then
set udg_location04=GetRectCenter(udg_rect89)
call SetUnitPositionLoc(GetEnteringUnit(),udg_location04)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),udg_location04,0)
call RemoveLocation(udg_location04)
else
set udg_location04=GetRectCenter(udg_rect106)
call SetUnitPositionLoc(GetEnteringUnit(),udg_location04)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),udg_location04,0)
call RemoveLocation(udg_location04)
endif
endfunction
function aGR takes nothing returns nothing
set udg_trigger358=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger358,udg_rect66)
call TriggerAddCondition(udg_trigger358,Condition(function aGq))
call TriggerAddAction(udg_trigger358,function aGr)
endfunction
function aGs takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[3])=='h01G'))then
return false
endif
if(not(udg_booleans05[3]==false))then
return false
endif
return true
endfunction
function aGS takes nothing returns boolean
if(not aGs())then
return false
endif
return true
endfunction
function aGt takes nothing returns boolean
if(not(RectContainsUnit(udg_rect86,udg_units01[3])==true))then
return false
endif
return true
endfunction
function aGT takes nothing returns nothing
if(aGt())then
set udg_location04=GetRectCenter(udg_rect90)
call SetUnitPositionLoc(GetEnteringUnit(),udg_location04)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),udg_location04,0)
call RemoveLocation(udg_location04)
else
set udg_location04=GetRectCenter(udg_rect107)
call SetUnitPositionLoc(GetEnteringUnit(),udg_location04)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),udg_location04,0)
call RemoveLocation(udg_location04)
endif
endfunction
function aGu takes nothing returns nothing
set udg_trigger359=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger359,udg_rect67)
call TriggerAddCondition(udg_trigger359,Condition(function aGS))
call TriggerAddAction(udg_trigger359,function aGT)
endfunction
function aGU takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[4])=='h01G'))then
return false
endif
if(not(udg_booleans05[4]==false))then
return false
endif
return true
endfunction
function aGv takes nothing returns boolean
if(not aGU())then
return false
endif
return true
endfunction
function aGV takes nothing returns boolean
if(not(RectContainsUnit(udg_rect87,udg_units01[4])==true))then
return false
endif
return true
endfunction
function aGw takes nothing returns nothing
if(aGV())then
set udg_location04=GetRectCenter(udg_rect91)
call SetUnitPositionLoc(GetEnteringUnit(),udg_location04)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),udg_location04,0)
call RemoveLocation(udg_location04)
else
set udg_location04=GetRectCenter(udg_rect108)
call SetUnitPositionLoc(GetEnteringUnit(),udg_location04)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),udg_location04,0)
call RemoveLocation(udg_location04)
endif
endfunction
function aGW takes nothing returns nothing
set udg_trigger360=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger360,udg_rect68)
call TriggerAddCondition(udg_trigger360,Condition(function aGv))
call TriggerAddAction(udg_trigger360,function aGw)
endfunction
function aGx takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='nrac'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nech'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nder'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='ndog'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nfro'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nskk'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='necr'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npig'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npng'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nrat'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsea'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nshe'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsno'))then
return false
endif
return true
endfunction
function aGX takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetEnteringUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not aGx())then
return false
endif
return true
endfunction
function aGy takes nothing returns boolean
if(not aGX())then
return false
endif
return true
endfunction
function aGY takes nothing returns boolean
return(udg_booleans03[1]==false)
endfunction
function aGz takes nothing returns boolean
return(udg_booleans04[1]==false)
endfunction
function aGZ takes nothing returns boolean
return GetBooleanAnd(aGY(),aGz())
endfunction
function aG0 takes nothing returns boolean
return(udg_booleans03[1]==true)
endfunction
function aG1 takes nothing returns boolean
return(udg_booleans04[1]==false)
endfunction
function aG2 takes nothing returns boolean
return GetBooleanAnd(aG0(),aG1())
endfunction
function aG3 takes nothing returns boolean
return(udg_booleans03[1]==false)
endfunction
function aG4 takes nothing returns boolean
return(udg_booleans04[1]==true)
endfunction
function aG5 takes nothing returns boolean
return GetBooleanAnd(aG3(),aG4())
endfunction
function aG6 takes nothing returns boolean
if(not(RectContainsUnit(udg_rect73,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[1])=='h01G'))then
return false
endif
if(not(udg_booleans05[1]==false))then
return false
endif
if(not(udg_booleans03[1]==false))then
return false
endif
if(not(udg_booleans04[1]==false))then
return false
endif
return true
endfunction
function aG7 takes nothing returns boolean
return(udg_booleans03[2]==false)
endfunction
function aG8 takes nothing returns boolean
return(udg_booleans04[2]==false)
endfunction
function aG9 takes nothing returns boolean
return GetBooleanAnd(aG7(),aG8())
endfunction
function aha takes nothing returns boolean
return(udg_booleans03[2]==true)
endfunction
function ahA takes nothing returns boolean
return(udg_booleans04[2]==false)
endfunction
function ahb takes nothing returns boolean
return GetBooleanAnd(aha(),ahA())
endfunction
function ahB takes nothing returns boolean
return(udg_booleans03[2]==false)
endfunction
function ahc takes nothing returns boolean
return(udg_booleans04[2]==true)
endfunction
function ahC takes nothing returns boolean
return GetBooleanAnd(ahB(),ahc())
endfunction
function ahd takes nothing returns boolean
if(not(RectContainsUnit(udg_rect75,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[2])=='h01G'))then
return false
endif
if(not(udg_booleans05[2]==false))then
return false
endif
if(not(udg_booleans03[2]==false))then
return false
endif
if(not(udg_booleans04[2]==false))then
return false
endif
return true
endfunction
function ahD takes nothing returns boolean
return(udg_booleans03[3]==false)
endfunction
function ahe takes nothing returns boolean
return(udg_booleans04[3]==false)
endfunction
function ahE takes nothing returns boolean
return GetBooleanAnd(ahD(),ahe())
endfunction
function ahf takes nothing returns boolean
return(udg_booleans03[3]==true)
endfunction
function ahF takes nothing returns boolean
return(udg_booleans04[3]==false)
endfunction
function ahg takes nothing returns boolean
return GetBooleanAnd(ahf(),ahF())
endfunction
function ahG takes nothing returns boolean
return(udg_booleans03[3]==false)
endfunction
function ahh takes nothing returns boolean
return(udg_booleans04[3]==true)
endfunction
function ahH takes nothing returns boolean
return GetBooleanAnd(ahG(),ahh())
endfunction
function ahi takes nothing returns boolean
if(not(RectContainsUnit(udg_rect77,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[3])=='h01G'))then
return false
endif
if(not(udg_booleans05[3]==false))then
return false
endif
if(not(udg_booleans03[3]==false))then
return false
endif
if(not(udg_booleans04[3]==false))then
return false
endif
return true
endfunction
function ahI takes nothing returns boolean
return(udg_booleans03[4]==false)
endfunction
function ahj takes nothing returns boolean
return(udg_booleans04[4]==false)
endfunction
function ahJ takes nothing returns boolean
return GetBooleanAnd(ahI(),ahj())
endfunction
function ahk takes nothing returns boolean
return(udg_booleans03[4]==true)
endfunction
function ahK takes nothing returns boolean
return(udg_booleans04[4]==false)
endfunction
function ahl takes nothing returns boolean
return GetBooleanAnd(ahk(),ahK())
endfunction
function ahL takes nothing returns boolean
return(udg_booleans03[4]==false)
endfunction
function ahm takes nothing returns boolean
return(udg_booleans04[4]==true)
endfunction
function ahM takes nothing returns boolean
return GetBooleanAnd(ahL(),ahm())
endfunction
function ahn takes nothing returns boolean
if(not(RectContainsUnit(udg_rect79,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[4])=='h01G'))then
return false
endif
if(not(udg_booleans05[4]==false))then
return false
endif
if(not(udg_booleans03[4]==false))then
return false
endif
if(not(udg_booleans04[4]==false))then
return false
endif
return true
endfunction
function ahN takes nothing returns boolean
if(not(udg_boolean03!=true))then
return false
endif
return true
endfunction
function aho takes nothing returns nothing
if(ahN())then
if(aG6())then
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2227")
set udg_booleans05[1]=true
call TriggerSleepAction(3.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Jwmb',-1,1,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2228")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Jwmb',-1,2,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2229")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Jwmb',-1,3,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2230")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Jwmb',-1,4,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2231")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Jwmb',-1,5,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2232")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Jwmb',-1,6,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2233")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Jwmb',-1,7,1)
set udg_reals04[1]=GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[1])
call RemoveUnit(udg_units01[1])
if(aGZ())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(udg_unit33),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aG2())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetRandomLocInRect(udg_rect109),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aG5())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetRandomLocInRect(udg_rect110),bj_UNIT_FACING)
else
call DoNothing()
endif
set udg_units01[1]=GetLastCreatedUnit()
call SetUnitLifeBJ(udg_units01[1],udg_reals04[1])
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Ysqd',-1,4,1)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(udg_units01[1]),0)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Ysqd',-1,5,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Ysqd',-1,7,1)
set udg_booleans05[1]=false
else
endif
if(ahd())then
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2234")
set udg_booleans05[2]=true
call TriggerSleepAction(3.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Jwmb',-1,1,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2235")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Jwmb',-1,2,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2236")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Jwmb',-1,3,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2237")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Jwmb',-1,4,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2238")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Jwmb',-1,5,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2239")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Jwmb',-1,6,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2240")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Jwmb',-1,7,1)
set udg_reals04[2]=GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[2])
call RemoveUnit(udg_units01[2])
if(aG9())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(udg_unit33),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ahb())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetRandomLocInRect(udg_rect109),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ahC())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetRandomLocInRect(udg_rect110),bj_UNIT_FACING)
else
call DoNothing()
endif
set udg_units01[2]=GetLastCreatedUnit()
call SetUnitLifeBJ(udg_units01[2],udg_reals04[2])
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Ysqd',-1,4,1)
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(udg_units01[2]),0)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Ysqd',-1,5,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Ysqd',-1,7,1)
set udg_booleans05[2]=false
else
endif
if(ahi())then
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2241")
set udg_booleans05[3]=true
call TriggerSleepAction(3.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Jwmb',-1,1,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2242")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Jwmb',-1,2,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2243")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Jwmb',-1,3,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2244")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Jwmb',-1,4,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2245")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Jwmb',-1,5,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2246")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Jwmb',-1,6,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2247")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Jwmb',-1,7,1)
set udg_reals04[3]=GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[3])
call RemoveUnit(udg_units01[3])
if(ahE())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(udg_unit33),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ahg())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetRandomLocInRect(udg_rect109),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ahH())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetRandomLocInRect(udg_rect110),bj_UNIT_FACING)
else
call DoNothing()
endif
set udg_units01[3]=GetLastCreatedUnit()
call SetUnitLifeBJ(udg_units01[3],udg_reals04[3])
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Ysqd',-1,4,1)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(udg_units01[3]),0)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Ysqd',-1,5,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Ysqd',-1,7,1)
set udg_booleans05[3]=false
else
endif
if(ahn())then
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2248")
set udg_booleans05[4]=true
call TriggerSleepAction(3.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Jwmb',-1,1,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2249")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Jwmb',-1,2,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2250")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Jwmb',-1,3,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2251")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Jwmb',-1,4,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2252")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Jwmb',-1,5,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2253")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Jwmb',-1,6,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2254")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Jwmb',-1,7,1)
set udg_reals04[4]=GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[4])
call RemoveUnit(udg_units01[4])
if(ahJ())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(udg_unit33),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ahl())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetRandomLocInRect(udg_rect109),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ahM())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetRandomLocInRect(udg_rect109),bj_UNIT_FACING)
else
call DoNothing()
endif
set udg_units01[4]=GetLastCreatedUnit()
call SetUnitLifeBJ(udg_units01[4],udg_reals04[4])
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Ysqd',-1,4,1)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(udg_units01[4]),0)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Ysqd',-1,5,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Ysqd',-1,7,1)
set udg_booleans05[4]=false
else
endif
else
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2188")
endif
endfunction
function ahO takes nothing returns nothing
set udg_trigger361=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger361,udg_rect73)
call TriggerRegisterEnterRectSimple(udg_trigger361,udg_rect75)
call TriggerRegisterEnterRectSimple(udg_trigger361,udg_rect77)
call TriggerRegisterEnterRectSimple(udg_trigger361,udg_rect79)
call TriggerAddCondition(udg_trigger361,Condition(function aGy))
call TriggerAddAction(udg_trigger361,function aho)
endfunction
function ahp takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='nrac'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nech'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nder'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='ndog'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nfro'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nskk'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='necr'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npig'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npng'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nrat'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsea'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nshe'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsno'))then
return false
endif
return true
endfunction
function ahP takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetEnteringUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not ahp())then
return false
endif
return true
endfunction
function ahq takes nothing returns boolean
if(not ahP())then
return false
endif
return true
endfunction
function ahQ takes nothing returns boolean
return(udg_booleans03[1]==false)
endfunction
function ahr takes nothing returns boolean
return(udg_booleans04[1]==false)
endfunction
function ahR takes nothing returns boolean
return GetBooleanAnd(ahQ(),ahr())
endfunction
function ahs takes nothing returns boolean
return(udg_booleans03[1]==true)
endfunction
function ahS takes nothing returns boolean
return(udg_booleans04[1]==false)
endfunction
function aht takes nothing returns boolean
return GetBooleanAnd(ahs(),ahS())
endfunction
function ahT takes nothing returns boolean
return(udg_booleans03[1]==false)
endfunction
function ahu takes nothing returns boolean
return(udg_booleans04[1]==true)
endfunction
function ahU takes nothing returns boolean
return GetBooleanAnd(ahT(),ahu())
endfunction
function ahv takes nothing returns boolean
if(not(RectContainsUnit(udg_rect73,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[1])=='h01G'))then
return false
endif
if(not(udg_booleans05[1]==false))then
return false
endif
if(not(udg_booleans03[1]==true))then
return false
endif
if(not(udg_booleans04[1]==false))then
return false
endif
return true
endfunction
function ahV takes nothing returns boolean
return(udg_booleans03[2]==false)
endfunction
function ahw takes nothing returns boolean
return(udg_booleans04[2]==false)
endfunction
function ahW takes nothing returns boolean
return GetBooleanAnd(ahV(),ahw())
endfunction
function ahx takes nothing returns boolean
return(udg_booleans03[2]==true)
endfunction
function ahX takes nothing returns boolean
return(udg_booleans04[2]==false)
endfunction
function ahy takes nothing returns boolean
return GetBooleanAnd(ahx(),ahX())
endfunction
function ahY takes nothing returns boolean
return(udg_booleans03[2]==false)
endfunction
function ahz takes nothing returns boolean
return(udg_booleans04[2]==true)
endfunction
function ahZ takes nothing returns boolean
return GetBooleanAnd(ahY(),ahz())
endfunction
function ah0 takes nothing returns boolean
if(not(RectContainsUnit(udg_rect75,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[2])=='h01G'))then
return false
endif
if(not(udg_booleans05[2]==false))then
return false
endif
if(not(udg_booleans03[2]==true))then
return false
endif
if(not(udg_booleans04[2]==false))then
return false
endif
return true
endfunction
function ah1 takes nothing returns boolean
return(udg_booleans03[3]==false)
endfunction
function ah2 takes nothing returns boolean
return(udg_booleans04[3]==false)
endfunction
function ah3 takes nothing returns boolean
return GetBooleanAnd(ah1(),ah2())
endfunction
function ah4 takes nothing returns boolean
return(udg_booleans03[3]==true)
endfunction
function ah5 takes nothing returns boolean
return(udg_booleans04[3]==false)
endfunction
function ah6 takes nothing returns boolean
return GetBooleanAnd(ah4(),ah5())
endfunction
function ah7 takes nothing returns boolean
return(udg_booleans03[3]==false)
endfunction
function ah8 takes nothing returns boolean
return(udg_booleans04[3]==true)
endfunction
function ah9 takes nothing returns boolean
return GetBooleanAnd(ah7(),ah8())
endfunction
function aHa takes nothing returns boolean
if(not(RectContainsUnit(udg_rect77,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[3])=='h01G'))then
return false
endif
if(not(udg_booleans05[3]==false))then
return false
endif
if(not(udg_booleans03[3]==true))then
return false
endif
if(not(udg_booleans04[3]==false))then
return false
endif
return true
endfunction
function aHA takes nothing returns boolean
return(udg_booleans03[4]==false)
endfunction
function aHb takes nothing returns boolean
return(udg_booleans04[4]==false)
endfunction
function aHB takes nothing returns boolean
return GetBooleanAnd(aHA(),aHb())
endfunction
function aHc takes nothing returns boolean
return(udg_booleans03[4]==true)
endfunction
function aHC takes nothing returns boolean
return(udg_booleans04[4]==false)
endfunction
function aHd takes nothing returns boolean
return GetBooleanAnd(aHc(),aHC())
endfunction
function aHD takes nothing returns boolean
return(udg_booleans03[4]==false)
endfunction
function aHe takes nothing returns boolean
return(udg_booleans04[4]==true)
endfunction
function aHE takes nothing returns boolean
return GetBooleanAnd(aHD(),aHe())
endfunction
function aHf takes nothing returns boolean
if(not(RectContainsUnit(udg_rect79,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[4])=='h01G'))then
return false
endif
if(not(udg_booleans05[4]==false))then
return false
endif
if(not(udg_booleans03[4]==true))then
return false
endif
if(not(udg_booleans04[4]==false))then
return false
endif
return true
endfunction
function aHF takes nothing returns boolean
if(not(udg_boolean03!=true))then
return false
endif
return true
endfunction
function aHg takes nothing returns nothing
if(aHF())then
if(ahv())then
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2256")
set udg_booleans05[1]=true
call TriggerSleepAction(3.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2257")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2258")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2259")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2260")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2261")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2262")
call TriggerSleepAction(1.00)
set udg_reals04[1]=GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[1])
call RemoveUnit(udg_units01[1])
if(ahR())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(udg_unit33),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aht())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetRandomLocInRect(udg_rect109),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ahU())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetRandomLocInRect(udg_rect110),bj_UNIT_FACING)
else
call DoNothing()
endif
set udg_units01[1]=GetLastCreatedUnit()
call SetUnitLifeBJ(udg_units01[1],udg_reals04[1])
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(udg_units01[1]),0)
call TriggerSleepAction(1.00)
set udg_booleans05[1]=false
else
endif
if(ah0())then
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2263")
set udg_booleans05[2]=true
call TriggerSleepAction(3.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2264")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2265")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2266")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2267")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2268")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2269")
call TriggerSleepAction(1.00)
set udg_reals04[2]=GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[2])
call RemoveUnit(udg_units01[2])
if(ahW())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(udg_unit33),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ahy())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetRandomLocInRect(udg_rect109),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ahZ())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetRandomLocInRect(udg_rect110),bj_UNIT_FACING)
else
call DoNothing()
endif
set udg_units01[2]=GetLastCreatedUnit()
call SetUnitLifeBJ(udg_units01[2],udg_reals04[2])
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(udg_units01[2]),0)
call TriggerSleepAction(1.00)
set udg_booleans05[2]=false
else
endif
if(aHa())then
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2270")
set udg_booleans05[3]=true
call TriggerSleepAction(3.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2271")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2272")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2273")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2274")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2275")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2276")
call TriggerSleepAction(1.00)
set udg_reals04[3]=GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[3])
call RemoveUnit(udg_units01[3])
if(ah3())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(udg_unit33),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ah6())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetRandomLocInRect(udg_rect109),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ah9())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetRandomLocInRect(udg_rect110),bj_UNIT_FACING)
else
call DoNothing()
endif
set udg_units01[3]=GetLastCreatedUnit()
call SetUnitLifeBJ(udg_units01[3],udg_reals04[3])
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(udg_units01[3]),0)
call TriggerSleepAction(1.00)
set udg_booleans05[3]=false
else
endif
if(aHf())then
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2277")
set udg_booleans05[4]=true
call TriggerSleepAction(3.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2278")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2279")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2280")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2281")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2282")
call TriggerSleepAction(1.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2283")
call TriggerSleepAction(1.00)
set udg_reals04[4]=GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[4])
call RemoveUnit(udg_units01[4])
if(aHB())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(udg_unit33),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aHd())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetRandomLocInRect(udg_rect109),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aHE())then
call CreateNUnitsAtLoc(1,'h01H',GetOwningPlayer(GetEnteringUnit()),GetRandomLocInRect(udg_rect109),bj_UNIT_FACING)
else
call DoNothing()
endif
set udg_units01[4]=GetLastCreatedUnit()
call SetUnitLifeBJ(udg_units01[4],udg_reals04[4])
call TriggerSleepAction(1.00)
call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetEnteringUnit()),GetUnitLoc(udg_units01[3]),0)
call TriggerSleepAction(1.00)
set udg_booleans05[4]=false
else
endif
else
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2255")
endif
endfunction
function aHG takes nothing returns nothing
set udg_trigger362=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger362,udg_rect73)
call TriggerRegisterEnterRectSimple(udg_trigger362,udg_rect75)
call TriggerRegisterEnterRectSimple(udg_trigger362,udg_rect77)
call TriggerRegisterEnterRectSimple(udg_trigger362,udg_rect79)
call TriggerAddCondition(udg_trigger362,Condition(function ahq))
call TriggerAddAction(udg_trigger362,function aHg)
endfunction
function aHh takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='nrac'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nech'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nder'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='ndog'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nfro'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nskk'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='necr'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npig'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npng'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nrat'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsea'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nshe'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsno'))then
return false
endif
return true
endfunction
function aHH takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetEnteringUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(RectContainsUnit(udg_rect73,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[1])=='h01H'))then
return false
endif
if(not(udg_booleans05[1]==false))then
return false
endif
if(not aHh())then
return false
endif
return true
endfunction
function aHi takes nothing returns boolean
if(not aHH())then
return false
endif
return true
endfunction
function aHI takes nothing returns nothing
set udg_force02=GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit()))
call DisplayTextToForce(udg_force02,"TRIGSTR_2284")
call DestroyForce(udg_force02)
call SetUnitOwner(udg_units01[1],GetOwningPlayer(GetEnteringUnit()),true)
endfunction
function aHj takes nothing returns nothing
set udg_trigger363=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger363,udg_rect73)
call TriggerAddCondition(udg_trigger363,Condition(function aHi))
call TriggerAddAction(udg_trigger363,function aHI)
endfunction
function aHJ takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='nrac'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nech'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nder'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='ndog'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nfro'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nskk'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='necr'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npig'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npng'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nrat'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsea'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nshe'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsno'))then
return false
endif
return true
endfunction
function aHk takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetEnteringUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(RectContainsUnit(udg_rect75,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[2])=='h01H'))then
return false
endif
if(not(udg_booleans05[2]==false))then
return false
endif
if(not aHJ())then
return false
endif
return true
endfunction
function aHK takes nothing returns boolean
if(not aHk())then
return false
endif
return true
endfunction
function aHl takes nothing returns nothing
set udg_force02=GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit()))
call DisplayTextToForce(udg_force02,"TRIGSTR_2320")
call DestroyForce(udg_force02)
call SetUnitOwner(udg_units01[2],GetOwningPlayer(GetEnteringUnit()),true)
endfunction
function aHL takes nothing returns nothing
set udg_trigger364=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger364,udg_rect75)
call TriggerAddCondition(udg_trigger364,Condition(function aHK))
call TriggerAddAction(udg_trigger364,function aHl)
endfunction
function aHm takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='nrac'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nech'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nder'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='ndog'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nfro'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nskk'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='necr'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npig'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npng'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nrat'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsea'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nshe'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsno'))then
return false
endif
return true
endfunction
function aHM takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetEnteringUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(RectContainsUnit(udg_rect77,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[3])=='h01H'))then
return false
endif
if(not(udg_booleans05[3]==false))then
return false
endif
if(not aHm())then
return false
endif
return true
endfunction
function aHn takes nothing returns boolean
if(not aHM())then
return false
endif
return true
endfunction
function aHN takes nothing returns nothing
set udg_force02=GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit()))
call DisplayTextToForce(udg_force02,"TRIGSTR_2344")
call DestroyForce(udg_force02)
call SetUnitOwner(udg_units01[3],GetOwningPlayer(GetEnteringUnit()),true)
endfunction
function aHo takes nothing returns nothing
set udg_trigger365=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger365,udg_rect77)
call TriggerAddCondition(udg_trigger365,Condition(function aHn))
call TriggerAddAction(udg_trigger365,function aHN)
endfunction
function aHO takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='nrac'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nech'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nder'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='ndog'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nfro'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nskk'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='necr'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npig'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npng'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nrat'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsea'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nshe'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsno'))then
return false
endif
return true
endfunction
function aHp takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetEnteringUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(RectContainsUnit(udg_rect79,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[4])=='h01H'))then
return false
endif
if(not(udg_booleans05[4]==false))then
return false
endif
if(not aHO())then
return false
endif
return true
endfunction
function aHP takes nothing returns boolean
if(not aHp())then
return false
endif
return true
endfunction
function aHq takes nothing returns nothing
set udg_force02=GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit()))
call DisplayTextToForce(udg_force02,"TRIGSTR_2374")
call DestroyForce(udg_force02)
call SetUnitOwner(udg_units01[4],GetOwningPlayer(GetEnteringUnit()),true)
endfunction
function aHQ takes nothing returns nothing
set udg_trigger366=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger366,udg_rect79)
call TriggerAddCondition(udg_trigger366,Condition(function aHP))
call TriggerAddAction(udg_trigger366,function aHq)
endfunction
function aHr takes nothing returns boolean
if(not(IsUnitType(GetLeavingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetLeavingUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetLeavingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(RectContainsUnit(udg_rect73,GetLeavingUnit())!=true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[1])=='h01H'))then
return false
endif
return true
endfunction
function aHR takes nothing returns boolean
if(not aHr())then
return false
endif
return true
endfunction
function aHs takes nothing returns nothing
call SetUnitOwner(udg_units01[1],Player(PLAYER_NEUTRAL_PASSIVE),true)
endfunction
function aHS takes nothing returns nothing
set udg_trigger367=CreateTrigger()
call TriggerRegisterLeaveRectSimple(udg_trigger367,udg_rect73)
call TriggerAddCondition(udg_trigger367,Condition(function aHR))
call TriggerAddAction(udg_trigger367,function aHs)
endfunction
function aHt takes nothing returns boolean
if(not(IsUnitType(GetLeavingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetLeavingUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetLeavingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(RectContainsUnit(udg_rect75,GetLeavingUnit())!=true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[2])=='h01H'))then
return false
endif
return true
endfunction
function aHT takes nothing returns boolean
if(not aHt())then
return false
endif
return true
endfunction
function aHu takes nothing returns nothing
call SetUnitOwner(udg_units01[2],Player(PLAYER_NEUTRAL_PASSIVE),true)
endfunction
function aHU takes nothing returns nothing
set udg_trigger368=CreateTrigger()
call TriggerRegisterLeaveRectSimple(udg_trigger368,udg_rect75)
call TriggerAddCondition(udg_trigger368,Condition(function aHT))
call TriggerAddAction(udg_trigger368,function aHu)
endfunction
function aHv takes nothing returns boolean
if(not(IsUnitType(GetLeavingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetLeavingUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetLeavingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(RectContainsUnit(udg_rect77,GetLeavingUnit())!=true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[3])=='h01H'))then
return false
endif
return true
endfunction
function aHV takes nothing returns boolean
if(not aHv())then
return false
endif
return true
endfunction
function aHw takes nothing returns nothing
call SetUnitOwner(udg_units01[3],Player(PLAYER_NEUTRAL_PASSIVE),true)
endfunction
function aHW takes nothing returns nothing
set udg_trigger369=CreateTrigger()
call TriggerRegisterLeaveRectSimple(udg_trigger369,udg_rect77)
call TriggerAddCondition(udg_trigger369,Condition(function aHV))
call TriggerAddAction(udg_trigger369,function aHw)
endfunction
function aHx takes nothing returns boolean
if(not(IsUnitType(GetLeavingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetLeavingUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetLeavingUnit()))==MAP_CONTROL_USER))then
return false
endif
if(not(RectContainsUnit(udg_rect79,GetLeavingUnit())!=true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[4])=='h01H'))then
return false
endif
return true
endfunction
function aHX takes nothing returns boolean
if(not aHx())then
return false
endif
return true
endfunction
function aHy takes nothing returns nothing
call SetUnitOwner(udg_units01[4],Player(PLAYER_NEUTRAL_PASSIVE),true)
endfunction
function aHY takes nothing returns nothing
set udg_trigger370=CreateTrigger()
call TriggerRegisterLeaveRectSimple(udg_trigger370,udg_rect79)
call TriggerAddCondition(udg_trigger370,Condition(function aHX))
call TriggerAddAction(udg_trigger370,function aHy)
endfunction
function aHz takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetEnteringUnit()))==MAP_CONTROL_USER))then
return false
endif
return true
endfunction
function aHZ takes nothing returns boolean
if(not aHz())then
return false
endif
return true
endfunction
function aH0 takes nothing returns boolean
if(not(udg_integers15[1]==1))then
return false
endif
return true
endfunction
function aH1 takes nothing returns boolean
if(not(RectContainsUnit(udg_rect74,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[1])=='h01H'))then
return false
endif
if(not(udg_booleans05[1]==false))then
return false
endif
if(not(RectContainsUnit(udg_rect100,udg_units01[1])==true))then
return false
endif
if(not(RectContainsUnit(udg_rect64,udg_units01[1])!=true))then
return false
endif
if(not(RectContainsUnit(udg_rect63,udg_units01[1])!=true))then
return false
endif
if(not(udg_integer25==0))then
return false
endif
return true
endfunction
function aH2 takes nothing returns boolean
if(not aH1())then
return false
endif
return true
endfunction
function aH3 takes nothing returns boolean
if(not(udg_integers15[2]==1))then
return false
endif
return true
endfunction
function aH4 takes nothing returns boolean
if(not(RectContainsUnit(udg_rect76,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[2])=='h01H'))then
return false
endif
if(not(udg_booleans05[1]==false))then
return false
endif
if(not(RectContainsUnit(udg_rect100,udg_units01[2])==true))then
return false
endif
if(not(RectContainsUnit(udg_rect64,udg_units01[2])!=true))then
return false
endif
if(not(RectContainsUnit(udg_rect63,udg_units01[2])!=true))then
return false
endif
if(not(udg_integer25==0))then
return false
endif
return true
endfunction
function aH5 takes nothing returns boolean
if(not aH4())then
return false
endif
return true
endfunction
function aH6 takes nothing returns boolean
if(not(udg_integers15[3]==1))then
return false
endif
return true
endfunction
function aH7 takes nothing returns boolean
if(not(RectContainsUnit(udg_rect78,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[3])=='h01H'))then
return false
endif
if(not(udg_booleans05[3]==false))then
return false
endif
if(not(RectContainsUnit(udg_rect100,udg_units01[3])==true))then
return false
endif
if(not(RectContainsUnit(udg_rect64,udg_units01[3])!=true))then
return false
endif
if(not(RectContainsUnit(udg_rect63,udg_units01[3])!=true))then
return false
endif
if(not(udg_integer25==0))then
return false
endif
return true
endfunction
function aH8 takes nothing returns boolean
if(not aH7())then
return false
endif
return true
endfunction
function aH9 takes nothing returns boolean
if(not(udg_integers15[4]==1))then
return false
endif
return true
endfunction
function aia takes nothing returns boolean
if(not(RectContainsUnit(udg_rect80,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[4])=='h01H'))then
return false
endif
if(not(udg_booleans05[4]==false))then
return false
endif
if(not(RectContainsUnit(udg_rect100,udg_units01[4])==true))then
return false
endif
if(not(RectContainsUnit(udg_rect64,udg_units01[4])!=true))then
return false
endif
if(not(RectContainsUnit(udg_rect63,udg_units01[4])!=true))then
return false
endif
if(not(udg_integer25==0))then
return false
endif
return true
endfunction
function aiA takes nothing returns boolean
if(not aia())then
return false
endif
return true
endfunction
function aib takes nothing returns nothing
if(aH2())then
if(aH0())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_129")
return
else
call DoNothing()
endif
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2288")
set udg_booleans05[1]=true
call TriggerSleepAction(3.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Jwmb',-1,1,1)
call TriggerSleepAction(1.00)
set udg_reals04[1]=GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[1])
call RemoveUnit(udg_units01[1])
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Jwmb',-1,2,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Jwmb',-1,3,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Jwmb',-1,4,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Jwmb',-1,5,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Jwmb',-1,6,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2289")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Jwmb',-1,7,1)
call CreateNUnitsAtLoc(1,'h01G',Player(PLAYER_NEUTRAL_PASSIVE),udg_locations01[1],bj_UNIT_FACING)
set udg_units01[1]=GetLastCreatedUnit()
call SetUnitLifeBJ(udg_units01[1],udg_reals04[1])
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Ysqd',-1,4,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Ysqd',-1,5,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect82),'Ysqd',-1,7,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2290")
set udg_booleans05[1]=false
set udg_booleans03[1]=false
set udg_booleans04[1]=false
else
endif
if(aH5())then
if(aH3())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_133")
return
else
call DoNothing()
endif
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2291")
set udg_booleans05[2]=true
call TriggerSleepAction(3.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Jwmb',-1,1,1)
call TriggerSleepAction(1.00)
set udg_reals04[2]=GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[2])
call RemoveUnit(udg_units01[2])
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Jwmb',-1,2,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Jwmb',-1,3,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Jwmb',-1,4,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Jwmb',-1,5,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Jwmb',-1,6,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2292")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Jwmb',-1,7,1)
call CreateNUnitsAtLoc(1,'h01G',Player(PLAYER_NEUTRAL_PASSIVE),udg_locations01[2],bj_UNIT_FACING)
set udg_units01[2]=GetLastCreatedUnit()
call SetUnitLifeBJ(udg_units01[2],udg_reals04[2])
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Ysqd',-1,4,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Ysqd',-1,5,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect84),'Ysqd',-1,7,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2293")
set udg_booleans05[2]=false
set udg_booleans03[2]=false
set udg_booleans04[2]=false
else
endif
if(aH8())then
if(aH6())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_689")
return
else
call DoNothing()
endif
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2294")
set udg_booleans05[3]=true
call TriggerSleepAction(3.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Jwmb',-1,1,1)
call TriggerSleepAction(1.00)
set udg_reals04[3]=GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[3])
call RemoveUnit(udg_units01[3])
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Jwmb',-1,2,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Jwmb',-1,3,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Jwmb',-1,4,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Jwmb',-1,5,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Jwmb',-1,6,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2295")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Jwmb',-1,7,1)
call CreateNUnitsAtLoc(1,'h01G',Player(PLAYER_NEUTRAL_PASSIVE),udg_locations01[3],bj_UNIT_FACING)
set udg_units01[3]=GetLastCreatedUnit()
call SetUnitLifeBJ(udg_units01[3],udg_reals04[3])
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Ysqd',-1,4,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Ysqd',-1,5,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect86),'Ysqd',-1,7,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2296")
set udg_booleans05[3]=false
set udg_booleans03[3]=false
set udg_booleans04[3]=false
else
endif
if(aiA())then
if(aH9())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_1319")
return
else
call DoNothing()
endif
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2297")
set udg_booleans05[4]=true
call TriggerSleepAction(3.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Jwmb',-1,1,1)
call TriggerSleepAction(1.00)
set udg_reals04[4]=GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[4])
call RemoveUnit(udg_units01[4])
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Jwmb',-1,2,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Jwmb',-1,3,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Jwmb',-1,4,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Jwmb',-1,5,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Jwmb',-1,6,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2298")
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Jwmb',-1,7,1)
call CreateNUnitsAtLoc(1,'h01G',Player(PLAYER_NEUTRAL_PASSIVE),udg_locations01[4],90.00)
set udg_units01[4]=GetLastCreatedUnit()
call SetUnitLifeBJ(udg_units01[4],udg_reals04[4])
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Ysqd',-1,4,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Ysqd',-1,5,1)
call TriggerSleepAction(1.00)
call SetTerrainTypeBJ(GetRectCenter(udg_rect87),'Ysqd',-1,7,1)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2299")
set udg_booleans05[4]=false
set udg_booleans03[4]=false
set udg_booleans04[4]=false
else
endif
endfunction
function aiB takes nothing returns nothing
set udg_trigger371=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger371,udg_rect74)
call TriggerRegisterEnterRectSimple(udg_trigger371,udg_rect76)
call TriggerRegisterEnterRectSimple(udg_trigger371,udg_rect78)
call TriggerRegisterEnterRectSimple(udg_trigger371,udg_rect80)
call TriggerAddCondition(udg_trigger371,Condition(function aHZ))
call TriggerAddAction(udg_trigger371,function aib)
endfunction
function aic takes nothing returns boolean
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
if(not(GetPlayerController(GetOwningPlayer(GetEnteringUnit()))==MAP_CONTROL_USER))then
return false
endif
return true
endfunction
function aiC takes nothing returns boolean
if(not aic())then
return false
endif
return true
endfunction
function aid takes nothing returns boolean
if(not(udg_integers15[1]==1))then
return false
endif
return true
endfunction
function aiD takes nothing returns boolean
if(not(udg_integer24==0))then
return false
endif
if(not(RectContainsUnit(udg_rect74,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[1])=='h01H'))then
return false
endif
if(not(udg_booleans05[1]==false))then
return false
endif
if(not(RectContainsUnit(udg_rect100,udg_units01[1])!=true))then
return false
endif
if(not(RectContainsUnit(udg_rect64,udg_units01[1])!=true))then
return false
endif
if(not(RectContainsUnit(udg_rect63,udg_units01[1])==true))then
return false
endif
return true
endfunction
function aie takes nothing returns boolean
if(not aiD())then
return false
endif
return true
endfunction
function aiE takes nothing returns boolean
if(not(udg_integers15[2]==1))then
return false
endif
return true
endfunction
function aif takes nothing returns boolean
if(not(udg_integer24==0))then
return false
endif
if(not(RectContainsUnit(udg_rect76,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[2])=='h01H'))then
return false
endif
if(not(udg_booleans05[2]==false))then
return false
endif
if(not(RectContainsUnit(udg_rect100,udg_units01[2])!=true))then
return false
endif
if(not(RectContainsUnit(udg_rect64,udg_units01[2])!=true))then
return false
endif
if(not(RectContainsUnit(udg_rect63,udg_units01[2])==true))then
return false
endif
return true
endfunction
function aiF takes nothing returns boolean
if(not aif())then
return false
endif
return true
endfunction
function aig takes nothing returns boolean
if(not(udg_integers15[3]==1))then
return false
endif
return true
endfunction
function aiG takes nothing returns boolean
if(not(udg_integer24==0))then
return false
endif
if(not(RectContainsUnit(udg_rect78,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[3])=='h01H'))then
return false
endif
if(not(udg_booleans05[3]==false))then
return false
endif
if(not(RectContainsUnit(udg_rect100,udg_units01[3])!=true))then
return false
endif
if(not(RectContainsUnit(udg_rect64,udg_units01[3])!=true))then
return false
endif
if(not(RectContainsUnit(udg_rect63,udg_units01[3])==true))then
return false
endif
return true
endfunction
function aih takes nothing returns boolean
if(not aiG())then
return false
endif
return true
endfunction
function aiH takes nothing returns boolean
if(not(udg_integers15[4]==1))then
return false
endif
return true
endfunction
function aii takes nothing returns boolean
if(not(udg_integer24==0))then
return false
endif
if(not(RectContainsUnit(udg_rect80,GetEnteringUnit())==true))then
return false
endif
if(not(GetUnitTypeId(udg_units01[4])=='h01H'))then
return false
endif
if(not(udg_booleans05[4]==false))then
return false
endif
if(not(RectContainsUnit(udg_rect100,udg_units01[4])!=true))then
return false
endif
if(not(RectContainsUnit(udg_rect64,udg_units01[4])!=true))then
return false
endif
if(not(RectContainsUnit(udg_rect63,udg_units01[4])==true))then
return false
endif
return true
endfunction
function aiI takes nothing returns boolean
if(not aii())then
return false
endif
return true
endfunction
function aij takes nothing returns boolean
if(not(udg_integer03>=2))then
return false
endif
return true
endfunction
function aiJ takes nothing returns nothing
if(aij())then
if(aie())then
if(aid())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_1890")
return
else
call DoNothing()
endif
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2301")
set udg_booleans05[1]=true
call TriggerSleepAction(4.00)
set udg_reals04[1]=GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[1])
call RemoveUnit(udg_units01[1])
set udg_location04=GetRectCenter(udg_rect59)
call CreateNUnitsAtLoc(1,'h01G',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
set udg_units01[1]=GetLastCreatedUnit()
call SetUnitLifeBJ(udg_units01[1],udg_reals04[1])
call SetUnitFlyHeightBJ(GetLastCreatedUnit(),900.00,900.00)
call SetUnitFlyHeightBJ(GetLastCreatedUnit(),100.00,200.00)
call TriggerSleepAction(4.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2302")
call TriggerSleepAction(1.00)
set udg_booleans05[1]=false
set udg_booleans03[1]=true
set udg_booleans04[1]=false
else
endif
if(aiF())then
if(aiE())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_2084")
return
else
call DoNothing()
endif
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2303")
set udg_booleans05[2]=true
call TriggerSleepAction(4.00)
set udg_reals04[2]=GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[2])
call RemoveUnit(udg_units01[2])
set udg_location04=GetRectCenter(udg_rect60)
call CreateNUnitsAtLoc(1,'h01G',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
set udg_units01[2]=GetLastCreatedUnit()
call SetUnitLifeBJ(udg_units01[2],udg_reals04[2])
call SetUnitFlyHeightBJ(GetLastCreatedUnit(),900.00,900.00)
call SetUnitFlyHeightBJ(GetLastCreatedUnit(),100.00,200.00)
call TriggerSleepAction(4.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2304")
call TriggerSleepAction(1.00)
set udg_booleans05[2]=false
set udg_booleans03[2]=true
set udg_booleans04[2]=false
else
endif
if(aih())then
if(aig())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_1897")
return
else
call DoNothing()
endif
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2305")
set udg_booleans05[3]=true
call TriggerSleepAction(4.00)
set udg_reals04[3]=GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[3])
call RemoveUnit(udg_units01[3])
set udg_location04=GetRectCenter(udg_rect61)
call CreateNUnitsAtLoc(1,'h01G',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
set udg_units01[3]=GetLastCreatedUnit()
call SetUnitLifeBJ(udg_units01[3],udg_reals04[3])
call SetUnitFlyHeightBJ(GetLastCreatedUnit(),900.00,900.00)
call SetUnitFlyHeightBJ(GetLastCreatedUnit(),100.00,200.00)
call TriggerSleepAction(4.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2306")
call TriggerSleepAction(1.00)
set udg_booleans05[3]=false
set udg_booleans03[3]=true
set udg_booleans04[3]=false
else
endif
if(aiI())then
if(aiH())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_2083")
return
else
call DoNothing()
endif
call PlaySoundBJ(udg_sound52)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2307")
set udg_booleans05[4]=true
call TriggerSleepAction(4.00)
set udg_reals04[4]=GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[4])
call RemoveUnit(udg_units01[4])
set udg_location04=GetRectCenter(udg_rect62)
call CreateNUnitsAtLoc(1,'h01G',Player(PLAYER_NEUTRAL_PASSIVE),udg_location04,bj_UNIT_FACING)
call RemoveLocation(udg_location04)
set udg_units01[4]=GetLastCreatedUnit()
call SetUnitLifeBJ(udg_units01[4],udg_reals04[4])
call SetUnitFlyHeightBJ(GetLastCreatedUnit(),900.00,900.00)
call SetUnitFlyHeightBJ(GetLastCreatedUnit(),100.00,200.00)
call TriggerSleepAction(4.00)
call DisplayTextToForce(GetPlayersAll(),"TRIGSTR_2308")
call TriggerSleepAction(1.00)
set udg_booleans05[4]=false
set udg_booleans03[4]=true
set udg_booleans04[4]=false
else
endif
else
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit())),"TRIGSTR_2300")
endif
endfunction
function aik takes nothing returns nothing
set udg_trigger372=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger372,udg_rect74)
call TriggerRegisterEnterRectSimple(udg_trigger372,udg_rect76)
call TriggerRegisterEnterRectSimple(udg_trigger372,udg_rect78)
call TriggerRegisterEnterRectSimple(udg_trigger372,udg_rect80)
call TriggerAddCondition(udg_trigger372,Condition(function aiC))
call TriggerAddAction(udg_trigger372,function aiJ)
endfunction
function aiK takes nothing returns boolean
return(IsUnitType(GetFilterUnit(),UNIT_TYPE_GROUND)==true)
endfunction
function ail takes nothing returns boolean
return(UnitHasBuffBJ(GetFilterUnit(),'Binf')!=true)
endfunction
function aiL takes nothing returns boolean
return GetBooleanAnd(aiK(),ail())
endfunction
function aim takes nothing returns boolean
if(not(GetTerrainTypeBJ(GetUnitLoc(GetEnumUnit()))=='Jwmb'))then
return false
endif
return true
endfunction
function aiM takes nothing returns nothing
if(aim())then
call ExplodeUnitBJ(GetEnumUnit())
else
endif
endfunction
function ain takes nothing returns nothing
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectMatching(GetPlayableMapRect(),Condition(function aiL)),function aiM)
endfunction
function aiN takes nothing returns nothing
set udg_trigger373=CreateTrigger()
call TriggerRegisterTimerEventPeriodic(udg_trigger373,1.00)
call TriggerAddAction(udg_trigger373,function ain)
endfunction
function aio takes nothing returns nothing
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function aiO takes nothing returns boolean
if(not(GetDyingUnit()==udg_units01[1]))then
return false
endif
return true
endfunction
function aip takes nothing returns nothing
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function aiP takes nothing returns boolean
if(not(GetDyingUnit()==udg_units01[2]))then
return false
endif
return true
endfunction
function aiq takes nothing returns nothing
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function aiQ takes nothing returns boolean
if(not(GetDyingUnit()==udg_units01[3]))then
return false
endif
return true
endfunction
function air takes nothing returns nothing
call ExplodeUnitBJ(GetEnumUnit())
endfunction
function aiR takes nothing returns boolean
if(not(GetDyingUnit()==udg_units01[4]))then
return false
endif
return true
endfunction
function ais takes nothing returns nothing
if(aiO())then
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect116),bj_UNIT_FACING)
call TriggerSleepAction(2.00)
call ForGroupBJ(GetUnitsInRectAll(udg_rect116),function aio)
else
endif
if(aiP())then
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect117),bj_UNIT_FACING)
call TriggerSleepAction(2.00)
call ForGroupBJ(GetUnitsInRectAll(udg_rect117),function aip)
else
endif
if(aiQ())then
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect118),bj_UNIT_FACING)
call TriggerSleepAction(2.00)
call ForGroupBJ(GetUnitsInRectAll(udg_rect118),function aiq)
else
endif
if(aiR())then
call CreateNUnitsAtLoc(1,'n018',Player(PLAYER_NEUTRAL_PASSIVE),GetRectCenter(udg_rect119),bj_UNIT_FACING)
call TriggerSleepAction(2.00)
call ForGroupBJ(GetUnitsInRectAll(udg_rect119),function air)
else
endif
endfunction
function aiS takes nothing returns nothing
set udg_trigger374=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger374,EVENT_PLAYER_UNIT_DEATH)
call TriggerAddAction(udg_trigger374,function ais)
endfunction
function ait takes nothing returns boolean
if(not(GetUnitLifePercent(udg_unit33)<=100.00))then
return false
endif
if(not(GetUnitLifePercent(udg_unit33)>75.00))then
return false
endif
return true
endfunction
function aiT takes nothing returns boolean
if(not ait())then
return false
endif
return true
endfunction
function aiu takes nothing returns boolean
return(udg_integer16==2)
endfunction
function aiU takes nothing returns boolean
return(udg_integer16==3)
endfunction
function aiv takes nothing returns boolean
return(udg_integer16==4)
endfunction
function aiV takes nothing returns boolean
return(udg_integer16==5)
endfunction
function aiw takes nothing returns boolean
return(udg_integer16==6)
endfunction
function aiW takes nothing returns boolean
return(udg_integer16==7)
endfunction
function aix takes nothing returns boolean
return(udg_integer16==8)
endfunction
function aiX takes nothing returns boolean
return(udg_integer16==9)
endfunction
function aiy takes nothing returns boolean
return(udg_integer16==10)
endfunction
function aiY takes nothing returns boolean
return(udg_integer16==11)
endfunction
function aiz takes nothing returns boolean
return(udg_integer16==12)
endfunction
function aiZ takes nothing returns boolean
return(udg_integer16==13)
endfunction
function ai0 takes nothing returns boolean
return(udg_integer16==14)
endfunction
function ai1 takes nothing returns boolean
return(udg_integer16==15)
endfunction
function ai2 takes nothing returns boolean
return(udg_integer16==16)
endfunction
function ai3 takes nothing returns boolean
return(udg_integer16==17)
endfunction
function ai4 takes nothing returns boolean
return(udg_integer16==18)
endfunction
function ai5 takes nothing returns boolean
return(udg_integer16==19)
endfunction
function ai6 takes nothing returns boolean
return(udg_integer16==20)
endfunction
function ai7 takes nothing returns boolean
return(udg_integer16==21)
endfunction
function ai8 takes nothing returns boolean
return(udg_integer16==22)
endfunction
function ai9 takes nothing returns boolean
return(udg_integer16==23)
endfunction
function aIa takes nothing returns nothing
set udg_integer16=GetRandomInt(2,23)
if(aiu())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect53),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aiU())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect49),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aiv())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect48),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aiV())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect43),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aiw())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect44),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aiW())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect45),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aix())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect40),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aiX())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect41),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aiy())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect42),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aiY())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect46),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aiz())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect47),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aiZ())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect121),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ai0())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect122),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ai1())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect123),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ai2())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect124),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ai3())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect113),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ai4())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect112),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ai5())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect114),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ai6())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect50),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ai7())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect31),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ai8())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect51),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ai9())then
call CreateNUnitsAtLoc(1,'e003',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect52),bj_UNIT_FACING)
else
call DoNothing()
endif
endfunction
function aIA takes nothing returns nothing
set udg_trigger375=CreateTrigger()
call DisableTrigger(udg_trigger375)
call TriggerRegisterTimerEventPeriodic(udg_trigger375,2.00)
call TriggerAddCondition(udg_trigger375,Condition(function aiT))
call TriggerAddAction(udg_trigger375,function aIa)
endfunction
function aIb takes nothing returns boolean
if(not(GetUnitLifePercent(udg_unit33)<=75.00))then
return false
endif
if(not(GetUnitLifePercent(udg_unit33)>50.00))then
return false
endif
return true
endfunction
function aIB takes nothing returns boolean
if(not aIb())then
return false
endif
return true
endfunction
function aIc takes nothing returns boolean
return(udg_integer16==2)
endfunction
function aIC takes nothing returns boolean
return(udg_integer16==4)
endfunction
function aId takes nothing returns boolean
return(udg_integer16==3)
endfunction
function aID takes nothing returns boolean
return(udg_integer16==5)
endfunction
function aIe takes nothing returns boolean
return(udg_integer16==6)
endfunction
function aIE takes nothing returns boolean
return(udg_integer16==7)
endfunction
function aIf takes nothing returns boolean
return(udg_integer16==8)
endfunction
function aIF takes nothing returns boolean
return(udg_integer16==9)
endfunction
function aIg takes nothing returns boolean
return(udg_integer16==10)
endfunction
function aIG takes nothing returns boolean
return(udg_integer16==11)
endfunction
function aIh takes nothing returns boolean
return(udg_integer16==12)
endfunction
function aIH takes nothing returns boolean
return(udg_integer16==13)
endfunction
function aIi takes nothing returns boolean
return(udg_integer16==14)
endfunction
function aII takes nothing returns boolean
return(udg_integer16==15)
endfunction
function aIj takes nothing returns boolean
return(udg_integer16==16)
endfunction
function aIJ takes nothing returns boolean
return(udg_integer16==17)
endfunction
function aIk takes nothing returns boolean
return(udg_integer16==18)
endfunction
function aIK takes nothing returns boolean
return(udg_integer16==19)
endfunction
function aIl takes nothing returns boolean
return(udg_integer16==20)
endfunction
function aIL takes nothing returns boolean
return(udg_integer16==21)
endfunction
function aIm takes nothing returns boolean
return(udg_integer16==22)
endfunction
function aIM takes nothing returns boolean
return(udg_integer16==23)
endfunction
function aIn takes nothing returns nothing
set udg_integer16=GetRandomInt(2,23)
if(aIc())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect53),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIC())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect48),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aId())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect49),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aID())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect43),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIe())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect44),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIE())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect45),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIf())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect40),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIF())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect41),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIg())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect42),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIG())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect46),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIh())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect47),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIH())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect121),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIi())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect122),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aII())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect123),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIj())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect124),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIJ())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect113),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIk())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect112),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIK())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect114),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIl())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect50),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIL())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect31),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIm())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect51),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIM())then
call CreateNUnitsAtLoc(1,'e002',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect52),bj_UNIT_FACING)
else
call DoNothing()
endif
endfunction
function aIN takes nothing returns nothing
set udg_trigger376=CreateTrigger()
call DisableTrigger(udg_trigger376)
call TriggerRegisterTimerEventPeriodic(udg_trigger376,2.00)
call TriggerAddCondition(udg_trigger376,Condition(function aIB))
call TriggerAddAction(udg_trigger376,function aIn)
endfunction
function aIo takes nothing returns boolean
if(not(GetUnitLifePercent(udg_unit33)<=50.00))then
return false
endif
if(not(GetUnitLifePercent(udg_unit33)>25.00))then
return false
endif
return true
endfunction
function aIO takes nothing returns boolean
if(not aIo())then
return false
endif
return true
endfunction
function aIp takes nothing returns boolean
return(udg_integer16==2)
endfunction
function aIP takes nothing returns boolean
return(udg_integer16==4)
endfunction
function aIq takes nothing returns boolean
return(udg_integer16==3)
endfunction
function aIQ takes nothing returns boolean
return(udg_integer16==5)
endfunction
function aIr takes nothing returns boolean
return(udg_integer16==6)
endfunction
function aIR takes nothing returns boolean
return(udg_integer16==7)
endfunction
function aIs takes nothing returns boolean
return(udg_integer16==8)
endfunction
function aIS takes nothing returns boolean
return(udg_integer16==9)
endfunction
function aIt takes nothing returns boolean
return(udg_integer16==10)
endfunction
function aIT takes nothing returns boolean
return(udg_integer16==11)
endfunction
function aIu takes nothing returns boolean
return(udg_integer16==12)
endfunction
function aIU takes nothing returns boolean
return(udg_integer16==13)
endfunction
function aIv takes nothing returns boolean
return(udg_integer16==14)
endfunction
function aIV takes nothing returns boolean
return(udg_integer16==15)
endfunction
function aIw takes nothing returns boolean
return(udg_integer16==16)
endfunction
function aIW takes nothing returns boolean
return(udg_integer16==17)
endfunction
function aIx takes nothing returns boolean
return(udg_integer16==18)
endfunction
function aIX takes nothing returns boolean
return(udg_integer16==19)
endfunction
function aIy takes nothing returns boolean
return(udg_integer16==20)
endfunction
function aIY takes nothing returns boolean
return(udg_integer16==21)
endfunction
function aIz takes nothing returns boolean
return(udg_integer16==22)
endfunction
function aIZ takes nothing returns boolean
return(udg_integer16==23)
endfunction
function aI0 takes nothing returns nothing
set udg_integer16=GetRandomInt(2,23)
if(aIp())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect53),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIP())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect48),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIq())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect49),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIQ())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect43),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIr())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect44),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIR())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect45),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIs())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect40),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIS())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect41),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIt())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect42),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIT())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect46),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIu())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect47),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIU())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect121),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIv())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect122),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIV())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect123),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIw())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect124),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIW())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect113),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIx())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect112),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIX())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect114),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIy())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect50),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIY())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect31),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIz())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect51),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aIZ())then
call CreateNUnitsAtLoc(1,'e005',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect52),bj_UNIT_FACING)
else
call DoNothing()
endif
endfunction
function aI1 takes nothing returns nothing
set udg_trigger377=CreateTrigger()
call DisableTrigger(udg_trigger377)
call TriggerRegisterTimerEventPeriodic(udg_trigger377,2.00)
call TriggerAddCondition(udg_trigger377,Condition(function aIO))
call TriggerAddAction(udg_trigger377,function aI0)
endfunction
function aI2 takes nothing returns boolean
if(not(GetUnitLifePercent(udg_unit33)<=25.00))then
return false
endif
return true
endfunction
function aI3 takes nothing returns boolean
return(udg_integer16==2)
endfunction
function aI4 takes nothing returns boolean
return(udg_integer16==4)
endfunction
function aI5 takes nothing returns boolean
return(udg_integer16==3)
endfunction
function aI6 takes nothing returns boolean
return(udg_integer16==5)
endfunction
function aI7 takes nothing returns boolean
return(udg_integer16==6)
endfunction
function aI8 takes nothing returns boolean
return(udg_integer16==7)
endfunction
function aI9 takes nothing returns boolean
return(udg_integer16==8)
endfunction
function aja takes nothing returns boolean
return(udg_integer16==9)
endfunction
function ajA takes nothing returns boolean
return(udg_integer16==10)
endfunction
function ajb takes nothing returns boolean
return(udg_integer16==11)
endfunction
function ajB takes nothing returns boolean
return(udg_integer16==12)
endfunction
function ajc takes nothing returns boolean
return(udg_integer16==13)
endfunction
function ajC takes nothing returns boolean
return(udg_integer16==14)
endfunction
function ajd takes nothing returns boolean
return(udg_integer16==15)
endfunction
function ajD takes nothing returns boolean
return(udg_integer16==16)
endfunction
function aje takes nothing returns boolean
return(udg_integer16==17)
endfunction
function ajE takes nothing returns boolean
return(udg_integer16==18)
endfunction
function ajf takes nothing returns boolean
return(udg_integer16==19)
endfunction
function ajF takes nothing returns boolean
return(udg_integer16==20)
endfunction
function ajg takes nothing returns boolean
return(udg_integer16==21)
endfunction
function ajG takes nothing returns boolean
return(udg_integer16==22)
endfunction
function ajh takes nothing returns boolean
return(udg_integer16==23)
endfunction
function ajH takes nothing returns nothing
set udg_integer16=GetRandomInt(2,23)
if(aI3())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect53),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aI4())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect48),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aI5())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect49),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aI6())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect43),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aI7())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect44),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aI8())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect45),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aI9())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect40),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aja())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect41),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ajA())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect42),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ajb())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect46),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ajB())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect47),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ajc())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect121),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ajC())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect122),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ajd())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect123),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ajD())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect124),bj_UNIT_FACING)
else
call DoNothing()
endif
if(aje())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect113),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ajE())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect112),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ajf())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect114),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ajF())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect50),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ajg())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect31),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ajG())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect51),bj_UNIT_FACING)
else
call DoNothing()
endif
if(ajh())then
call CreateNUnitsAtLoc(1,'e004',Player(PLAYER_NEUTRAL_PASSIVE),GetRandomLocInRect(udg_rect52),bj_UNIT_FACING)
else
call DoNothing()
endif
endfunction
function aji takes nothing returns nothing
set udg_trigger378=CreateTrigger()
call DisableTrigger(udg_trigger378)
call TriggerRegisterTimerEventPeriodic(udg_trigger378,2.00)
call TriggerAddCondition(udg_trigger378,Condition(function aI2))
call TriggerAddAction(udg_trigger378,function ajH)
endfunction
function ajI takes nothing returns boolean
if((GetAttackedUnitBJ()==udg_units01[1]))then
return true
endif
if((GetAttackedUnitBJ()==udg_units01[2]))then
return true
endif
if((GetAttackedUnitBJ()==udg_units01[3]))then
return true
endif
if((GetAttackedUnitBJ()==udg_units01[4]))then
return true
endif
return false
endfunction
function ajj takes nothing returns boolean
if(not ajI())then
return false
endif
return true
endfunction
function ajJ takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetOwningPlayer(GetEnumUnit()),(40000.00/GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[1])))
endfunction
function ajk takes nothing returns nothing
call CameraClearNoiseForPlayer(GetEnumPlayer())
endfunction
function ajK takes nothing returns boolean
if(not(GetAttackedUnitBJ()==udg_units01[1]))then
return false
endif
return true
endfunction
function ajl takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetOwningPlayer(GetEnumUnit()),(40000.00/GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[2])))
endfunction
function ajL takes nothing returns nothing
call CameraClearNoiseForPlayer(GetEnumPlayer())
endfunction
function ajm takes nothing returns boolean
if(not(GetAttackedUnitBJ()==udg_units01[2]))then
return false
endif
return true
endfunction
function ajM takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetOwningPlayer(GetEnumUnit()),(40000.00/GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[3])))
endfunction
function ajn takes nothing returns nothing
call CameraClearNoiseForPlayer(GetEnumPlayer())
endfunction
function ajN takes nothing returns boolean
if(not(GetAttackedUnitBJ()==udg_units01[3]))then
return false
endif
return true
endfunction
function ajo takes nothing returns nothing
call CameraSetEQNoiseForPlayer(GetOwningPlayer(GetEnumUnit()),(40000.00/GetUnitStateSwap(UNIT_STATE_LIFE,udg_units01[4])))
endfunction
function ajO takes nothing returns nothing
call CameraClearNoiseForPlayer(GetEnumPlayer())
endfunction
function ajp takes nothing returns boolean
if(not(GetAttackedUnitBJ()==udg_units01[4]))then
return false
endif
return true
endfunction
function ajP takes nothing returns nothing
if(ajK())then
set udg_integers15[1]=1
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect116),function ajJ)
call TriggerSleepAction(2.00)
call ForForce(GetPlayersAll(),function ajk)
call TriggerSleepAction(3.00)
set udg_integers15[1]=0
else
call DoNothing()
endif
if(ajm())then
set udg_integers15[2]=1
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect117),function ajl)
call TriggerSleepAction(2.00)
call ForForce(GetPlayersAll(),function ajL)
call TriggerSleepAction(3.00)
set udg_integers15[2]=0
else
call DoNothing()
endif
if(ajN())then
set udg_integers15[3]=1
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect118),function ajM)
call TriggerSleepAction(2.00)
call ForForce(GetPlayersAll(),function ajn)
call TriggerSleepAction(3.00)
set udg_integers15[3]=0
else
call DoNothing()
endif
if(ajp())then
set udg_integers15[4]=1
set bj_wantDestroyGroup=true
call ForGroupBJ(GetUnitsInRectAll(udg_rect119),function ajo)
call TriggerSleepAction(2.00)
call ForForce(GetPlayersAll(),function ajO)
call TriggerSleepAction(3.00)
set udg_integers15[4]=0
else
call DoNothing()
endif
endfunction
function ajq takes nothing returns nothing
set udg_trigger379=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger379,EVENT_PLAYER_UNIT_ATTACKED)
call TriggerAddCondition(udg_trigger379,Condition(function ajj))
call TriggerAddAction(udg_trigger379,function ajP)
endfunction
function ajQ takes nothing returns boolean
if((udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]=="DarkShoGun"))then
return true
endif
if((udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]=="bladedude"))then
return true
endif
if((udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]=="Mykovsky"))then
return true
endif
if((udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]=="Punk_Angel_Girl"))then
return true
endif
if((udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]=="FrenchCondom"))then
return true
endif
if((udg_strings02[GetConvertedPlayerId(GetTriggerPlayer())]=="Mastrbate4Peace"))then
return true
endif
return false
endfunction
function ajr takes nothing returns boolean
if(not ajQ())then
return false
endif
return true
endfunction
function ajR takes nothing returns nothing
set udg_integer23=16
call DisableTrigger(GetTriggeringTrigger())
endfunction
function ajs takes nothing returns nothing
set udg_trigger380=CreateTrigger()
call TriggerRegisterPlayerChatEvent(udg_trigger380,Player(0),"Hello.",true)
call TriggerRegisterPlayerChatEvent(udg_trigger380,Player(1),"Hello.",true)
call TriggerRegisterPlayerChatEvent(udg_trigger380,Player(2),"Hello.",true)
call TriggerRegisterPlayerChatEvent(udg_trigger380,Player(3),"Hello.",true)
call TriggerRegisterPlayerChatEvent(udg_trigger380,Player(4),"Hello.",true)
call TriggerRegisterPlayerChatEvent(udg_trigger380,Player(5),"Hello.",true)
call TriggerRegisterPlayerChatEvent(udg_trigger380,Player(6),"Hello.",true)
call TriggerRegisterPlayerChatEvent(udg_trigger380,Player(7),"Hello.",true)
call TriggerRegisterPlayerChatEvent(udg_trigger380,Player(8),"Hello.",true)
call TriggerRegisterPlayerChatEvent(udg_trigger380,Player(9),"Hello.",true)
call TriggerRegisterPlayerChatEvent(udg_trigger380,Player(10),"Hello.",true)
call TriggerAddCondition(udg_trigger380,Condition(function ajr))
call TriggerAddAction(udg_trigger380,function ajR)
endfunction
function ajS takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[1])=='h01H'))then
return false
endif
if(not(GetOwningPlayer(udg_unit53)==Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not(IsUnitAliveBJ(udg_unit53)==true))then
return false
endif
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
return true
endfunction
function ajt takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='nrac'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nech'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nder'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='ndog'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nfro'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nskk'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='necr'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npig'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npng'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nrat'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsea'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nshe'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsno'))then
return false
endif
return true
endfunction
function ajT takes nothing returns boolean
if(not ajS())then
return false
endif
if(not ajt())then
return false
endif
return true
endfunction
function aju takes nothing returns nothing
call SetUnitOwner(udg_unit53,GetOwningPlayer(GetEnteringUnit()),true)
call UnitAddAbilityBJ('AItg',udg_units01[1])
set udg_force02=GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit()))
call DisplayTextToForce(udg_force02,"TRIGSTR_2309")
call DestroyForce(udg_force02)
endfunction
function ajU takes nothing returns nothing
set udg_trigger381=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger381,udg_rect92)
call TriggerAddCondition(udg_trigger381,Condition(function ajT))
call TriggerAddAction(udg_trigger381,function aju)
endfunction
function ajv takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[1])=='h01H'))then
return false
endif
if(not(GetOwningPlayer(udg_unit54)==Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not(IsUnitAliveBJ(udg_unit54)==true))then
return false
endif
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
return true
endfunction
function ajV takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='nrac'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nech'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nder'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='ndog'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nfro'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nskk'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='necr'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npig'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npng'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nrat'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsea'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nshe'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsno'))then
return false
endif
return true
endfunction
function ajw takes nothing returns boolean
if(not ajv())then
return false
endif
if(not ajV())then
return false
endif
return true
endfunction
function ajW takes nothing returns nothing
call SetUnitOwner(udg_unit54,GetOwningPlayer(GetEnteringUnit()),true)
call UnitAddAbilityBJ('AItn',udg_units01[1])
set udg_force02=GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit()))
call DisplayTextToForce(udg_force02,"TRIGSTR_2310")
call DestroyForce(udg_force02)
endfunction
function ajx takes nothing returns nothing
set udg_trigger382=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger382,udg_rect93)
call TriggerAddCondition(udg_trigger382,Condition(function ajw))
call TriggerAddAction(udg_trigger382,function ajW)
endfunction
function ajX takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[2])=='h01H'))then
return false
endif
if(not(GetOwningPlayer(udg_unit55)==Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not(IsUnitAliveBJ(udg_unit55)==true))then
return false
endif
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
return true
endfunction
function ajy takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='nrac'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nech'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nder'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='ndog'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nfro'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nskk'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='necr'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npig'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npng'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nrat'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsea'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nshe'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsno'))then
return false
endif
return true
endfunction
function ajY takes nothing returns boolean
if(not ajX())then
return false
endif
if(not ajy())then
return false
endif
return true
endfunction
function ajz takes nothing returns nothing
call SetUnitOwner(udg_unit55,GetOwningPlayer(GetEnteringUnit()),true)
call UnitAddAbilityBJ('AItg',udg_units01[2])
set udg_force02=GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit()))
call DisplayTextToForce(udg_force02,"TRIGSTR_2311")
call DestroyForce(udg_force02)
endfunction
function ajZ takes nothing returns nothing
set udg_trigger383=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger383,udg_rect94)
call TriggerAddCondition(udg_trigger383,Condition(function ajY))
call TriggerAddAction(udg_trigger383,function ajz)
endfunction
function aj0 takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[2])=='h01H'))then
return false
endif
if(not(GetOwningPlayer(udg_unit43)==Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not(IsUnitAliveBJ(udg_unit43)==true))then
return false
endif
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
return true
endfunction
function aj1 takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='nrac'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nech'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nder'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='ndog'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nfro'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nskk'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='necr'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npig'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npng'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nrat'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsea'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nshe'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsno'))then
return false
endif
return true
endfunction
function aj2 takes nothing returns boolean
if(not aj0())then
return false
endif
if(not aj1())then
return false
endif
return true
endfunction
function aj3 takes nothing returns nothing
call SetUnitOwner(udg_unit43,GetOwningPlayer(GetEnteringUnit()),true)
call UnitAddAbilityBJ('AItn',udg_units01[2])
set udg_force02=GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit()))
call DisplayTextToForce(udg_force02,"TRIGSTR_2312")
call DestroyForce(udg_force02)
endfunction
function aj4 takes nothing returns nothing
set udg_trigger384=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger384,udg_rect95)
call TriggerAddCondition(udg_trigger384,Condition(function aj2))
call TriggerAddAction(udg_trigger384,function aj3)
endfunction
function aj5 takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[3])=='h01H'))then
return false
endif
if(not(GetOwningPlayer(udg_unit52)==Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not(IsUnitAliveBJ(udg_unit52)==true))then
return false
endif
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
return true
endfunction
function aj6 takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='nrac'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nech'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nder'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='ndog'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nfro'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nskk'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='necr'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npig'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npng'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nrat'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsea'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nshe'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsno'))then
return false
endif
return true
endfunction
function aj7 takes nothing returns boolean
if(not aj5())then
return false
endif
if(not aj6())then
return false
endif
return true
endfunction
function aj8 takes nothing returns nothing
call SetUnitOwner(udg_unit52,GetOwningPlayer(GetEnteringUnit()),true)
call UnitAddAbilityBJ('AItg',udg_units01[3])
set udg_force02=GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit()))
call DisplayTextToForce(udg_force02,"TRIGSTR_2313")
call DestroyForce(udg_force02)
endfunction
function aj9 takes nothing returns nothing
set udg_trigger385=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger385,udg_rect96)
call TriggerAddCondition(udg_trigger385,Condition(function aj7))
call TriggerAddAction(udg_trigger385,function aj8)
endfunction
function aJa takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[3])=='h01H'))then
return false
endif
if(not(GetOwningPlayer(udg_unit51)==Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not(IsUnitAliveBJ(udg_unit51)==true))then
return false
endif
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
return true
endfunction
function aJA takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='nrac'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nech'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nder'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='ndog'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nfro'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nskk'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='necr'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npig'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npng'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nrat'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsea'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nshe'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsno'))then
return false
endif
return true
endfunction
function aJb takes nothing returns boolean
if(not aJa())then
return false
endif
if(not aJA())then
return false
endif
return true
endfunction
function aJB takes nothing returns nothing
call SetUnitOwner(udg_unit51,GetOwningPlayer(GetEnteringUnit()),true)
call UnitAddAbilityBJ('AItn',udg_units01[3])
set udg_force02=GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit()))
call DisplayTextToForce(udg_force02,"TRIGSTR_2314")
call DestroyForce(udg_force02)
endfunction
function aJc takes nothing returns nothing
set udg_trigger386=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger386,udg_rect97)
call TriggerAddCondition(udg_trigger386,Condition(function aJb))
call TriggerAddAction(udg_trigger386,function aJB)
endfunction
function aJC takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[4])=='h01H'))then
return false
endif
if(not(GetOwningPlayer(udg_unit50)==Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not(IsUnitAliveBJ(udg_unit50)==true))then
return false
endif
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
return true
endfunction
function aJd takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='nrac'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nech'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nder'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='ndog'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nfro'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nskk'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='necr'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npig'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npng'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nrat'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsea'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nshe'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsno'))then
return false
endif
return true
endfunction
function aJD takes nothing returns boolean
if(not aJC())then
return false
endif
if(not aJd())then
return false
endif
return true
endfunction
function aJe takes nothing returns nothing
call SetUnitOwner(udg_unit50,GetOwningPlayer(GetEnteringUnit()),true)
call UnitAddAbilityBJ('AItg',udg_units01[4])
set udg_force02=GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit()))
call DisplayTextToForce(udg_force02,"TRIGSTR_2315")
call DestroyForce(udg_force02)
endfunction
function aJE takes nothing returns nothing
set udg_trigger387=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger387,udg_rect98)
call TriggerAddCondition(udg_trigger387,Condition(function aJD))
call TriggerAddAction(udg_trigger387,function aJe)
endfunction
function aJf takes nothing returns boolean
if(not(GetUnitTypeId(udg_units01[4])=='h01H'))then
return false
endif
if(not(GetOwningPlayer(udg_unit49)==Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not(IsUnitAliveBJ(udg_unit49)==true))then
return false
endif
if(not(IsUnitType(GetEnteringUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetEnteringUnit())!=true))then
return false
endif
return true
endfunction
function aJF takes nothing returns boolean
if(not(GetUnitTypeId(GetEnteringUnit())!='nrac'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nech'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nder'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='ndog'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nfro'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nskk'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='necr'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npig'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='npng'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nrat'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsea'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nshe'))then
return false
endif
if(not(GetUnitTypeId(GetEnteringUnit())!='nsno'))then
return false
endif
return true
endfunction
function aJg takes nothing returns boolean
if(not aJf())then
return false
endif
if(not aJF())then
return false
endif
return true
endfunction
function aJG takes nothing returns nothing
call SetUnitOwner(udg_unit49,GetOwningPlayer(GetEnteringUnit()),true)
call UnitAddAbilityBJ('AItn',udg_units01[4])
set udg_force02=GetForceOfPlayer(GetOwningPlayer(GetEnteringUnit()))
call DisplayTextToForce(udg_force02,"TRIGSTR_2316")
call DestroyForce(udg_force02)
endfunction
function aJh takes nothing returns nothing
set udg_trigger388=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger388,udg_rect99)
call TriggerAddCondition(udg_trigger388,Condition(function aJg))
call TriggerAddAction(udg_trigger388,function aJG)
endfunction
function aJH takes nothing returns boolean
if(not(GetOwningPlayer(udg_unit53)!=Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not(IsUnitType(GetLeavingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetLeavingUnit())!=true))then
return false
endif
return true
endfunction
function aJi takes nothing returns boolean
if(not aJH())then
return false
endif
return true
endfunction
function aJI takes nothing returns nothing
call SetUnitOwner(udg_unit53,Player(PLAYER_NEUTRAL_PASSIVE),true)
call UnitRemoveAbilityBJ('AItg',udg_units01[1])
endfunction
function aJj takes nothing returns nothing
set udg_trigger389=CreateTrigger()
call TriggerRegisterLeaveRectSimple(udg_trigger389,udg_rect92)
call TriggerAddCondition(udg_trigger389,Condition(function aJi))
call TriggerAddAction(udg_trigger389,function aJI)
endfunction
function aJJ takes nothing returns boolean
if(not(GetOwningPlayer(udg_unit54)!=Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not(IsUnitType(GetLeavingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetLeavingUnit())!=true))then
return false
endif
return true
endfunction
function aJk takes nothing returns boolean
if(not aJJ())then
return false
endif
return true
endfunction
function aJK takes nothing returns nothing
call SetUnitOwner(udg_unit54,Player(PLAYER_NEUTRAL_PASSIVE),true)
call UnitRemoveAbilityBJ('AItn',udg_units01[1])
endfunction
function aJl takes nothing returns nothing
set udg_trigger390=CreateTrigger()
call TriggerRegisterLeaveRectSimple(udg_trigger390,udg_rect93)
call TriggerAddCondition(udg_trigger390,Condition(function aJk))
call TriggerAddAction(udg_trigger390,function aJK)
endfunction
function aJL takes nothing returns boolean
if(not(GetOwningPlayer(udg_unit55)!=Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not(IsUnitType(GetLeavingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetLeavingUnit())!=true))then
return false
endif
return true
endfunction
function aJm takes nothing returns boolean
if(not aJL())then
return false
endif
return true
endfunction
function aJM takes nothing returns nothing
call SetUnitOwner(udg_unit55,Player(PLAYER_NEUTRAL_PASSIVE),true)
call UnitRemoveAbilityBJ('AItg',udg_units01[2])
endfunction
function aJn takes nothing returns nothing
set udg_trigger391=CreateTrigger()
call TriggerRegisterLeaveRectSimple(udg_trigger391,udg_rect94)
call TriggerAddCondition(udg_trigger391,Condition(function aJm))
call TriggerAddAction(udg_trigger391,function aJM)
endfunction
function aJN takes nothing returns boolean
if(not(GetOwningPlayer(udg_unit43)!=Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not(IsUnitType(GetLeavingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetLeavingUnit())!=true))then
return false
endif
return true
endfunction
function aJo takes nothing returns boolean
if(not aJN())then
return false
endif
return true
endfunction
function aJO takes nothing returns nothing
call SetUnitOwner(udg_unit43,Player(PLAYER_NEUTRAL_PASSIVE),true)
call UnitRemoveAbilityBJ('AItn',udg_units01[2])
endfunction
function aJp takes nothing returns nothing
set udg_trigger392=CreateTrigger()
call TriggerRegisterLeaveRectSimple(udg_trigger392,udg_rect95)
call TriggerAddCondition(udg_trigger392,Condition(function aJo))
call TriggerAddAction(udg_trigger392,function aJO)
endfunction
function aJP takes nothing returns boolean
if(not(GetOwningPlayer(udg_unit52)!=Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not(IsUnitType(GetLeavingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetLeavingUnit())!=true))then
return false
endif
return true
endfunction
function aJq takes nothing returns boolean
if(not aJP())then
return false
endif
return true
endfunction
function aJQ takes nothing returns nothing
call SetUnitOwner(udg_unit52,Player(PLAYER_NEUTRAL_PASSIVE),true)
call UnitRemoveAbilityBJ('AItg',udg_units01[3])
endfunction
function aJr takes nothing returns nothing
set udg_trigger393=CreateTrigger()
call TriggerRegisterLeaveRectSimple(udg_trigger393,udg_rect96)
call TriggerAddCondition(udg_trigger393,Condition(function aJq))
call TriggerAddAction(udg_trigger393,function aJQ)
endfunction
function aJR takes nothing returns boolean
if(not(GetOwningPlayer(udg_unit51)!=Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not(IsUnitType(GetLeavingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetLeavingUnit())!=true))then
return false
endif
return true
endfunction
function aJs takes nothing returns boolean
if(not aJR())then
return false
endif
return true
endfunction
function aJS takes nothing returns nothing
call SetUnitOwner(udg_unit51,Player(PLAYER_NEUTRAL_PASSIVE),true)
call UnitRemoveAbilityBJ('AItn',udg_units01[3])
endfunction
function aJt takes nothing returns nothing
set udg_trigger394=CreateTrigger()
call TriggerRegisterLeaveRectSimple(udg_trigger394,udg_rect97)
call TriggerAddCondition(udg_trigger394,Condition(function aJs))
call TriggerAddAction(udg_trigger394,function aJS)
endfunction
function aJT takes nothing returns boolean
if(not(GetOwningPlayer(udg_unit50)!=Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not(IsUnitType(GetLeavingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetLeavingUnit())!=true))then
return false
endif
return true
endfunction
function aJu takes nothing returns boolean
if(not aJT())then
return false
endif
return true
endfunction
function aJU takes nothing returns nothing
call SetUnitOwner(udg_unit50,Player(PLAYER_NEUTRAL_PASSIVE),true)
call UnitRemoveAbilityBJ('AItg',udg_units01[4])
endfunction
function aJv takes nothing returns nothing
set udg_trigger395=CreateTrigger()
call TriggerRegisterLeaveRectSimple(udg_trigger395,udg_rect98)
call TriggerAddCondition(udg_trigger395,Condition(function aJu))
call TriggerAddAction(udg_trigger395,function aJU)
endfunction
function aJV takes nothing returns boolean
if(not(GetOwningPlayer(udg_unit49)!=Player(PLAYER_NEUTRAL_PASSIVE)))then
return false
endif
if(not(IsUnitType(GetLeavingUnit(),UNIT_TYPE_SUMMONED)!=true))then
return false
endif
if(not(IsUnitIllusionBJ(GetLeavingUnit())!=true))then
return false
endif
return true
endfunction
function aJw takes nothing returns boolean
if(not aJV())then
return false
endif
return true
endfunction
function aJW takes nothing returns nothing
call SetUnitOwner(udg_unit49,Player(PLAYER_NEUTRAL_PASSIVE),true)
call UnitRemoveAbilityBJ('AItn',udg_units01[4])
endfunction
function aJx takes nothing returns nothing
set udg_trigger396=CreateTrigger()
call TriggerRegisterLeaveRectSimple(udg_trigger396,udg_rect99)
call TriggerAddCondition(udg_trigger396,Condition(function aJw))
call TriggerAddAction(udg_trigger396,function aJW)
endfunction
function aJX takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I024'))then
return false
endif
return true
endfunction
function aJy takes nothing returns boolean
return(udg_integer16==1)
endfunction
function aJY takes nothing returns boolean
return(udg_integer16==2)
endfunction
function aJz takes nothing returns boolean
return(udg_integer16==3)
endfunction
function aJZ takes nothing returns boolean
return(udg_integer16==4)
endfunction
function aJ0 takes nothing returns boolean
return(udg_integer16==5)
endfunction
function aJ1 takes nothing returns boolean
return(udg_integer16==6)
endfunction
function aJ2 takes nothing returns boolean
return(udg_integer16==7)
endfunction
function aJ3 takes nothing returns boolean
return(udg_integer16==8)
endfunction
function aJ4 takes nothing returns boolean
return(udg_integer16==9)
endfunction
function aJ5 takes nothing returns boolean
return(udg_integer16==10)
endfunction
function aJ6 takes nothing returns boolean
return(udg_integer16==11)
endfunction
function aJ7 takes nothing returns boolean
return(udg_integer16==12)
endfunction
function aJ8 takes nothing returns boolean
return(udg_integer16==13)
endfunction
function aJ9 takes nothing returns nothing
set udg_integer16=GetRandomInt(1,14)
if(aJy())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_2843")
else
call DoNothing()
endif
if(aJY())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_2840")
else
call DoNothing()
endif
if(aJz())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_2841")
else
call DoNothing()
endif
if(aJZ())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_2844")
else
call DoNothing()
endif
if(aJ0())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_2845")
else
call DoNothing()
endif
if(aJ1())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_2846")
else
call DoNothing()
endif
if(aJ2())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_2847")
else
call DoNothing()
endif
if(aJ3())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_2848")
else
call DoNothing()
endif
if(aJ4())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_2849")
else
call DoNothing()
endif
if(aJ5())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_2850")
else
call DoNothing()
endif
if(aJ6())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_2851")
else
call DoNothing()
endif
if(aJ7())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_2852")
else
call DoNothing()
endif
if(aJ8())then
call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetManipulatingUnit())),"TRIGSTR_2853")
else
call DoNothing()
endif
endfunction
function aka takes nothing returns nothing
set udg_trigger397=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger397,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger397,Condition(function aJX))
call TriggerAddAction(udg_trigger397,function aJ9)
endfunction
function akA takes nothing returns boolean
if(not(GetItemTypeId(GetManipulatedItem())=='I03A'))then
return false
endif
return true
endfunction
function akb takes nothing returns boolean
return(GetOwningPlayer(GetFilterUnit())==Player(11))
endfunction
function akB takes nothing returns nothing
call UnitDamageTargetBJ(GetManipulatingUnit(),GetEnumUnit(),300.00,ATTACK_TYPE_NORMAL,DAMAGE_TYPE_NORMAL)
call AddSpecialEffectLocBJ(GetUnitLoc(GetEnumUnit()),"Abilities\\Spells\\Undead\\CarrionSwarm\\CarrionSwarmDamage.mdl")
call DestroyEffectBJ(GetLastCreatedEffectBJ())
endfunction
function akc takes nothing returns nothing
call ForGroupBJ(GetUnitsInRangeOfLocMatching(250.00,GetUnitLoc(GetManipulatingUnit()),Condition(function akb)),function akB)
endfunction
function akC takes nothing returns nothing
set udg_trigger398=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(udg_trigger398,EVENT_PLAYER_UNIT_USE_ITEM)
call TriggerAddCondition(udg_trigger398,Condition(function akA))
call TriggerAddAction(udg_trigger398,function akc)
endfunction
function akd takes nothing returns nothing
call hd()
call hf()
call hg()
call hk()
call hl()
call hM()
call ho()
call hP()
call hs()
call hT()
call hv()
call hW()
call hy()
call hZ()
call h2()
call h5()
call h8()
call HA()
call Hc()
call HR()
call Ht()
call HU()
call Hw()
call HY()
call ib()
call iD()
call iT()
call iw()
call iz()
call i3()
call IA()
call Ic()
call ID()
call IH()
call Il()
call Io()
call IR()
call IS()
call Iw()
call Iz()
call Je()
call kq()
call ku()
call kV()
call kx()
call kY()
call k0()
call k3()
call k8()
call KG()
call Ki()
call KJ()
call KN()
call KR()
call Kt()
call Kv()
call KX()
call Kz()
call K1()
call K4()
call K9()
call lc()
call lD()
call lq()
call lR()
call lu()
call lV()
call lx()
call l0()
call l5()
call Lb()
call Ld()
call Lf()
call LG()
call LI()
call Lk()
call Ll()
call LM()
call LO()
call Lq()
call LR()
call LY()
call L8()
call mb()
call md()
call mE()
call mI()
call mo()
call mV()
call my()
call mZ()
call m2()
call m6()
call Mq()
call nd()
call nL()
call nS()
call nu()
call n5()
call n8()
call NA()
call Nd()
call NE()
call Ng()
call NL()
call Nn()
call Np()
call Nr()
call Nt()
call NU()
call Ny()
call N3()
call N6()
call N9()
call ob()
call oc()
call oD()
call oF()
call oS()
call oW()
call o1()
call o9()
call OD()
call OH()
call OL()
call OP()
call Ou()
call Oy()
call O4()
call pb()
call pn()
call pV()
call p1()
call PA()
call PF()
call PK()
call PP()
call PU()
call PZ()
call P9()
call qE()
call qJ()
call qO()
call qW()
call q9()
call QH()
call QP()
call QX()
call rA()
call rI()
call rQ()
call rY()
call RB()
call RJ()
call RR()
call Rv()
call R4()
call se()
call sl()
call ss()
call sz()
call Sb()
call Si()
call Sp()
call Sw()
call S6()
call tf()
call tV()
call t6()
call Tl()
call Tn()
call Tq()
call Ts()
call Tv()
call T6()
call U5()
call U9()
call vB()
call vJ()
call vM()
call vZ()
call v5()
call VH()
call VR()
call V3()
call wh()
call wr()
call w2()
call Wg()
call Wq()
call W0()
call xf()
call xp()
call xV()
call x4()
call XD()
call Xk()
call XQ()
call Xx()
call X7()
call yf()
call yL()
call ys()
call yY()
call Y8()
call zB()
call ze()
call zg()
call zi()
call zk()
call zl()
call zP()
call zQ()
call zS()
call zv()
call z4()
call Ze()
call Zg()
call ZS()
call Zv()
call Zx()
call ZY()
call ZZ()
call Z8()
call aac()
call aaD()
call aaf()
call aag()
call aah()
call aai()
call aaN()
call aat()
call aaU()
call aax()
call aaz()
call aAA()
call aAe()
call aAF()
call aAh()
call aAn()
call aAr()
call aAU()
call aAW()
call abD()
call abo()
call aby()
call abz()
call ab9()
call aBB()
call aBF()
call aBh()
call aBI()
call acD()
call acf()
call ach()
call acJ()
call acl()
call acM()
call acN()
call acO()
call acP()
call acQ()
call acR()
call acS()
call acT()
call acU()
call acV()
call acW()
call acX()
call acY()
call acZ()
call ac1()
call ac3()
call ac5()
call ac7()
call ac9()
call aCA()
call aCB()
call aCC()
call aCD()
call aCE()
call aCF()
call adO()
call adq()
call adT()
call adW()
call adZ()
call aDm()
call aDv()
call aDY()
call aD0()
call aeE()
call aep()
call aeQ()
call aeu()
call aeX()
call aeZ()
call ae3()
call ae7()
call ae9()
call aEb()
call aEC()
call aED()
call aEH()
call aEJ()
call aEL()
call aEP()
call aET()
call aEU()
call aEW()
call aEy()
call aE0()
call aE4()
call aE7()
call afa()
call afB()
call afd()
call afJ()
call afO()
call afT()
call afY()
call af7()
call aFq()
call aFr()
call aFT()
call aFv()
call aFW()
call aFX()
call aFZ()
call aF2()
call aF5()
call aF8()
call agA()
call agc()
call agD()
call agf()
call agH()
call agk()
call agm()
call ago()
call agq()
call ags()
call agT()
call agv()
call agW()
call agy()
call agZ()
call ag2()
call ag4()
call ag9()
call aGc()
call aGE()
call aGh()
call aGM()
call aGp()
call aGR()
call aGu()
call aGW()
call ahO()
call aHG()
call aHj()
call aHL()
call aHo()
call aHQ()
call aHS()
call aHU()
call aHW()
call aHY()
call aiB()
call aik()
call aiN()
call aiS()
call aIA()
call aIN()
call aI1()
call aji()
call ajq()
call ajs()
call ajU()
call ajx()
call ajZ()
call aj4()
call aj9()
call aJc()
call aJE()
call aJh()
call aJj()
call aJl()
call aJn()
call aJp()
call aJr()
call aJt()
call aJv()
call aJx()
call aka()
call akC()
endfunction
function akD takes nothing returns nothing
call ConditionalTriggerExecute(udg_trigger03)
call ConditionalTriggerExecute(udg_trigger26)
endfunction
function ake takes nothing returns nothing
call SetPlayerStartLocation(Player(0),0)
call SetPlayerColor(Player(0),ConvertPlayerColor(0))
call SetPlayerRacePreference(Player(0),RACE_PREF_HUMAN)
call SetPlayerRaceSelectable(Player(0),false)
call SetPlayerController(Player(0),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(1),1)
call SetPlayerColor(Player(1),ConvertPlayerColor(1))
call SetPlayerRacePreference(Player(1),RACE_PREF_HUMAN)
call SetPlayerRaceSelectable(Player(1),false)
call SetPlayerController(Player(1),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(2),2)
call SetPlayerColor(Player(2),ConvertPlayerColor(2))
call SetPlayerRacePreference(Player(2),RACE_PREF_HUMAN)
call SetPlayerRaceSelectable(Player(2),false)
call SetPlayerController(Player(2),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(3),3)
call SetPlayerColor(Player(3),ConvertPlayerColor(3))
call SetPlayerRacePreference(Player(3),RACE_PREF_HUMAN)
call SetPlayerRaceSelectable(Player(3),false)
call SetPlayerController(Player(3),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(4),4)
call SetPlayerColor(Player(4),ConvertPlayerColor(4))
call SetPlayerRacePreference(Player(4),RACE_PREF_HUMAN)
call SetPlayerRaceSelectable(Player(4),false)
call SetPlayerController(Player(4),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(5),5)
call SetPlayerColor(Player(5),ConvertPlayerColor(5))
call SetPlayerRacePreference(Player(5),RACE_PREF_HUMAN)
call SetPlayerRaceSelectable(Player(5),false)
call SetPlayerController(Player(5),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(6),6)
call SetPlayerColor(Player(6),ConvertPlayerColor(6))
call SetPlayerRacePreference(Player(6),RACE_PREF_HUMAN)
call SetPlayerRaceSelectable(Player(6),false)
call SetPlayerController(Player(6),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(7),7)
call SetPlayerColor(Player(7),ConvertPlayerColor(7))
call SetPlayerRacePreference(Player(7),RACE_PREF_HUMAN)
call SetPlayerRaceSelectable(Player(7),false)
call SetPlayerController(Player(7),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(8),8)
call SetPlayerColor(Player(8),ConvertPlayerColor(8))
call SetPlayerRacePreference(Player(8),RACE_PREF_HUMAN)
call SetPlayerRaceSelectable(Player(8),false)
call SetPlayerController(Player(8),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(9),9)
call SetPlayerColor(Player(9),ConvertPlayerColor(9))
call SetPlayerRacePreference(Player(9),RACE_PREF_HUMAN)
call SetPlayerRaceSelectable(Player(9),false)
call SetPlayerController(Player(9),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(10),10)
call SetPlayerColor(Player(10),ConvertPlayerColor(10))
call SetPlayerRacePreference(Player(10),RACE_PREF_HUMAN)
call SetPlayerRaceSelectable(Player(10),false)
call SetPlayerController(Player(10),MAP_CONTROL_USER)
call SetPlayerStartLocation(Player(11),11)
call ForcePlayerStartLocation(Player(11),11)
call SetPlayerColor(Player(11),ConvertPlayerColor(11))
call SetPlayerRacePreference(Player(11),RACE_PREF_HUMAN)
call SetPlayerRaceSelectable(Player(11),false)
call SetPlayerController(Player(11),MAP_CONTROL_COMPUTER)
endfunction
function InitCustomTeams2 takes nothing returns nothing
call SetPlayerTeam(Player(0),0)
call SetPlayerTeam(Player(1),0)
call SetPlayerTeam(Player(2),0)
call SetPlayerTeam(Player(3),0)
call SetPlayerTeam(Player(4),0)
call SetPlayerTeam(Player(5),0)
call SetPlayerTeam(Player(6),0)
call SetPlayerTeam(Player(7),0)
call SetPlayerTeam(Player(8),0)
call SetPlayerTeam(Player(9),0)
call SetPlayerTeam(Player(10),0)
call SetPlayerAllianceStateAllyBJ(Player(0),Player(1),true)
call SetPlayerAllianceStateAllyBJ(Player(0),Player(2),true)
call SetPlayerAllianceStateAllyBJ(Player(0),Player(3),true)
call SetPlayerAllianceStateAllyBJ(Player(0),Player(4),true)
call SetPlayerAllianceStateAllyBJ(Player(0),Player(5),true)
call SetPlayerAllianceStateAllyBJ(Player(0),Player(6),true)
call SetPlayerAllianceStateAllyBJ(Player(0),Player(7),true)
call SetPlayerAllianceStateAllyBJ(Player(0),Player(8),true)
call SetPlayerAllianceStateAllyBJ(Player(0),Player(9),true)
call SetPlayerAllianceStateAllyBJ(Player(0),Player(10),true)
call SetPlayerAllianceStateAllyBJ(Player(1),Player(0),true)
call SetPlayerAllianceStateAllyBJ(Player(1),Player(2),true)
call SetPlayerAllianceStateAllyBJ(Player(1),Player(3),true)
call SetPlayerAllianceStateAllyBJ(Player(1),Player(4),true)
call SetPlayerAllianceStateAllyBJ(Player(1),Player(5),true)
call SetPlayerAllianceStateAllyBJ(Player(1),Player(6),true)
call SetPlayerAllianceStateAllyBJ(Player(1),Player(7),true)
call SetPlayerAllianceStateAllyBJ(Player(1),Player(8),true)
call SetPlayerAllianceStateAllyBJ(Player(1),Player(9),true)
call SetPlayerAllianceStateAllyBJ(Player(1),Player(10),true)
call SetPlayerAllianceStateAllyBJ(Player(2),Player(0),true)
call SetPlayerAllianceStateAllyBJ(Player(2),Player(1),true)
call SetPlayerAllianceStateAllyBJ(Player(2),Player(3),true)
call SetPlayerAllianceStateAllyBJ(Player(2),Player(4),true)
call SetPlayerAllianceStateAllyBJ(Player(2),Player(5),true)
call SetPlayerAllianceStateAllyBJ(Player(2),Player(6),true)
call SetPlayerAllianceStateAllyBJ(Player(2),Player(7),true)
call SetPlayerAllianceStateAllyBJ(Player(2),Player(8),true)
call SetPlayerAllianceStateAllyBJ(Player(2),Player(9),true)
call SetPlayerAllianceStateAllyBJ(Player(2),Player(10),true)
call SetPlayerAllianceStateAllyBJ(Player(3),Player(0),true)
call SetPlayerAllianceStateAllyBJ(Player(3),Player(1),true)
call SetPlayerAllianceStateAllyBJ(Player(3),Player(2),true)
call SetPlayerAllianceStateAllyBJ(Player(3),Player(4),true)
call SetPlayerAllianceStateAllyBJ(Player(3),Player(5),true)
call SetPlayerAllianceStateAllyBJ(Player(3),Player(6),true)
call SetPlayerAllianceStateAllyBJ(Player(3),Player(7),true)
call SetPlayerAllianceStateAllyBJ(Player(3),Player(8),true)
call SetPlayerAllianceStateAllyBJ(Player(3),Player(9),true)
call SetPlayerAllianceStateAllyBJ(Player(3),Player(10),true)
call SetPlayerAllianceStateAllyBJ(Player(4),Player(0),true)
call SetPlayerAllianceStateAllyBJ(Player(4),Player(1),true)
call SetPlayerAllianceStateAllyBJ(Player(4),Player(2),true)
call SetPlayerAllianceStateAllyBJ(Player(4),Player(3),true)
call SetPlayerAllianceStateAllyBJ(Player(4),Player(5),true)
call SetPlayerAllianceStateAllyBJ(Player(4),Player(6),true)
call SetPlayerAllianceStateAllyBJ(Player(4),Player(7),true)
call SetPlayerAllianceStateAllyBJ(Player(4),Player(8),true)
call SetPlayerAllianceStateAllyBJ(Player(4),Player(9),true)
call SetPlayerAllianceStateAllyBJ(Player(4),Player(10),true)
call SetPlayerAllianceStateAllyBJ(Player(5),Player(0),true)
call SetPlayerAllianceStateAllyBJ(Player(5),Player(1),true)
call SetPlayerAllianceStateAllyBJ(Player(5),Player(2),true)
call SetPlayerAllianceStateAllyBJ(Player(5),Player(3),true)
call SetPlayerAllianceStateAllyBJ(Player(5),Player(4),true)
call SetPlayerAllianceStateAllyBJ(Player(5),Player(6),true)
call SetPlayerAllianceStateAllyBJ(Player(5),Player(7),true)
call SetPlayerAllianceStateAllyBJ(Player(5),Player(8),true)
call SetPlayerAllianceStateAllyBJ(Player(5),Player(9),true)
call SetPlayerAllianceStateAllyBJ(Player(5),Player(10),true)
call SetPlayerAllianceStateAllyBJ(Player(6),Player(0),true)
call SetPlayerAllianceStateAllyBJ(Player(6),Player(1),true)
call SetPlayerAllianceStateAllyBJ(Player(6),Player(2),true)
call SetPlayerAllianceStateAllyBJ(Player(6),Player(3),true)
call SetPlayerAllianceStateAllyBJ(Player(6),Player(4),true)
call SetPlayerAllianceStateAllyBJ(Player(6),Player(5),true)
call SetPlayerAllianceStateAllyBJ(Player(6),Player(7),true)
call SetPlayerAllianceStateAllyBJ(Player(6),Player(8),true)
call SetPlayerAllianceStateAllyBJ(Player(6),Player(9),true)
call SetPlayerAllianceStateAllyBJ(Player(6),Player(10),true)
call SetPlayerAllianceStateAllyBJ(Player(7),Player(0),true)
call SetPlayerAllianceStateAllyBJ(Player(7),Player(1),true)
call SetPlayerAllianceStateAllyBJ(Player(7),Player(2),true)
call SetPlayerAllianceStateAllyBJ(Player(7),Player(3),true)
call SetPlayerAllianceStateAllyBJ(Player(7),Player(4),true)
call SetPlayerAllianceStateAllyBJ(Player(7),Player(5),true)
call SetPlayerAllianceStateAllyBJ(Player(7),Player(6),true)
call SetPlayerAllianceStateAllyBJ(Player(7),Player(8),true)
call SetPlayerAllianceStateAllyBJ(Player(7),Player(9),true)
call SetPlayerAllianceStateAllyBJ(Player(7),Player(10),true)
call SetPlayerAllianceStateAllyBJ(Player(8),Player(0),true)
call SetPlayerAllianceStateAllyBJ(Player(8),Player(1),true)
call SetPlayerAllianceStateAllyBJ(Player(8),Player(2),true)
call SetPlayerAllianceStateAllyBJ(Player(8),Player(3),true)
call SetPlayerAllianceStateAllyBJ(Player(8),Player(4),true)
call SetPlayerAllianceStateAllyBJ(Player(8),Player(5),true)
call SetPlayerAllianceStateAllyBJ(Player(8),Player(6),true)
call SetPlayerAllianceStateAllyBJ(Player(8),Player(7),true)
call SetPlayerAllianceStateAllyBJ(Player(8),Player(9),true)
call SetPlayerAllianceStateAllyBJ(Player(8),Player(10),true)
call SetPlayerAllianceStateAllyBJ(Player(9),Player(0),true)
call SetPlayerAllianceStateAllyBJ(Player(9),Player(1),true)
call SetPlayerAllianceStateAllyBJ(Player(9),Player(2),true)
call SetPlayerAllianceStateAllyBJ(Player(9),Player(3),true)
call SetPlayerAllianceStateAllyBJ(Player(9),Player(4),true)
call SetPlayerAllianceStateAllyBJ(Player(9),Player(5),true)
call SetPlayerAllianceStateAllyBJ(Player(9),Player(6),true)
call SetPlayerAllianceStateAllyBJ(Player(9),Player(7),true)
call SetPlayerAllianceStateAllyBJ(Player(9),Player(8),true)
call SetPlayerAllianceStateAllyBJ(Player(9),Player(10),true)
call SetPlayerAllianceStateAllyBJ(Player(10),Player(0),true)
call SetPlayerAllianceStateAllyBJ(Player(10),Player(1),true)
call SetPlayerAllianceStateAllyBJ(Player(10),Player(2),true)
call SetPlayerAllianceStateAllyBJ(Player(10),Player(3),true)
call SetPlayerAllianceStateAllyBJ(Player(10),Player(4),true)
call SetPlayerAllianceStateAllyBJ(Player(10),Player(5),true)
call SetPlayerAllianceStateAllyBJ(Player(10),Player(6),true)
call SetPlayerAllianceStateAllyBJ(Player(10),Player(7),true)
call SetPlayerAllianceStateAllyBJ(Player(10),Player(8),true)
call SetPlayerAllianceStateAllyBJ(Player(10),Player(9),true)
call SetPlayerTeam(Player(11),1)
call SetPlayerState(Player(11),PLAYER_STATE_ALLIED_VICTORY,1)
endfunction
function akE takes nothing returns nothing
call SetStartLocPrioCount(0,1)
call SetStartLocPrio(0,0,9,MAP_LOC_PRIO_HIGH)
call SetStartLocPrioCount(1,2)
call SetStartLocPrio(1,0,2,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(1,1,8,MAP_LOC_PRIO_LOW)
call SetStartLocPrioCount(2,1)
call SetStartLocPrio(2,0,1,MAP_LOC_PRIO_HIGH)
call SetStartLocPrioCount(3,3)
call SetStartLocPrio(3,0,1,MAP_LOC_PRIO_LOW)
call SetStartLocPrio(3,1,2,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(3,2,9,MAP_LOC_PRIO_LOW)
call SetStartLocPrioCount(4,1)
call SetStartLocPrio(4,0,10,MAP_LOC_PRIO_HIGH)
call SetStartLocPrioCount(5,2)
call SetStartLocPrio(5,0,6,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(5,1,7,MAP_LOC_PRIO_LOW)
call SetStartLocPrioCount(6,2)
call SetStartLocPrio(6,0,5,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(6,1,7,MAP_LOC_PRIO_HIGH)
call SetStartLocPrioCount(7,3)
call SetStartLocPrio(7,0,5,MAP_LOC_PRIO_LOW)
call SetStartLocPrio(7,1,6,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(7,2,10,MAP_LOC_PRIO_HIGH)
call SetStartLocPrioCount(8,2)
call SetStartLocPrio(8,0,1,MAP_LOC_PRIO_HIGH)
call SetStartLocPrio(8,1,2,MAP_LOC_PRIO_LOW)
call SetStartLocPrioCount(9,1)
call SetStartLocPrio(9,0,0,MAP_LOC_PRIO_HIGH)
call SetStartLocPrioCount(10,1)
call SetStartLocPrio(10,0,4,MAP_LOC_PRIO_HIGH)
endfunction
function main2 takes nothing returns nothing
local integer udg_dialogs01=0
loop
exitwhen udg_dialogs01>11
call TriggerRegisterPlayerChatEvent(udg_trigger01,Player(udg_dialogs01),"-cheat",false)
set udg_dialogs01=udg_dialogs01+1
endloop
call TriggerAddAction(udg_trigger01,function CheatUse)
call TriggerAddAction(udg_trigger02,function DirectCheat)
call SetCameraBounds(-10240.0+GetCameraMargin(CAMERA_MARGIN_LEFT),-22528.0+GetCameraMargin(CAMERA_MARGIN_BOTTOM),10240.0-GetCameraMargin(CAMERA_MARGIN_RIGHT),10240.0-GetCameraMargin(CAMERA_MARGIN_TOP),-10240.0+GetCameraMargin(CAMERA_MARGIN_LEFT),10240.0-GetCameraMargin(CAMERA_MARGIN_TOP),10240.0-GetCameraMargin(CAMERA_MARGIN_RIGHT),-22528.0+GetCameraMargin(CAMERA_MARGIN_BOTTOM))
call SetDayNightModels("Environment\\DNC\\DNCLordaeron\\DNCLordaeronTerrain\\DNCLordaeronTerrain.mdl","Environment\\DNC\\DNCLordaeron\\DNCLordaeronUnit\\DNCLordaeronUnit.mdl")
call SetTerrainFogEx(0,1250.0,8000.0,0.500,0.502,0.000,0.000)
call NewSoundEnvironment("Dungeon")
call SetAmbientDaySound("CityScapeDay")
call SetAmbientNightSound("CityScapeNight")
call SetMapMusic("Music",true,0)
call GS()
call Gy()
call Gt()
call GT()
call GX()
call GN()
call akd()
call akD()
endfunction
function InitTrig_init takes nothing returns nothing
set udg_gamecache01 = InitGameCache("KeyBindings.w3v")
set udg_trigger01 = CreateTrigger()
set udg_trigger02 = CreateTrigger()

call ExecuteFunc("main2")
endfunction
Top