function GetT1Skill takes integer rawcode, integer skillnub returns integer
if rawcode == 'Hpal' then
if skillnub == 1 then
return 'AUav'
elseif skillnub == 2 then
return 'ANms'
elseif skillnub == 3 then
return 'AOsh'
elseif skillnub == 4 then
return 'AHbh'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Hamg' then
if skillnub == 1 then
return 'AHab'
elseif skillnub == 2 then
return 'AEim'
elseif skillnub == 3 then
return 'ANrf'
elseif skillnub == 4 then
return 'AHtb'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Hmkg' then
if skillnub == 1 then
return 'AHav'
elseif skillnub == 2 then
return 'A00P'
elseif skillnub == 3 then
return 'AHfa'
elseif skillnub == 4 then
return 'Aflk'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Hblm' then
if skillnub == 1 then
return 'Arsq'
elseif skillnub == 2 then
return 'ANca'
elseif skillnub == 3 then
return 'AOae'
elseif skillnub == 4 then
return 'ANms'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Nalc' then
if skillnub == 1 then
return 'Asp2'
elseif skillnub == 2 then
return 'Afae'
elseif skillnub == 3 then
return 'AIsb'
elseif skillnub == 4 then
return 'AEar'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Hgam' then
if skillnub == 1 then
return 'ACpa'
elseif skillnub == 2 then
return 'Amls'
elseif skillnub == 3 then
return 'Afbk'
elseif skillnub == 4 then
return 'ANmo'
elseif skillnub == 5 then
return 'AUfu'
endif
endif
if rawcode == 'Hjai' then
if skillnub == 1 then
return 'Amgl'
elseif skillnub == 2 then
return 'Afzy'
elseif skillnub == 3 then
return 'Advm'
elseif skillnub == 4 then
return 'ANsi'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Hant' then
if skillnub == 1 then
return 'A01H'
elseif skillnub == 2 then
return 'ACif'
elseif skillnub == 3 then
return 'AOww'
elseif skillnub == 4 then
return 'AHhb'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Hart' then
if skillnub == 1 then
return 'Aspl'
elseif skillnub == 2 then
return 'AUls'
elseif skillnub == 3 then
return 'Arav'
elseif skillnub == 4 then
return 'AOmi'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Usyl' then
if skillnub == 1 then
return 'AHre'
elseif skillnub == 2 then
return 'ANeg'
elseif skillnub == 3 then
return 'AUfa'
elseif skillnub == 4 then
return 'A019'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Hapm' then
if skillnub == 1 then
return 'AEer'
elseif skillnub == 2 then
return 'ANfl'
elseif skillnub == 3 then
return 'AIpv'
elseif skillnub == 4 then
return 'Scri'
elseif skillnub == 5 then
return 0
endif
endif
return 0
endfunction
function GetT3Skill takes integer rawcode, integer skillnub returns integer
if rawcode == 'Ekee' then
if skillnub == 1 then
return 'ANcf'
elseif skillnub == 2 then
return 'ANhw'
elseif skillnub == 3 then
return 'A00C'
elseif skillnub == 4 then
return 'A00B'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Emoo' then
if skillnub == 1 then
return 'AUau'
elseif skillnub == 2 then
return 'Aroc'
elseif skillnub == 3 then
return 'ANc2'
elseif skillnub == 4 then
return 'Amdf'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Nbbc' then
if skillnub == 1 then
return 'ACac'
elseif skillnub == 2 then
return 'ANlm'
elseif skillnub == 3 then
return 'AUdp'
elseif skillnub == 4 then
return 'Adev'
elseif skillnub == 5 then
return 'A02b'
endif
endif
if rawcode == 'Ucrl' then
if skillnub == 1 then
return 'ACfd'
elseif skillnub == 2 then
return 'AHad'
elseif skillnub == 3 then
return 'ANht'
elseif skillnub == 4 then
return 'ANc1'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Nsjs' then
if skillnub == 1 then
return 'A02j'
elseif skillnub == 2 then
return 'Abof'
elseif skillnub == 3 then
return 'ACcv'
elseif skillnub == 4 then
return 'A027'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Ocbh' then
if skillnub == 1 then
return 'Absk'
elseif skillnub == 2 then
return 'A02A'
elseif skillnub == 3 then
return 'A023'
elseif skillnub == 4 then
return 'Aucb'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Odrt' then
if skillnub == 1 then
return 'Afra'
elseif skillnub == 2 then
return 'AHwe'
elseif skillnub == 3 then
return 'A0ls'
elseif skillnub == 4 then
return 'ACbf'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Orkn' then
if skillnub == 1 then
return 'A02N'
elseif skillnub == 2 then
return 'A02M'
elseif skillnub == 3 then
return 'A02L'
elseif skillnub == 4 then
return 'A02k'
elseif skillnub == 5 then
return 'A029'
endif
endif
return 0
endfunction
function GetT5Skill takes integer rawcode, integer skillnub returns integer
if rawcode == 'Nklj' then
if skillnub == 1 then
return 'ANcr'
elseif skillnub == 2 then
return 'ANba'
elseif skillnub == 3 then
return 'A033'
elseif skillnub == 4 then
return 'A032'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Npld' then
if skillnub == 1 then
return 'A036'
elseif skillnub == 2 then
return 'A035'
elseif skillnub == 3 then
return 'ACfb'
elseif skillnub == 4 then
return 'A034'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Ekgg' then
if skillnub == 1 then
return 'Aweb'
elseif skillnub == 2 then
return 'ANdb'
elseif skillnub == 3 then
return 'ANdr'
elseif skillnub == 4 then
return 'AEtq'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Efur' then
if skillnub == 1 then
return 'AHbz'
elseif skillnub == 2 then
return 'A01E'
elseif skillnub == 3 then
return 'Arsp'
elseif skillnub == 4 then
return 'A0w2'
elseif skillnub == 5 then
return 'Acri'
endif
endif
if rawcode == 'Naka' then
if skillnub == 1 then
return 'A038'
elseif skillnub == 2 then
return 'AUan'
elseif skillnub == 3 then
return 'A037'
elseif skillnub == 4 then
return 'AEme'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Uanb' then
if skillnub == 1 then
return 'A039'
elseif skillnub == 2 then
return 'ANrc'
elseif skillnub == 3 then
return 'ACmo'
elseif skillnub == 4 then
return 'Arpl'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Uear' then
if skillnub == 1 then
return 'AOr2'
elseif skillnub == 2 then
return 'ACss'
elseif skillnub == 3 then
return 'AOhx'
elseif skillnub == 4 then
return 'Arpb'
elseif skillnub == 5 then
return 0
endif
endif
if rawcode == 'Nbst' then
if skillnub == 1 then
return 'AOr3'
elseif skillnub == 2 then
return 'AEsf'
elseif skillnub == 3 then
return 'AEmb'
elseif skillnub == 4 then
return 'A010'
elseif skillnub == 5 then
return 0
endif
endif
return 0
endfunction
function BuyAbility takes integer ItemId, integer aid, integer maxlevel, integer cost, unit u, item t returns nothing
local integer start = 0
local boolean stop = false
loop
if GetUnitAbilityLevelSwapped(aid, u) == 0 then
call RemoveItem( t )
call SetUnitUserData( u, ( GetUnitUserData(u) + cost ) )
call UnitAddAbilityBJ( aid, u )
call UnitMakeAbilityPermanentBJ( TRUE, aid, u )
set stop = true
elseif GetUnitAbilityLevelSwapped(aid, u) == start then
call RemoveItem( t )
call SetUnitUserData( u, ( GetUnitUserData(u) + cost ) )
call SetUnitAbilityLevelSwapped( aid, u, start + 1 )
set stop = true
endif
set start = start + 1
exitwhen stop == true or start == maxlevel
endloop
endfunction
Name | Type | is_array | initial_value |
AI_Tier1_heroes | unitcode | Yes | |
AI_Tier2_heroes | unitcode | Yes | |
AI_tier3_heroes | unitcode | Yes | |
AI_TIER4_heroes | unitcode | Yes | |
AI_tier5_HEROES | unitcode | Yes | |
AirSpire | group | Yes | |
AIT1_heroNumb | integer | Yes | |
AIT2_heronumb | integer | Yes | |
AIT3_heronumB | integer | Yes | |
Assembly | group | Yes | |
Attackloc | location | Yes | |
Bases | rect | Yes | |
BattleFactory | group | Yes | |
Buldings | integer | Yes | 3 |
Caster | unit | No | |
Computer | player | Yes | |
D | destructable | Yes | |
Dialog1 | dialog | No | |
DialogButton | button | Yes | |
Dummys | group | No | |
FakeWeapons | itemcode | Yes | |
GoldCost | real | Yes | |
Hero1 | group | Yes | |
Hero2 | group | Yes | |
Hero3 | group | Yes | |
HeroBuild1 | group | Yes | |
HeroBuild2 | group | Yes | |
HeroBuild3 | group | Yes | |
Heroes_busy | group | No | |
HeroTechGroup | group | Yes | |
IgetItem | boolean | Yes | true |
ItemInSlot | itemcode | Yes | |
lasers | group | No | |
MainFactory | group | Yes | |
MercFactory | unit | Yes | |
MindSwapper1 | item | Yes | ItemNull |
MindSwapper2 | item | Yes | ItemNull |
Moneybags | real | Yes | |
Numb | integer | Yes | |
Number | real | Yes | |
Numberofplayers | integer | No | |
one | integer | No | |
OutdatedHeroes | group | Yes | |
Paycheck | integer | No | 175 |
Player | player | Yes | |
PlayerG | force | No | |
PlayerGroup | force | No | |
PlayerLeft | boolean | Yes | |
Point | location | No | |
point2 | location | No | |
PointArray | location | Yes | |
PowerSupplys | group | Yes | |
Race | integer | Yes | 7 |
Real | real | Yes | |
RebuildAreas | rect | Yes | |
Rone | real | No | |
Rthree | real | No | |
Rtwo | real | No | |
SecondHero | group | Yes | |
Sensors | group | Yes | |
Spawning | trigger | Yes | |
SpawningOn | boolean | Yes | true |
Spawns | group | Yes | |
SpiritLinker | unit | Yes | |
SwapTracker | real | Yes | |
TargetPoint | location | No | |
TechieGroup | group | Yes | |
TechLab | group | Yes | |
techlevel | leaderboard | Yes | |
TechLevel | real | Yes | 1.00 |
TempTarget | unit | No | |
TempUnit | unit | No | |
Testnumb | integer | No | |
three | integer | No | |
Time | integer | No | |
Tome | item | No | |
two | integer | No | |
unit | unit | No | |
Unitgroup | group | No | |
Weapons | itemcode | Yes | |
WorkerBots | group | Yes |
function Trig_Buy_Blink_Actions takes nothing returns nothing
if GetItemTypeId(GetManipulatedItem()) == 'rre2' then
call BuyAbility('rre2','AEbl', 3, 304, GetTriggerUnit(), GetManipulatedItem())
endif
endfunction
//===========================================================================
function InitTrig_Buy_Blink takes nothing returns nothing
set gg_trg_Buy_Blink = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Buy_Blink, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddAction( gg_trg_Buy_Blink, function Trig_Buy_Blink_Actions )
endfunction
function Trig_Buy_drain_Actions takes nothing returns nothing
if GetItemTypeId(GetManipulatedItem()) == 'rres' then
call BuyAbility('rres','AHdr', 6, 282, GetTriggerUnit(), GetManipulatedItem())
endif
endfunction
//===========================================================================
function InitTrig_Buy_drain takes nothing returns nothing
set gg_trg_Buy_drain = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Buy_drain, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddAction( gg_trg_Buy_drain, function Trig_Buy_drain_Actions )
endfunction
function Trig_Buy_ensnare_Actions takes nothing returns nothing
if GetItemTypeId(GetManipulatedItem()) == 'rspl' then
call BuyAbility('rspl','Aens', 5, 226, GetTriggerUnit(), GetManipulatedItem())
endif
endfunction
//===========================================================================
function InitTrig_Buy_ensnare takes nothing returns nothing
set gg_trg_Buy_ensnare = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Buy_ensnare, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddAction( gg_trg_Buy_ensnare, function Trig_Buy_ensnare_Actions )
endfunction
function Trig_Buy_starburst_Actions takes nothing returns nothing
if GetItemTypeId(GetManipulatedItem()) == 'rreb' then
call BuyAbility('rreb','AEfk', 4, 456, GetTriggerUnit(), GetManipulatedItem())
endif
endfunction
//===========================================================================
function InitTrig_Buy_starburst takes nothing returns nothing
set gg_trg_Buy_starburst = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Buy_starburst, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddAction( gg_trg_Buy_starburst, function Trig_Buy_starburst_Actions )
endfunction
function Trig_Buy_ground_break_Actions takes nothing returns nothing
if GetItemTypeId(GetManipulatedItem()) == 'rhe2' then
call BuyAbility('rhe2','AOeq', 4, 470, GetTriggerUnit(), GetManipulatedItem())
endif
endfunction
//===========================================================================
function InitTrig_Buy_ground_break takes nothing returns nothing
set gg_trg_Buy_ground_break = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Buy_ground_break, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddAction( gg_trg_Buy_ground_break, function Trig_Buy_ground_break_Actions )
endfunction
function Trig_Buy_air_strike_Actions takes nothing returns nothing
if GetItemTypeId(GetManipulatedItem()) == 'rman' then
call BuyAbility('rman','ACfs', 3, 1653, GetTriggerUnit(), GetManipulatedItem())
endif
endfunction
//===========================================================================
function InitTrig_Buy_air_strike takes nothing returns nothing
set gg_trg_Buy_air_strike = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Buy_air_strike, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddAction( gg_trg_Buy_air_strike, function Trig_Buy_air_strike_Actions )
endfunction
function Trig_buy_self_Destruct_Actions takes nothing returns nothing
if GetItemTypeId(GetManipulatedItem()) == 'guvi' then
call BuyAbility('guvi','Auco', 0, 17182, GetTriggerUnit(), GetManipulatedItem())
endif
endfunction
//===========================================================================
function InitTrig_buy_self_Destruct takes nothing returns nothing
set gg_trg_buy_self_Destruct = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_buy_self_Destruct, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddAction( gg_trg_buy_self_Destruct, function Trig_buy_self_Destruct_Actions )
endfunction
function Trig_Buy_LS_Actions takes nothing returns nothing
if GetItemTypeId(GetManipulatedItem()) == 'rspd' then
call BuyAbility('rspd','Alsh', 4, 287, GetTriggerUnit(), GetManipulatedItem())
endif
endfunction
//===========================================================================
function InitTrig_Buy_LS takes nothing returns nothing
set gg_trg_Buy_LS = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Buy_LS, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddAction( gg_trg_Buy_LS, function Trig_Buy_LS_Actions )
endfunction
function Trig_Buy_WW_Actions takes nothing returns nothing
if GetItemTypeId(GetManipulatedItem()) == 'rsps' then
call BuyAbility('rsps','AOwk', 4, 217, GetTriggerUnit(), GetManipulatedItem())
endif
endfunction
//===========================================================================
function InitTrig_Buy_WW takes nothing returns nothing
set gg_trg_Buy_WW = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Buy_WW, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddAction( gg_trg_Buy_WW, function Trig_Buy_WW_Actions )
endfunction
function Trig_Buy_invul_Actions takes nothing returns nothing
if GetItemTypeId(GetManipulatedItem()) == 'rwat' then
call BuyAbility('rwat','AHds', 3, 543, GetTriggerUnit(), GetManipulatedItem())
endif
endfunction
//===========================================================================
function InitTrig_Buy_invul takes nothing returns nothing
set gg_trg_Buy_invul = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Buy_invul, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddAction( gg_trg_Buy_invul, function Trig_Buy_invul_Actions )
endfunction
function Trig_Buy_stasis_Actions takes nothing returns nothing
if GetItemTypeId(GetManipulatedItem()) == 'rhe1' then
call BuyAbility('rhe1','Asta', 3, 674, GetTriggerUnit(), GetManipulatedItem())
endif
endfunction
//===========================================================================
function InitTrig_Buy_stasis takes nothing returns nothing
set gg_trg_Buy_stasis = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Buy_stasis, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddAction( gg_trg_Buy_stasis, function Trig_Buy_stasis_Actions )
endfunction
function Trig_ADock_request_Actions takes nothing returns nothing
local unit a = GetSpellTargetUnit()
local unit b = GetSpellAbilityUnit()
if GetSpellAbilityId() == 'A000' then
call SetUnitPathing( b, false )
call SetUnitPathing( a, false )
set udg_Point = GetUnitLoc(b)
call SetUnitPositionLoc( a, udg_Point )
call UnitAddAbility( a, 'ACm2' )
call PauseUnit( a, true )
loop
call TriggerSleepAction(1)
call SetUnitLifeBJ( a, ( GetUnitStateSwap(UNIT_STATE_LIFE, a) + ( GetUnitStateSwap(UNIT_STATE_MAX_LIFE, a) / 10.00 ) ) )
call SetUnitManaBJ( a, ( GetUnitStateSwap(UNIT_STATE_MANA, a) + ( GetUnitStateSwap(UNIT_STATE_MAX_MANA, a) / 10.00 ) ) )
exitwhen GetUnitStateSwap(UNIT_STATE_LIFE, a) == GetUnitStateSwap(UNIT_STATE_MAX_LIFE, a) and GetUnitStateSwap(UNIT_STATE_MANA, a) == GetUnitStateSwap(UNIT_STATE_MAX_MANA, a) or IsUnitDeadBJ(a) == true or IsUnitDeadBJ(b) == true
endloop
call PauseUnit( a, false )
call UnitRemoveAbility( a, 'ACm2')
call SetUnitPathing( b, true )
call SetUnitPathing( a, true )
endif
call PolledWait( 1.00 )
set a = null
set b = null
endfunction
//===========================================================================
function InitTrig_Docking takes nothing returns nothing
set gg_trg_Docking = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Docking, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddAction( gg_trg_Docking, function Trig_ADock_request_Actions )
endfunction
function Trig_Smoke_Bomb_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'AChw' ) ) then
return false
endif
return true
endfunction
function Trig_Smoke_Bomb_Actions takes nothing returns nothing
local unit a
set udg_Point = GetSpellTargetLoc()
call CreateNUnitsAtLoc( 1, 'hgyr', GetOwningPlayer(GetTriggerUnit()), udg_Point, bj_UNIT_FACING )
set a=GetLastCreatedUnit()
call IssuePointOrderLocBJ( a, "cloudoffog", udg_Point )
call PolledWait( 40.00 )
call RemoveUnit( a )
call PolledWait( 1.00 )
set a = null
endfunction
//===========================================================================
function InitTrig_Smoke_Bomb takes nothing returns nothing
set gg_trg_Smoke_Bomb = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Smoke_Bomb, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddCondition( gg_trg_Smoke_Bomb, Condition( function Trig_Smoke_Bomb_Conditions ) )
call TriggerAddAction( gg_trg_Smoke_Bomb, function Trig_Smoke_Bomb_Actions )
endfunction
function Trig_Atom_Sizer_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'AIfz' ) ) then
return false
endif
return true
endfunction
function Trig_Atom_Sizer_Func005C takes nothing returns boolean
if ( not ( IsUnitAlly(udg_TempTarget, GetOwningPlayer(udg_TempUnit)) == true ) ) then
return false
endif
return true
endfunction
function Trig_Atom_Sizer_Actions takes nothing returns nothing
local unit x
set udg_TempTarget = GetSpellTargetUnit()
set udg_TempUnit = GetTriggerUnit()
set udg_Point = GetUnitLoc(GetTriggerUnit())
if ( Trig_Atom_Sizer_Func005C() ) then
call CreateNUnitsAtLoc( 1, 'hgry', GetOwningPlayer(GetTriggerUnit()), udg_Point, bj_UNIT_FACING )
call IssueTargetOrderBJ( GetLastCreatedUnit(), "bloodlust", udg_TempTarget )
else
call CreateNUnitsAtLoc( 1, 'hmpr', GetOwningPlayer(GetTriggerUnit()), udg_Point, bj_UNIT_FACING )
call IssueTargetOrderBJ( GetLastCreatedUnit(), "bloodlust", udg_TempTarget )
endif
set x=GetLastCreatedUnit()
call PolledWait( 1.00 )
call RemoveUnit( x )
call PolledWait( 1.00 )
set x = null
endfunction
//===========================================================================
function InitTrig_Atom_Sizer takes nothing returns nothing
set gg_trg_Atom_Sizer = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Atom_Sizer, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddCondition( gg_trg_Atom_Sizer, Condition( function Trig_Atom_Sizer_Conditions ) )
call TriggerAddAction( gg_trg_Atom_Sizer, function Trig_Atom_Sizer_Actions )
endfunction
function Trig_LS_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'Alsh' ) ) then
return false
endif
return true
endfunction
function Trig_LS_Actions takes nothing returns nothing
local unit m
set udg_Point = GetUnitLoc(GetSpellTargetUnit())
set udg_TempUnit = GetSpellAbilityUnit()
set udg_TempTarget = GetSpellTargetUnit()
call CreateNUnitsAtLoc( 1, 'ucry', GetOwningPlayer(udg_TempUnit), udg_Point, bj_UNIT_FACING )
call SetUnitAbilityLevelSwapped( 'Ainf', GetLastCreatedUnit(), GetUnitAbilityLevelSwapped('Alsh', udg_TempUnit) )
call IssueTargetOrderBJ( GetLastCreatedUnit(), "innerfire", udg_TempTarget )
set m=GetLastCreatedUnit()
call PolledWait( 1.00 )
call RemoveUnit( m )
call PolledWait( 1.00 )
set m = null
endfunction
//===========================================================================
function InitTrig_LS takes nothing returns nothing
set gg_trg_LS = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_LS, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddCondition( gg_trg_LS, Condition( function Trig_LS_Conditions ) )
call TriggerAddAction( gg_trg_LS, function Trig_LS_Actions )
endfunction
function Trig_Drain_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'AHdr' ) ) then
return false
endif
return true
endfunction
function Trig_Drain_Actions takes nothing returns nothing
local unit y
set udg_point2 = GetRectCenter(GetPlayableMapRect())
call CreateNUnitsAtLoc( 1, 'hrif', GetOwningPlayer(GetSpellAbilityUnit()), udg_point2, bj_UNIT_FACING )
call IssueTargetOrderBJ( GetLastCreatedUnit(), "purge", GetSpellTargetUnit() )
set y=GetLastCreatedUnit()
call PolledWait( 1.00 )
call RemoveUnit(y)
call PolledWait( 1.00 )
set y = null
endfunction
//===========================================================================
function InitTrig_Drain takes nothing returns nothing
set gg_trg_Drain = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Drain, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddCondition( gg_trg_Drain, Condition( function Trig_Drain_Conditions ) )
call TriggerAddAction( gg_trg_Drain, function Trig_Drain_Actions )
endfunction
function Trig_Air_Strike_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'ACfs' ) ) then
return false
endif
return true
endfunction
function Trig_Air_Strike_Actions takes nothing returns nothing
local unit f
local location p1
local location p2
set f = GetTriggerUnit()
set p1 = GetSpellTargetLoc()
set p2 = GetRectCenter(GetPlayableMapRect())
call PolledWait( 3.00 )
call CreateNUnitsAtLocFacingLocBJ( 1, 'hdhw', GetOwningPlayer(f), p2, p1 )
call IssuePointOrderLocBJ( GetLastCreatedUnit(), "attackground", p1 )
set f=GetLastCreatedUnit()
call PolledWait( 9.00 )
call RemoveUnit( f )
call PolledWait( 1.00 )
set f = null
set p1 = null
set p2 = null
endfunction
//===========================================================================
function InitTrig_Air_Strike takes nothing returns nothing
set gg_trg_Air_Strike = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Air_Strike, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddCondition( gg_trg_Air_Strike, Condition( function Trig_Air_Strike_Conditions ) )
call TriggerAddAction( gg_trg_Air_Strike, function Trig_Air_Strike_Actions )
endfunction
function Trig_Stasis_Feild_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'Asta' ) ) then
return false
endif
return true
endfunction
function Trig_Stasis_Feild_Actions takes nothing returns nothing
local unit b
set udg_Point = GetSpellTargetLoc()
call CreateNUnitsAtLoc( 1, 'hmtm', GetOwningPlayer(GetTriggerUnit()), udg_Point, bj_UNIT_FACING )
call SetUnitAbilityLevelSwapped( 'AOws', GetLastCreatedUnit(), GetUnitAbilityLevelSwapped('Asta', GetTriggerUnit()) )
set b=GetLastCreatedUnit()
call PolledWait( 2 )
call IssueImmediateOrderBJ( b, "stomp" )
call PolledWait( 2 )
call IssueImmediateOrderBJ( b, "stomp" )
call PolledWait( 2 )
call IssueImmediateOrderBJ( b, "stomp" )
call PolledWait( 2 )
call IssueImmediateOrderBJ( b, "stomp" )
call PolledWait( 2 )
call IssueImmediateOrderBJ( b, "stomp" )
call PolledWait( 2 )
call RemoveUnit( b )
call PolledWait( 1.00 )
set b = null
endfunction
//===========================================================================
function InitTrig_Stasis_Feild takes nothing returns nothing
set gg_trg_Stasis_Feild = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Stasis_Feild, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddCondition( gg_trg_Stasis_Feild, Condition( function Trig_Stasis_Feild_Conditions ) )
call TriggerAddAction( gg_trg_Stasis_Feild, function Trig_Stasis_Feild_Actions )
endfunction
function Trig_Ground_Break_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'AOeq' ) ) then
return false
endif
return true
endfunction
function Trig_Ground_Break_Actions takes nothing returns nothing
local destructable a
set udg_Point = GetSpellTargetLoc()
call CreateDestructableLoc( 'B000', udg_Point, GetRandomDirectionDeg(), 1, 0 )
set a = GetLastCreatedDestructable()
call TerrainDeformationCraterBJ( 15.00, false, udg_Point, 425.00, 750.00 )
call PolledWait( 15.00 )
call KillDestructable( a )
call PolledWait( 1.00 )
set a = null
endfunction
//===========================================================================
function InitTrig_Ground_Break takes nothing returns nothing
set gg_trg_Ground_Break = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Ground_Break, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddCondition( gg_trg_Ground_Break, Condition( function Trig_Ground_Break_Conditions ) )
call TriggerAddAction( gg_trg_Ground_Break, function Trig_Ground_Break_Actions )
endfunction
function IsBad takes nothing returns boolean
return ( IsPlayerEnemy(GetOwningPlayer(GetFilterUnit()), ConvertedPlayer(udg_Numb[1])) == true )
endfunction
function IsGood takes nothing returns boolean
return ( IsPlayerAlly(GetTriggerPlayer(), ConvertedPlayer(udg_Numb[1])) == true )
endfunction
function Attack takes nothing returns nothing
call RecycleGuardPosition( GetEnumUnit() )
call IssuePointOrderLocBJ( GetEnumUnit(), "attack", udg_Point )
endfunction
function Noworkers takes nothing returns boolean
return ( GetUnitTypeId(GetFilterUnit()) != 'uaco' ) and GetUnitLifePercent(GetFilterUnit()) >= 33 and IsUnitType(GetFilterUnit(), UNIT_TYPE_STRUCTURE) == false and IsUnitInGroup(GetFilterUnit(), udg_Heroes_busy) == false
endfunction
function Trig_LaunchAttacks_Actions takes nothing returns nothing
local location array l
local integer i = GetRandomInt(1, 5)
local integer start = 0
local integer end = 12
local boolean stop
local integer count = 0
local group a
local group e
set l[1] = GetPlayerStartLocationLoc(Player(0))
set l[2] = GetPlayerStartLocationLoc(Player(3))
set l[3] = GetPlayerStartLocationLoc(Player(6))
set l[4] = GetPlayerStartLocationLoc(Player(9))
set l[5] = GetRectCenter(gg_rct_Vismid2)
loop
exitwhen start > end
set start = start + 1
set udg_Spawns[start] = GetUnitsOfPlayerMatching(ConvertedPlayer(start), Condition(function Noworkers))
loop
set udg_Numb[1] = start
call PolledWait(2.0)
if CountUnitsInGroup(GetUnitsInRangeOfLocMatching(1250.0, l[i], Condition(function IsBad) )) == 0 then
set i = GetRandomInt(1, 5)
set stop = false
else
set stop = true
endif
exitwhen stop == true
endloop
//call DisplayTimedTextToForce( GetPlayersAll(), 30, I2S(CountUnitsInGroup(udg_Spawns[start]) ))
if (GetPlayerController(ConvertedPlayer(start)) == MAP_CONTROL_COMPUTER ) and CountUnitsInGroup(udg_Spawns[start]) >= 5 then
set udg_Point = l[i]
call ForGroupBJ( udg_Spawns[start], function Attack )
endif
endloop
endfunction
//===========================================================================
function InitTrig_LaunchAttacks takes nothing returns nothing
set gg_trg_LaunchAttacks = CreateTrigger( )
call TriggerAddAction( gg_trg_LaunchAttacks, function Trig_LaunchAttacks_Actions )
endfunction
function Trig_Exp_Transfer_Copy_Conditions takes nothing returns boolean
return (GetSpellAbilityId() == 'AIcl' )
endfunction
//function XPT takes nothing returns nothing
//call SetHeroLevelBJ( GetEnumUnit(), 1, false )
//call AddHeroXPSwapped( udg_Numb[1], GetEnumUnit(), true )
//endfunction
//function XPT2 takes nothing returns nothing
//call SetHeroLevelBJ( GetEnumUnit(), 1, false )
//call AddHeroXPSwapped( udg_Numb[1], GetEnumUnit(), true )
//endfunction
function Trig_tst_trig_Copy_Func001Func001Func002A takes nothing returns nothing
call SetHeroLevelBJ( GetEnumUnit(), 1, false )
call AddHeroXPSwapped( udg_Numb[3], GetEnumUnit(), true )
endfunction
function Trig_tst_trig_Copy_Func001Func001C takes nothing returns boolean
if ( not ( IsUnitInGroup(udg_TempTarget, udg_TechieGroup[GetForLoopIndexA()]) == true ) ) then
return false
endif
return true
endfunction
function Trig_tst_trig_Copy_Func001Func002Func002A takes nothing returns nothing
call SetHeroLevelBJ( GetEnumUnit(), 1, false )
call AddHeroXPSwapped( udg_Numb[4], GetEnumUnit(), true )
endfunction
function Trig_tst_trig_Copy_Func001Func002C takes nothing returns boolean
if ( not ( IsUnitInGroup(udg_TempUnit, udg_TechieGroup[GetForLoopIndexA()]) == true ) ) then
return false
endif
return true
endfunction
function Trig_Exp_Transfer_Copy_Actions takes nothing returns nothing
local integer tier = 0
local integer tier2 = 0
local integer td = 0
local integer max = 5
local integer min = 1
local integer XP = GetHeroXP(GetSpellAbilityUnit())
local integer XP2 = GetHeroXP(GetSpellTargetUnit())
local integer Xpr
local integer Xpr2
local unit swap = GetSpellAbilityUnit()
local unit swap2 = GetSpellTargetUnit()
call RemoveItem( GetItemOfTypeFromUnitBJ(swap, 'wlsd') )
//this gets the tier of the heroes..
set max = 5
loop
exitwhen min > max
if IsUnitInGroup(swap, udg_HeroTechGroup[min]) == true then
set tier = min
endif
set min = min + 1
endloop
set min = 1
loop
exitwhen min > max
if IsUnitInGroup(swap2, udg_HeroTechGroup[min]) == true then
set tier2 = min
endif
set min = min + 1
endloop
//this is the diffrince of the tiers
set td = IAbsBJ(( tier - tier2 ))
set Xpr = ( XP / 100 )
set Xpr2 = ( XP2 / 100 )
if td == 0 then
set Xpr = 0
set Xpr2 = 0
else
set Xpr = ( Xpr * 15 * td)
set Xpr2 = ( Xpr2 * 15 * td)
endif
call SetHeroLevelBJ( swap2, 1, false )
call SetHeroLevelBJ( swap, 1, false )
set XP = XP - Xpr
set XP2 = XP2 - Xpr2
call AddHeroXPSwapped( XP, swap2, true )
call AddHeroXPSwapped( XP2, swap, true )
set udg_Numb[3] = XP2
set udg_Numb[4] = XP
set udg_TempUnit = swap2
set udg_TempTarget = swap
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
if ( Trig_tst_trig_Copy_Func001Func001C() ) then
call ForGroupBJ( udg_TechieGroup[GetForLoopIndexA()], function Trig_tst_trig_Copy_Func001Func001Func002A )
else
endif
if ( Trig_tst_trig_Copy_Func001Func002C() ) then
call ForGroupBJ( udg_TechieGroup[GetForLoopIndexA()], function Trig_tst_trig_Copy_Func001Func002Func002A )
else
endif
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
endfunction
//===========================================================================
function InitTrig_Exp_Transfer_Copy takes nothing returns nothing
set gg_trg_Exp_Transfer_Copy = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Exp_Transfer_Copy, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddCondition( gg_trg_Exp_Transfer_Copy, Condition( function Trig_Exp_Transfer_Copy_Conditions ) )
call TriggerAddAction( gg_trg_Exp_Transfer_Copy, function Trig_Exp_Transfer_Copy_Actions )
endfunction
function Trig_Retire_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'ANtm' ) ) then
return false
endif
return true
endfunction
function Trig_Retire_Actions takes nothing returns nothing
local unit a
local player p = GetOwningPlayer(GetSpellTargetUnit())
set a = GetSpellTargetUnit()
call UnitRemoveAbilityBJ( 'AInv', a )
call UnitRemoveAbilityBJ( 'A00K', a )
call AdjustPlayerStateBJ( GetUnitUserData(GetSpellTargetUnit()), GetOwningPlayer(GetSpellTargetUnit()), PLAYER_STATE_RESOURCE_GOLD )
call PolledWait( 3.00 )
call RemoveUnit( a )
endfunction
//===========================================================================
function InitTrig_Retire takes nothing returns nothing
set gg_trg_Retire = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Retire, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Retire, EVENT_PLAYER_UNIT_SPELL_FINISH )
call TriggerAddCondition( gg_trg_Retire, Condition( function Trig_Retire_Conditions ) )
call TriggerAddAction( gg_trg_Retire, function Trig_Retire_Actions )
endfunction
function Trig_Multipule_volcano_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'Arpl' ) ) then
return false
endif
return true
endfunction
function Trig_Multipule_volcano_Actions takes nothing returns nothing
local integer c
set c = 0
loop
set udg_Point = GetUnitLoc(GetSpellAbilityUnit())
set udg_Point = OffsetLocation(udg_Point, GetRandomReal(-500.00, 500.00), GetRandomReal(-500.00, 500.00))
call CreateNUnitsAtLoc( 1, 'hfoo', GetOwningPlayer(GetTriggerUnit()), udg_Point, bj_UNIT_FACING )
call SetUnitAbilityLevelSwapped( 'A024', GetLastCreatedUnit(), GetUnitAbilityLevelSwapped('Arpl', GetSpellAbilityUnit()) )
call IssuePointOrderLocBJ( GetLastCreatedUnit(), "volcano", udg_Point )
call UnitApplyTimedLifeBJ( 7.00, 'BTLF', GetLastCreatedUnit() )
set c = c + 1
exitwhen c == 3
endloop
endfunction
//===========================================================================
function InitTrig_Multipule_volcano takes nothing returns nothing
set gg_trg_Multipule_volcano = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Multipule_volcano, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddCondition( gg_trg_Multipule_volcano, Condition( function Trig_Multipule_volcano_Conditions ) )
call TriggerAddAction( gg_trg_Multipule_volcano, function Trig_Multipule_volcano_Actions )
endfunction
function Trig_Battle_Frenzy_2_Conditions takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('A03N', GetAttackedUnitBJ()) > 0 ) ) then
return false
endif
return true
endfunction
function Trig_Battle_Frenzy_2_Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 100) > 93 ) ) then
return false
endif
return true
endfunction
function Trig_Battle_Frenzy_2_Actions takes nothing returns nothing
local unit u
local integer n
set u = GetAttackedUnitBJ()
if ( Trig_Battle_Frenzy_2_Func002C() ) then
call ModifyHeroStat( bj_HEROSTAT_STR, u, bj_MODIFYMETHOD_ADD, ( GetUnitAbilityLevelSwapped('A03N', u) * 2 ) )
call ModifyHeroStat( bj_HEROSTAT_AGI, u, bj_MODIFYMETHOD_ADD, ( GetUnitAbilityLevelSwapped('A03N', u) * 1 ) )
set n = GetUnitAbilityLevelSwapped('A03N', u)
call PolledWait( 30.00 )
call ModifyHeroStat( bj_HEROSTAT_STR, u, bj_MODIFYMETHOD_SUB, ( n * 2 ) )
call ModifyHeroStat( bj_HEROSTAT_AGI, u, bj_MODIFYMETHOD_SUB, ( n * 1 ) )
else
call DoNothing( )
endif
call PolledWait( 1.00 )
set u = null
endfunction
//===========================================================================
function InitTrig_Battle_Frenzy_2 takes nothing returns nothing
set gg_trg_Battle_Frenzy_2 = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Battle_Frenzy_2, EVENT_PLAYER_UNIT_ATTACKED )
call TriggerAddCondition( gg_trg_Battle_Frenzy_2, Condition( function Trig_Battle_Frenzy_2_Conditions ) )
call TriggerAddAction( gg_trg_Battle_Frenzy_2, function Trig_Battle_Frenzy_2_Actions )
endfunction
function Trig_Rock_Ring_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'A03E' ) ) then
return false
endif
return true
endfunction
function Trig_Rock_Ring_Actions takes nothing returns nothing
local destructable array d
set udg_Point = GetSpellTargetLoc()
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 14
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
set udg_PointArray[GetForLoopIndexA()] = PolarProjectionBJ(udg_Point, 300.50, ( 25.72 * I2R(GetForLoopIndexA()) ))
call CreateDestructableLoc( 'LTrc', udg_PointArray[GetForLoopIndexA()], GetRandomDirectionDeg(), 1, 0 )
set d[GetForLoopIndexA()] = GetLastCreatedDestructable()
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call PolledWait( 30.00 )
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 14
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call KillDestructable( d[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call PolledWait( 1.00 )
set d[1] = null
set d[2] = null
set d[3] = null
set d[4] = null
set d[5] = null
set d[6] = null
set d[7] = null
set d[8] = null
set d[9] = null
set d[10] = null
set d[11] = null
set d[12] = null
set d[13] = null
set d[14] = null
endfunction
//===========================================================================
function InitTrig_Rock_Ring takes nothing returns nothing
set gg_trg_Rock_Ring = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Rock_Ring, EVENT_PLAYER_UNIT_SPELL_EFFECT )
call TriggerAddCondition( gg_trg_Rock_Ring, Condition( function Trig_Rock_Ring_Conditions ) )
call TriggerAddAction( gg_trg_Rock_Ring, function Trig_Rock_Ring_Actions )
endfunction
function Trig_Rock_Shower_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'A03A' ) ) then
return false
endif
return true
endfunction
function Trig_Rock_Shower_Actions takes nothing returns nothing
local unit u
set u = GetTriggerUnit()
call TriggerSleepAction( 0.20 )
call SetUnitAbilityLevelSwapped( 'A03D', u, GetUnitAbilityLevelSwapped('A03A', u) )
call TriggerSleepAction( 0.20 )
set u = null
endfunction
//===========================================================================
function InitTrig_Rock_Shower takes nothing returns nothing
set gg_trg_Rock_Shower = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Rock_Shower, EVENT_PLAYER_UNIT_SPELL_EFFECT )
call TriggerAddCondition( gg_trg_Rock_Shower, Condition( function Trig_Rock_Shower_Conditions ) )
call TriggerAddAction( gg_trg_Rock_Shower, function Trig_Rock_Shower_Actions )
endfunction
function Trig_Cluster_Bombs_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'A027' ) ) then
return false
endif
return true
endfunction
function Trig_Cluster_Bombs_Actions takes nothing returns nothing
local location p
local unit u
local unit t
set p = GetUnitLoc(GetSpellTargetUnit())
set u = GetSpellAbilityUnit()
set t = GetSpellTargetUnit()
call PolledWait( 0.85 )
call CreateNUnitsAtLoc( 1, 'hhes', GetOwningPlayer(u), p, bj_UNIT_FACING )
call SetUnitAbilityLevelSwapped( 'A026', GetLastCreatedUnit(), GetUnitAbilityLevelSwapped('A027', u) )
call IssuePointOrderLocBJ( GetLastCreatedUnit(), "clusterrockets", p )
call UnitApplyTimedLifeBJ( 3.00, 'BTLF', GetLastCreatedUnit() )
call CreateNUnitsAtLoc( 1, 'ocat', GetOwningPlayer(u), p, bj_UNIT_FACING )
call SetUnitAbilityLevelSwapped( 'A025', GetLastCreatedUnit(), GetUnitAbilityLevelSwapped('A027', u) )
call IssueTargetOrderBJ( GetLastCreatedUnit(), "unstableconcoction", t )
call UnitApplyTimedLifeBJ( 3.00, 'BTLF', GetLastCreatedUnit() )
call PolledWait( 1.00 )
set p = null
set u = null
set t = null
endfunction
//===========================================================================
function InitTrig_Cluster_Bombs takes nothing returns nothing
set gg_trg_Cluster_Bombs = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Cluster_Bombs, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddCondition( gg_trg_Cluster_Bombs, Condition( function Trig_Cluster_Bombs_Conditions ) )
call TriggerAddAction( gg_trg_Cluster_Bombs, function Trig_Cluster_Bombs_Actions )
endfunction
function Trig_Power_wave_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'ACcv' ) ) then
return false
endif
return true
endfunction
function Trig_Power_wave_Actions takes nothing returns nothing
local location p
local unit u
set p = GetSpellTargetLoc()
set u = GetSpellAbilityUnit()
call TriggerSleepAction( 0.85 )
call SetUnitPositionLoc( u, p )
call PolledWait( 1.00 )
set p = null
set u = null
endfunction
//===========================================================================
function InitTrig_Power_wave takes nothing returns nothing
set gg_trg_Power_wave = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Power_wave, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddCondition( gg_trg_Power_wave, Condition( function Trig_Power_wave_Conditions ) )
call TriggerAddAction( gg_trg_Power_wave, function Trig_Power_wave_Actions )
endfunction
function Trig_Swoop_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'A029' ) ) then
return false
endif
return true
endfunction
function Trig_Swoop_Actions takes nothing returns nothing
local unit e
call SetUnitPathing( GetSpellAbilityUnit(), false )
call UnitAddAbilityBJ( 'A028', GetSpellAbilityUnit() )
call SetUnitAbilityLevelSwapped( 'A028', GetSpellAbilityUnit(), GetUnitAbilityLevelSwapped('A029', GetSpellAbilityUnit()) )
set e = GetSpellAbilityUnit()
call PolledWait( 10.00 )
call SetUnitPathing( e, true )
call UnitRemoveAbilityBJ( 'A028', e )
call PolledWait( 1.00 )
set e = null
endfunction
//===========================================================================
function InitTrig_Swoop takes nothing returns nothing
set gg_trg_Swoop = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Swoop, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddCondition( gg_trg_Swoop, Condition( function Trig_Swoop_Conditions ) )
call TriggerAddAction( gg_trg_Swoop, function Trig_Swoop_Actions )
endfunction
function Trig_Jump_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'AOhx' ) ) then
return false
endif
return true
endfunction
function Trig_Jump_Actions takes nothing returns nothing
local location a
local location b
local unit u
set a = GetUnitLoc(GetSpellAbilityUnit())
set b = GetUnitLoc(GetSpellTargetUnit())
set u = GetSpellAbilityUnit()
call PolledWait( 0.25 )
call CreateNUnitsAtLoc( 1, 'hfoo', GetOwningPlayer(u), a, bj_UNIT_FACING )
call SetUnitAbilityLevelSwapped( 'ACtc', GetLastCreatedUnit(), GetUnitAbilityLevelSwapped('AOhx', u) )
call IssueImmediateOrderBJ( GetLastCreatedUnit(), "creepthunderclap" )
call UnitApplyTimedLifeBJ( 3.00, 'BTLF', GetLastCreatedUnit() )
call SetUnitPositionLoc( u, b )
call CreateNUnitsAtLoc( 1, 'hfoo', GetOwningPlayer(u), b, bj_UNIT_FACING )
call SetUnitAbilityLevelSwapped( 'Awrg', GetLastCreatedUnit(), GetUnitAbilityLevelSwapped('AOhx', u) )
call IssueImmediateOrderBJ( GetLastCreatedUnit(), "stomp" )
call UnitApplyTimedLifeBJ( 3.00, 'BTLF', GetLastCreatedUnit() )
call PolledWait( 1.00 )
set a = null
set b = null
endfunction
//===========================================================================
function InitTrig_Jump takes nothing returns nothing
set gg_trg_Jump = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Jump, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddCondition( gg_trg_Jump, Condition( function Trig_Jump_Conditions ) )
call TriggerAddAction( gg_trg_Jump, function Trig_Jump_Actions )
endfunction
function Trig_Smashing_Fury_Copy_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'Arpb' ) ) then
return false
endif
return true
endfunction
function Trig_Smashing_Fury_Copy_Func003002003001 takes nothing returns boolean
return ( IsUnitEnemy(GetFilterUnit(), GetOwningPlayer(udg_unit)) == true )
endfunction
function Trig_Smashing_Fury_Copy_Func003002003002001 takes nothing returns boolean
return ( IsUnitAliveBJ(GetFilterUnit()) == true )
endfunction
function Trig_Smashing_Fury_Copy_Func003002003002002 takes nothing returns boolean
return ( IsUnitType(GetFilterUnit(), UNIT_TYPE_GROUND) == true )
endfunction
function Trig_Smashing_Fury_Copy_Func003002003002 takes nothing returns boolean
return GetBooleanAnd( Trig_Smashing_Fury_Copy_Func003002003002001(), Trig_Smashing_Fury_Copy_Func003002003002002() )
endfunction
function Trig_Smashing_Fury_Copy_Func003002003 takes nothing returns boolean
return GetBooleanAnd( Trig_Smashing_Fury_Copy_Func003002003001(), Trig_Smashing_Fury_Copy_Func003002003002() )
endfunction
function Trig_Smashing_Fury_Copy_Actions takes nothing returns nothing
local integer c
local location a
local location b
local group f
local unit h
set c = 0
set h = GetSpellAbilityUnit()
loop
set udg_unit = h
set a = GetUnitLoc(h)
set f = GetUnitsInRangeOfLocMatching(475.00, a, Condition(function Trig_Smashing_Fury_Copy_Func003002003))
set b = GetUnitLoc(GroupPickRandomUnit(f))
call PolledWait( 0.60 )
call CreateNUnitsAtLoc( 1, 'hfoo', GetOwningPlayer(h), a, bj_UNIT_FACING )
call SetUnitAbilityLevelSwapped( 'ACtc', GetLastCreatedUnit(), GetUnitAbilityLevelSwapped('Arpb', h) )
call IssueImmediateOrderBJ( GetLastCreatedUnit(), "creepthunderclap" )
call UnitApplyTimedLifeBJ( 3.00, 'BTLF', GetLastCreatedUnit() )
call SetUnitPositionLoc( h, b )
call CreateNUnitsAtLoc( 1, 'hfoo', GetOwningPlayer(h), b, bj_UNIT_FACING )
call SetUnitAbilityLevelSwapped( 'Awrg', GetLastCreatedUnit(), GetUnitAbilityLevelSwapped('Arpb', h) )
call IssueImmediateOrderBJ( GetLastCreatedUnit(), "stomp" )
call UnitApplyTimedLifeBJ( 3.00, 'BTLF', GetLastCreatedUnit() )
set c = c + 1
exitwhen c == 5
endloop
call PolledWait( 1.00 )
set a = null
set b = null
set f = null
set h = null
endfunction
//===========================================================================
function InitTrig_Smashing_Fury_backup takes nothing returns nothing
set gg_trg_Smashing_Fury_backup = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Smashing_Fury_backup, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddCondition( gg_trg_Smashing_Fury_backup, Condition( function Trig_Smashing_Fury_Copy_Conditions ) )
call TriggerAddAction( gg_trg_Smashing_Fury_backup, function Trig_Smashing_Fury_Copy_Actions )
endfunction
function Trig_Unswoop_Conditions takes nothing returns boolean
if ( not ( UnitHasBuffBJ(GetAttacker(), 'B00B') == true ) ) then
return false
endif
return true
endfunction
function Trig_Unswoop_Actions takes nothing returns nothing
local unit m
set m = GetAttacker()
call PolledWait( 1.50 )
set udg_Point = GetUnitLoc(m)
call CreateNUnitsAtLoc( 1, 'hrif', GetOwningPlayer(m), udg_Point, bj_UNIT_FACING )
call IssueTargetOrderBJ( GetLastCreatedUnit(), "purge", m )
call UnitApplyTimedLifeBJ( 2.00, 'BTLF', GetLastCreatedUnit() )
call PolledWait( 0.50 )
call SetUnitPathing( m, true )
call UnitRemoveAbilityBJ( 'A028', m )
call PolledWait( 1.00 )
set m = null
endfunction
//===========================================================================
function InitTrig_Unswoop takes nothing returns nothing
set gg_trg_Unswoop = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Unswoop, EVENT_PLAYER_UNIT_ATTACKED )
call TriggerAddCondition( gg_trg_Unswoop, Condition( function Trig_Unswoop_Conditions ) )
call TriggerAddAction( gg_trg_Unswoop, function Trig_Unswoop_Actions )
endfunction
function Trig_Tractor_Beam_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'ACsw' ) ) then
return false
endif
return true
endfunction
function Trig_Tractor_Beam_Copy_Func004002003 takes nothing returns boolean
return ( IsUnitType(GetFilterUnit(), UNIT_TYPE_STRUCTURE) == false )
endfunction
function Trig_Tractor_Beam_Func006A takes nothing returns nothing
local unit u
local unit t
local unit a
set u = GetSpellTargetUnit()
set t = GetTriggerUnit()
set a = GetSpellAbilityUnit()
if ( GetUnitTypeId(GetEnumUnit()) != 'hbla' ) then
set udg_Point = OffsetLocation(udg_Point, GetRandomReal(-75.00, 75.00), GetRandomReal(-75.00, 75.00))
call SetUnitPositionLoc( GetEnumUnit(), udg_Point )
if ( IsUnitEnemy(GetEnumUnit(), GetOwningPlayer(t)) == true ) then
call UnitDamageTargetBJ( t, GetEnumUnit(), ( 440.00 * I2R(GetUnitAbilityLevelSwapped('ACsw', a)) ), ATTACK_TYPE_NORMAL, DAMAGE_TYPE_NORMAL )
else
endif
else
endif
call PolledWait( 1.00 )
set u = null
set t = null
set a = null
endfunction
function Trig_Tractor_Beam_Actions takes nothing returns nothing
local unit u
local unit t
local unit a
set u = GetSpellTargetUnit()
set t = GetTriggerUnit()
set a = GetSpellAbilityUnit()
loop
exitwhen ( ( UnitHasBuffBJ(u, 'B016') == true ) )
call TriggerSleepAction(RMaxBJ(bj_WAIT_FOR_COND_MIN_INTERVAL, 0.45))
endloop
set udg_Point = GetUnitLoc(u)
set udg_Unitgroup = GetUnitsInRangeOfLocMatching(( 200.00 + ( 25.00 * I2R(GetUnitAbilityLevelSwapped('ACsw', a)) ) ), udg_Point, Condition(function Trig_Tractor_Beam_Copy_Func004002003))
set udg_Point = GetUnitLoc(a)
call ForGroupBJ( udg_Unitgroup, function Trig_Tractor_Beam_Func006A )
endfunction
//===========================================================================
function InitTrig_Tractor_Beam takes nothing returns nothing
set gg_trg_Tractor_Beam = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Tractor_Beam, EVENT_PLAYER_UNIT_SPELL_EFFECT )
call TriggerAddCondition( gg_trg_Tractor_Beam, Condition( function Trig_Tractor_Beam_Conditions ) )
call TriggerAddAction( gg_trg_Tractor_Beam, function Trig_Tractor_Beam_Actions )
endfunction
function Trig_Absorbent_Carapace_Conditions takes nothing returns boolean
if ( not ( IsUnitType(GetAttackedUnitBJ(), UNIT_TYPE_HERO) == true ) ) then
return false
endif
if ( not ( UnitHasBuffBJ(GetAttackedUnitBJ(), 'B00A') == true ) ) then
return false
endif
return true
endfunction
function Trig_Absorbent_Carapace_Actions takes nothing returns nothing
local integer int = GetRandomInt(1, 100)
if int <= 4 then
call ModifyHeroStat( bj_HEROSTAT_STR, GetAttackedUnitBJ(), bj_MODIFYMETHOD_ADD, 1 )
endif
set int = GetRandomInt(1, 100)
if int <= 4 then
call ModifyHeroStat( bj_HEROSTAT_AGI, GetAttackedUnitBJ(), bj_MODIFYMETHOD_ADD, 1 )
else
endif
endfunction
//===========================================================================
function InitTrig_Absorbent_Carapace takes nothing returns nothing
set gg_trg_Absorbent_Carapace = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Absorbent_Carapace, EVENT_PLAYER_UNIT_ATTACKED )
call TriggerAddCondition( gg_trg_Absorbent_Carapace, Condition( function Trig_Absorbent_Carapace_Conditions ) )
call TriggerAddAction( gg_trg_Absorbent_Carapace, function Trig_Absorbent_Carapace_Actions )
endfunction
function Trig_Ice_Rain_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'AOls' ) ) then
return false
endif
return true
endfunction
function Trig_Ice_Rain_Actions takes nothing returns nothing
local integer i
local integer c
set c = 0
set i = ( GetUnitAbilityLevelSwapped('AOls', GetSpellAbilityUnit()) * 7 )
loop
set udg_Point = GetUnitLoc(GetSpellAbilityUnit())
call CreateNUnitsAtLoc( 1, 'uabo', GetOwningPlayer(GetSpellAbilityUnit()), udg_Point, bj_UNIT_FACING )
set udg_Point = OffsetLocation(udg_Point, GetRandomReal(-450.00, 450.00), GetRandomReal(-450.00, 450.00))
call IssuePointOrderLocBJ( GetLastCreatedUnit(), "rainoffire", udg_Point )
call UnitApplyTimedLifeBJ( 3.00, 'BTLF', GetLastCreatedUnit() )
set c = c + 1
exitwhen c == i
endloop
endfunction
//===========================================================================
function InitTrig_Ice_Rain takes nothing returns nothing
set gg_trg_Ice_Rain = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Ice_Rain, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddCondition( gg_trg_Ice_Rain, Condition( function Trig_Ice_Rain_Conditions ) )
call TriggerAddAction( gg_trg_Ice_Rain, function Trig_Ice_Rain_Actions )
endfunction
function Trig_TechLab_Conditions takes nothing returns boolean
if ( not ( GetUnitTypeId(GetAttacker()) == 'hlum' ) ) then
return false
endif
return true
endfunction
function Trig_TechLab_Actions takes nothing returns nothing
local unit g
set g = GetAttacker()
call SetUnitAnimation( g, "spell" )
call PolledWait( 1.50 )
call ResetUnitAnimation( g )
endfunction
//===========================================================================
function InitTrig_TechLab takes nothing returns nothing
set gg_trg_TechLab = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_TechLab, EVENT_PLAYER_UNIT_ATTACKED )
call TriggerAddCondition( gg_trg_TechLab, Condition( function Trig_TechLab_Conditions ) )
call TriggerAddAction( gg_trg_TechLab, function Trig_TechLab_Actions )
endfunction
function Trig_Kickp1_Func008C takes nothing returns boolean
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal1991" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Evan1993" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "HorcishAlliance" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Fat-Mans-Reveng" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "d_Alchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Badalchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal5" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "JediCal" ) ) then
return true
endif
return false
endfunction
function Trig_Kickp1_Func009C takes nothing returns boolean
if ( not ( GetPlayerName(udg_Player[1]) != "Cal1991" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[1]) != "Evan1993" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[1]) != "HorcishAlliance" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[1]) != "Fat-Mans-Reveng" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[1]) != "d_Alchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[1]) != "Badalchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[1]) != "Cal5" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[1]) != "JediCal" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[1]) != "DeadlyDuckling" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[1]) != "the.dude.abides" ) ) then
return false
endif
return true
endfunction
function Trig_Kickp1_Conditions takes nothing returns boolean
if ( not Trig_Kickp1_Func008C() ) then
return false
endif
if ( not Trig_Kickp1_Func009C() ) then
return false
endif
return true
endfunction
function Trig_Kickp1_Func007Func006A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_Kickp1_Func007Func009A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_Kickp1_Func007Func013A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_Kickp1_Func007Func019001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(1)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_Kickp1_Func007Func019002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(1)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_Kickp1_Func007Func020001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(2)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_Kickp1_Func007Func020002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(2)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_Kickp1_Func007C takes nothing returns boolean
if ( not GetBooleanOr( Trig_Kickp1_Func007Func019001(), Trig_Kickp1_Func007Func019002() ) ) then
return false
endif
if ( not GetBooleanOr( Trig_Kickp1_Func007Func020001(), Trig_Kickp1_Func007Func020002() ) ) then
return false
endif
return true
endfunction
function Trig_Kickp1_Actions takes nothing returns nothing
call CustomDefeatBJ( Player(0), "TRIGSTR_3054" )
set udg_PlayerLeft[1] = true
call SetPlayerAllianceBJ( Player(0), ALLIANCE_SHARED_CONTROL, true, Player(1) )
call SetPlayerAllianceBJ( Player(0), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(1) )
call SetPlayerAllianceBJ( Player(0), ALLIANCE_SHARED_CONTROL, true, Player(2) )
call SetPlayerAllianceBJ( Player(0), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(2) )
if ( Trig_Kickp1_Func007C() ) then
call DisableTrigger( gg_trg_Spawnp1 )
call DisableTrigger( gg_trg_Spawnp2 )
call DisableTrigger( gg_trg_Spawnp3 )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(0))
call ForGroupBJ( udg_Unitgroup, function Trig_Kickp1_Func007Func006A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(1))
call ForGroupBJ( udg_Unitgroup, function Trig_Kickp1_Func007Func009A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(2))
call ForGroupBJ( udg_Unitgroup, function Trig_Kickp1_Func007Func013A )
set udg_Buldings[1] = 0
set udg_Buldings[2] = 0
set udg_Buldings[3] = 0
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[1], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[2], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[3], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call ConditionalTriggerExecute( gg_trg_Decay )
else
call DoNothing( )
endif
endfunction
//===========================================================================
function InitTrig_Kickp1 takes nothing returns nothing
set gg_trg_Kickp1 = CreateTrigger( )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp1, Player(1), ( "+=~kick " + GetPlayerName(Player(0)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp1, Player(2), ( "+=~kick " + GetPlayerName(Player(0)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp1, Player(3), ( "+=~kick " + GetPlayerName(Player(0)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp1, Player(4), ( "+=~kick " + GetPlayerName(Player(0)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp1, Player(5), ( "+=~kick " + GetPlayerName(Player(0)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp1, Player(6), ( "+=~kick " + GetPlayerName(Player(0)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp1, Player(7), ( "+=~kick " + GetPlayerName(Player(0)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp1, Player(8), ( "+=~kick " + GetPlayerName(Player(0)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp1, Player(9), ( "+=~kick " + GetPlayerName(Player(0)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp1, Player(10), ( "+=~kick " + GetPlayerName(Player(0)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp1, Player(11), ( "+=~kick " + GetPlayerName(Player(0)) ), true )
call TriggerAddCondition( gg_trg_Kickp1, Condition( function Trig_Kickp1_Conditions ) )
call TriggerAddAction( gg_trg_Kickp1, function Trig_Kickp1_Actions )
endfunction
function Trig_Kickp3_Func002C takes nothing returns boolean
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal1991" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Evan1993" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "HorcishAlliance" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Fat-Mans-Reveng" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "d_Alchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Badalchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal5" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "JediCal" ) ) then
return true
endif
return false
endfunction
function Trig_Kickp3_Func003C takes nothing returns boolean
if ( not ( GetPlayerName(udg_Player[3]) != "Cal1991" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[3]) != "Evan1993" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[3]) != "HorcishAlliance" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[3]) != "Fat-Mans-Reveng" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[3]) != "d_Alchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[3]) != "Badalchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[3]) != "Cal5" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[3]) != "JediCal" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[3]) != "DeadlyDuckling" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[3]) != "the.dude.abides" ) ) then
return false
endif
return true
endfunction
function Trig_Kickp3_Conditions takes nothing returns boolean
if ( not Trig_Kickp3_Func002C() ) then
return false
endif
if ( not Trig_Kickp3_Func003C() ) then
return false
endif
return true
endfunction
function Trig_tree_Func006Func006A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_tree_Func006Func010A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_tree_Func006Func014A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_tree_Func006Func020001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(1)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_tree_Func006Func020002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(1)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_tree_Func006Func021001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(0)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_tree_Func006Func021002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(0)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_tree_Func006C takes nothing returns boolean
if ( not GetBooleanOr( Trig_tree_Func006Func020001(), Trig_tree_Func006Func020002() ) ) then
return false
endif
if ( not GetBooleanOr( Trig_tree_Func006Func021001(), Trig_tree_Func006Func021002() ) ) then
return false
endif
return true
endfunction
function Trig_Kickp3_Actions takes nothing returns nothing
call CustomDefeatBJ( Player(2), "TRIGSTR_3056" )
set udg_PlayerLeft[3] = true
call SetPlayerAllianceBJ( Player(2), ALLIANCE_SHARED_CONTROL, true, Player(1) )
call SetPlayerAllianceBJ( Player(2), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(1) )
call SetPlayerAllianceBJ( Player(2), ALLIANCE_SHARED_CONTROL, true, Player(0) )
call SetPlayerAllianceBJ( Player(2), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(0) )
if ( Trig_tree_Func006C() ) then
call DisableTrigger( gg_trg_Spawnp1 )
call DisableTrigger( gg_trg_Spawnp2 )
call DisableTrigger( gg_trg_Spawnp3 )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(0))
call ForGroupBJ( udg_Unitgroup, function Trig_tree_Func006Func006A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(1))
call ForGroupBJ( udg_Unitgroup, function Trig_tree_Func006Func010A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(2))
call ForGroupBJ( udg_Unitgroup, function Trig_tree_Func006Func014A )
set udg_Buldings[1] = 0
set udg_Buldings[2] = 0
set udg_Buldings[3] = 0
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[1], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[2], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[3], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call ConditionalTriggerExecute( gg_trg_Decay )
else
call DoNothing( )
endif
endfunction
//===========================================================================
function InitTrig_Kickp3 takes nothing returns nothing
set gg_trg_Kickp3 = CreateTrigger( )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp3, Player(0), ( "+=~kick " + GetPlayerName(Player(2)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp3, Player(1), ( "+=~kick " + GetPlayerName(Player(2)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp3, Player(3), ( "+=~kick " + GetPlayerName(Player(2)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp3, Player(4), ( "+=~kick " + GetPlayerName(Player(2)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp3, Player(5), ( "+=~kick " + GetPlayerName(Player(2)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp3, Player(6), ( "+=~kick " + GetPlayerName(Player(2)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp3, Player(7), ( "+=~kick " + GetPlayerName(Player(2)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp3, Player(8), ( "+=~kick " + GetPlayerName(Player(2)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp3, Player(9), ( "+=~kick " + GetPlayerName(Player(2)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp3, Player(10), ( "+=~kick " + GetPlayerName(Player(2)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp3, Player(11), ( "+=~kick " + GetPlayerName(Player(2)) ), true )
call TriggerAddCondition( gg_trg_Kickp3, Condition( function Trig_Kickp3_Conditions ) )
call TriggerAddAction( gg_trg_Kickp3, function Trig_Kickp3_Actions )
endfunction
function Trig_Kickp2_Func002C takes nothing returns boolean
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal1991" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Evan1993" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "HorcishAlliance" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Fat-Mans-Reveng" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "d_Alchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Badalchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal5" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "JediCal" ) ) then
return true
endif
return false
endfunction
function Trig_Kickp2_Func003C takes nothing returns boolean
if ( not ( GetPlayerName(udg_Player[2]) != "Cal1991" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[2]) != "Evan1993" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[2]) != "HorcishAlliance" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[2]) != "Fat-Mans-Reveng" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[2]) != "d_Alchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[2]) != "Badalchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[2]) != "Cal5" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[2]) != "JediCal" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[2]) != "DeadlyDuckling" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[2]) != "the.dude.abides" ) ) then
return false
endif
return true
endfunction
function Trig_Kickp2_Conditions takes nothing returns boolean
if ( not Trig_Kickp2_Func002C() ) then
return false
endif
if ( not Trig_Kickp2_Func003C() ) then
return false
endif
return true
endfunction
function Trig_two_Func006Func006A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_two_Func006Func010A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_two_Func006Func013A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_two_Func006Func019001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(0)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_two_Func006Func019002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(0)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_two_Func006Func020001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(2)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_two_Func006Func020002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(2)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_two_Func006C takes nothing returns boolean
if ( not GetBooleanOr( Trig_two_Func006Func019001(), Trig_two_Func006Func019002() ) ) then
return false
endif
if ( not GetBooleanOr( Trig_two_Func006Func020001(), Trig_two_Func006Func020002() ) ) then
return false
endif
return true
endfunction
function Trig_Kickp2_Actions takes nothing returns nothing
call CustomDefeatBJ( Player(1), "TRIGSTR_3055" )
set udg_PlayerLeft[2] = true
call SetPlayerAllianceBJ( Player(1), ALLIANCE_SHARED_CONTROL, true, Player(2) )
call SetPlayerAllianceBJ( Player(1), ALLIANCE_SHARED_CONTROL, true, Player(0) )
call SetPlayerAllianceBJ( Player(1), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(2) )
call SetPlayerAllianceBJ( Player(1), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(0) )
if ( Trig_two_Func006C() ) then
call DisableTrigger( gg_trg_Spawnp1 )
call DisableTrigger( gg_trg_Spawnp2 )
call DisableTrigger( gg_trg_Spawnp3 )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(0))
call ForGroupBJ( udg_Unitgroup, function Trig_two_Func006Func006A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(1))
call ForGroupBJ( udg_Unitgroup, function Trig_two_Func006Func010A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(2))
call ForGroupBJ( udg_Unitgroup, function Trig_two_Func006Func013A )
set udg_Buldings[1] = 0
set udg_Buldings[2] = 0
set udg_Buldings[3] = 0
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[1], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[2], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[3], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call ConditionalTriggerExecute( gg_trg_Decay )
else
call DoNothing( )
endif
endfunction
//===========================================================================
function InitTrig_Kickp2 takes nothing returns nothing
set gg_trg_Kickp2 = CreateTrigger( )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp2, Player(0), ( "+=~kick " + GetPlayerName(Player(1)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp2, Player(2), ( "+=~kick " + GetPlayerName(Player(1)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp2, Player(3), ( "+=~kick " + GetPlayerName(Player(1)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp2, Player(4), ( "+=~kick " + GetPlayerName(Player(1)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp2, Player(5), ( "+=~kick " + GetPlayerName(Player(1)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp2, Player(6), ( "+=~kick " + GetPlayerName(Player(1)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp2, Player(7), ( "+=~kick " + GetPlayerName(Player(1)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp2, Player(8), ( "+=~kick " + GetPlayerName(Player(1)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp2, Player(9), ( "+=~kick " + GetPlayerName(Player(1)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp2, Player(10), ( "+=~kick " + GetPlayerName(Player(1)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp2, Player(11), ( "+=~kick " + GetPlayerName(Player(1)) ), true )
call TriggerAddCondition( gg_trg_Kickp2, Condition( function Trig_Kickp2_Conditions ) )
call TriggerAddAction( gg_trg_Kickp2, function Trig_Kickp2_Actions )
endfunction
function Trig_Kickp4_Func002C takes nothing returns boolean
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal1991" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Evan1993" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "HorcishAlliance" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Fat-Mans-Reveng" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "d_Alchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Badalchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal5" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "JediCal" ) ) then
return true
endif
return false
endfunction
function Trig_Kickp4_Func003C takes nothing returns boolean
if ( not ( GetPlayerName(udg_Player[4]) != "Cal1991" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[4]) != "Evan1993" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[4]) != "HorcishAlliance" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[4]) != "Fat-Mans-Reveng" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[4]) != "d_Alchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[4]) != "Badalchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[4]) != "Cal5" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[4]) != "JediCal" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[4]) != "DeadlyDuckling" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[4]) != "the.dude.abides" ) ) then
return false
endif
return true
endfunction
function Trig_Kickp4_Conditions takes nothing returns boolean
if ( not Trig_Kickp4_Func002C() ) then
return false
endif
if ( not Trig_Kickp4_Func003C() ) then
return false
endif
return true
endfunction
function Trig_four_Func006Func002A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_four_Func006Func006A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_four_Func006Func010A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_four_Func006Func020001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(4)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_four_Func006Func020002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(4)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_four_Func006Func021001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(5)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_four_Func006Func021002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(5)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_four_Func006C takes nothing returns boolean
if ( not GetBooleanOr( Trig_four_Func006Func020001(), Trig_four_Func006Func020002() ) ) then
return false
endif
if ( not GetBooleanOr( Trig_four_Func006Func021001(), Trig_four_Func006Func021002() ) ) then
return false
endif
return true
endfunction
function Trig_Kickp4_Actions takes nothing returns nothing
call CustomDefeatBJ( Player(3), "TRIGSTR_3095" )
set udg_PlayerLeft[4] = true
call SetPlayerAllianceBJ( Player(3), ALLIANCE_SHARED_CONTROL, true, Player(4) )
call SetPlayerAllianceBJ( Player(3), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(4) )
call SetPlayerAllianceBJ( Player(3), ALLIANCE_SHARED_CONTROL, true, Player(5) )
call SetPlayerAllianceBJ( Player(3), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(5) )
if ( Trig_four_Func006C() ) then
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(3))
call ForGroupBJ( udg_Unitgroup, function Trig_four_Func006Func002A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(4))
call ForGroupBJ( udg_Unitgroup, function Trig_four_Func006Func006A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(5))
call ForGroupBJ( udg_Unitgroup, function Trig_four_Func006Func010A )
set udg_Buldings[4] = 0
set udg_Buldings[5] = 0
set udg_Buldings[6] = 0
call DisableTrigger( gg_trg_Spawnp4 )
call DisableTrigger( gg_trg_Spawnp5 )
call DisableTrigger( gg_trg_Spawnp6 )
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[4], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[5], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[6], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call ConditionalTriggerExecute( gg_trg_Decay )
else
call DoNothing( )
endif
endfunction
//===========================================================================
function InitTrig_Kickp4 takes nothing returns nothing
set gg_trg_Kickp4 = CreateTrigger( )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp4, Player(0), ( "+=~kick " + GetPlayerName(Player(3)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp4, Player(1), ( "+=~kick " + GetPlayerName(Player(3)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp4, Player(2), ( "+=~kick " + GetPlayerName(Player(3)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp4, Player(4), ( "+=~kick " + GetPlayerName(Player(3)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp4, Player(5), ( "+=~kick " + GetPlayerName(Player(3)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp4, Player(6), ( "+=~kick " + GetPlayerName(Player(3)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp4, Player(7), ( "+=~kick " + GetPlayerName(Player(3)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp4, Player(8), ( "+=~kick " + GetPlayerName(Player(3)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp4, Player(9), ( "+=~kick " + GetPlayerName(Player(3)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp4, Player(10), ( "+=~kick " + GetPlayerName(Player(3)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp4, Player(11), ( "+=~kick " + GetPlayerName(Player(3)) ), true )
call TriggerAddCondition( gg_trg_Kickp4, Condition( function Trig_Kickp4_Conditions ) )
call TriggerAddAction( gg_trg_Kickp4, function Trig_Kickp4_Actions )
endfunction
function Trig_Kickp5_Func002C takes nothing returns boolean
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal1991" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Evan1993" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "HorcishAlliance" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Fat-Mans-Reveng" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "d_Alchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Badalchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal5" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "JediCal" ) ) then
return true
endif
return false
endfunction
function Trig_Kickp5_Func003C takes nothing returns boolean
if ( not ( GetPlayerName(udg_Player[5]) != "Cal1991" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[5]) != "Evan1993" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[5]) != "HorcishAlliance" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[5]) != "Fat-Mans-Reveng" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[5]) != "d_Alchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[5]) != "Badalchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[5]) != "Cal5" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[5]) != "JediCal" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[5]) != "DeadlyDuckling" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[5]) != "the.dude.abides" ) ) then
return false
endif
return true
endfunction
function Trig_Kickp5_Conditions takes nothing returns boolean
if ( not Trig_Kickp5_Func002C() ) then
return false
endif
if ( not Trig_Kickp5_Func003C() ) then
return false
endif
return true
endfunction
function Trig_five_Func006Func002A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_five_Func006Func006A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_five_Func006Func010A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_five_Func006Func020001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(3)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_five_Func006Func020002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(3)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_five_Func006Func021001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(5)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_five_Func006Func021002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(5)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_five_Func006C takes nothing returns boolean
if ( not GetBooleanOr( Trig_five_Func006Func020001(), Trig_five_Func006Func020002() ) ) then
return false
endif
if ( not GetBooleanOr( Trig_five_Func006Func021001(), Trig_five_Func006Func021002() ) ) then
return false
endif
return true
endfunction
function Trig_Kickp5_Actions takes nothing returns nothing
call CustomDefeatBJ( Player(4), "TRIGSTR_3058" )
set udg_PlayerLeft[5] = true
call SetPlayerAllianceBJ( Player(4), ALLIANCE_SHARED_CONTROL, true, Player(5) )
call SetPlayerAllianceBJ( Player(4), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(5) )
call SetPlayerAllianceBJ( Player(4), ALLIANCE_SHARED_CONTROL, true, Player(3) )
call SetPlayerAllianceBJ( Player(4), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(3) )
if ( Trig_five_Func006C() ) then
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(3))
call ForGroupBJ( udg_Unitgroup, function Trig_five_Func006Func002A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(4))
call ForGroupBJ( udg_Unitgroup, function Trig_five_Func006Func006A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(5))
call ForGroupBJ( udg_Unitgroup, function Trig_five_Func006Func010A )
set udg_Buldings[4] = 0
set udg_Buldings[5] = 0
set udg_Buldings[6] = 0
call DisableTrigger( gg_trg_Spawnp4 )
call DisableTrigger( gg_trg_Spawnp5 )
call DisableTrigger( gg_trg_Spawnp6 )
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[4], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[5], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[6], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call ConditionalTriggerExecute( gg_trg_Decay )
else
call DoNothing( )
endif
endfunction
//===========================================================================
function InitTrig_Kickp5 takes nothing returns nothing
set gg_trg_Kickp5 = CreateTrigger( )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp5, Player(0), ( "+=~kick " + GetPlayerName(Player(4)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp5, Player(1), ( "+=~kick " + GetPlayerName(Player(4)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp5, Player(2), ( "+=~kick " + GetPlayerName(Player(4)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp5, Player(3), ( "+=~kick " + GetPlayerName(Player(4)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp5, Player(5), ( "+=~kick " + GetPlayerName(Player(4)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp5, Player(6), ( "+=~kick " + GetPlayerName(Player(4)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp5, Player(7), ( "+=~kick " + GetPlayerName(Player(4)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp5, Player(8), ( "+=~kick " + GetPlayerName(Player(4)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp5, Player(9), ( "+=~kick " + GetPlayerName(Player(4)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp5, Player(10), ( "+=~kick " + GetPlayerName(Player(4)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp5, Player(11), ( "+=~kick " + GetPlayerName(Player(4)) ), true )
call TriggerAddCondition( gg_trg_Kickp5, Condition( function Trig_Kickp5_Conditions ) )
call TriggerAddAction( gg_trg_Kickp5, function Trig_Kickp5_Actions )
endfunction
function Trig_Kickp6_Func002C takes nothing returns boolean
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal1991" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Evan1993" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "HorcishAlliance" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Fat-Mans-Reveng" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "d_Alchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Badalchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal5" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "JediCal" ) ) then
return true
endif
return false
endfunction
function Trig_Kickp6_Func003C takes nothing returns boolean
if ( not ( GetPlayerName(udg_Player[6]) != "Cal1991" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[6]) != "Evan1993" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[6]) != "HorcishAlliance" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[6]) != "Fat-Mans-Reveng" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[6]) != "d_Alchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[6]) != "Badalchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[6]) != "Cal5" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[6]) != "JediCal" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[6]) != "DeadlyDuckling" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[6]) != "the.dude.abides" ) ) then
return false
endif
return true
endfunction
function Trig_Kickp6_Conditions takes nothing returns boolean
if ( not Trig_Kickp6_Func002C() ) then
return false
endif
if ( not Trig_Kickp6_Func003C() ) then
return false
endif
return true
endfunction
function Trig_six_Func006Func002A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_six_Func006Func006A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_six_Func006Func010A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_six_Func006Func020001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(4)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_six_Func006Func020002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(4)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_six_Func006Func021001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(3)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_six_Func006Func021002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(3)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_six_Func006C takes nothing returns boolean
if ( not GetBooleanOr( Trig_six_Func006Func020001(), Trig_six_Func006Func020002() ) ) then
return false
endif
if ( not GetBooleanOr( Trig_six_Func006Func021001(), Trig_six_Func006Func021002() ) ) then
return false
endif
return true
endfunction
function Trig_Kickp6_Actions takes nothing returns nothing
call CustomDefeatBJ( Player(5), "TRIGSTR_3059" )
set udg_PlayerLeft[6] = true
call SetPlayerAllianceBJ( Player(5), ALLIANCE_SHARED_CONTROL, true, Player(4) )
call SetPlayerAllianceBJ( Player(5), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(4) )
call SetPlayerAllianceBJ( Player(5), ALLIANCE_SHARED_CONTROL, true, Player(3) )
call SetPlayerAllianceBJ( Player(5), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(3) )
if ( Trig_six_Func006C() ) then
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(3))
call ForGroupBJ( udg_Unitgroup, function Trig_six_Func006Func002A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(4))
call ForGroupBJ( udg_Unitgroup, function Trig_six_Func006Func006A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(5))
call ForGroupBJ( udg_Unitgroup, function Trig_six_Func006Func010A )
set udg_Buldings[4] = 0
set udg_Buldings[5] = 0
set udg_Buldings[6] = 0
call DisableTrigger( gg_trg_Spawnp4 )
call DisableTrigger( gg_trg_Spawnp5 )
call DisableTrigger( gg_trg_Spawnp6 )
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[4], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[5], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[6], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call ConditionalTriggerExecute( gg_trg_Decay )
else
call DoNothing( )
endif
endfunction
//===========================================================================
function InitTrig_Kickp6 takes nothing returns nothing
set gg_trg_Kickp6 = CreateTrigger( )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp6, Player(0), ( "+=~kick " + GetPlayerName(Player(5)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp6, Player(1), ( "+=~kick " + GetPlayerName(Player(5)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp6, Player(2), ( "+=~kick " + GetPlayerName(Player(5)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp6, Player(3), ( "+=~kick " + GetPlayerName(Player(5)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp6, Player(4), ( "+=~kick " + GetPlayerName(Player(5)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp6, Player(6), ( "+=~kick " + GetPlayerName(Player(5)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp6, Player(7), ( "+=~kick " + GetPlayerName(Player(5)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp6, Player(8), ( "+=~kick " + GetPlayerName(Player(5)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp6, Player(9), ( "+=~kick " + GetPlayerName(Player(5)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp6, Player(10), ( "+=~kick " + GetPlayerName(Player(5)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp6, Player(11), ( "+=~kick " + GetPlayerName(Player(5)) ), true )
call TriggerAddCondition( gg_trg_Kickp6, Condition( function Trig_Kickp6_Conditions ) )
call TriggerAddAction( gg_trg_Kickp6, function Trig_Kickp6_Actions )
endfunction
function Trig_Kickp7_Func002C takes nothing returns boolean
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal1991" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Evan1993" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "HorcishAlliance" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Fat-Mans-Reveng" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "d_Alchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Badalchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal5" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "JediCal" ) ) then
return true
endif
return false
endfunction
function Trig_Kickp7_Func003C takes nothing returns boolean
if ( not ( GetPlayerName(udg_Player[7]) != "Cal1991" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[7]) != "Evan1993" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[7]) != "HorcishAlliance" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[7]) != "Fat-Mans-Reveng" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[7]) != "d_Alchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[7]) != "Badalchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[7]) != "Cal5" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[7]) != "JediCal" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[7]) != "DeadlyDuckling" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[7]) != "the.dude.abides" ) ) then
return false
endif
return true
endfunction
function Trig_Kickp7_Conditions takes nothing returns boolean
if ( not Trig_Kickp7_Func002C() ) then
return false
endif
if ( not Trig_Kickp7_Func003C() ) then
return false
endif
return true
endfunction
function Trig_seven_Func006Func002A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_seven_Func006Func006A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_seven_Func006Func010A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_seven_Func006Func020001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(7)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_seven_Func006Func020002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(7)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_seven_Func006Func021001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(8)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_seven_Func006Func021002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(8)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_seven_Func006C takes nothing returns boolean
if ( not GetBooleanOr( Trig_seven_Func006Func020001(), Trig_seven_Func006Func020002() ) ) then
return false
endif
if ( not GetBooleanOr( Trig_seven_Func006Func021001(), Trig_seven_Func006Func021002() ) ) then
return false
endif
return true
endfunction
function Trig_Kickp7_Actions takes nothing returns nothing
call CustomDefeatBJ( Player(6), "TRIGSTR_3060" )
set udg_PlayerLeft[7] = true
call SetPlayerAllianceBJ( Player(6), ALLIANCE_SHARED_CONTROL, true, Player(7) )
call SetPlayerAllianceBJ( Player(6), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(7) )
call SetPlayerAllianceBJ( Player(6), ALLIANCE_SHARED_CONTROL, true, Player(8) )
call SetPlayerAllianceBJ( Player(6), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(8) )
if ( Trig_seven_Func006C() ) then
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(6))
call ForGroupBJ( udg_Unitgroup, function Trig_seven_Func006Func002A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(7))
call ForGroupBJ( udg_Unitgroup, function Trig_seven_Func006Func006A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(8))
call ForGroupBJ( udg_Unitgroup, function Trig_seven_Func006Func010A )
set udg_Buldings[7] = 0
set udg_Buldings[8] = 0
set udg_Buldings[9] = 0
call DisableTrigger( gg_trg_Spawnp7 )
call DisableTrigger( gg_trg_Spawnp8 )
call DisableTrigger( gg_trg_Spawnp9 )
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[7], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[8], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[9], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call ConditionalTriggerExecute( gg_trg_Decay )
else
call DoNothing( )
endif
endfunction
//===========================================================================
function InitTrig_Kickp7 takes nothing returns nothing
set gg_trg_Kickp7 = CreateTrigger( )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp7, Player(0), ( "+=~kick " + GetPlayerName(Player(6)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp7, Player(1), ( "+=~kick " + GetPlayerName(Player(6)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp7, Player(2), ( "+=~kick " + GetPlayerName(Player(6)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp7, Player(3), ( "+=~kick " + GetPlayerName(Player(6)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp7, Player(4), ( "+=~kick " + GetPlayerName(Player(6)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp7, Player(5), ( "+=~kick " + GetPlayerName(Player(6)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp7, Player(7), ( "+=~kick " + GetPlayerName(Player(6)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp7, Player(8), ( "+=~kick " + GetPlayerName(Player(6)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp7, Player(9), ( "+=~kick " + GetPlayerName(Player(6)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp7, Player(10), ( "+=~kick " + GetPlayerName(Player(6)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp7, Player(11), ( "+=~kick " + GetPlayerName(Player(6)) ), true )
call TriggerAddCondition( gg_trg_Kickp7, Condition( function Trig_Kickp7_Conditions ) )
call TriggerAddAction( gg_trg_Kickp7, function Trig_Kickp7_Actions )
endfunction
function Trig_Kickp8_Func002C takes nothing returns boolean
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal1991" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Evan1993" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "HorcishAlliance" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Fat-Mans-Reveng" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "d_Alchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Badalchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal5" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "JediCal" ) ) then
return true
endif
return false
endfunction
function Trig_Kickp8_Func003C takes nothing returns boolean
if ( not ( GetPlayerName(udg_Player[8]) != "Cal1991" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[8]) != "Evan1993" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[8]) != "HorcishAlliance" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[8]) != "Fat-Mans-Reveng" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[8]) != "d_Alchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[8]) != "Badalchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[8]) != "Cal5" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[8]) != "JediCal" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[8]) != "DeadlyDuckling" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[8]) != "the.dude.abides" ) ) then
return false
endif
return true
endfunction
function Trig_Kickp8_Conditions takes nothing returns boolean
if ( not Trig_Kickp8_Func002C() ) then
return false
endif
if ( not Trig_Kickp8_Func003C() ) then
return false
endif
return true
endfunction
function Trig_eight_Func006Func002A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_eight_Func006Func006A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_eight_Func006Func010A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_eight_Func006Func020001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(6)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_eight_Func006Func020002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(6)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_eight_Func006Func021001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(8)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_eight_Func006Func021002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(8)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_eight_Func006C takes nothing returns boolean
if ( not GetBooleanOr( Trig_eight_Func006Func020001(), Trig_eight_Func006Func020002() ) ) then
return false
endif
if ( not GetBooleanOr( Trig_eight_Func006Func021001(), Trig_eight_Func006Func021002() ) ) then
return false
endif
return true
endfunction
function Trig_Kickp8_Actions takes nothing returns nothing
call CustomDefeatBJ( Player(7), "TRIGSTR_3061" )
set udg_PlayerLeft[8] = true
call SetPlayerAllianceBJ( Player(7), ALLIANCE_SHARED_CONTROL, true, Player(6) )
call SetPlayerAllianceBJ( Player(7), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(6) )
call SetPlayerAllianceBJ( Player(7), ALLIANCE_SHARED_CONTROL, true, Player(8) )
call SetPlayerAllianceBJ( Player(7), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(8) )
if ( Trig_eight_Func006C() ) then
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(6))
call ForGroupBJ( udg_Unitgroup, function Trig_eight_Func006Func002A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(7))
call ForGroupBJ( udg_Unitgroup, function Trig_eight_Func006Func006A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(8))
call ForGroupBJ( udg_Unitgroup, function Trig_eight_Func006Func010A )
set udg_Buldings[7] = 0
set udg_Buldings[8] = 0
set udg_Buldings[9] = 0
call DisableTrigger( gg_trg_Spawnp7 )
call DisableTrigger( gg_trg_Spawnp8 )
call DisableTrigger( gg_trg_Spawnp9 )
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[7], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[8], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[9], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call ConditionalTriggerExecute( gg_trg_Decay )
else
call DoNothing( )
endif
endfunction
//===========================================================================
function InitTrig_Kickp8 takes nothing returns nothing
set gg_trg_Kickp8 = CreateTrigger( )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp8, Player(0), ( "+=~kick " + GetPlayerName(Player(7)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp8, Player(1), ( "+=~kick " + GetPlayerName(Player(7)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp8, Player(2), ( "+=~kick " + GetPlayerName(Player(7)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp8, Player(3), ( "+=~kick " + GetPlayerName(Player(7)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp8, Player(4), ( "+=~kick " + GetPlayerName(Player(7)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp8, Player(5), ( "+=~kick " + GetPlayerName(Player(7)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp8, Player(6), ( "+=~kick " + GetPlayerName(Player(7)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp8, Player(8), ( "+=~kick " + GetPlayerName(Player(7)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp8, Player(9), ( "+=~kick " + GetPlayerName(Player(7)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp8, Player(10), ( "+=~kick " + GetPlayerName(Player(7)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp8, Player(11), ( "+=~kick " + GetPlayerName(Player(7)) ), true )
call TriggerAddCondition( gg_trg_Kickp8, Condition( function Trig_Kickp8_Conditions ) )
call TriggerAddAction( gg_trg_Kickp8, function Trig_Kickp8_Actions )
endfunction
function Trig_Kickp9_Func002C takes nothing returns boolean
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal1991" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Evan1993" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "HorcishAlliance" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Fat-Mans-Reveng" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "d_Alchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Badalchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal5" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "JediCal" ) ) then
return true
endif
return false
endfunction
function Trig_Kickp9_Func003C takes nothing returns boolean
if ( not ( GetPlayerName(udg_Player[9]) != "Cal1991" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[9]) != "Evan1993" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[9]) != "HorcishAlliance" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[9]) != "Fat-Mans-Reveng" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[9]) != "d_Alchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[9]) != "Badalchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[9]) != "Cal5" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[9]) != "JediCal" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[9]) != "DeadlyDuckling" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[9]) != "the.dude.abides" ) ) then
return false
endif
return true
endfunction
function Trig_Kickp9_Conditions takes nothing returns boolean
if ( not Trig_Kickp9_Func002C() ) then
return false
endif
if ( not Trig_Kickp9_Func003C() ) then
return false
endif
return true
endfunction
function Trig_nine_Func006Func002A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_nine_Func006Func006A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_nine_Func006Func010A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_nine_Func006Func020001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(7)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_nine_Func006Func020002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(7)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_nine_Func006Func021001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(6)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_nine_Func006Func021002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(6)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_nine_Func006C takes nothing returns boolean
if ( not GetBooleanOr( Trig_nine_Func006Func020001(), Trig_nine_Func006Func020002() ) ) then
return false
endif
if ( not GetBooleanOr( Trig_nine_Func006Func021001(), Trig_nine_Func006Func021002() ) ) then
return false
endif
return true
endfunction
function Trig_Kickp9_Actions takes nothing returns nothing
call CustomDefeatBJ( Player(8), "TRIGSTR_3062" )
set udg_PlayerLeft[9] = true
call SetPlayerAllianceBJ( Player(8), ALLIANCE_SHARED_CONTROL, true, Player(6) )
call SetPlayerAllianceBJ( Player(8), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(6) )
call SetPlayerAllianceBJ( Player(8), ALLIANCE_SHARED_CONTROL, true, Player(7) )
call SetPlayerAllianceBJ( Player(8), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(7) )
if ( Trig_nine_Func006C() ) then
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(6))
call ForGroupBJ( udg_Unitgroup, function Trig_nine_Func006Func002A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(7))
call ForGroupBJ( udg_Unitgroup, function Trig_nine_Func006Func006A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(8))
call ForGroupBJ( udg_Unitgroup, function Trig_nine_Func006Func010A )
set udg_Buldings[7] = 0
set udg_Buldings[8] = 0
set udg_Buldings[9] = 0
call DisableTrigger( gg_trg_Spawnp7 )
call DisableTrigger( gg_trg_Spawnp8 )
call DisableTrigger( gg_trg_Spawnp9 )
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[7], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[8], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[9], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call ConditionalTriggerExecute( gg_trg_Decay )
else
call DoNothing( )
endif
endfunction
//===========================================================================
function InitTrig_Kickp9 takes nothing returns nothing
set gg_trg_Kickp9 = CreateTrigger( )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp9, Player(0), ( "+=~kick " + GetPlayerName(Player(8)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp9, Player(1), ( "+=~kick " + GetPlayerName(Player(8)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp9, Player(2), ( "+=~kick " + GetPlayerName(Player(8)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp9, Player(3), ( "+=~kick " + GetPlayerName(Player(8)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp9, Player(4), ( "+=~kick " + GetPlayerName(Player(8)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp9, Player(5), ( "+=~kick " + GetPlayerName(Player(8)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp9, Player(6), ( "+=~kick " + GetPlayerName(Player(8)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp9, Player(7), ( "+=~kick " + GetPlayerName(Player(8)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp9, Player(9), ( "+=~kick " + GetPlayerName(Player(8)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp9, Player(10), ( "+=~kick " + GetPlayerName(Player(8)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp9, Player(11), ( "+=~kick " + GetPlayerName(Player(8)) ), true )
call TriggerAddCondition( gg_trg_Kickp9, Condition( function Trig_Kickp9_Conditions ) )
call TriggerAddAction( gg_trg_Kickp9, function Trig_Kickp9_Actions )
endfunction
function Trig_Kickp11_Func002C takes nothing returns boolean
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal1991" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Evan1993" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "HorcishAlliance" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Fat-Mans-Reveng" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "d_Alchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Badalchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal5" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "JediCal" ) ) then
return true
endif
return false
endfunction
function Trig_Kickp11_Func003C takes nothing returns boolean
if ( not ( GetPlayerName(udg_Player[11]) != "Cal1991" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[11]) != "Evan1993" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[11]) != "HorcishAlliance" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[11]) != "Fat-Mans-Reveng" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[11]) != "d_Alchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[11]) != "Badalchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[11]) != "Cal5" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[11]) != "JediCal" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[11]) != "DeadlyDuckling" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[11]) != "the.dude.abides" ) ) then
return false
endif
return true
endfunction
function Trig_Kickp11_Conditions takes nothing returns boolean
if ( not Trig_Kickp11_Func002C() ) then
return false
endif
if ( not Trig_Kickp11_Func003C() ) then
return false
endif
return true
endfunction
function Trig_leven_Func006Func002A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_leven_Func006Func006A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_leven_Func006Func010A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_leven_Func006Func020001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(9)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_leven_Func006Func020002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(9)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_leven_Func006Func021001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(11)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_leven_Func006Func021002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(11)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_leven_Func006C takes nothing returns boolean
if ( not GetBooleanOr( Trig_leven_Func006Func020001(), Trig_leven_Func006Func020002() ) ) then
return false
endif
if ( not GetBooleanOr( Trig_leven_Func006Func021001(), Trig_leven_Func006Func021002() ) ) then
return false
endif
return true
endfunction
function Trig_Kickp11_Actions takes nothing returns nothing
call CustomDefeatBJ( Player(10), "TRIGSTR_3064" )
set udg_PlayerLeft[11] = true
call SetPlayerAllianceBJ( Player(10), ALLIANCE_SHARED_CONTROL, true, Player(11) )
call SetPlayerAllianceBJ( Player(10), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(11) )
call SetPlayerAllianceBJ( Player(10), ALLIANCE_SHARED_CONTROL, true, Player(9) )
call SetPlayerAllianceBJ( Player(10), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(9) )
if ( Trig_leven_Func006C() ) then
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(9))
call ForGroupBJ( udg_Unitgroup, function Trig_leven_Func006Func002A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(10))
call ForGroupBJ( udg_Unitgroup, function Trig_leven_Func006Func006A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(11))
call ForGroupBJ( udg_Unitgroup, function Trig_leven_Func006Func010A )
set udg_Buldings[10] = 0
set udg_Buldings[11] = 0
set udg_Buldings[12] = 0
call DisableTrigger( gg_trg_Spawnp10 )
call DisableTrigger( gg_trg_Spawnp11 )
call DisableTrigger( gg_trg_Spawnp12 )
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[10], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[11], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[12], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call ConditionalTriggerExecute( gg_trg_Decay )
else
call DoNothing( )
endif
endfunction
//===========================================================================
function InitTrig_Kickp11 takes nothing returns nothing
set gg_trg_Kickp11 = CreateTrigger( )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp11, Player(0), ( "+=~kick " + GetPlayerName(Player(10)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp11, Player(1), ( "+=~kick " + GetPlayerName(Player(10)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp11, Player(2), ( "+=~kick " + GetPlayerName(Player(10)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp11, Player(3), ( "+=~kick " + GetPlayerName(Player(10)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp11, Player(4), ( "+=~kick " + GetPlayerName(Player(10)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp11, Player(5), ( "+=~kick " + GetPlayerName(Player(10)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp11, Player(6), ( "+=~kick " + GetPlayerName(Player(10)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp11, Player(7), ( "+=~kick " + GetPlayerName(Player(10)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp11, Player(8), ( "+=~kick " + GetPlayerName(Player(10)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp11, Player(9), ( "+=~kick " + GetPlayerName(Player(10)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp11, Player(11), ( "+=~kick " + GetPlayerName(Player(10)) ), true )
call TriggerAddCondition( gg_trg_Kickp11, Condition( function Trig_Kickp11_Conditions ) )
call TriggerAddAction( gg_trg_Kickp11, function Trig_Kickp11_Actions )
endfunction
function Trig_Kickp10_Func002C takes nothing returns boolean
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal1991" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Evan1993" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "HorcishAlliance" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Fat-Mans-Reveng" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "d_Alchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Badalchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal5" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "JediCal" ) ) then
return true
endif
return false
endfunction
function Trig_Kickp10_Func003C takes nothing returns boolean
if ( not ( GetPlayerName(udg_Player[10]) != "Cal1991" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[10]) != "Evan1993" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[10]) != "HorcishAlliance" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[10]) != "Fat-Mans-Reveng" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[10]) != "d_Alchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[10]) != "Badalchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[10]) != "Cal5" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[10]) != "JediCal" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[10]) != "DeadlyDuckling" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[10]) != "the.dude.abides" ) ) then
return false
endif
return true
endfunction
function Trig_Kickp10_Conditions takes nothing returns boolean
if ( not Trig_Kickp10_Func002C() ) then
return false
endif
if ( not Trig_Kickp10_Func003C() ) then
return false
endif
return true
endfunction
function Trig_ten_Func006Func002A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_ten_Func006Func006A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_ten_Func006Func010A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_ten_Func006Func020001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(10)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_ten_Func006Func020002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(10)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_ten_Func006Func021001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(11)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_ten_Func006Func021002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(11)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_ten_Func006C takes nothing returns boolean
if ( not GetBooleanOr( Trig_ten_Func006Func020001(), Trig_ten_Func006Func020002() ) ) then
return false
endif
if ( not GetBooleanOr( Trig_ten_Func006Func021001(), Trig_ten_Func006Func021002() ) ) then
return false
endif
return true
endfunction
function Trig_Kickp10_Actions takes nothing returns nothing
call CustomDefeatBJ( Player(9), "TRIGSTR_3063" )
set udg_PlayerLeft[10] = true
call SetPlayerAllianceBJ( Player(9), ALLIANCE_SHARED_CONTROL, true, Player(10) )
call SetPlayerAllianceBJ( Player(9), ALLIANCE_SHARED_CONTROL, true, Player(11) )
call SetPlayerAllianceBJ( Player(9), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(10) )
call SetPlayerAllianceBJ( Player(9), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(11) )
if ( Trig_ten_Func006C() ) then
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(9))
call ForGroupBJ( udg_Unitgroup, function Trig_ten_Func006Func002A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(10))
call ForGroupBJ( udg_Unitgroup, function Trig_ten_Func006Func006A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(11))
call ForGroupBJ( udg_Unitgroup, function Trig_ten_Func006Func010A )
set udg_Buldings[10] = 0
set udg_Buldings[11] = 0
set udg_Buldings[12] = 0
call DisableTrigger( gg_trg_Spawnp10 )
call DisableTrigger( gg_trg_Spawnp11 )
call DisableTrigger( gg_trg_Spawnp12 )
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[10], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[11], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[12], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call ConditionalTriggerExecute( gg_trg_Decay )
else
call DoNothing( )
endif
endfunction
//===========================================================================
function InitTrig_Kickp10 takes nothing returns nothing
set gg_trg_Kickp10 = CreateTrigger( )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp10, Player(0), ( "+=~kick " + GetPlayerName(Player(9)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp10, Player(1), ( "+=~kick " + GetPlayerName(Player(9)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp10, Player(2), ( "+=~kick " + GetPlayerName(Player(9)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp10, Player(3), ( "+=~kick " + GetPlayerName(Player(9)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp10, Player(4), ( "+=~kick " + GetPlayerName(Player(9)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp10, Player(5), ( "+=~kick " + GetPlayerName(Player(9)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp10, Player(6), ( "+=~kick " + GetPlayerName(Player(9)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp10, Player(7), ( "+=~kick " + GetPlayerName(Player(9)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp10, Player(8), ( "+=~kick " + GetPlayerName(Player(9)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp10, Player(10), ( "+=~kick " + GetPlayerName(Player(9)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp10, Player(11), ( "+=~kick " + GetPlayerName(Player(9)) ), true )
call TriggerAddCondition( gg_trg_Kickp10, Condition( function Trig_Kickp10_Conditions ) )
call TriggerAddAction( gg_trg_Kickp10, function Trig_Kickp10_Actions )
endfunction
function Trig_Kickp12_Func002C takes nothing returns boolean
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal1991" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Evan1993" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "HorcishAlliance" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Fat-Mans-Reveng" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "d_Alchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Badalchemi" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "Cal5" ) ) then
return true
endif
if ( ( GetPlayerName(GetTriggerPlayer()) == "JediCal" ) ) then
return true
endif
return false
endfunction
function Trig_Kickp12_Func003C takes nothing returns boolean
if ( not ( GetPlayerName(udg_Player[12]) != "Cal1991" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[12]) != "Evan1993" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[12]) != "HorcishAlliance" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[12]) != "Fat-Mans-Reveng" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[12]) != "d_Alchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[12]) != "Badalchemi" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[12]) != "Cal5" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[12]) != "JediCal" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[12]) != "DeadlyDuckling" ) ) then
return false
endif
if ( not ( GetPlayerName(udg_Player[12]) != "the.dude.abides" ) ) then
return false
endif
return true
endfunction
function Trig_Kickp12_Conditions takes nothing returns boolean
if ( not Trig_Kickp12_Func002C() ) then
return false
endif
if ( not Trig_Kickp12_Func003C() ) then
return false
endif
return true
endfunction
function Trig_twewve_Func006Func002A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_twewve_Func006Func006A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_twewve_Func006Func010A takes nothing returns nothing
call SetUnitOwner( GetEnumUnit(), Player(bj_PLAYER_NEUTRAL_VICTIM), true )
endfunction
function Trig_twewve_Func006Func020001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(10)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_twewve_Func006Func020002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(10)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_twewve_Func006Func021001 takes nothing returns boolean
return ( GetPlayerSlotState(Player(9)) == PLAYER_SLOT_STATE_EMPTY )
endfunction
function Trig_twewve_Func006Func021002 takes nothing returns boolean
return ( GetPlayerSlotState(Player(9)) == PLAYER_SLOT_STATE_LEFT )
endfunction
function Trig_twewve_Func006C takes nothing returns boolean
if ( not GetBooleanOr( Trig_twewve_Func006Func020001(), Trig_twewve_Func006Func020002() ) ) then
return false
endif
if ( not GetBooleanOr( Trig_twewve_Func006Func021001(), Trig_twewve_Func006Func021002() ) ) then
return false
endif
return true
endfunction
function Trig_Kickp12_Actions takes nothing returns nothing
call CustomDefeatBJ( Player(11), "TRIGSTR_3065" )
set udg_PlayerLeft[12] = true
call SetPlayerAllianceBJ( Player(11), ALLIANCE_SHARED_CONTROL, true, Player(10) )
call SetPlayerAllianceBJ( Player(11), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(10) )
call SetPlayerAllianceBJ( Player(11), ALLIANCE_SHARED_CONTROL, true, Player(9) )
call SetPlayerAllianceBJ( Player(11), ALLIANCE_SHARED_ADVANCED_CONTROL, true, Player(9) )
if ( Trig_twewve_Func006C() ) then
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(9))
call ForGroupBJ( udg_Unitgroup, function Trig_twewve_Func006Func002A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(10))
call ForGroupBJ( udg_Unitgroup, function Trig_twewve_Func006Func006A )
set udg_Unitgroup = GetUnitsOfPlayerAll(Player(11))
call ForGroupBJ( udg_Unitgroup, function Trig_twewve_Func006Func010A )
set udg_Buldings[10] = 0
set udg_Buldings[11] = 0
set udg_Buldings[12] = 0
call DisableTrigger( gg_trg_Spawnp10 )
call DisableTrigger( gg_trg_Spawnp11 )
call DisableTrigger( gg_trg_Spawnp12 )
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[10], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[11], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
call LeaderboardRemovePlayerItemBJ( udg_Player[12], udg_techlevel[GetForLoopIndexA()] )
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call ConditionalTriggerExecute( gg_trg_Decay )
else
call DoNothing( )
endif
endfunction
//===========================================================================
function InitTrig_Kickp12 takes nothing returns nothing
set gg_trg_Kickp12 = CreateTrigger( )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp12, Player(0), ( "+=~kick " + GetPlayerName(Player(11)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp12, Player(1), ( "+=~kick " + GetPlayerName(Player(11)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp12, Player(2), ( "+=~kick " + GetPlayerName(Player(11)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp12, Player(3), ( "+=~kick " + GetPlayerName(Player(11)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp12, Player(4), ( "+=~kick " + GetPlayerName(Player(11)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp12, Player(5), ( "+=~kick " + GetPlayerName(Player(11)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp12, Player(6), ( "+=~kick " + GetPlayerName(Player(11)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp12, Player(7), ( "+=~kick " + GetPlayerName(Player(11)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp12, Player(8), ( "+=~kick " + GetPlayerName(Player(11)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp12, Player(9), ( "+=~kick " + GetPlayerName(Player(11)) ), true )
call TriggerRegisterPlayerChatEvent( gg_trg_Kickp12, Player(10), ( "+=~kick " + GetPlayerName(Player(11)) ), true )
call TriggerAddCondition( gg_trg_Kickp12, Condition( function Trig_Kickp12_Conditions ) )
call TriggerAddAction( gg_trg_Kickp12, function Trig_Kickp12_Actions )
endfunction
function Trig_Tractor_Beam_Copy_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'ACsw' ) ) then
return false
endif
return true
endfunction
function Trig_Tractor_Beam_Copy_Func001001 takes nothing returns boolean
return ( UnitHasBuffBJ(GetSpellTargetUnit(), 'B016') == true )
endfunction
function Trig_Tractor_Beam_Copy_Func004002003 takes nothing returns boolean
return ( IsUnitType(GetFilterUnit(), UNIT_TYPE_STRUCTURE) == false )
endfunction
function Trig_Tractor_Beam_Copy_Func006Func001Func003C takes nothing returns boolean
if ( not ( IsUnitEnemy(GetEnumUnit(), GetOwningPlayer(GetTriggerUnit())) == true ) ) then
return false
endif
return true
endfunction
function Trig_Tractor_Beam_Copy_Func006Func001C takes nothing returns boolean
if ( not ( GetUnitTypeId(GetEnumUnit()) != 'hbla' ) ) then
return false
endif
return true
endfunction
function Trig_Tractor_Beam_Copy_Func006A takes nothing returns nothing
if ( Trig_Tractor_Beam_Copy_Func006Func001C() ) then
set udg_Point = OffsetLocation(udg_Point, GetRandomReal(-75.00, 75.00), GetRandomReal(-75.00, 75.00))
call SetUnitPositionLoc( GetEnumUnit(), udg_Point )
if ( Trig_Tractor_Beam_Copy_Func006Func001Func003C() ) then
call UnitDamageTargetBJ( GetTriggerUnit(), GetEnumUnit(), ( 600.00 * I2R(GetUnitAbilityLevelSwapped('ACsw', GetSpellAbilityUnit())) ), ATTACK_TYPE_NORMAL, DAMAGE_TYPE_NORMAL )
else
endif
else
endif
endfunction
function Trig_Tractor_Beam_Copy_Actions takes nothing returns nothing
loop
exitwhen ( Trig_Tractor_Beam_Copy_Func001001() )
call TriggerSleepAction(RMaxBJ(bj_WAIT_FOR_COND_MIN_INTERVAL, 0.45))
endloop
set udg_Point = GetUnitLoc(GetSpellTargetUnit())
set udg_Unitgroup = GetUnitsInRangeOfLocMatching(( 200.00 + ( 25.00 * I2R(GetUnitAbilityLevelSwapped('ACsw', GetSpellAbilityUnit())) ) ), udg_Point, Condition(function Trig_Tractor_Beam_Copy_Func004002003))
set udg_Point = GetUnitLoc(GetSpellAbilityUnit())
call ForGroupBJ( udg_Unitgroup, function Trig_Tractor_Beam_Copy_Func006A )
endfunction
//===========================================================================
function InitTrig_Tractor_Beam_Copy takes nothing returns nothing
set gg_trg_Tractor_Beam_Copy = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Tractor_Beam_Copy, EVENT_PLAYER_UNIT_SPELL_EFFECT )
call TriggerAddCondition( gg_trg_Tractor_Beam_Copy, Condition( function Trig_Tractor_Beam_Copy_Conditions ) )
call TriggerAddAction( gg_trg_Tractor_Beam_Copy, function Trig_Tractor_Beam_Copy_Actions )
endfunction
function Trig_Retire_Conditions takes nothing returns boolean
if ( not ( GetSpellAbilityId() == 'ANtm' ) ) then
return false
endif
return true
endfunction
function Trig_Retire_Actions takes nothing returns nothing
local unit a
local player p
set p = GetOwningPlayer(GetSpellTargetUnit())
set a = GetSpellTargetUnit()
call UnitRemoveAbilityBJ( 'AInv', a )
call UnitRemoveAbilityBJ( 'A00K', a )
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = 12
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
if p == udg_Player[GetForLoopIndexA()] then
set udg_Numb[1] = GetUnitUserData(a)
call AdjustPlayerStateBJ( udg_Numb[1], udg_Player[GetForLoopIndexA()], PLAYER_STATE_RESOURCE_GOLD )
else
endif
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call PolledWait( 3.00 )
call RemoveUnit( a )
call PolledWait( 1.00 )
set p = null
set a = null
endfunction
//===========================================================================
function InitTrig_Retire_t takes nothing returns nothing
set gg_trg_Retire_t = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Retire_t, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Retire_t, EVENT_PLAYER_UNIT_SPELL_FINISH )
call TriggerAddCondition( gg_trg_Retire_t, Condition( function Trig_Retire_Conditions ) )
call TriggerAddAction( gg_trg_Retire_t, function Trig_Retire_Actions )
endfunction
function Trig_Battle_Frenzy_Conditions takes nothing returns boolean
if ( not ( UnitHasBuffBJ(GetAttackedUnitBJ(), 'B00P') == true ) ) then
return false
endif
return true
endfunction
function Trig_Battle_Frenzy_Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 100) > 66 ) ) then
return false
endif
return true
endfunction
function Trig_Battle_Frenzy_Actions takes nothing returns nothing
local unit u
local integer n
set u = GetAttackedUnitBJ()
call DisplayTextToForce( GetPlayersAll(), "ya" )
if ( Trig_Battle_Frenzy_Func002C() ) then
call ModifyHeroStat( bj_HEROSTAT_STR, u, bj_MODIFYMETHOD_ADD, ( GetUnitAbilityLevelSwapped('A03N', udg_unit) * 2 ) )
call ModifyHeroStat( bj_HEROSTAT_AGI, u, bj_MODIFYMETHOD_ADD, ( GetUnitAbilityLevelSwapped('A03N', udg_unit) * 1 ) )
set n = GetUnitAbilityLevelSwapped('A03N', udg_unit)
call PolledWait( 9.75 )
call ModifyHeroStat( bj_HEROSTAT_STR, u, bj_MODIFYMETHOD_SUB, ( n * 2 ) )
call ModifyHeroStat( bj_HEROSTAT_AGI, u, bj_MODIFYMETHOD_SUB, ( n * 1 ) )
else
call DoNothing( )
endif
call PolledWait( 1.00 )
set u = null
endfunction
//===========================================================================
function InitTrig_Battle_Frenzy takes nothing returns nothing
set gg_trg_Battle_Frenzy = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Battle_Frenzy, EVENT_PLAYER_UNIT_ATTACKED )
call TriggerAddCondition( gg_trg_Battle_Frenzy, Condition( function Trig_Battle_Frenzy_Conditions ) )
call TriggerAddAction( gg_trg_Battle_Frenzy, function Trig_Battle_Frenzy_Actions )
endfunction
function Trig_buy_self_Destruct_Func001Func002C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('Auco', GetTriggerUnit()) == 0 ) ) then
return false
endif
return true
endfunction
function Trig_buy_self_Destruct_Func001C takes nothing returns boolean
if ( not ( GetItemTypeId(GetManipulatedItem()) == 'guvi' ) ) then
return false
endif
return true
endfunction
function Trig_buy_self_Destruct_Actions takes nothing returns nothing
if ( Trig_buy_self_Destruct_Func001C() ) then
if ( Trig_buy_self_Destruct_Func001Func002C() ) then
call RemoveItem( GetManipulatedItem() )
set udg_Numb[1] = GetUnitUserData(GetTriggerUnit())
call SetUnitUserData( GetTriggerUnit(), ( udg_Numb[1] + 19750 ) )
call UnitAddAbilityBJ( 'Auco', GetTriggerUnit() )
call UnitMakeAbilityPermanentBJ( TRUE, 'Auco', GetTriggerUnit() )
else
call DisplayTextToForce( GetPlayersByMapControl(GetPlayerController(GetOwningPlayer(GetTriggerUnit()))), "TRIGSTR_3952" )
endif
else
call DoNothing( )
endif
endfunction
//===========================================================================
function InitTrig_buy_self_Destruct_Copy takes nothing returns nothing
set gg_trg_buy_self_Destruct_Copy = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_buy_self_Destruct_Copy, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddAction( gg_trg_buy_self_Destruct_Copy, function Trig_buy_self_Destruct_Actions )
endfunction
function Trig_Buy_LS_Conditions takes nothing returns boolean
if ( not ( GetItemTypeId(GetManipulatedItem()) == 'rspd' ) ) then
return false
endif
return true
endfunction
function Trig_Buy_LS_Func002Func001Func003Func001C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('Alsh', GetTriggerUnit()) == 3 ) ) then
return false
endif
return true
endfunction
function Trig_Buy_LS_Func002Func001Func003C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('Alsh', GetTriggerUnit()) == 2 ) ) then
return false
endif
return true
endfunction
function Trig_Buy_LS_Func002Func001C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('Alsh', GetTriggerUnit()) == 1 ) ) then
return false
endif
return true
endfunction
function Trig_Buy_LS_Func002C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('Alsh', GetTriggerUnit()) == 0 ) ) then
return false
endif
return true
endfunction
function Trig_Buy_LS_Actions takes nothing returns nothing
if ( Trig_Buy_LS_Func002C() ) then
call RemoveItem( GetManipulatedItem() )
set udg_Numb[1] = GetUnitUserData(GetTriggerUnit())
call SetUnitUserData( GetTriggerUnit(), ( udg_Numb[1] + 325 ) )
call UnitAddAbilityBJ( 'Alsh', GetTriggerUnit() )
call UnitMakeAbilityPermanentBJ( TRUE, 'Alsh', GetTriggerUnit() )
else
if ( Trig_Buy_LS_Func002Func001C() ) then
call RemoveItem( GetManipulatedItem() )
set udg_Numb[1] = GetUnitUserData(GetTriggerUnit())
call SetUnitUserData( GetTriggerUnit(), ( udg_Numb[1] + 325 ) )
call SetUnitAbilityLevelSwapped( 'Alsh', GetTriggerUnit(), 2 )
else
if ( Trig_Buy_LS_Func002Func001Func003C() ) then
call RemoveItem( GetManipulatedItem() )
set udg_Numb[1] = GetUnitUserData(GetTriggerUnit())
call SetUnitUserData( GetTriggerUnit(), ( udg_Numb[1] + 325 ) )
call SetUnitAbilityLevelSwapped( 'Alsh', GetTriggerUnit(), 3 )
else
if ( Trig_Buy_LS_Func002Func001Func003Func001C() ) then
call RemoveItem( GetManipulatedItem() )
set udg_Numb[1] = GetUnitUserData(GetTriggerUnit())
call SetUnitUserData( GetTriggerUnit(), ( udg_Numb[1] + 325 ) )
call SetUnitAbilityLevelSwapped( 'Alsh', GetTriggerUnit(), 4 )
else
call DisplayTextToForce( GetPlayersByMapControl(GetPlayerController(GetOwningPlayer(GetTriggerUnit()))), "TRIGSTR_2359" )
endif
endif
endif
endif
endfunction
//===========================================================================
function InitTrig_Buy_LS_Copy takes nothing returns nothing
set gg_trg_Buy_LS_Copy = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Buy_LS_Copy, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddCondition( gg_trg_Buy_LS_Copy, Condition( function Trig_Buy_LS_Conditions ) )
call TriggerAddAction( gg_trg_Buy_LS_Copy, function Trig_Buy_LS_Actions )
endfunction
function Trig_Buy_WW_Conditions takes nothing returns boolean
if ( not ( GetItemTypeId(GetManipulatedItem()) == 'rsps' ) ) then
return false
endif
return true
endfunction
function Trig_Buy_WW_Func002Func001Func003Func001C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('AOwk', GetTriggerUnit()) == 3 ) ) then
return false
endif
return true
endfunction
function Trig_Buy_WW_Func002Func001Func003C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('AOwk', GetTriggerUnit()) == 2 ) ) then
return false
endif
return true
endfunction
function Trig_Buy_WW_Func002Func001C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('AOwk', GetTriggerUnit()) == 1 ) ) then
return false
endif
return true
endfunction
function Trig_Buy_WW_Func002C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('AOwk', GetTriggerUnit()) == 0 ) ) then
return false
endif
return true
endfunction
function Trig_Buy_WW_Actions takes nothing returns nothing
if ( Trig_Buy_WW_Func002C() ) then
call RemoveItem( GetManipulatedItem() )
set udg_Numb[1] = GetUnitUserData(GetTriggerUnit())
call SetUnitUserData( GetTriggerUnit(), ( udg_Numb[1] + 245 ) )
call UnitAddAbilityBJ( 'AOwk', GetTriggerUnit() )
call UnitMakeAbilityPermanentBJ( TRUE, 'AOwk', GetTriggerUnit() )
else
if ( Trig_Buy_WW_Func002Func001C() ) then
call RemoveItem( GetManipulatedItem() )
set udg_Numb[1] = GetUnitUserData(GetTriggerUnit())
call SetUnitUserData( GetTriggerUnit(), ( udg_Numb[1] + 245 ) )
call SetUnitAbilityLevelSwapped( 'AOwk', GetTriggerUnit(), 2 )
else
if ( Trig_Buy_WW_Func002Func001Func003C() ) then
call RemoveItem( GetManipulatedItem() )
set udg_Numb[1] = GetUnitUserData(GetTriggerUnit())
call SetUnitUserData( GetTriggerUnit(), ( udg_Numb[1] + 245 ) )
call SetUnitAbilityLevelSwapped( 'AOwk', GetTriggerUnit(), 3 )
else
if ( Trig_Buy_WW_Func002Func001Func003Func001C() ) then
call RemoveItem( GetManipulatedItem() )
set udg_Numb[1] = GetUnitUserData(GetTriggerUnit())
call SetUnitUserData( GetTriggerUnit(), ( udg_Numb[1] + 245 ) )
call SetUnitAbilityLevelSwapped( 'AOwk', GetTriggerUnit(), 4 )
else
call DisplayTextToForce( GetPlayersByMapControl(GetPlayerController(GetOwningPlayer(GetTriggerUnit()))), "TRIGSTR_2359" )
endif
endif
endif
endif
endfunction
//===========================================================================
function InitTrig_Buy_WW_Copy takes nothing returns nothing
set gg_trg_Buy_WW_Copy = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Buy_WW_Copy, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddCondition( gg_trg_Buy_WW_Copy, Condition( function Trig_Buy_WW_Conditions ) )
call TriggerAddAction( gg_trg_Buy_WW_Copy, function Trig_Buy_WW_Actions )
endfunction
function Trig_Buy_invul_Func001Func002Func003Func004Func004C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('AHds', GetTriggerUnit()) == 3 ) ) then
return false
endif
return true
endfunction
function Trig_Buy_invul_Func001Func002Func003Func004C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('AHds', GetTriggerUnit()) == 2 ) ) then
return false
endif
return true
endfunction
function Trig_Buy_invul_Func001Func002Func003C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('AHds', GetTriggerUnit()) == 1 ) ) then
return false
endif
return true
endfunction
function Trig_Buy_invul_Func001Func002C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('AHds', GetTriggerUnit()) == 0 ) ) then
return false
endif
return true
endfunction
function Trig_Buy_invul_Func001C takes nothing returns boolean
if ( not ( GetItemTypeId(GetManipulatedItem()) == 'rwat' ) ) then
return false
endif
return true
endfunction
function Trig_Buy_invul_Actions takes nothing returns nothing
if ( Trig_Buy_invul_Func001C() ) then
if ( Trig_Buy_invul_Func001Func002C() ) then
call RemoveItem( GetManipulatedItem() )
set udg_Numb[1] = GetUnitUserData(GetTriggerUnit())
call SetUnitUserData( GetTriggerUnit(), ( udg_Numb[1] + 625 ) )
call UnitAddAbilityBJ( 'AHds', GetTriggerUnit() )
call UnitMakeAbilityPermanentBJ( TRUE, 'AHds', GetTriggerUnit() )
else
if ( Trig_Buy_invul_Func001Func002Func003C() ) then
call RemoveItem( GetManipulatedItem() )
set udg_Numb[1] = GetUnitUserData(GetTriggerUnit())
call SetUnitUserData( GetTriggerUnit(), ( udg_Numb[1] + 625 ) )
call SetUnitAbilityLevelSwapped( 'AHds', GetTriggerUnit(), 2 )
else
if ( Trig_Buy_invul_Func001Func002Func003Func004C() ) then
call RemoveItem( GetManipulatedItem() )
set udg_Numb[1] = GetUnitUserData(GetTriggerUnit())
call SetUnitUserData( GetTriggerUnit(), ( udg_Numb[1] + 625 ) )
call SetUnitAbilityLevelSwapped( 'AHds', GetTriggerUnit(), 3 )
else
if ( Trig_Buy_invul_Func001Func002Func003Func004Func004C() ) then
call DisplayTextToForce( GetPlayersByMapControl(GetPlayerController(GetOwningPlayer(GetTriggerUnit()))), "TRIGSTR_1239" )
else
call DoNothing( )
endif
endif
endif
endif
else
call DoNothing( )
endif
endfunction
//===========================================================================
function InitTrig_Buy_invul_Copy takes nothing returns nothing
set gg_trg_Buy_invul_Copy = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Buy_invul_Copy, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddAction( gg_trg_Buy_invul_Copy, function Trig_Buy_invul_Actions )
endfunction
function Trig_Buy_stasis_Func001Func002Func003Func004Func004C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('Asta', GetTriggerUnit()) == 3 ) ) then
return false
endif
return true
endfunction
function Trig_Buy_stasis_Func001Func002Func003Func004C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('Asta', GetTriggerUnit()) == 2 ) ) then
return false
endif
return true
endfunction
function Trig_Buy_stasis_Func001Func002Func003C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('Asta', GetTriggerUnit()) == 1 ) ) then
return false
endif
return true
endfunction
function Trig_Buy_stasis_Func001Func002C takes nothing returns boolean
if ( not ( GetUnitAbilityLevelSwapped('Asta', GetTriggerUnit()) == 0 ) ) then
return false
endif
return true
endfunction
function Trig_Buy_stasis_Func001C takes nothing returns boolean
if ( not ( GetItemTypeId(GetManipulatedItem()) == 'rhe1' ) ) then
return false
endif
return true
endfunction
function Trig_Buy_stasis_Actions takes nothing returns nothing
if ( Trig_Buy_stasis_Func001C() ) then
if ( Trig_Buy_stasis_Func001Func002C() ) then
call RemoveItem( GetManipulatedItem() )
set udg_Numb[1] = GetUnitUserData(GetTriggerUnit())
call SetUnitUserData( GetTriggerUnit(), ( udg_Numb[1] + 750 ) )
call UnitAddAbilityBJ( 'Asta', GetTriggerUnit() )
call UnitMakeAbilityPermanentBJ( TRUE, 'Asta', GetTriggerUnit() )
else
if ( Trig_Buy_stasis_Func001Func002Func003C() ) then
call RemoveItem( GetManipulatedItem() )
set udg_Numb[1] = GetUnitUserData(GetTriggerUnit())
call SetUnitUserData( GetTriggerUnit(), ( udg_Numb[1] + 750 ) )
call SetUnitAbilityLevelSwapped( 'Asta', GetTriggerUnit(), 2 )
else
if ( Trig_Buy_stasis_Func001Func002Func003Func004C() ) then
call RemoveItem( GetManipulatedItem() )
set udg_Numb[1] = GetUnitUserData(GetTriggerUnit())
call SetUnitUserData( GetTriggerUnit(), ( udg_Numb[1] + 750 ) )
call SetUnitAbilityLevelSwapped( 'Asta', GetTriggerUnit(), 3 )
else
if ( Trig_Buy_stasis_Func001Func002Func003Func004Func004C() ) then
call DisplayTextToForce( GetPlayersByMapControl(GetPlayerController(GetOwningPlayer(GetTriggerUnit()))), "TRIGSTR_1235" )
else
call DoNothing( )
endif
endif
endif
endif
else
call DoNothing( )
endif
endfunction
//===========================================================================
function InitTrig_Buy_stasis_Copy takes nothing returns nothing
set gg_trg_Buy_stasis_Copy = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Buy_stasis_Copy, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddAction( gg_trg_Buy_stasis_Copy, function Trig_Buy_stasis_Actions )
endfunction