Wheres the part in here that says "If you village dies you are defeated"?
//===========================================================================
//===========================================================================
//Triggerefeat
//===========================================================================
function Trig_Defeat_Func004001 takes nothing returns boolean
return(GetUnitTypeId(GetDyingUnit())=='h00H')
endfunction
function Trig_Defeat_Func004002 takes nothing returns boolean
return(GetUnitTypeId(GetDyingUnit())=='h00I')
endfunction
function Trig_Defeat_Conditions takes nothing returns boolean
if(not GetBooleanOr(Trig_Defeat_Func004001(),Trig_Defeat_Func004002()))then
return false
endif
return true
endfunction
function Trig_Defeat_Func003A takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function Trig_Defeat_Actions takes nothing returns nothing
call CustomDefeatBJ(GetOwningPlayer(GetDyingUnit()),"TRIGSTR_732")
call DisplayTimedTextToForce(GetPlayersAll(),30,(GetPlayerName(GetOwningPlayer(GetDyingUnit()))+(" has been defeated by "+GetPlayerName(GetOwningPlayer(GetKillingUnitBJ())))))
call ForGroupBJ(GetUnitsOfPlayerAll(GetOwningPlayer(GetDyingUnit())),function Trig_Defeat_Func003A)
endfunction
//===========================================================================
//===========================================================================
//Trigger:Leave
//===========================================================================
function Trig_Leave_Func002A takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function Trig_Leave_Actions takes nothing returns nothing
call DisplayTimedTextToForce(GetPlayersAll(),30,(GetPlayerName(GetTriggerPlayer())+" left the game."))
call ForGroupBJ(GetUnitsOfPlayerAll(GetTriggerPlayer()),function Trig_Leave_Func002A)
endfunction
//===========================================================================
//===========================================================================
//Trigger:Income
//===========================================================================
function Trig_Income_Func002Func004C takes nothing returns boolean
if(not(udg_reals16[GetForLoopIndexA()]==0.00))then
return false
endif
return true
endfunction
function Trig_Income_Func002Func011C takes nothing returns boolean
if(not(udg_integers49[GetForLoopIndexA()]<=-5))then
return false
endif
return true
endfunction
function Trig_Income_Actions takes nothing returns nothing
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers46[GetForLoopIndexA()]=GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_FOOD_USED)
set udg_integers47[GetForLoopIndexA()]=GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
set udg_reals16[GetForLoopIndexA()]=(1.00-(I2R(udg_integers46[GetForLoopIndexA()])*0.01))
if(Trig_Income_Func002Func004C())then
set udg_reals17[GetForLoopIndexA()]=((I2R(udg_integers47[GetForLoopIndexA()])/10.00)-100.00)
else
set udg_reals17[GetForLoopIndexA()]=((I2R(udg_integers47[GetForLoopIndexA()])/10.00)*udg_reals16[GetForLoopIndexA()])
endif
set udg_integers48[GetForLoopIndexA()]=R2I(udg_reals17[GetForLoopIndexA()])
call DisplayTimedTextToPlayer(udg_players01[GetForLoopIndexA()],0,0,10.00,"TRIGSTR_703")
call DisplayTimedTextToPlayer(udg_players01[GetForLoopIndexA()],0,0,10.00,("Peasants:"+I2S(udg_integers47[GetForLoopIndexA()])))
call DisplayTimedTextToPlayer(udg_players01[GetForLoopIndexA()],0,0,10.00,("Military:"+I2S(udg_integers46[GetForLoopIndexA()])))
call DisplayTimedTextToPlayer(udg_players01[GetForLoopIndexA()],0,0,10.00,("Income:"+I2S(udg_integers48[GetForLoopIndexA()])))
call AdjustPlayerStateBJ(udg_integers48[GetForLoopIndexA()],udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_GOLD)
if(Trig_Income_Func002Func011C())then
set udg_integers49[GetForLoopIndexA()]=(udg_integers49[GetForLoopIndexA()]+5)
else
call DoNothing()
endif
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
//===========================================================================
//===========================================================================
//Trigger:RandomPeasantEvents
//===========================================================================
function Trig_RandomPeasantEvents_Func002Func003Func001C takes nothing returns boolean
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)>100))then
return false
endif
return true
endfunction
function Trig_RandomPeasantEvents_Func002C takes nothing returns boolean
if(not(udg_integer40>18))then
return false
endif
return true
endfunction
function Trig_RandomPeasantEvents_Func003Func004Func002Func001001 takes nothing returns boolean
return(udg_integer39==0)
endfunction
function Trig_RandomPeasantEvents_Func003Func004Func002C takes nothing returns boolean
if(not(udg_integer39>=0))then
return false
endif
return true
endfunction
function Trig_RandomPeasantEvents_Func003C takes nothing returns boolean
if(not(udg_integer40>10))then
return false
endif
if(not(udg_integer40<15))then
return false
endif
return true
endfunction
function Trig_RandomPeasantEvents_Func004C takes nothing returns boolean
if(not(udg_integer40<5))then
return false
endif
if(not(IsTriggerEnabled(udg_trigger56)==false))then
return false
endif
if(not(IsTriggerEnabled(udg_trigger57)==true))then
return false
endif
return true
endfunction
function Trig_RandomPeasantEvents_Actions takes nothing returns nothing
set udg_integer40=GetRandomInt(1,20)
if(Trig_RandomPeasantEvents_Func002C())then
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
if(Trig_RandomPeasantEvents_Func002Func003Func001C())then
set udg_integer39=R2I((I2R((GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)/25))+GetRandomReal(1.00,25.00)))
call DisplayTextToPlayer(udg_players01[GetForLoopIndexA()],0,0,("POPULATION BOOM! "+(I2S(udg_integer39)+" babies have been born!")))
call AdjustPlayerStateBJ(udg_integer39,udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
else
call DoNothing()
endif
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
else
call DoNothing()
endif
if(Trig_RandomPeasantEvents_Func003C())then
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integer39=R2I((I2R((udg_integers49[GetForLoopIndexA()]+GetRandomInt(-25,25)))/2.00))
if(Trig_RandomPeasantEvents_Func003Func004Func002C())then
if(Trig_RandomPeasantEvents_Func003Func004Func002Func001001())then
set udg_integer39=GetRandomInt(1,10)
else
call DoNothing()
endif
call DisplayTextToPlayer(udg_players01[GetForLoopIndexA()],0,0,("Your reputation precedes you. "+(I2S(udg_integer39)+" peasants have journeyed from afar to serve.")))
call AdjustPlayerStateBJ(udg_integer39,udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
else
call DisplayTextToPlayer(udg_players01[GetForLoopIndexA()],0,0,("Your people have become restless... "+(I2S(IAbsBJ(udg_integer39))+" peasants have left your service.")))
call AdjustPlayerStateBJ(udg_integer39,udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
endif
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
else
call DoNothing()
endif
if(Trig_RandomPeasantEvents_Func004C())then
call EnableTrigger(udg_trigger56)
call StartTimerBJ(udg_timer02,false,GetRandomReal(60.00,240.00))
call CreateTimerDialogBJ(udg_timer02,"TRIGSTR_1548")
set udg_timerdialog02=GetLastCreatedTimerDialogBJ()
call TimerDialogDisplayBJ(true,udg_timerdialog02)
call DisplayTimedTextToForce(GetPlayersAll(),30,"TRIGSTR_1550")
else
call DoNothing()
endif
endfunction
//===========================================================================
//===========================================================================
//Triggerlague Effect
//===========================================================================
function Trig_Plague_Effect_Func002Func001C takes nothing returns boolean
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)>8000))then
return false
endif
return true
endfunction
function Trig_Plague_Effect_Func002Func002C takes nothing returns boolean
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)>5000))then
return false
endif
return true
endfunction
function Trig_Plague_Effect_Func002Func003C takes nothing returns boolean
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)>1000))then
return false
endif
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)<5000))then
return false
endif
return true
endfunction
function Trig_Plague_Effect_Func002Func004C takes nothing returns boolean
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)>100))then
return false
endif
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)<1000))then
return false
endif
return true
endfunction
function Trig_Plague_Effect_Actions takes nothing returns nothing
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
if(Trig_Plague_Effect_Func002Func001C())then
set udg_integer39=GetRandomInt((250-(udg_integers50[GetForLoopIndexA()]*10)),(600-(udg_integers50[GetForLoopIndexA()]*10)))
call AdjustPlayerStateBJ((udg_integer39*-1),udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
set udg_integers52[GetForLoopIndexA()]=(udg_integers52[GetForLoopIndexA()]+udg_integer39)
else
call DoNothing()
endif
if(Trig_Plague_Effect_Func002Func002C())then
set udg_integer39=GetRandomInt((100-(udg_integers50[GetForLoopIndexA()]*10)),(500-(udg_integers50[GetForLoopIndexA()]*10)))
call AdjustPlayerStateBJ((udg_integer39*-1),udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
set udg_integers52[GetForLoopIndexA()]=(udg_integers52[GetForLoopIndexA()]+udg_integer39)
else
call DoNothing()
endif
if(Trig_Plague_Effect_Func002Func003C())then
set udg_integer39=GetRandomInt((50-udg_integers50[GetForLoopIndexA()]),(100-udg_integers50[GetForLoopIndexA()]))
call AdjustPlayerStateBJ((udg_integer39*-1),udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
set udg_integers52[GetForLoopIndexA()]=(udg_integers52[GetForLoopIndexA()]+udg_integer39)
else
call DoNothing()
endif
if(Trig_Plague_Effect_Func002Func004C())then
set udg_integer39=GetRandomInt((10-udg_integers50[GetForLoopIndexA()]),(25-udg_integers50[GetForLoopIndexA()]))
call AdjustPlayerStateBJ((udg_integer39*-1),udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
set udg_integers52[GetForLoopIndexA()]=(udg_integers52[GetForLoopIndexA()]+udg_integer39)
else
call DoNothing()
endif
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
//===========================================================================
//===========================================================================
//Triggerlague Timer
//===========================================================================
function Trig_Plague_Timer_Actions takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call DisableTrigger(udg_trigger56)
call DestroyTimerDialogBJ(udg_timerdialog02)
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call DisplayTimedTextToPlayer(udg_players01[GetForLoopIndexA()],0,0,15.00,("You have lost "+(I2S(udg_integers52[GetForLoopIndexA()])+" peasants in this epidemic")))
set udg_integers52[GetForLoopIndexA()]=0
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call TriggerSleepAction(30.00)
call EnableTrigger(GetTriggeringTrigger())
endfunction
//===========================================================================
//===========================================================================
//TriggereasantGrowth
//===========================================================================
function Trig_PeasantGrowth_Func001Func001Func004C takes nothing returns boolean
if(not(udg_integers49[GetForLoopIndexA()]<0))then
return false
endif
return true
endfunction
function Trig_PeasantGrowth_Func001Func001C takes nothing returns boolean
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)>100))then
return false
endif
return true
endfunction
function Trig_PeasantGrowth_Func001Func002C takes nothing returns boolean
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)<0))then
return false
endif
return true
endfunction
function Trig_PeasantGrowth_Func001Func003C takes nothing returns boolean
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)<=100))then
return false
endif
return true
endfunction
function Trig_PeasantGrowth_Func001Func004C takes nothing returns boolean
if(not(udg_integers49[GetForLoopIndexA()]<-5))then
return false
endif
return true
endfunction
function Trig_PeasantGrowth_Actions takes nothing returns nothing
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
if(Trig_PeasantGrowth_Func001Func001C())then
call AdjustPlayerStateBJ(GetRandomInt(-1,udg_integers51[GetForLoopIndexA()]),udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
if(Trig_PeasantGrowth_Func001Func001Func004C())then
call AdjustPlayerStateBJ(udg_integers49[GetForLoopIndexA()],udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
else
endif
else
call DoNothing()
endif
if(Trig_PeasantGrowth_Func001Func002C())then
call SetPlayerStateBJ(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER,0)
else
call DoNothing()
endif
if(Trig_PeasantGrowth_Func001Func003C())then
call AdjustPlayerStateBJ(GetRandomInt(0,2),udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
else
call DoNothing()
endif
if(Trig_PeasantGrowth_Func001Func004C())then
set udg_integers49[GetForLoopIndexA()]=(udg_integers49[GetForLoopIndexA()]+1)
else
call DoNothing()
endif
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
//===========================================================================
//===========================================================================
//Trigger:Glory
//===========================================================================
function Trig_Glory_Conditions takes nothing returns boolean
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_STRUCTURE)==false))then
return false
endif
if(not(IsPlayerEnemy(GetOwningPlayer(GetKillingUnitBJ()),GetOwningPlayer(GetDyingUnit()))==true))then
return false
endif
return true
endfunction
function Trig_Glory_Func003001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(0))==true)
endfunction
function Trig_Glory_Func004001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(1))==true)
endfunction
function Trig_Glory_Func005001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(2))==true)
endfunction
function Trig_Glory_Func006001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(3))==true)
endfunction
function Trig_Glory_Func007001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(4))==true)
endfunction
function Trig_Glory_Func008001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(5))==true)
endfunction
function Trig_Glory_Func009001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(6))==true)
endfunction
function Trig_Glory_Func010001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(7))==true)
endfunction
function Trig_Glory_Func011001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(8))==true)
endfunction
function Trig_Glory_Func012001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(9))==true)
endfunction
function Trig_Glory_Func013001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(10))==true)
endfunction
function Trig_Glory_Func014001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(11))==true)
endfunction
function Trig_Glory_Func015001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(0))==true)
endfunction
function Trig_Glory_Func016001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(1))==true)
endfunction
function Trig_Glory_Func017001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(2))==true)
endfunction
function Trig_Glory_Func018001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(3))==true)
endfunction
function Trig_Glory_Func019001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(4))==true)
endfunction
function Trig_Glory_Func020001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(5))==true)
endfunction
function Trig_Glory_Func021001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(6))==true)
endfunction
function Trig_Glory_Func022001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(7))==true)
endfunction
function Trig_Glory_Func023001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(8))==true)
endfunction
function Trig_Glory_Func024001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(9))==true)
endfunction
function Trig_Glory_Func025001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(10))==true)
endfunction
function Trig_Glory_Func026001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(11))==true)
endfunction
function Trig_Glory_Actions takes nothing returns nothing
if(Trig_Glory_Func003001())then
set udg_integers49[1]=(udg_integers49[1]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func004001())then
set udg_integers49[2]=(udg_integers49[2]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func005001())then
set udg_integers49[3]=(udg_integers49[3]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func006001())then
set udg_integers49[4]=(udg_integers49[4]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func007001())then
set udg_integers49[5]=(udg_integers49[5]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func008001())then
set udg_integers49[6]=(udg_integers49[6]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func009001())then
set udg_integers49[7]=(udg_integers49[7]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func010001())then
set udg_integers49[8]=(udg_integers49[8]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func011001())then
set udg_integers49[9]=(udg_integers49[9]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func012001())then
set udg_integers49[10]=(udg_integers49[10]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func013001())then
set udg_integers49[11]=(udg_integers49[11]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func014001())then
set udg_integers49[12]=(udg_integers49[12]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func015001())then
set udg_integers49[1]=(udg_integers49[1]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func016001())then
set udg_integers49[2]=(udg_integers49[2]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func017001())then
set udg_integers49[3]=(udg_integers49[3]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func018001())then
set udg_integers49[4]=(udg_integers49[4]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func019001())then
set udg_integers49[5]=(udg_integers49[5]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func020001())then
set udg_integers49[6]=(udg_integers49[6]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func021001())then
set udg_integers49[7]=(udg_integers49[7]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func022001())then
set udg_integers49[8]=(udg_integers49[8]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func023001())then
set udg_integers49[9]=(udg_integers49[9]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func024001())then
set udg_integers49[10]=(udg_integers49[10]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func025001())then
set udg_integers49[11]=(udg_integers49[11]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func026001())then
set udg_integers49[12]=(udg_integers49[12]-1)
else
call DoNothing()
endif
endfunction
//===========================================================================
//===========================================================================
//Trigger:VillageBuilt
//===========================================================================
function Trig_VillageBuilt_Conditions takes nothing returns boolean
if(not(GetUnitTypeId(GetConstructedStructure())=='h00K'))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func002C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(0)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func003C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(1)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func004C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(2)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func005C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(3)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func006C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(4)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func007C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(5)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func008C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(6)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func009C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(7)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func010C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(8)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func011C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(9)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func012C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(10)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func013C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(11)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Actions takes nothing returns nothing
call AdjustPlayerStateBJ(100,GetOwningPlayer(GetConstructedStructure()),PLAYER_STATE_RESOURCE_LUMBER)
if(Trig_VillageBuilt_Func002C())then
set udg_integers51[1]=(udg_integers51[1]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func003C())then
set udg_integers51[2]=(udg_integers51[2]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func004C())then
set udg_integers51[3]=(udg_integers51[3]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func005C())then
set udg_integers51[4]=(udg_integers51[4]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func006C())then
set udg_integers51[5]=(udg_integers51[5]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func007C())then
set udg_integers51[6]=(udg_integers51[6]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func008C())then
set udg_integers51[7]=(udg_integers51[7]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func009C())then
set udg_integers51[8]=(udg_integers51[8]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func010C())then
set udg_integers51[9]=(udg_integers51[9]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func011C())then
set udg_integers51[10]=(udg_integers51[10]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func012C())then
set udg_integers51[11]=(udg_integers51[11]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func013C())then
set udg_integers51[12]=(udg_integers51[12]+1)
else
call DoNothing()
endif
endfunction
//===========================================================================
//===========================================================================
//Trigger:VillageDeath
//===========================================================================
function Trig_VillageDeath_Func002C takes nothing returns boolean
if((GetUnitTypeId(GetDyingUnit())=='h00K'))then
return true
endif
if((GetUnitTypeId(GetDyingUnit())=='h013'))then
return true
endif
if((GetUnitTypeId(GetDyingUnit())=='h014'))then
return true
endif
return false
endfunction
function Trig_VillageDeath_Conditions takes nothing returns boolean
if(not(IsUnitIdType(GetUnitTypeId(GetKillingUnitBJ()),UNIT_TYPE_GROUND)==true))then
return false
endif
if(not Trig_VillageDeath_Func002C())then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func006C takes nothing returns boolean
if(not(GetPlayerState(GetOwningPlayer(GetDyingUnit()),PLAYER_STATE_RESOURCE_LUMBER)<0))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func007Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func007C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(0)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func008Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func008C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(1)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func009Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func009C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(2)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func010Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func010C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(3)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func011Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func011C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(4)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func012Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func012C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(5)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func013Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func013C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(6)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func014Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func014C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(7)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func015Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func015C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(8)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func016Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func016C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(9)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func017Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func017C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(10)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func018Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func018C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(11)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Actions takes nothing returns nothing
set udg_integer39=GetRandomInt(1,100)
call AdjustPlayerStateBJ((udg_integer39*-1),GetOwningPlayer(GetDyingUnit()),PLAYER_STATE_RESOURCE_LUMBER)
call DisplayTextToPlayer(GetOwningPlayer(GetDyingUnit()),0,0,("A village has been razed. "+(I2S(udg_integer39)+" of your peasants have died.")))
if(Trig_VillageDeath_Func006C())then
call SetPlayerStateBJ(GetOwningPlayer(GetDyingUnit()),PLAYER_STATE_RESOURCE_LUMBER,0)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func007C())then
if(Trig_VillageDeath_Func007Func001C())then
set udg_integers51[1]=(udg_integers51[1]-1)
else
set udg_integers51[1]=(udg_integers51[1]-2)
endif
set udg_integers51[1]=(udg_integers51[1]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func008C())then
if(Trig_VillageDeath_Func008Func001C())then
set udg_integers51[2]=(udg_integers51[2]-1)
else
set udg_integers51[2]=(udg_integers51[2]-2)
endif
set udg_integers51[2]=(udg_integers51[2]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func009C())then
if(Trig_VillageDeath_Func009Func001C())then
set udg_integers51[3]=(udg_integers51[3]-1)
else
set udg_integers51[3]=(udg_integers51[3]-2)
endif
set udg_integers51[3]=(udg_integers51[3]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func010C())then
if(Trig_VillageDeath_Func010Func001C())then
set udg_integers51[4]=(udg_integers51[4]-1)
else
set udg_integers51[4]=(udg_integers51[4]-2)
endif
set udg_integers51[4]=(udg_integers51[4]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func011C())then
if(Trig_VillageDeath_Func011Func001C())then
set udg_integers51[5]=(udg_integers51[5]-1)
else
set udg_integers51[5]=(udg_integers51[5]-2)
endif
set udg_integers51[5]=(udg_integers51[5]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func012C())then
if(Trig_VillageDeath_Func012Func001C())then
set udg_integers51[6]=(udg_integers51[6]-1)
else
set udg_integers51[6]=(udg_integers51[6]-2)
endif
set udg_integers51[6]=(udg_integers51[6]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func013C())then
if(Trig_VillageDeath_Func013Func001C())then
set udg_integers51[7]=(udg_integers51[7]-1)
else
set udg_integers51[7]=(udg_integers51[7]-2)
endif
set udg_integers51[7]=(udg_integers51[7]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func014C())then
if(Trig_VillageDeath_Func014Func001C())then
set udg_integers51[8]=(udg_integers51[8]-1)
else
set udg_integers51[8]=(udg_integers51[8]-2)
endif
set udg_integers51[8]=(udg_integers51[8]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func015C())then
if(Trig_VillageDeath_Func015Func001C())then
set udg_integers51[9]=(udg_integers51[9]-1)
else
set udg_integers51[9]=(udg_integers51[9]-2)
endif
set udg_integers51[9]=(udg_integers51[9]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func016C())then
if(Trig_VillageDeath_Func016Func001C())then
set udg_integers51[10]=(udg_integers51[10]-1)
else
set udg_integers51[10]=(udg_integers51[10]-2)
endif
set udg_integers51[10]=(udg_integers51[10]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func017C())then
if(Trig_VillageDeath_Func017Func001C())then
set udg_integers51[11]=(udg_integers51[11]-1)
else
set udg_integers51[11]=(udg_integers51[11]-2)
endif
set udg_integers51[11]=(udg_integers51[11]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func018C())then
if(Trig_VillageDeath_Func018Func001C())then
set udg_integers51[12]=(udg_integers51[12]-1)
else
set udg_integers51[12]=(udg_integers51[12]-2)
endif
set udg_integers51[12]=(udg_integers51[12]-1)
else
call DoNothing()
endif
endfunction
//===========================================================================
//===========================================================================
//Trigger:VillageUpgrade
//===========================================================================
function Trig_VillageUpgrade_Func014C takes nothing returns boolean
if((GetUnitTypeId(GetTriggerUnit())=='h00K'))then
return true
endif
if((GetUnitTypeId(GetTriggerUnit())=='h013'))then
return true
endif
return false
endfunction
function Trig_VillageUpgrade_Conditions takes nothing returns boolean
if(not Trig_VillageUpgrade_Func014C())then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func002C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(0)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func003C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(1)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func004C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(2)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func005C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(3)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func006C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(4)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func007C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(5)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func008C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(6)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func009C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(7)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func010C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(8)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func011C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(9)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func012C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(10)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func013C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(11)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Actions takes nothing returns nothing
call AdjustPlayerStateBJ(100,GetOwningPlayer(GetTriggerUnit()),PLAYER_STATE_RESOURCE_LUMBER)
if(Trig_VillageUpgrade_Func002C())then
set udg_integers51[1]=(udg_integers51[1]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func003C())then
set udg_integers51[2]=(udg_integers51[2]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func004C())then
set udg_integers51[3]=(udg_integers51[3]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func005C())then
set udg_integers51[4]=(udg_integers51[4]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func006C())then
set udg_integers51[5]=(udg_integers51[5]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func007C())then
set udg_integers51[6]=(udg_integers51[6]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func008C())then
set udg_integers51[7]=(udg_integers51[7]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func009C())then
set udg_integers51[8]=(udg_integers51[8]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func010C())then
set udg_integers51[9]=(udg_integers51[9]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func011C())then
set udg_integers51[10]=(udg_integers51[10]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func012C())then
set udg_integers51[11]=(udg_integers51[11]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func013C())then
set udg_integers51[12]=(udg_integers51[12]+1)
else
call DoNothing()
endif
endfunction
//===========================================================================
//===========================================================================
//Trigger:Guild and Commerce Tax
//===========================================================================
function Trig_Guild_and_Commerce_Tax_Conditions takes nothing returns boolean
if(not(GetSpellAbilityId()=='A00O'))then
return false
endif
return true
endfunction
function Trig_Guild_and_Commerce_Tax_Actions takes nothing returns nothing
call AdjustPlayerStateBJ(25,GetOwningPlayer(GetTriggerUnit()),PLAYER_STATE_RESOURCE_GOLD)
call DisplayTimedTextToPlayer(GetOwningPlayer(GetTriggerUnit()),0,0,10.00,"TRIGSTR_1555")
endfunction
//===========================================================================
//===========================================================================
//Trigger:Wall
//===========================================================================
function Trig_Wall_Conditions takes nothing returns boolean
if(not(GetUnitTypeId(GetConstructedStructure())=='h00M'))then
return false
endif
return true
endfunction
function Trig_Wall_Actions takes nothing returns nothing
call SetUnitOwner(GetConstructedStructure(),Player(PLAYER_NEUTRAL_PASSIVE),false)
endfunction
//===========================================================================
//===========================================================================
//TriggeriseaseControl
//===========================================================================
function Trig_DiseaseControl_Conditions takes nothing returns boolean
if(not(GetResearched()=='R007'))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func001C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(0)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func002C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(1)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func003C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(2)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func004C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(3)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func005C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(4)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func006C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(5)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func007C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(6)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func008C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(7)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func009C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(8)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func010C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(9)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func011C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(10)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func012C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(11)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Actions takes nothing returns nothing
if(Trig_DiseaseControl_Func001C())then
set udg_integers50[1]=(udg_integers50[1]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func002C())then
set udg_integers50[2]=(udg_integers50[2]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func003C())then
set udg_integers50[3]=(udg_integers50[3]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func004C())then
set udg_integers50[4]=(udg_integers50[4]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func005C())then
set udg_integers50[5]=(udg_integers50[5]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func006C())then
set udg_integers50[6]=(udg_integers50[6]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func007C())then
set udg_integers50[7]=(udg_integers50[7]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func008C())then
set udg_integers50[8]=(udg_integers50[8]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func009C())then
set udg_integers50[9]=(udg_integers50[9]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func010C())then
set udg_integers50[10]=(udg_integers50[10]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func011C())then
set udg_integers50[11]=(udg_integers50[11]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func012C())then
set udg_integers50[12]=(udg_integers50[12]+2)
else
call DoNothing()
endif
endfunction
//===========================================================================
//===========================================================================
//Trigger:Leaving
//===========================================================================
function Trig_Leaving_Actions takes nothing returns nothing
call StartTimerBJ(udg_timer01,true,60.00)
call CreateTimerDialogBJ(udg_timer01,"TRIGSTR_1549")
call TimerDialogDisplayBJ(true,GetLastCreatedTimerDialogBJ())
call EnableTrigger(udg_trigger53)
endfunction
//===========================================================================
//===========================================================================
//Trigger:Tunneler
//===========================================================================
function Trig_Tunneler_Conditions takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h018'))then
return false
endif
return true
endfunction
function Trig_Tunneler_Func001Func001Func003C takes nothing returns boolean
if((GetUnitTypeId(GetEnumUnit())=='h015'))then
return true
endif
if((GetUnitTypeId(GetEnumUnit())=='h00T'))then
return true
endif
if((GetUnitTypeId(GetEnumUnit())=='h00N'))then
return true
endif
if((GetUnitTypeId(GetEnumUnit())=='h00M'))then
return true
endif
if((GetUnitTypeId(GetEnumUnit())=='h00Q'))then
return true
endif
return false
endfunction
function Trig_Tunneler_Func001Func001C takes nothing returns boolean
if(not Trig_Tunneler_Func001Func001Func003C())then
return false
endif
return true
endfunction
function Trig_Tunneler_Func001Func002C takes nothing returns boolean
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_GROUND)==true))then
return false
endif
return true
endfunction
function Trig_Tunneler_Func001A takes nothing returns nothing
if(Trig_Tunneler_Func001Func001C())then
call KillUnit(GetEnumUnit())
else
call DoNothing()
endif
if(Trig_Tunneler_Func001Func002C())then
call ExplodeUnitBJ(GetEnumUnit())
else
call DoNothing()
endif
endfunction
function Trig_Tunneler_Actions takes nothing returns nothing
call ForGroupBJ(GetUnitsInRangeOfLocAll(150.00,GetUnitLoc(GetAttacker())),function Trig_Tunneler_Func001A)
call RemoveUnit(GetAttacker())
endfunction
//===========================================================================
//===========================================================================
//Trigger:Assassin Tech Upgrade
//===========================================================================
function Trig_Assassin_Tech_Upgrade_Conditions takes nothing returns boolean
if(not(GetResearched()=='R00B'))then
return false
endif
return true
endfunction
function Trig_Assassin_Tech_Upgrade_Actions takes nothing returns nothing
call SetPlayerUnitAvailableBJ('h016',true,GetOwningPlayer(GetTriggerUnit()))
endfunction
//===========================================================================
//===========================================================================
//Trigger:Tunneler Tech Upgrade
//===========================================================================
function Trig_Tunneler_Tech_Upgrade_Conditions takes nothing returns boolean
if(not(GetResearched()=='R00C'))then
return false
endif
return true
endfunction
function Trig_Tunneler_Tech_Upgrade_Actions takes nothing returns nothing
call SetPlayerUnitAvailableBJ('h017',true,GetOwningPlayer(GetTriggerUnit()))
endfunction
//===========================================================================
//===========================================================================
//===========================================================================
//===========================================================================
//Trigger:SlaveUpgrade
//===========================================================================
function Trig_SlaveUpgrade_Func005C takes nothing returns boolean
if((GetUnitTypeId(GetTriggerUnit())=='e002'))then
return true
endif
if((GetUnitTypeId(GetTriggerUnit())=='e003'))then
return true
endif
return false
endfunction
function Trig_SlaveUpgrade_Conditions takes nothing returns boolean
if(not Trig_SlaveUpgrade_Func005C())then
return false
endif
return true
endfunction
function Trig_SlaveUpgrade_Func004C takes nothing returns boolean
if(not(GetRandomInt(1,5)<=GetRandomInt(1,10)))then
return false
endif
return true
endfunction
function Trig_SlaveUpgrade_Actions takes nothing returns nothing
call AdjustPlayerStateBJ(10,GetOwningPlayer(GetTriggerUnit()),PLAYER_STATE_RESOURCE_GOLD)
call CreateNUnitsAtLoc(GetRandomInt(1,5),'h00Z',GetTriggerPlayer(),PolarProjectionBJ(GetUnitLoc(GetTriggerUnit()),150.00,GetRandomDirectionDeg()),GetRandomDirectionDeg())
if(Trig_SlaveUpgrade_Func004C())then
call AdjustPlayerStateBJ(GetRandomInt(-50,0),GetTriggerPlayer(),PLAYER_STATE_RESOURCE_LUMBER)
else
call DoNothing()
endif
endfunction
//===========================================================================
//===========================================================================
//Trigger:Black Powder
//===========================================================================
function Trig_Black_Powder_Conditions takes nothing returns boolean
if(not(GetSpellAbilityId()=='A00I'))then
return false
endif
return true
endfunction
function Trig_Black_Powder_Func003Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetEnumUnit())=='h00M'))then
return false
endif
return true
endfunction
function Trig_Black_Powder_Func003A takes nothing returns nothing
if(Trig_Black_Powder_Func003Func001C())then
call UnitApplyTimedLifeBJ(9.00,'BTLF',GetEnumUnit())
else
call DoNothing()
endif
endfunction
function Trig_Black_Powder_Actions takes nothing returns nothing
call CreateNUnitsAtLocFacingLocBJ(1,'h011',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetSpellAbilityUnit()),GetRandomLocInRect(GetPlayableMapRect()))
call IssueImmediateOrderBJ(GetLastCreatedUnit(),"stomp")
call ForGroupBJ(GetUnitsInRangeOfLocAll(250.00,GetSpellTargetLoc()),function Trig_Black_Powder_Func003A)
endfunction
//===========================================================================
//===========================================================================
//Trigger:Caged Animal
//===========================================================================
function Trig_Caged_Animal_Conditions takes nothing returns boolean
if(not(GetSpellAbilityId()=='A00F'))then
return false
endif
return true
endfunction
function Trig_Caged_Animal_Actions takes nothing returns nothing
call KillUnit(GetSpellAbilityUnit())
call CreateNUnitsAtLoc(1,'n003',Player(PLAYER_NEUTRAL_AGGRESSIVE),GetUnitLoc(GetSpellAbilityUnit()),GetRandomDirectionDeg())
endfunction
//===========================================================================
//===========================================================================
//Trigger:Caged Animal Release
//===========================================================================
function Trig_Caged_Animal_Release_Conditions takes nothing returns boolean
if(not(GetUnitTypeId(GetAttackedUnitBJ())=='h00W'))then
return false
endif
if(not(GetUnitStateSwap(UNIT_STATE_LIFE,GetAttackedUnitBJ())<=50.00))then
return false
endif
return true
endfunction
function Trig_Caged_Animal_Release_Actions takes nothing returns nothing
call KillUnit(GetAttackedUnitBJ())
call CreateNUnitsAtLoc(1,'n003',Player(PLAYER_NEUTRAL_AGGRESSIVE),GetUnitLoc(GetAttackedUnitBJ()),GetRandomDirectionDeg())
endfunction
//===========================================================================
//===========================================================================
//Trigger:Foot
//===========================================================================
function Trig_Foot_Conditions takes nothing returns boolean
if(not(GetSpellAbilityId()=='A007'))then
return false
endif
return true
endfunction
function Trig_Foot_Actions takes nothing returns nothing
call ReplaceUnitBJ(GetSpellAbilityUnit(),'h00D',bj_UNIT_STATE_METHOD_RELATIVE)
endfunction
//===========================================================================
//===========================================================================
//Trigger:Ranged
//===========================================================================
function Trig_Ranged_Conditions takes nothing returns boolean
if(not(GetSpellAbilityId()=='A008'))then
return false
endif
return true
endfunction
function Trig_Ranged_Actions takes nothing returns nothing
call ReplaceUnitBJ(GetSpellAbilityUnit(),'h00E',bj_UNIT_STATE_METHOD_RELATIVE)
endfunction
//===========================================================================
//===========================================================================
//Trigger:Mounted
//===========================================================================
function Trig_Mounted_Conditions takes nothing returns boolean
if(not(GetSpellAbilityId()=='A009'))then
return false
endif
return true
endfunction
function Trig_Mounted_Actions takes nothing returns nothing
call ReplaceUnitBJ(GetSpellAbilityUnit(),'h00C',bj_UNIT_STATE_METHOD_RELATIVE)
endfunction
//===========================================================================
//===========================================================================
//Triggeresert Weather
//===========================================================================
function Trig_Desert_Weather_Func001Func001C takes nothing returns boolean
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_MECHANICAL)==false))then
return false
endif
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_STRUCTURE)==false))then
return false
endif
return true
endfunction
function Trig_Desert_Weather_Func001A takes nothing returns nothing
if(Trig_Desert_Weather_Func001Func001C())then
call SetUnitLifeBJ(GetEnumUnit(),(GetUnitStateSwap(UNIT_STATE_LIFE,GetEnumUnit())-1))
else
call DoNothing()
endif
endfunction
function Trig_Desert_Weather_Func002Func001C takes nothing returns boolean
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_MECHANICAL)==false))then
return false
endif
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_STRUCTURE)==false))then
return false
endif
return true
endfunction
function Trig_Desert_Weather_Func002A takes nothing returns nothing
if(Trig_Desert_Weather_Func002Func001C())then
call SetUnitLifeBJ(GetEnumUnit(),(GetUnitStateSwap(UNIT_STATE_LIFE,GetEnumUnit())-1))
else
call DoNothing()
endif
endfunction
function Trig_Desert_Weather_Func003Func001C takes nothing returns boolean
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_MECHANICAL)==false))then
return false
endif
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_STRUCTURE)==false))then
return false
endif
return true
endfunction
function Trig_Desert_Weather_Func003A takes nothing returns nothing
if(Trig_Desert_Weather_Func003Func001C())then
call SetUnitLifeBJ(GetEnumUnit(),(GetUnitStateSwap(UNIT_STATE_LIFE,GetEnumUnit())-1))
else
call DoNothing()
endif
endfunction
function Trig_Desert_Weather_Func004Func001C takes nothing returns boolean
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_MECHANICAL)==false))then
return false
endif
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_STRUCTURE)==false))then
return false
endif
return true
endfunction
function Trig_Desert_Weather_Func004A takes nothing returns nothing
if(Trig_Desert_Weather_Func004Func001C())then
call SetUnitLifeBJ(GetEnumUnit(),(GetUnitStateSwap(UNIT_STATE_LIFE,GetEnumUnit())-1))
else
call DoNothing()
endif
endfunction
function Trig_Desert_Weather_Func005Func001C takes nothing returns boolean
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_MECHANICAL)==false))then
return false
endif
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_STRUCTURE)==false))then
return false
endif
return true
endfunction
function Trig_Desert_Weather_Func005A takes nothing returns nothing
if(Trig_Desert_Weather_Func005Func001C())then
call SetUnitLifeBJ(GetEnumUnit(),(GetUnitStateSwap(UNIT_STATE_LIFE,GetEnumUnit())-1))
else
call DoNothing()
endif
endfunction
function Trig_Desert_Weather_Actions takes nothing returns nothing
call ForGroupBJ(GetUnitsInRectAll(udg_rect03),function Trig_Desert_Weather_Func001A)
call ForGroupBJ(GetUnitsInRectAll(udg_rect04),function Trig_Desert_Weather_Func002A)
call ForGroupBJ(GetUnitsInRectAll(udg_rect05),function Trig_Desert_Weather_Func003A)
call ForGroupBJ(GetUnitsInRectAll(udg_rect06),function Trig_Desert_Weather_Func004A)
call ForGroupBJ(GetUnitsInRectAll(udg_rect07),function Trig_Desert_Weather_Func005A)
endfunction
//===========================================================================
//===========================================================================
//Trigger:Submission
//===========================================================================
function Trig_Submission_Func001001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(0))
endfunction
function Trig_Submission_Func002001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(1))
endfunction
function Trig_Submission_Func003001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(2))
endfunction
function Trig_Submission_Func004001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(3))
endfunction
function Trig_Submission_Func005001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(4))
endfunction
function Trig_Submission_Func006001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(5))
endfunction
function Trig_Submission_Func007001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(6))
endfunction
function Trig_Submission_Func008001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(7))
endfunction
function Trig_Submission_Func009001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(8))
endfunction
function Trig_Submission_Func010001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(9))
endfunction
function Trig_Submission_Func011001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(10))
endfunction
function Trig_Submission_Func012001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(11))
endfunction
function Trig_Submission_Func013C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="red"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(0)))then
return false
endif
return true
endfunction
function Trig_Submission_Func014C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="blue"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(1)))then
return false
endif
return true
endfunction
function Trig_Submission_Func015C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="teal"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(2)))then
return false
endif
return true
endfunction
function Trig_Submission_Func016C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="purple"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(3)))then
return false
endif
return true
endfunction
function Trig_Submission_Func017C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="yellow"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(4)))then
return false
endif
return true
endfunction
function Trig_Submission_Func018C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="orange"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(5)))then
return false
endif
return true
endfunction
function Trig_Submission_Func019C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="green"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(6)))then
return false
endif
return true
endfunction
function Trig_Submission_Func020C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="pink"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(7)))then
return false
endif
return true
endfunction
function Trig_Submission_Func021C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="gray"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(8)))then
return false
endif
return true
endfunction
function Trig_Submission_Func022C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="lightblue"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(9)))then
return false
endif
return true
endfunction
function Trig_Submission_Func023C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="darkgreen"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(10)))then
return false
endif
return true
endfunction
function Trig_Submission_Func024C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="brown"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(11)))then
return false
endif
return true
endfunction
function Trig_Submission_Actions takes nothing returns nothing
if(Trig_Submission_Func001001())then
set udg_integer41=1
else
call DoNothing()
endif
if(Trig_Submission_Func002001())then
set udg_integer41=2
else
call DoNothing()
endif
if(Trig_Submission_Func003001())then
set udg_integer41=3
else
call DoNothing()
endif
if(Trig_Submission_Func004001())then
set udg_integer41=4
else
call DoNothing()
endif
if(Trig_Submission_Func005001())then
set udg_integer41=5
else
call DoNothing()
endif
if(Trig_Submission_Func006001())then
set udg_integer41=6
else
call DoNothing()
endif
if(Trig_Submission_Func007001())then
set udg_integer41=7
else
call DoNothing()
endif
if(Trig_Submission_Func008001())then
set udg_integer41=8
else
call DoNothing()
endif
if(Trig_Submission_Func009001())then
set udg_integer41=9
else
call DoNothing()
endif
if(Trig_Submission_Func010001())then
set udg_integer41=10
else
call DoNothing()
endif
if(Trig_Submission_Func011001())then
set udg_integer41=11
else
call DoNothing()
endif
if(Trig_Submission_Func012001())then
set udg_integer41=12
else
call DoNothing()
endif
if(Trig_Submission_Func013C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(0)
set udg_strings23[udg_integer41]="red"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(0),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(0),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[1]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func014C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(1)
set udg_strings23[udg_integer41]="blue"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(1),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(1),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[2]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func015C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(2)
set udg_strings23[udg_integer41]="teal"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(2),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(2),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[3]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func016C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(3)
set udg_strings23[udg_integer41]="purple"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(3),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(3),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[4]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func017C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(4)
set udg_strings23[udg_integer41]="yellow"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(4),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(4),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[5]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func018C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(5)
set udg_strings23[udg_integer41]="orange"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(5),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(5),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[6]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func019C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(6)
set udg_strings23[udg_integer41]="green"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(6),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(6),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[7]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func020C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(7)
set udg_strings23[udg_integer41]="pink"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(7),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(7),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[8]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func021C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(8)
set udg_strings23[udg_integer41]="gray"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(8),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(8),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[9]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func022C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(9)
set udg_strings23[udg_integer41]="lightblue"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(9),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(9),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[10]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func023C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(10)
set udg_strings23[udg_integer41]="darkgreen"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(10),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(10),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[11]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func024C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(11)
set udg_strings23[udg_integer41]="brown"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(11),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(11),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[12]+"!"))))
else
call DoNothing()
endif
endfunction
//===========================================================================
//===========================================================================
//Triggerefeat
//===========================================================================
function Trig_Defeat_Func004001 takes nothing returns boolean
return(GetUnitTypeId(GetDyingUnit())=='h00H')
endfunction
function Trig_Defeat_Func004002 takes nothing returns boolean
return(GetUnitTypeId(GetDyingUnit())=='h00I')
endfunction
function Trig_Defeat_Conditions takes nothing returns boolean
if(not GetBooleanOr(Trig_Defeat_Func004001(),Trig_Defeat_Func004002()))then
return false
endif
return true
endfunction
function Trig_Defeat_Func003A takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function Trig_Defeat_Actions takes nothing returns nothing
call CustomDefeatBJ(GetOwningPlayer(GetDyingUnit()),"TRIGSTR_732")
call DisplayTimedTextToForce(GetPlayersAll(),30,(GetPlayerName(GetOwningPlayer(GetDyingUnit()))+(" has been defeated by "+GetPlayerName(GetOwningPlayer(GetKillingUnitBJ())))))
call ForGroupBJ(GetUnitsOfPlayerAll(GetOwningPlayer(GetDyingUnit())),function Trig_Defeat_Func003A)
endfunction
//===========================================================================
//===========================================================================
//Trigger:Leave
//===========================================================================
function Trig_Leave_Func002A takes nothing returns nothing
call RemoveUnit(GetEnumUnit())
endfunction
function Trig_Leave_Actions takes nothing returns nothing
call DisplayTimedTextToForce(GetPlayersAll(),30,(GetPlayerName(GetTriggerPlayer())+" left the game."))
call ForGroupBJ(GetUnitsOfPlayerAll(GetTriggerPlayer()),function Trig_Leave_Func002A)
endfunction
//===========================================================================
//===========================================================================
//Trigger:Income
//===========================================================================
function Trig_Income_Func002Func004C takes nothing returns boolean
if(not(udg_reals16[GetForLoopIndexA()]==0.00))then
return false
endif
return true
endfunction
function Trig_Income_Func002Func011C takes nothing returns boolean
if(not(udg_integers49[GetForLoopIndexA()]<=-5))then
return false
endif
return true
endfunction
function Trig_Income_Actions takes nothing returns nothing
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integers46[GetForLoopIndexA()]=GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_FOOD_USED)
set udg_integers47[GetForLoopIndexA()]=GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
set udg_reals16[GetForLoopIndexA()]=(1.00-(I2R(udg_integers46[GetForLoopIndexA()])*0.01))
if(Trig_Income_Func002Func004C())then
set udg_reals17[GetForLoopIndexA()]=((I2R(udg_integers47[GetForLoopIndexA()])/10.00)-100.00)
else
set udg_reals17[GetForLoopIndexA()]=((I2R(udg_integers47[GetForLoopIndexA()])/10.00)*udg_reals16[GetForLoopIndexA()])
endif
set udg_integers48[GetForLoopIndexA()]=R2I(udg_reals17[GetForLoopIndexA()])
call DisplayTimedTextToPlayer(udg_players01[GetForLoopIndexA()],0,0,10.00,"TRIGSTR_703")
call DisplayTimedTextToPlayer(udg_players01[GetForLoopIndexA()],0,0,10.00,("Peasants:"+I2S(udg_integers47[GetForLoopIndexA()])))
call DisplayTimedTextToPlayer(udg_players01[GetForLoopIndexA()],0,0,10.00,("Military:"+I2S(udg_integers46[GetForLoopIndexA()])))
call DisplayTimedTextToPlayer(udg_players01[GetForLoopIndexA()],0,0,10.00,("Income:"+I2S(udg_integers48[GetForLoopIndexA()])))
call AdjustPlayerStateBJ(udg_integers48[GetForLoopIndexA()],udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_GOLD)
if(Trig_Income_Func002Func011C())then
set udg_integers49[GetForLoopIndexA()]=(udg_integers49[GetForLoopIndexA()]+5)
else
call DoNothing()
endif
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
//===========================================================================
//===========================================================================
//Trigger:RandomPeasantEvents
//===========================================================================
function Trig_RandomPeasantEvents_Func002Func003Func001C takes nothing returns boolean
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)>100))then
return false
endif
return true
endfunction
function Trig_RandomPeasantEvents_Func002C takes nothing returns boolean
if(not(udg_integer40>18))then
return false
endif
return true
endfunction
function Trig_RandomPeasantEvents_Func003Func004Func002Func001001 takes nothing returns boolean
return(udg_integer39==0)
endfunction
function Trig_RandomPeasantEvents_Func003Func004Func002C takes nothing returns boolean
if(not(udg_integer39>=0))then
return false
endif
return true
endfunction
function Trig_RandomPeasantEvents_Func003C takes nothing returns boolean
if(not(udg_integer40>10))then
return false
endif
if(not(udg_integer40<15))then
return false
endif
return true
endfunction
function Trig_RandomPeasantEvents_Func004C takes nothing returns boolean
if(not(udg_integer40<5))then
return false
endif
if(not(IsTriggerEnabled(udg_trigger56)==false))then
return false
endif
if(not(IsTriggerEnabled(udg_trigger57)==true))then
return false
endif
return true
endfunction
function Trig_RandomPeasantEvents_Actions takes nothing returns nothing
set udg_integer40=GetRandomInt(1,20)
if(Trig_RandomPeasantEvents_Func002C())then
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
if(Trig_RandomPeasantEvents_Func002Func003Func001C())then
set udg_integer39=R2I((I2R((GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)/25))+GetRandomReal(1.00,25.00)))
call DisplayTextToPlayer(udg_players01[GetForLoopIndexA()],0,0,("POPULATION BOOM! "+(I2S(udg_integer39)+" babies have been born!")))
call AdjustPlayerStateBJ(udg_integer39,udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
else
call DoNothing()
endif
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
else
call DoNothing()
endif
if(Trig_RandomPeasantEvents_Func003C())then
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_integer39=R2I((I2R((udg_integers49[GetForLoopIndexA()]+GetRandomInt(-25,25)))/2.00))
if(Trig_RandomPeasantEvents_Func003Func004Func002C())then
if(Trig_RandomPeasantEvents_Func003Func004Func002Func001001())then
set udg_integer39=GetRandomInt(1,10)
else
call DoNothing()
endif
call DisplayTextToPlayer(udg_players01[GetForLoopIndexA()],0,0,("Your reputation precedes you. "+(I2S(udg_integer39)+" peasants have journeyed from afar to serve.")))
call AdjustPlayerStateBJ(udg_integer39,udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
else
call DisplayTextToPlayer(udg_players01[GetForLoopIndexA()],0,0,("Your people have become restless... "+(I2S(IAbsBJ(udg_integer39))+" peasants have left your service.")))
call AdjustPlayerStateBJ(udg_integer39,udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
endif
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
else
call DoNothing()
endif
if(Trig_RandomPeasantEvents_Func004C())then
call EnableTrigger(udg_trigger56)
call StartTimerBJ(udg_timer02,false,GetRandomReal(60.00,240.00))
call CreateTimerDialogBJ(udg_timer02,"TRIGSTR_1548")
set udg_timerdialog02=GetLastCreatedTimerDialogBJ()
call TimerDialogDisplayBJ(true,udg_timerdialog02)
call DisplayTimedTextToForce(GetPlayersAll(),30,"TRIGSTR_1550")
else
call DoNothing()
endif
endfunction
//===========================================================================
//===========================================================================
//Triggerlague Effect
//===========================================================================
function Trig_Plague_Effect_Func002Func001C takes nothing returns boolean
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)>8000))then
return false
endif
return true
endfunction
function Trig_Plague_Effect_Func002Func002C takes nothing returns boolean
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)>5000))then
return false
endif
return true
endfunction
function Trig_Plague_Effect_Func002Func003C takes nothing returns boolean
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)>1000))then
return false
endif
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)<5000))then
return false
endif
return true
endfunction
function Trig_Plague_Effect_Func002Func004C takes nothing returns boolean
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)>100))then
return false
endif
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)<1000))then
return false
endif
return true
endfunction
function Trig_Plague_Effect_Actions takes nothing returns nothing
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
if(Trig_Plague_Effect_Func002Func001C())then
set udg_integer39=GetRandomInt((250-(udg_integers50[GetForLoopIndexA()]*10)),(600-(udg_integers50[GetForLoopIndexA()]*10)))
call AdjustPlayerStateBJ((udg_integer39*-1),udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
set udg_integers52[GetForLoopIndexA()]=(udg_integers52[GetForLoopIndexA()]+udg_integer39)
else
call DoNothing()
endif
if(Trig_Plague_Effect_Func002Func002C())then
set udg_integer39=GetRandomInt((100-(udg_integers50[GetForLoopIndexA()]*10)),(500-(udg_integers50[GetForLoopIndexA()]*10)))
call AdjustPlayerStateBJ((udg_integer39*-1),udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
set udg_integers52[GetForLoopIndexA()]=(udg_integers52[GetForLoopIndexA()]+udg_integer39)
else
call DoNothing()
endif
if(Trig_Plague_Effect_Func002Func003C())then
set udg_integer39=GetRandomInt((50-udg_integers50[GetForLoopIndexA()]),(100-udg_integers50[GetForLoopIndexA()]))
call AdjustPlayerStateBJ((udg_integer39*-1),udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
set udg_integers52[GetForLoopIndexA()]=(udg_integers52[GetForLoopIndexA()]+udg_integer39)
else
call DoNothing()
endif
if(Trig_Plague_Effect_Func002Func004C())then
set udg_integer39=GetRandomInt((10-udg_integers50[GetForLoopIndexA()]),(25-udg_integers50[GetForLoopIndexA()]))
call AdjustPlayerStateBJ((udg_integer39*-1),udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
set udg_integers52[GetForLoopIndexA()]=(udg_integers52[GetForLoopIndexA()]+udg_integer39)
else
call DoNothing()
endif
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
//===========================================================================
//===========================================================================
//Triggerlague Timer
//===========================================================================
function Trig_Plague_Timer_Actions takes nothing returns nothing
call DisableTrigger(GetTriggeringTrigger())
call DisableTrigger(udg_trigger56)
call DestroyTimerDialogBJ(udg_timerdialog02)
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
call DisplayTimedTextToPlayer(udg_players01[GetForLoopIndexA()],0,0,15.00,("You have lost "+(I2S(udg_integers52[GetForLoopIndexA()])+" peasants in this epidemic")))
set udg_integers52[GetForLoopIndexA()]=0
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call TriggerSleepAction(30.00)
call EnableTrigger(GetTriggeringTrigger())
endfunction
//===========================================================================
//===========================================================================
//TriggereasantGrowth
//===========================================================================
function Trig_PeasantGrowth_Func001Func001Func004C takes nothing returns boolean
if(not(udg_integers49[GetForLoopIndexA()]<0))then
return false
endif
return true
endfunction
function Trig_PeasantGrowth_Func001Func001C takes nothing returns boolean
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)>100))then
return false
endif
return true
endfunction
function Trig_PeasantGrowth_Func001Func002C takes nothing returns boolean
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)<0))then
return false
endif
return true
endfunction
function Trig_PeasantGrowth_Func001Func003C takes nothing returns boolean
if(not(GetPlayerState(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)<=100))then
return false
endif
return true
endfunction
function Trig_PeasantGrowth_Func001Func004C takes nothing returns boolean
if(not(udg_integers49[GetForLoopIndexA()]<-5))then
return false
endif
return true
endfunction
function Trig_PeasantGrowth_Actions takes nothing returns nothing
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
if(Trig_PeasantGrowth_Func001Func001C())then
call AdjustPlayerStateBJ(GetRandomInt(-1,udg_integers51[GetForLoopIndexA()]),udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
if(Trig_PeasantGrowth_Func001Func001Func004C())then
call AdjustPlayerStateBJ(udg_integers49[GetForLoopIndexA()],udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
else
endif
else
call DoNothing()
endif
if(Trig_PeasantGrowth_Func001Func002C())then
call SetPlayerStateBJ(udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER,0)
else
call DoNothing()
endif
if(Trig_PeasantGrowth_Func001Func003C())then
call AdjustPlayerStateBJ(GetRandomInt(0,2),udg_players01[GetForLoopIndexA()],PLAYER_STATE_RESOURCE_LUMBER)
else
call DoNothing()
endif
if(Trig_PeasantGrowth_Func001Func004C())then
set udg_integers49[GetForLoopIndexA()]=(udg_integers49[GetForLoopIndexA()]+1)
else
call DoNothing()
endif
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
//===========================================================================
//===========================================================================
//Trigger:Glory
//===========================================================================
function Trig_Glory_Conditions takes nothing returns boolean
if(not(IsUnitType(GetDyingUnit(),UNIT_TYPE_STRUCTURE)==false))then
return false
endif
if(not(IsPlayerEnemy(GetOwningPlayer(GetKillingUnitBJ()),GetOwningPlayer(GetDyingUnit()))==true))then
return false
endif
return true
endfunction
function Trig_Glory_Func003001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(0))==true)
endfunction
function Trig_Glory_Func004001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(1))==true)
endfunction
function Trig_Glory_Func005001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(2))==true)
endfunction
function Trig_Glory_Func006001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(3))==true)
endfunction
function Trig_Glory_Func007001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(4))==true)
endfunction
function Trig_Glory_Func008001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(5))==true)
endfunction
function Trig_Glory_Func009001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(6))==true)
endfunction
function Trig_Glory_Func010001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(7))==true)
endfunction
function Trig_Glory_Func011001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(8))==true)
endfunction
function Trig_Glory_Func012001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(9))==true)
endfunction
function Trig_Glory_Func013001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(10))==true)
endfunction
function Trig_Glory_Func014001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetKillingUnitBJ(),Player(11))==true)
endfunction
function Trig_Glory_Func015001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(0))==true)
endfunction
function Trig_Glory_Func016001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(1))==true)
endfunction
function Trig_Glory_Func017001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(2))==true)
endfunction
function Trig_Glory_Func018001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(3))==true)
endfunction
function Trig_Glory_Func019001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(4))==true)
endfunction
function Trig_Glory_Func020001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(5))==true)
endfunction
function Trig_Glory_Func021001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(6))==true)
endfunction
function Trig_Glory_Func022001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(7))==true)
endfunction
function Trig_Glory_Func023001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(8))==true)
endfunction
function Trig_Glory_Func024001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(9))==true)
endfunction
function Trig_Glory_Func025001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(10))==true)
endfunction
function Trig_Glory_Func026001 takes nothing returns boolean
return(IsUnitOwnedByPlayer(GetDyingUnit(),Player(11))==true)
endfunction
function Trig_Glory_Actions takes nothing returns nothing
if(Trig_Glory_Func003001())then
set udg_integers49[1]=(udg_integers49[1]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func004001())then
set udg_integers49[2]=(udg_integers49[2]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func005001())then
set udg_integers49[3]=(udg_integers49[3]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func006001())then
set udg_integers49[4]=(udg_integers49[4]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func007001())then
set udg_integers49[5]=(udg_integers49[5]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func008001())then
set udg_integers49[6]=(udg_integers49[6]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func009001())then
set udg_integers49[7]=(udg_integers49[7]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func010001())then
set udg_integers49[8]=(udg_integers49[8]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func011001())then
set udg_integers49[9]=(udg_integers49[9]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func012001())then
set udg_integers49[10]=(udg_integers49[10]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func013001())then
set udg_integers49[11]=(udg_integers49[11]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func014001())then
set udg_integers49[12]=(udg_integers49[12]+3)
else
call DoNothing()
endif
if(Trig_Glory_Func015001())then
set udg_integers49[1]=(udg_integers49[1]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func016001())then
set udg_integers49[2]=(udg_integers49[2]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func017001())then
set udg_integers49[3]=(udg_integers49[3]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func018001())then
set udg_integers49[4]=(udg_integers49[4]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func019001())then
set udg_integers49[5]=(udg_integers49[5]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func020001())then
set udg_integers49[6]=(udg_integers49[6]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func021001())then
set udg_integers49[7]=(udg_integers49[7]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func022001())then
set udg_integers49[8]=(udg_integers49[8]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func023001())then
set udg_integers49[9]=(udg_integers49[9]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func024001())then
set udg_integers49[10]=(udg_integers49[10]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func025001())then
set udg_integers49[11]=(udg_integers49[11]-1)
else
call DoNothing()
endif
if(Trig_Glory_Func026001())then
set udg_integers49[12]=(udg_integers49[12]-1)
else
call DoNothing()
endif
endfunction
//===========================================================================
//===========================================================================
//Trigger:VillageBuilt
//===========================================================================
function Trig_VillageBuilt_Conditions takes nothing returns boolean
if(not(GetUnitTypeId(GetConstructedStructure())=='h00K'))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func002C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(0)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func003C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(1)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func004C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(2)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func005C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(3)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func006C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(4)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func007C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(5)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func008C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(6)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func009C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(7)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func010C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(8)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func011C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(9)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func012C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(10)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Func013C takes nothing returns boolean
if(not(GetOwningPlayer(GetConstructedStructure())==Player(11)))then
return false
endif
return true
endfunction
function Trig_VillageBuilt_Actions takes nothing returns nothing
call AdjustPlayerStateBJ(100,GetOwningPlayer(GetConstructedStructure()),PLAYER_STATE_RESOURCE_LUMBER)
if(Trig_VillageBuilt_Func002C())then
set udg_integers51[1]=(udg_integers51[1]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func003C())then
set udg_integers51[2]=(udg_integers51[2]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func004C())then
set udg_integers51[3]=(udg_integers51[3]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func005C())then
set udg_integers51[4]=(udg_integers51[4]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func006C())then
set udg_integers51[5]=(udg_integers51[5]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func007C())then
set udg_integers51[6]=(udg_integers51[6]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func008C())then
set udg_integers51[7]=(udg_integers51[7]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func009C())then
set udg_integers51[8]=(udg_integers51[8]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func010C())then
set udg_integers51[9]=(udg_integers51[9]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func011C())then
set udg_integers51[10]=(udg_integers51[10]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func012C())then
set udg_integers51[11]=(udg_integers51[11]+1)
else
call DoNothing()
endif
if(Trig_VillageBuilt_Func013C())then
set udg_integers51[12]=(udg_integers51[12]+1)
else
call DoNothing()
endif
endfunction
//===========================================================================
//===========================================================================
//Trigger:VillageDeath
//===========================================================================
function Trig_VillageDeath_Func002C takes nothing returns boolean
if((GetUnitTypeId(GetDyingUnit())=='h00K'))then
return true
endif
if((GetUnitTypeId(GetDyingUnit())=='h013'))then
return true
endif
if((GetUnitTypeId(GetDyingUnit())=='h014'))then
return true
endif
return false
endfunction
function Trig_VillageDeath_Conditions takes nothing returns boolean
if(not(IsUnitIdType(GetUnitTypeId(GetKillingUnitBJ()),UNIT_TYPE_GROUND)==true))then
return false
endif
if(not Trig_VillageDeath_Func002C())then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func006C takes nothing returns boolean
if(not(GetPlayerState(GetOwningPlayer(GetDyingUnit()),PLAYER_STATE_RESOURCE_LUMBER)<0))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func007Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func007C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(0)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func008Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func008C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(1)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func009Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func009C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(2)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func010Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func010C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(3)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func011Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func011C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(4)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func012Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func012C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(5)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func013Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func013C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(6)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func014Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func014C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(7)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func015Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func015C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(8)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func016Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func016C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(9)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func017Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func017C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(10)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func018Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetDyingUnit())=='h013'))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Func018C takes nothing returns boolean
if(not(GetOwningPlayer(GetDyingUnit())==Player(11)))then
return false
endif
return true
endfunction
function Trig_VillageDeath_Actions takes nothing returns nothing
set udg_integer39=GetRandomInt(1,100)
call AdjustPlayerStateBJ((udg_integer39*-1),GetOwningPlayer(GetDyingUnit()),PLAYER_STATE_RESOURCE_LUMBER)
call DisplayTextToPlayer(GetOwningPlayer(GetDyingUnit()),0,0,("A village has been razed. "+(I2S(udg_integer39)+" of your peasants have died.")))
if(Trig_VillageDeath_Func006C())then
call SetPlayerStateBJ(GetOwningPlayer(GetDyingUnit()),PLAYER_STATE_RESOURCE_LUMBER,0)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func007C())then
if(Trig_VillageDeath_Func007Func001C())then
set udg_integers51[1]=(udg_integers51[1]-1)
else
set udg_integers51[1]=(udg_integers51[1]-2)
endif
set udg_integers51[1]=(udg_integers51[1]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func008C())then
if(Trig_VillageDeath_Func008Func001C())then
set udg_integers51[2]=(udg_integers51[2]-1)
else
set udg_integers51[2]=(udg_integers51[2]-2)
endif
set udg_integers51[2]=(udg_integers51[2]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func009C())then
if(Trig_VillageDeath_Func009Func001C())then
set udg_integers51[3]=(udg_integers51[3]-1)
else
set udg_integers51[3]=(udg_integers51[3]-2)
endif
set udg_integers51[3]=(udg_integers51[3]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func010C())then
if(Trig_VillageDeath_Func010Func001C())then
set udg_integers51[4]=(udg_integers51[4]-1)
else
set udg_integers51[4]=(udg_integers51[4]-2)
endif
set udg_integers51[4]=(udg_integers51[4]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func011C())then
if(Trig_VillageDeath_Func011Func001C())then
set udg_integers51[5]=(udg_integers51[5]-1)
else
set udg_integers51[5]=(udg_integers51[5]-2)
endif
set udg_integers51[5]=(udg_integers51[5]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func012C())then
if(Trig_VillageDeath_Func012Func001C())then
set udg_integers51[6]=(udg_integers51[6]-1)
else
set udg_integers51[6]=(udg_integers51[6]-2)
endif
set udg_integers51[6]=(udg_integers51[6]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func013C())then
if(Trig_VillageDeath_Func013Func001C())then
set udg_integers51[7]=(udg_integers51[7]-1)
else
set udg_integers51[7]=(udg_integers51[7]-2)
endif
set udg_integers51[7]=(udg_integers51[7]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func014C())then
if(Trig_VillageDeath_Func014Func001C())then
set udg_integers51[8]=(udg_integers51[8]-1)
else
set udg_integers51[8]=(udg_integers51[8]-2)
endif
set udg_integers51[8]=(udg_integers51[8]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func015C())then
if(Trig_VillageDeath_Func015Func001C())then
set udg_integers51[9]=(udg_integers51[9]-1)
else
set udg_integers51[9]=(udg_integers51[9]-2)
endif
set udg_integers51[9]=(udg_integers51[9]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func016C())then
if(Trig_VillageDeath_Func016Func001C())then
set udg_integers51[10]=(udg_integers51[10]-1)
else
set udg_integers51[10]=(udg_integers51[10]-2)
endif
set udg_integers51[10]=(udg_integers51[10]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func017C())then
if(Trig_VillageDeath_Func017Func001C())then
set udg_integers51[11]=(udg_integers51[11]-1)
else
set udg_integers51[11]=(udg_integers51[11]-2)
endif
set udg_integers51[11]=(udg_integers51[11]-1)
else
call DoNothing()
endif
if(Trig_VillageDeath_Func018C())then
if(Trig_VillageDeath_Func018Func001C())then
set udg_integers51[12]=(udg_integers51[12]-1)
else
set udg_integers51[12]=(udg_integers51[12]-2)
endif
set udg_integers51[12]=(udg_integers51[12]-1)
else
call DoNothing()
endif
endfunction
//===========================================================================
//===========================================================================
//Trigger:VillageUpgrade
//===========================================================================
function Trig_VillageUpgrade_Func014C takes nothing returns boolean
if((GetUnitTypeId(GetTriggerUnit())=='h00K'))then
return true
endif
if((GetUnitTypeId(GetTriggerUnit())=='h013'))then
return true
endif
return false
endfunction
function Trig_VillageUpgrade_Conditions takes nothing returns boolean
if(not Trig_VillageUpgrade_Func014C())then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func002C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(0)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func003C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(1)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func004C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(2)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func005C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(3)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func006C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(4)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func007C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(5)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func008C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(6)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func009C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(7)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func010C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(8)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func011C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(9)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func012C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(10)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Func013C takes nothing returns boolean
if(not(GetOwningPlayer(GetTriggerUnit())==Player(11)))then
return false
endif
return true
endfunction
function Trig_VillageUpgrade_Actions takes nothing returns nothing
call AdjustPlayerStateBJ(100,GetOwningPlayer(GetTriggerUnit()),PLAYER_STATE_RESOURCE_LUMBER)
if(Trig_VillageUpgrade_Func002C())then
set udg_integers51[1]=(udg_integers51[1]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func003C())then
set udg_integers51[2]=(udg_integers51[2]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func004C())then
set udg_integers51[3]=(udg_integers51[3]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func005C())then
set udg_integers51[4]=(udg_integers51[4]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func006C())then
set udg_integers51[5]=(udg_integers51[5]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func007C())then
set udg_integers51[6]=(udg_integers51[6]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func008C())then
set udg_integers51[7]=(udg_integers51[7]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func009C())then
set udg_integers51[8]=(udg_integers51[8]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func010C())then
set udg_integers51[9]=(udg_integers51[9]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func011C())then
set udg_integers51[10]=(udg_integers51[10]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func012C())then
set udg_integers51[11]=(udg_integers51[11]+1)
else
call DoNothing()
endif
if(Trig_VillageUpgrade_Func013C())then
set udg_integers51[12]=(udg_integers51[12]+1)
else
call DoNothing()
endif
endfunction
//===========================================================================
//===========================================================================
//Trigger:Guild and Commerce Tax
//===========================================================================
function Trig_Guild_and_Commerce_Tax_Conditions takes nothing returns boolean
if(not(GetSpellAbilityId()=='A00O'))then
return false
endif
return true
endfunction
function Trig_Guild_and_Commerce_Tax_Actions takes nothing returns nothing
call AdjustPlayerStateBJ(25,GetOwningPlayer(GetTriggerUnit()),PLAYER_STATE_RESOURCE_GOLD)
call DisplayTimedTextToPlayer(GetOwningPlayer(GetTriggerUnit()),0,0,10.00,"TRIGSTR_1555")
endfunction
//===========================================================================
//===========================================================================
//Trigger:Wall
//===========================================================================
function Trig_Wall_Conditions takes nothing returns boolean
if(not(GetUnitTypeId(GetConstructedStructure())=='h00M'))then
return false
endif
return true
endfunction
function Trig_Wall_Actions takes nothing returns nothing
call SetUnitOwner(GetConstructedStructure(),Player(PLAYER_NEUTRAL_PASSIVE),false)
endfunction
//===========================================================================
//===========================================================================
//TriggeriseaseControl
//===========================================================================
function Trig_DiseaseControl_Conditions takes nothing returns boolean
if(not(GetResearched()=='R007'))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func001C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(0)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func002C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(1)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func003C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(2)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func004C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(3)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func005C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(4)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func006C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(5)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func007C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(6)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func008C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(7)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func009C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(8)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func010C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(9)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func011C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(10)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Func012C takes nothing returns boolean
if(not(GetOwningPlayer(GetResearchingUnit())==Player(11)))then
return false
endif
return true
endfunction
function Trig_DiseaseControl_Actions takes nothing returns nothing
if(Trig_DiseaseControl_Func001C())then
set udg_integers50[1]=(udg_integers50[1]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func002C())then
set udg_integers50[2]=(udg_integers50[2]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func003C())then
set udg_integers50[3]=(udg_integers50[3]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func004C())then
set udg_integers50[4]=(udg_integers50[4]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func005C())then
set udg_integers50[5]=(udg_integers50[5]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func006C())then
set udg_integers50[6]=(udg_integers50[6]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func007C())then
set udg_integers50[7]=(udg_integers50[7]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func008C())then
set udg_integers50[8]=(udg_integers50[8]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func009C())then
set udg_integers50[9]=(udg_integers50[9]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func010C())then
set udg_integers50[10]=(udg_integers50[10]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func011C())then
set udg_integers50[11]=(udg_integers50[11]+2)
else
call DoNothing()
endif
if(Trig_DiseaseControl_Func012C())then
set udg_integers50[12]=(udg_integers50[12]+2)
else
call DoNothing()
endif
endfunction
//===========================================================================
//===========================================================================
//Trigger:Leaving
//===========================================================================
function Trig_Leaving_Actions takes nothing returns nothing
call StartTimerBJ(udg_timer01,true,60.00)
call CreateTimerDialogBJ(udg_timer01,"TRIGSTR_1549")
call TimerDialogDisplayBJ(true,GetLastCreatedTimerDialogBJ())
call EnableTrigger(udg_trigger53)
endfunction
//===========================================================================
//===========================================================================
//Trigger:Tunneler
//===========================================================================
function Trig_Tunneler_Conditions takes nothing returns boolean
if(not(GetUnitTypeId(GetAttacker())=='h018'))then
return false
endif
return true
endfunction
function Trig_Tunneler_Func001Func001Func003C takes nothing returns boolean
if((GetUnitTypeId(GetEnumUnit())=='h015'))then
return true
endif
if((GetUnitTypeId(GetEnumUnit())=='h00T'))then
return true
endif
if((GetUnitTypeId(GetEnumUnit())=='h00N'))then
return true
endif
if((GetUnitTypeId(GetEnumUnit())=='h00M'))then
return true
endif
if((GetUnitTypeId(GetEnumUnit())=='h00Q'))then
return true
endif
return false
endfunction
function Trig_Tunneler_Func001Func001C takes nothing returns boolean
if(not Trig_Tunneler_Func001Func001Func003C())then
return false
endif
return true
endfunction
function Trig_Tunneler_Func001Func002C takes nothing returns boolean
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_GROUND)==true))then
return false
endif
return true
endfunction
function Trig_Tunneler_Func001A takes nothing returns nothing
if(Trig_Tunneler_Func001Func001C())then
call KillUnit(GetEnumUnit())
else
call DoNothing()
endif
if(Trig_Tunneler_Func001Func002C())then
call ExplodeUnitBJ(GetEnumUnit())
else
call DoNothing()
endif
endfunction
function Trig_Tunneler_Actions takes nothing returns nothing
call ForGroupBJ(GetUnitsInRangeOfLocAll(150.00,GetUnitLoc(GetAttacker())),function Trig_Tunneler_Func001A)
call RemoveUnit(GetAttacker())
endfunction
//===========================================================================
//===========================================================================
//Trigger:Assassin Tech Upgrade
//===========================================================================
function Trig_Assassin_Tech_Upgrade_Conditions takes nothing returns boolean
if(not(GetResearched()=='R00B'))then
return false
endif
return true
endfunction
function Trig_Assassin_Tech_Upgrade_Actions takes nothing returns nothing
call SetPlayerUnitAvailableBJ('h016',true,GetOwningPlayer(GetTriggerUnit()))
endfunction
//===========================================================================
//===========================================================================
//Trigger:Tunneler Tech Upgrade
//===========================================================================
function Trig_Tunneler_Tech_Upgrade_Conditions takes nothing returns boolean
if(not(GetResearched()=='R00C'))then
return false
endif
return true
endfunction
function Trig_Tunneler_Tech_Upgrade_Actions takes nothing returns nothing
call SetPlayerUnitAvailableBJ('h017',true,GetOwningPlayer(GetTriggerUnit()))
endfunction
//===========================================================================
//===========================================================================
//===========================================================================
//===========================================================================
//Trigger:SlaveUpgrade
//===========================================================================
function Trig_SlaveUpgrade_Func005C takes nothing returns boolean
if((GetUnitTypeId(GetTriggerUnit())=='e002'))then
return true
endif
if((GetUnitTypeId(GetTriggerUnit())=='e003'))then
return true
endif
return false
endfunction
function Trig_SlaveUpgrade_Conditions takes nothing returns boolean
if(not Trig_SlaveUpgrade_Func005C())then
return false
endif
return true
endfunction
function Trig_SlaveUpgrade_Func004C takes nothing returns boolean
if(not(GetRandomInt(1,5)<=GetRandomInt(1,10)))then
return false
endif
return true
endfunction
function Trig_SlaveUpgrade_Actions takes nothing returns nothing
call AdjustPlayerStateBJ(10,GetOwningPlayer(GetTriggerUnit()),PLAYER_STATE_RESOURCE_GOLD)
call CreateNUnitsAtLoc(GetRandomInt(1,5),'h00Z',GetTriggerPlayer(),PolarProjectionBJ(GetUnitLoc(GetTriggerUnit()),150.00,GetRandomDirectionDeg()),GetRandomDirectionDeg())
if(Trig_SlaveUpgrade_Func004C())then
call AdjustPlayerStateBJ(GetRandomInt(-50,0),GetTriggerPlayer(),PLAYER_STATE_RESOURCE_LUMBER)
else
call DoNothing()
endif
endfunction
//===========================================================================
//===========================================================================
//Trigger:Black Powder
//===========================================================================
function Trig_Black_Powder_Conditions takes nothing returns boolean
if(not(GetSpellAbilityId()=='A00I'))then
return false
endif
return true
endfunction
function Trig_Black_Powder_Func003Func001C takes nothing returns boolean
if(not(GetUnitTypeId(GetEnumUnit())=='h00M'))then
return false
endif
return true
endfunction
function Trig_Black_Powder_Func003A takes nothing returns nothing
if(Trig_Black_Powder_Func003Func001C())then
call UnitApplyTimedLifeBJ(9.00,'BTLF',GetEnumUnit())
else
call DoNothing()
endif
endfunction
function Trig_Black_Powder_Actions takes nothing returns nothing
call CreateNUnitsAtLocFacingLocBJ(1,'h011',Player(PLAYER_NEUTRAL_PASSIVE),GetUnitLoc(GetSpellAbilityUnit()),GetRandomLocInRect(GetPlayableMapRect()))
call IssueImmediateOrderBJ(GetLastCreatedUnit(),"stomp")
call ForGroupBJ(GetUnitsInRangeOfLocAll(250.00,GetSpellTargetLoc()),function Trig_Black_Powder_Func003A)
endfunction
//===========================================================================
//===========================================================================
//Trigger:Caged Animal
//===========================================================================
function Trig_Caged_Animal_Conditions takes nothing returns boolean
if(not(GetSpellAbilityId()=='A00F'))then
return false
endif
return true
endfunction
function Trig_Caged_Animal_Actions takes nothing returns nothing
call KillUnit(GetSpellAbilityUnit())
call CreateNUnitsAtLoc(1,'n003',Player(PLAYER_NEUTRAL_AGGRESSIVE),GetUnitLoc(GetSpellAbilityUnit()),GetRandomDirectionDeg())
endfunction
//===========================================================================
//===========================================================================
//Trigger:Caged Animal Release
//===========================================================================
function Trig_Caged_Animal_Release_Conditions takes nothing returns boolean
if(not(GetUnitTypeId(GetAttackedUnitBJ())=='h00W'))then
return false
endif
if(not(GetUnitStateSwap(UNIT_STATE_LIFE,GetAttackedUnitBJ())<=50.00))then
return false
endif
return true
endfunction
function Trig_Caged_Animal_Release_Actions takes nothing returns nothing
call KillUnit(GetAttackedUnitBJ())
call CreateNUnitsAtLoc(1,'n003',Player(PLAYER_NEUTRAL_AGGRESSIVE),GetUnitLoc(GetAttackedUnitBJ()),GetRandomDirectionDeg())
endfunction
//===========================================================================
//===========================================================================
//Trigger:Foot
//===========================================================================
function Trig_Foot_Conditions takes nothing returns boolean
if(not(GetSpellAbilityId()=='A007'))then
return false
endif
return true
endfunction
function Trig_Foot_Actions takes nothing returns nothing
call ReplaceUnitBJ(GetSpellAbilityUnit(),'h00D',bj_UNIT_STATE_METHOD_RELATIVE)
endfunction
//===========================================================================
//===========================================================================
//Trigger:Ranged
//===========================================================================
function Trig_Ranged_Conditions takes nothing returns boolean
if(not(GetSpellAbilityId()=='A008'))then
return false
endif
return true
endfunction
function Trig_Ranged_Actions takes nothing returns nothing
call ReplaceUnitBJ(GetSpellAbilityUnit(),'h00E',bj_UNIT_STATE_METHOD_RELATIVE)
endfunction
//===========================================================================
//===========================================================================
//Trigger:Mounted
//===========================================================================
function Trig_Mounted_Conditions takes nothing returns boolean
if(not(GetSpellAbilityId()=='A009'))then
return false
endif
return true
endfunction
function Trig_Mounted_Actions takes nothing returns nothing
call ReplaceUnitBJ(GetSpellAbilityUnit(),'h00C',bj_UNIT_STATE_METHOD_RELATIVE)
endfunction
//===========================================================================
//===========================================================================
//Triggeresert Weather
//===========================================================================
function Trig_Desert_Weather_Func001Func001C takes nothing returns boolean
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_MECHANICAL)==false))then
return false
endif
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_STRUCTURE)==false))then
return false
endif
return true
endfunction
function Trig_Desert_Weather_Func001A takes nothing returns nothing
if(Trig_Desert_Weather_Func001Func001C())then
call SetUnitLifeBJ(GetEnumUnit(),(GetUnitStateSwap(UNIT_STATE_LIFE,GetEnumUnit())-1))
else
call DoNothing()
endif
endfunction
function Trig_Desert_Weather_Func002Func001C takes nothing returns boolean
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_MECHANICAL)==false))then
return false
endif
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_STRUCTURE)==false))then
return false
endif
return true
endfunction
function Trig_Desert_Weather_Func002A takes nothing returns nothing
if(Trig_Desert_Weather_Func002Func001C())then
call SetUnitLifeBJ(GetEnumUnit(),(GetUnitStateSwap(UNIT_STATE_LIFE,GetEnumUnit())-1))
else
call DoNothing()
endif
endfunction
function Trig_Desert_Weather_Func003Func001C takes nothing returns boolean
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_MECHANICAL)==false))then
return false
endif
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_STRUCTURE)==false))then
return false
endif
return true
endfunction
function Trig_Desert_Weather_Func003A takes nothing returns nothing
if(Trig_Desert_Weather_Func003Func001C())then
call SetUnitLifeBJ(GetEnumUnit(),(GetUnitStateSwap(UNIT_STATE_LIFE,GetEnumUnit())-1))
else
call DoNothing()
endif
endfunction
function Trig_Desert_Weather_Func004Func001C takes nothing returns boolean
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_MECHANICAL)==false))then
return false
endif
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_STRUCTURE)==false))then
return false
endif
return true
endfunction
function Trig_Desert_Weather_Func004A takes nothing returns nothing
if(Trig_Desert_Weather_Func004Func001C())then
call SetUnitLifeBJ(GetEnumUnit(),(GetUnitStateSwap(UNIT_STATE_LIFE,GetEnumUnit())-1))
else
call DoNothing()
endif
endfunction
function Trig_Desert_Weather_Func005Func001C takes nothing returns boolean
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_MECHANICAL)==false))then
return false
endif
if(not(IsUnitType(GetEnumUnit(),UNIT_TYPE_STRUCTURE)==false))then
return false
endif
return true
endfunction
function Trig_Desert_Weather_Func005A takes nothing returns nothing
if(Trig_Desert_Weather_Func005Func001C())then
call SetUnitLifeBJ(GetEnumUnit(),(GetUnitStateSwap(UNIT_STATE_LIFE,GetEnumUnit())-1))
else
call DoNothing()
endif
endfunction
function Trig_Desert_Weather_Actions takes nothing returns nothing
call ForGroupBJ(GetUnitsInRectAll(udg_rect03),function Trig_Desert_Weather_Func001A)
call ForGroupBJ(GetUnitsInRectAll(udg_rect04),function Trig_Desert_Weather_Func002A)
call ForGroupBJ(GetUnitsInRectAll(udg_rect05),function Trig_Desert_Weather_Func003A)
call ForGroupBJ(GetUnitsInRectAll(udg_rect06),function Trig_Desert_Weather_Func004A)
call ForGroupBJ(GetUnitsInRectAll(udg_rect07),function Trig_Desert_Weather_Func005A)
endfunction
//===========================================================================
//===========================================================================
//Trigger:Submission
//===========================================================================
function Trig_Submission_Func001001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(0))
endfunction
function Trig_Submission_Func002001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(1))
endfunction
function Trig_Submission_Func003001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(2))
endfunction
function Trig_Submission_Func004001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(3))
endfunction
function Trig_Submission_Func005001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(4))
endfunction
function Trig_Submission_Func006001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(5))
endfunction
function Trig_Submission_Func007001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(6))
endfunction
function Trig_Submission_Func008001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(7))
endfunction
function Trig_Submission_Func009001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(8))
endfunction
function Trig_Submission_Func010001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(9))
endfunction
function Trig_Submission_Func011001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(10))
endfunction
function Trig_Submission_Func012001 takes nothing returns boolean
return(GetTriggerPlayer()==Player(11))
endfunction
function Trig_Submission_Func013C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="red"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(0)))then
return false
endif
return true
endfunction
function Trig_Submission_Func014C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="blue"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(1)))then
return false
endif
return true
endfunction
function Trig_Submission_Func015C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="teal"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(2)))then
return false
endif
return true
endfunction
function Trig_Submission_Func016C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="purple"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(3)))then
return false
endif
return true
endfunction
function Trig_Submission_Func017C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="yellow"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(4)))then
return false
endif
return true
endfunction
function Trig_Submission_Func018C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="orange"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(5)))then
return false
endif
return true
endfunction
function Trig_Submission_Func019C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="green"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(6)))then
return false
endif
return true
endfunction
function Trig_Submission_Func020C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="pink"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(7)))then
return false
endif
return true
endfunction
function Trig_Submission_Func021C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="gray"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(8)))then
return false
endif
return true
endfunction
function Trig_Submission_Func022C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="lightblue"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(9)))then
return false
endif
return true
endfunction
function Trig_Submission_Func023C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="darkgreen"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(10)))then
return false
endif
return true
endfunction
function Trig_Submission_Func024C takes nothing returns boolean
if(not(SubStringBJ(GetEventPlayerChatString(),9,StringLength(GetEventPlayerChatString()))=="brown"))then
return false
endif
if(not(udg_booleans20[udg_integer41]==false))then
return false
endif
if(not(GetTriggerPlayer()!=Player(11)))then
return false
endif
return true
endfunction
function Trig_Submission_Actions takes nothing returns nothing
if(Trig_Submission_Func001001())then
set udg_integer41=1
else
call DoNothing()
endif
if(Trig_Submission_Func002001())then
set udg_integer41=2
else
call DoNothing()
endif
if(Trig_Submission_Func003001())then
set udg_integer41=3
else
call DoNothing()
endif
if(Trig_Submission_Func004001())then
set udg_integer41=4
else
call DoNothing()
endif
if(Trig_Submission_Func005001())then
set udg_integer41=5
else
call DoNothing()
endif
if(Trig_Submission_Func006001())then
set udg_integer41=6
else
call DoNothing()
endif
if(Trig_Submission_Func007001())then
set udg_integer41=7
else
call DoNothing()
endif
if(Trig_Submission_Func008001())then
set udg_integer41=8
else
call DoNothing()
endif
if(Trig_Submission_Func009001())then
set udg_integer41=9
else
call DoNothing()
endif
if(Trig_Submission_Func010001())then
set udg_integer41=10
else
call DoNothing()
endif
if(Trig_Submission_Func011001())then
set udg_integer41=11
else
call DoNothing()
endif
if(Trig_Submission_Func012001())then
set udg_integer41=12
else
call DoNothing()
endif
if(Trig_Submission_Func013C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(0)
set udg_strings23[udg_integer41]="red"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(0),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(0),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[1]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func014C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(1)
set udg_strings23[udg_integer41]="blue"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(1),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(1),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[2]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func015C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(2)
set udg_strings23[udg_integer41]="teal"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(2),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(2),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[3]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func016C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(3)
set udg_strings23[udg_integer41]="purple"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(3),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(3),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[4]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func017C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(4)
set udg_strings23[udg_integer41]="yellow"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(4),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(4),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[5]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func018C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(5)
set udg_strings23[udg_integer41]="orange"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(5),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(5),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[6]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func019C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(6)
set udg_strings23[udg_integer41]="green"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(6),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(6),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[7]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func020C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(7)
set udg_strings23[udg_integer41]="pink"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(7),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(7),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[8]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func021C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(8)
set udg_strings23[udg_integer41]="gray"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(8),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(8),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[9]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func022C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(9)
set udg_strings23[udg_integer41]="lightblue"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(9),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(9),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[10]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func023C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(10)
set udg_strings23[udg_integer41]="darkgreen"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(10),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(10),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[11]+"!"))))
else
call DoNothing()
endif
if(Trig_Submission_Func024C())then
set udg_booleans20[udg_integer41]=true
set udg_players02[udg_integer41]=Player(11)
set udg_strings23[udg_integer41]="brown"
call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(11),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(11),GetTriggerPlayer(),bj_ALLIANCE_ALLIED_VISION)
call DisplayTextToForce(GetPlayersAll(),(GetPlayerName(GetTriggerPlayer())+(" has been conquered by "+(udg_strings22[12]+"!"))))
else
call DoNothing()
endif
endfunction