Triggers

//TESH.scrollpos=0
//TESH.alwaysfold=0
// Map deprotected by X-deprotect (version 2006-10-02) by bizi
// http://dimon.xgm.ru/xdep/
// Visit our modmaking community at http://kani.hu/


function InitGlobals2 takes nothing returns nothing
	local integer i=0
	set udg_force01=CreateForce()
	set udg_force02=CreateForce()
	set udg_integer01=0
	set udg_integer02=0
	set udg_integer03=0
	set udg_integer04=3
	set udg_boolean01=false
	set udg_boolean02=false
	set udg_boolean03=true
	set udg_timer01=CreateTimer()
	set udg_timer02=CreateTimer()
	set i=0
	loop
		exitwhen(i>1)
		set udg_integers01[i]=0
		set i=i+1
	endloop
	set i=0
	loop
		exitwhen(i>1)
		set udg_strings01[i]=""
		set i=i+1
	endloop
endfunction

//***************************************************************************
//*
//*Unit Creation
//*
//***************************************************************************
//===========================================================================
function CreateNeutralHostile takes nothing returns nothing
	local player p=Player(PLAYER_NEUTRAL_AGGRESSIVE)
	local unit u
	local integer unitID
	local trigger t
	local real life
endfunction

//===========================================================================
function CreateNeutralPassiveBuildings2 takes nothing returns nothing
	local player p=Player(PLAYER_NEUTRAL_PASSIVE)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'ngme',-896.0,-1664.0,270.000)
endfunction

//===========================================================================
//===========================================================================
//===========================================================================
//***************************************************************************
//*
//*Regions
//*
//***************************************************************************
function CreateRegions2 takes nothing returns nothing
	local weathereffect we
	set udg_rect14=Rect(1376.0,992.0,3072.0,2656.0)
	set udg_rect15=Rect(1152.0,2912.0,1184.0,3008.0)
	set udg_rect16=Rect(1344.0,1056.0,3072.0,2656.0)
endfunction

//***************************************************************************
//*
//*Custom Script Code
//*
//***************************************************************************
//Map deprotected by X-deprotect(version 2006-10-02)by zibada
//http://dimon.xgm.ru/xdep/
//Visit our modmaking community at http://xgm.ru/
//***************************************************************************
//*
//*Triggers
//*
//***************************************************************************
//===========================================================================
//Trigger:init
//===========================================================================
//Map deprotected by X-deprotect(version 2006-10-02)by zibada
//http://dimon.xgm.ru/xdep/
//Visit our modmaking community at http://xgm.ru/
function Trig_Player_Groups_Actions takes nothing returns nothing
	call ForceAddPlayer(udg_force02,Player(0))
	call ForceAddPlayer(udg_force02,Player(1))
	call ForceAddPlayer(udg_force02,Player(2))
	call ForceAddPlayer(udg_force02,Player(3))
	call ForceAddPlayer(udg_force02,Player(4))
	call ForceAddPlayer(udg_force02,Player(5))
	call ForceAddPlayer(udg_force02,Player(6))
	call ForceAddPlayer(udg_force02,Player(7))
	call ForceAddPlayer(udg_force02,Player(8))
	call ForceAddPlayer(udg_force02,Player(9))
	call ForceAddPlayer(udg_force01,Player(10))
	call ForceAddPlayer(udg_force01,Player(11))
endfunction

function Trig_VCounter_Actions takes nothing returns nothing
	call CreateTimerDialogBJ(udg_timer02,"Ancient Evil :")
	call StartTimerBJ(udg_timer02,false,53.)
	set udg_timerdialog01=bj_lastCreatedTimerDialog
endfunction

function Trig_VCounter_expires_Actions takes nothing returns nothing
	call TimerDialogDisplay(udg_timerdialog01,false)
	call DestroyTimerDialog(udg_timerdialog01)
endfunction

function Trig_Limit_Train_Unit_Func001A takes nothing returns nothing
	call SetPlayerMaxHeroesAllowed(1,GetEnumPlayer())
	call SetPlayerTechMaxAllowedSwap('h00I',3,GetEnumPlayer())
	call SetPlayerTechMaxAllowedSwap('h00K',3,GetEnumPlayer())
	call SetPlayerTechMaxAllowedSwap('h00F',3,GetEnumPlayer())
	call SetPlayerTechMaxAllowedSwap('h00E',3,GetEnumPlayer())
endfunction

function Trig_Limit_Train_Unit_Actions takes nothing returns nothing
	call ForForce(bj_FORCE_ALL_PLAYERS,function Trig_Limit_Train_Unit_Func001A)
endfunction

function Trig_Goldmine_after_4_Minutes_Actions takes nothing returns nothing
	call CreateNUnitsAtLocFacingLocBJ(1,'ngol',Player(15),GetRectCenter(udg_rect06),GetRectCenter(udg_rect06))
	call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,"Human can get Gold from the Goldmine, which was created in middle.")
	call TriggerSleepAction(3.)
endfunction

function Trig_Bounty_On_Actions takes nothing returns nothing
	call SetPlayerFlagBJ(PLAYER_STATE_GIVES_BOUNTY,true,Player(0))
	call SetPlayerFlagBJ(PLAYER_STATE_GIVES_BOUNTY,true,Player(1))
	call SetPlayerFlagBJ(PLAYER_STATE_GIVES_BOUNTY,true,Player(2))
	call SetPlayerFlagBJ(PLAYER_STATE_GIVES_BOUNTY,true,Player(3))
	call SetPlayerFlagBJ(PLAYER_STATE_GIVES_BOUNTY,true,Player(4))
	call SetPlayerFlagBJ(PLAYER_STATE_GIVES_BOUNTY,true,Player(5))
	call SetPlayerFlagBJ(PLAYER_STATE_GIVES_BOUNTY,true,Player(6))
	call SetPlayerFlagBJ(PLAYER_STATE_GIVES_BOUNTY,true,Player(7))
	call SetPlayerFlagBJ(PLAYER_STATE_GIVES_BOUNTY,true,Player(8))
	call SetPlayerFlagBJ(PLAYER_STATE_GIVES_BOUNTY,true,Player(9))
	call SetPlayerFlagBJ(PLAYER_STATE_GIVES_BOUNTY,true,Player(10))
	call SetPlayerFlagBJ(PLAYER_STATE_GIVES_BOUNTY,true,Player(11))
endfunction

function Trig_Quest_Menu_Actions takes nothing returns nothing
	call CreateQuestBJ(0,"Human Instructions","TRIGSTR_457","ReplaceableTextures\\CommandButtons\\BTNMilitia.blp")
	call CreateQuestBJ(0,"Vampire Instructions","TRIGSTR_459","ReplaceableTextures\\CommandButtons\\BTNHeroDreadLord.blp")
	call CreateQuestBJ(0,"Vampire Fusion","TRIGSTR_1000","ReplaceableTextures\\CommandButtons\\BTNBaal.blp")
	call CreateQuestBJ(0,"Training Area","TRIGSTR_1002","ReplaceableTextures\\CommandButtons\\BTNCryptFiend.blp")
	call CreateQuestBJ(0,"Castle","TRIGSTR_1004","ReplaceableTextures\\CommandButtons\\BTNCastle.blp")
	call CreateQuestBJ(0,"Shops","TRIGSTR_1006","ReplaceableTextures\\CommandButtons\\BTNDustOfAppearance.blp")
	call CreateQuestBJ(2,"Changes","TRIGSTR_455","ReplaceableTextures\\CommandButtons\\BTNSelectHeroOn.blp")
	call CreateQuestBJ(2,"Credits","TRIGSTR_452","ReplaceableTextures\\WorldEditUI\\Editor-MultipleUnits.blp")
endfunction

function Trig_Starting_Lumber_Actions takes nothing returns nothing
	call AdjustPlayerStateBJ('d',Player(0),PLAYER_STATE_RESOURCE_LUMBER)
	call AdjustPlayerStateBJ('d',Player(1),PLAYER_STATE_RESOURCE_LUMBER)
	call AdjustPlayerStateBJ('d',Player(2),PLAYER_STATE_RESOURCE_LUMBER)
	call AdjustPlayerStateBJ('d',Player(3),PLAYER_STATE_RESOURCE_LUMBER)
	call AdjustPlayerStateBJ('d',Player(4),PLAYER_STATE_RESOURCE_LUMBER)
	call AdjustPlayerStateBJ('d',Player(5),PLAYER_STATE_RESOURCE_LUMBER)
	call AdjustPlayerStateBJ('d',Player(6),PLAYER_STATE_RESOURCE_LUMBER)
	call AdjustPlayerStateBJ('d',Player(7),PLAYER_STATE_RESOURCE_LUMBER)
	call AdjustPlayerStateBJ('d',Player(8),PLAYER_STATE_RESOURCE_LUMBER)
	call AdjustPlayerStateBJ('d',Player(9),PLAYER_STATE_RESOURCE_LUMBER)
endfunction

function Trig_Spawn_Players_Func002001 takes nothing returns boolean
	return(GetPlayerSlotState(Player(0))==PLAYER_SLOT_STATE_PLAYING)
endfunction

function Trig_Spawn_Players_Func003001 takes nothing returns boolean
	return(GetPlayerSlotState(Player(1))==PLAYER_SLOT_STATE_PLAYING)
endfunction

function Trig_Spawn_Players_Func004001 takes nothing returns boolean
	return(GetPlayerSlotState(Player(2))==PLAYER_SLOT_STATE_PLAYING)
endfunction

function Trig_Spawn_Players_Func005001 takes nothing returns boolean
	return(GetPlayerSlotState(Player(3))==PLAYER_SLOT_STATE_PLAYING)
endfunction

function Trig_Spawn_Players_Func006001 takes nothing returns boolean
	return(GetPlayerSlotState(Player(4))==PLAYER_SLOT_STATE_PLAYING)
endfunction

function Trig_Spawn_Players_Func007001 takes nothing returns boolean
	return(GetPlayerSlotState(Player(5))==PLAYER_SLOT_STATE_PLAYING)
endfunction

function Trig_Spawn_Players_Func008001 takes nothing returns boolean
	return(GetPlayerSlotState(Player(6))==PLAYER_SLOT_STATE_PLAYING)
endfunction

function Trig_Spawn_Players_Func009001 takes nothing returns boolean
	return(GetPlayerSlotState(Player(7))==PLAYER_SLOT_STATE_PLAYING)
endfunction

function Trig_Spawn_Players_Func010001 takes nothing returns boolean
	return(GetPlayerSlotState(Player(8))==PLAYER_SLOT_STATE_PLAYING)
endfunction

function Trig_Spawn_Players_Func011001 takes nothing returns boolean
	return(GetPlayerSlotState(Player(9))==PLAYER_SLOT_STATE_PLAYING)
endfunction

function Trig_Spawn_Players_Actions takes nothing returns nothing
	call FogMaskEnableOff()
	if(Trig_Spawn_Players_Func002001())then
		call CreateNUnitsAtLocFacingLocBJ(1,'hpea',Player(0),GetRandomLocInRect(udg_rect02),GetUnitLoc(udg_unit06))
	endif
	if(Trig_Spawn_Players_Func003001())then
		call CreateNUnitsAtLocFacingLocBJ(1,'hpea',Player(1),GetRandomLocInRect(udg_rect02),GetUnitLoc(udg_unit06))
	endif
	if(Trig_Spawn_Players_Func004001())then
		call CreateNUnitsAtLocFacingLocBJ(1,'hpea',Player(2),GetRandomLocInRect(udg_rect02),GetUnitLoc(udg_unit06))
	endif
	if(Trig_Spawn_Players_Func005001())then
		call CreateNUnitsAtLocFacingLocBJ(1,'hpea',Player(3),GetRandomLocInRect(udg_rect02),GetUnitLoc(udg_unit06))
	endif
	if(Trig_Spawn_Players_Func006001())then
		call CreateNUnitsAtLocFacingLocBJ(1,'hpea',Player(4),GetRandomLocInRect(udg_rect02),GetUnitLoc(udg_unit06))
	endif
	if(Trig_Spawn_Players_Func007001())then
		call CreateNUnitsAtLocFacingLocBJ(1,'hpea',Player(5),GetRandomLocInRect(udg_rect02),GetUnitLoc(udg_unit06))
	endif
	if(Trig_Spawn_Players_Func008001())then
		call CreateNUnitsAtLocFacingLocBJ(1,'hpea',Player(6),GetRandomLocInRect(udg_rect02),GetUnitLoc(udg_unit06))
	endif
	if(Trig_Spawn_Players_Func009001())then
		call CreateNUnitsAtLocFacingLocBJ(1,'hpea',Player(7),GetRandomLocInRect(udg_rect02),GetUnitLoc(udg_unit06))
	endif
	if(Trig_Spawn_Players_Func010001())then
		call CreateNUnitsAtLocFacingLocBJ(1,'hpea',Player(8),GetRandomLocInRect(udg_rect02),GetUnitLoc(udg_unit06))
	endif
	if(Trig_Spawn_Players_Func011001())then
		call CreateNUnitsAtLocFacingLocBJ(1,'hpea',Player(9),GetRandomLocInRect(udg_rect02),GetUnitLoc(udg_unit06))
	endif
	call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,"A portal to Hell has been opened. Soon a terrible evil will come forth... Run or die!")
	call PolledWait(15.)
	call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,"Wall yourselves in with structures for protection!")
endfunction

function Trig_Spawn_Vampire_Func003001 takes nothing returns boolean
	return(GetPlayerSlotState(Player(10))==PLAYER_SLOT_STATE_PLAYING)
endfunction

function Trig_Spawn_Vampire_Func004001 takes nothing returns boolean
	return(GetPlayerSlotState(Player(11))==PLAYER_SLOT_STATE_PLAYING)
endfunction

function Trig_Spawn_Vampire_Actions takes nothing returns nothing
	call PolledWait(56.)
	call PlaySoundBJ(udg_sound04)
	if(Trig_Spawn_Vampire_Func003001())then
		call CreateNUnitsAtLoc(1,'E000',Player(10),GetRectCenter(udg_rect01),bj_UNIT_FACING)
	endif
	if(Trig_Spawn_Vampire_Func004001())then
		call CreateNUnitsAtLoc(1,'Eevi',Player(11),GetRectCenter(udg_rect01),bj_UNIT_FACING)
	endif
	call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,"The portal has been sealed... But not before an Ancient Evil escaped...")
	call EnableTrigger(udg_trigger48)
endfunction

function Trig_Timed_Lumber_Func001002 takes nothing returns nothing
	call AdjustPlayerStateBJ('d',GetEnumPlayer(),PLAYER_STATE_RESOURCE_LUMBER)
endfunction

function Trig_Timed_Lumber_Actions takes nothing returns nothing
	call ForForce(udg_force02,function Trig_Timed_Lumber_Func001002)
endfunction

function Trig_Portal_Func011002 takes nothing returns nothing
	call PanCameraToTimedLocForPlayer(GetEnumPlayer(),CameraSetupGetDestPositionLoc(udg_camerasetup01),.01)
endfunction

function Trig_Portal_Func027002 takes nothing returns nothing
	call PanCameraToTimedLocForPlayer(GetEnumPlayer(),CameraSetupGetDestPositionLoc(udg_camerasetup02),1.)
endfunction

function Trig_Portal_Actions takes nothing returns nothing
	call SetUnitInvulnerable(udg_unit06,true)
	call SetUnitInvulnerable(udg_unit05,true)
	call SetUnitInvulnerable(udg_unit04,true)
	call IssueTargetOrderById(udg_unit06,851983,udg_destructable01)
	call IssueTargetOrderById(udg_unit05,851983,udg_destructable01)
	call IssueTargetOrderById(udg_unit04,851983,udg_destructable01)
	call SetTerrainFogExBJ(0,1000.,8000,.0,'d',.0,.0)
	call PolledWait(55.)
	call PingMinimapLocForForceEx(udg_force02,GetRectCenter(udg_rect01),10.,1,'d',.0,.0)
	call CinematicModeBJ(true,udg_force01)
	call ForForce(udg_force01,function Trig_Portal_Func011002)
	call TransmissionFromUnitWithNameBJ(udg_force01,udg_unit06,"Dark Summoner",udg_sound05,"It is done... We have summoned the Ancient Evil !!!",0,2.,true)
	call ResetTerrainFog()
	call IssueImmediateOrderById(udg_unit06,851972)
	call IssueImmediateOrderById(udg_unit05,851972)
	call IssueImmediateOrderById(udg_unit04,851972)
	call RemoveDestructable(udg_destructable01)
	call AddSpecialEffectLocBJ(GetRectCenter(udg_rect01),"Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl")
	call DestroyEffect(bj_lastCreatedEffect)
	call SetUnitInvulnerable(udg_unit06,false)
	call SetUnitInvulnerable(udg_unit05,false)
	call SetUnitInvulnerable(udg_unit04,false)
	call ExplodeUnitBJ(udg_unit06)
	call ExplodeUnitBJ(udg_unit05)
	call ExplodeUnitBJ(udg_unit04)
	call TriggerSleepAction(5.)
	call ForForce(udg_force01,function Trig_Portal_Func027002)
	call CinematicModeBJ(false,udg_force01)
endfunction

function Trig_Kill_Zone_Switch_Actions takes nothing returns nothing
	call PolledWait(50.)
	call ConditionalTriggerExecute(udg_trigger14)
	call ConditionalTriggerExecute(udg_trigger15)
endfunction

function Trig_Kill_Zone_Kill_Humans_Func001Func001Func002002 takes nothing returns nothing
	call RemoveUnit(GetEnumUnit())
endfunction

function Trig_Kill_Zone_Kill_Humans_Func001Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetEnumUnit())=='hpea')
endfunction

function Trig_Kill_Zone_Kill_Humans_Func001A takes nothing returns nothing
	if(Trig_Kill_Zone_Kill_Humans_Func001Func001C())then
		call ForGroupBJ(GetUnitsOfPlayerAll(GetOwningPlayer(GetEnumUnit())),function Trig_Kill_Zone_Kill_Humans_Func001Func001Func002002)
		call CustomDefeatBJ(GetOwningPlayer(GetEnumUnit()),"You were obliterated.")
		call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(GetPlayerName(GetOwningPlayer(GetEnumUnit()))+" has been obliterated by the exploding Portal... It wasn't very wise to stand so close."))
	endif
endfunction

function Trig_Kill_Zone_Kill_Humans_Actions takes nothing returns nothing
	call ForGroupBJ(GetUnitsInRectAll(udg_rect04),function Trig_Kill_Zone_Kill_Humans_Func001A)
endfunction

function Trig_Kill_Zone_Kill_Vampires_Func001Func001Func002002 takes nothing returns nothing
	call RemoveUnit(GetEnumUnit())
endfunction

function Trig_Kill_Zone_Kill_Vampires_Func001Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetEnumUnit())=='Udre')
endfunction

function Trig_Kill_Zone_Kill_Vampires_Func001A takes nothing returns nothing
	if(Trig_Kill_Zone_Kill_Vampires_Func001Func001C())then
		call ForGroupBJ(GetUnitsOfPlayerAll(GetOwningPlayer(GetEnumUnit())),function Trig_Kill_Zone_Kill_Vampires_Func001Func001Func002002)
		call CustomDefeatBJ(GetOwningPlayer(GetEnumUnit()),"You were obliterated.")
		call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(GetPlayerName(GetOwningPlayer(GetEnumUnit()))+" has been obliterated by the exploding Portal... It wasn't very wise to stand so close."))
	endif
endfunction

function Trig_Kill_Zone_Kill_Vampires_Actions takes nothing returns nothing
	call ForGroupBJ(GetUnitsInRectAll(udg_rect04),function Trig_Kill_Zone_Kill_Vampires_Func001A)
endfunction

function Trig_Training_Area_Intruction_Actions takes nothing returns nothing
	call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,10.,"Vampires can enter Training Area at Night. Human can get there in the morning.")
endfunction

function Trig_DayTime_turn_to_Morning_or_Night_Func001Func001Func001Func001Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='Eevi')or(GetUnitTypeId(GetTriggerUnit())=='E001')or(GetUnitTypeId(GetTriggerUnit())=='E000')or(GetUnitTypeId(GetTriggerUnit())=='E006')or(GetUnitTypeId(GetTriggerUnit())=='Udre')or(GetUnitTypeId(GetTriggerUnit())=='Utic')or(GetUnitTypeId(GetTriggerUnit())=='U002')or(GetUnitTypeId(GetTriggerUnit())=='ushd')or(GetUnitTypeId(GetTriggerUnit())=='ugho')or(GetUnitTypeId(GetTriggerUnit())=='uabo')or(GetUnitTypeId(GetTriggerUnit())=='h005')
endfunction

function Trig_DayTime_turn_to_Morning_or_Night_Func001Func001Func001Func001C takes nothing returns boolean
	return(Trig_DayTime_turn_to_Morning_or_Night_Func001Func001Func001Func001Func003C())
endfunction

function Trig_DayTime_turn_to_Morning_or_Night_Func001Func001Func001Func002Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='Ntin')or(GetUnitTypeId(GetTriggerUnit())=='Nrob')or(GetUnitTypeId(GetTriggerUnit())=='Hmkg')or(GetUnitTypeId(GetTriggerUnit())=='Npbm')or(GetUnitTypeId(GetTriggerUnit())=='npn2')or(GetUnitTypeId(GetTriggerUnit())=='npn5')or(GetUnitTypeId(GetTriggerUnit())=='npn1')or(GetUnitTypeId(GetTriggerUnit())=='npn4')or(GetUnitTypeId(GetTriggerUnit())=='npn3')or(GetUnitTypeId(GetTriggerUnit())=='npn6')or(GetUnitTypeId(GetTriggerUnit())=='Nngs')or(GetUnitTypeId(GetTriggerUnit())=='ntor')or(GetSpellAbilityId()=='Atsp')or(GetSpellAbilityId()=='Atwa')or(GetUnitTypeId(GetTriggerUnit())=='nmed')or(GetUnitTypeId(GetTriggerUnit())=='earc')or(GetUnitTypeId(GetTriggerUnit())=='hrif')or(GetUnitTypeId(GetTriggerUnit())=='hkni')or(GetUnitTypeId(GetTriggerUnit())=='Nbrn')or(GetUnitTypeId(GetTriggerUnit())=='N00E')or(GetUnitTypeId(GetTriggerUnit())=='ngzc')or(GetUnitTypeId(GetTriggerUnit())=='ngzd')or(GetUnitTypeId(GetTriggerUnit())=='ngza')or(GetUnitTypeId(GetTriggerUnit())=='ngz4')or(GetUnitTypeId(GetTriggerUnit())=='nge1')or(GetUnitTypeId(GetTriggerUnit())=='nge2')or(GetUnitTypeId(GetTriggerUnit())=='nge3')
endfunction

function Trig_DayTime_turn_to_Morning_or_Night_Func001Func001Func001Func002C takes nothing returns boolean
	return(Trig_DayTime_turn_to_Morning_or_Night_Func001Func001Func001Func002Func003C())
endfunction

function Trig_DayTime_turn_to_Morning_or_Night_Func001Func001Func001Func003C takes nothing returns boolean
	return(GetTimeOfDay()>=6.)and(GetTimeOfDay()<18.)
endfunction

function Trig_DayTime_turn_to_Morning_or_Night_Func001Func001Func001C takes nothing returns boolean
	return(Trig_DayTime_turn_to_Morning_or_Night_Func001Func001Func001Func003C())
endfunction

function Trig_DayTime_turn_to_Morning_or_Night_Func001Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetEnumUnit())=='u001')
endfunction

function Trig_DayTime_turn_to_Morning_or_Night_Func001A takes nothing returns nothing
	if(Trig_DayTime_turn_to_Morning_or_Night_Func001Func001C())then
	else
		if(Trig_DayTime_turn_to_Morning_or_Night_Func001Func001Func001C())then
			if(Trig_DayTime_turn_to_Morning_or_Night_Func001Func001Func001Func002C())then
			else
				call SetUnitPositionLoc(GetEnumUnit(),GetRectCenter(udg_rect08))
			endif
		else
			if(Trig_DayTime_turn_to_Morning_or_Night_Func001Func001Func001Func001C())then
			else
				call SetUnitPositionLoc(GetEnumUnit(),GetRectCenter(udg_rect08))
			endif
		endif
	endif
endfunction

function Trig_DayTime_turn_to_Morning_or_Night_Actions takes nothing returns nothing
	call ForGroupBJ(GetUnitsInRectAll(udg_rect05),function Trig_DayTime_turn_to_Morning_or_Night_Func001A)
endfunction

function Trig_Training_Door_Func001Func001Func001Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='Eevi')or(GetUnitTypeId(GetTriggerUnit())=='E001')or(GetUnitTypeId(GetTriggerUnit())=='E000')or(GetUnitTypeId(GetTriggerUnit())=='E006')or(GetUnitTypeId(GetTriggerUnit())=='Udre')or(GetUnitTypeId(GetTriggerUnit())=='Utic')or(GetUnitTypeId(GetTriggerUnit())=='U002')or(GetUnitTypeId(GetTriggerUnit())=='ushd')or(GetUnitTypeId(GetTriggerUnit())=='ugho')or(GetUnitTypeId(GetTriggerUnit())=='uabo')or(GetUnitTypeId(GetTriggerUnit())=='h005')
endfunction

function Trig_Training_Door_Func001Func001Func001C takes nothing returns boolean
	return(Trig_Training_Door_Func001Func001Func001Func003C())
endfunction

function Trig_Training_Door_Func001Func001Func002Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='Nngs')or(GetUnitTypeId(GetTriggerUnit())=='O001')or(GetUnitTypeId(GetTriggerUnit())=='H00U')or(GetUnitTypeId(GetTriggerUnit())=='E009')or(GetUnitTypeId(GetTriggerUnit())=='Otch')or(GetUnitTypeId(GetTriggerUnit())=='H016')or(GetUnitTypeId(GetTriggerUnit())=='Ntin')or(GetUnitTypeId(GetTriggerUnit())=='Nrob')or(GetUnitTypeId(GetTriggerUnit())=='Hmkg')or(GetUnitTypeId(GetTriggerUnit())=='Npbm')or(GetUnitTypeId(GetTriggerUnit())=='npn2')or(GetUnitTypeId(GetTriggerUnit())=='npn5')or(GetUnitTypeId(GetTriggerUnit())=='npn1')or(GetUnitTypeId(GetTriggerUnit())=='npn4')or(GetUnitTypeId(GetTriggerUnit())=='npn3')or(GetUnitTypeId(GetTriggerUnit())=='npn6')or(GetUnitTypeId(GetTriggerUnit())=='Nngs')or(GetUnitTypeId(GetTriggerUnit())=='ntor')or(GetSpellAbilityId()=='Atsp')or(GetSpellAbilityId()=='Atwa')or(GetUnitTypeId(GetTriggerUnit())=='nmed')or(GetUnitTypeId(GetTriggerUnit())=='earc')or(GetUnitTypeId(GetTriggerUnit())=='hrif')or(GetUnitTypeId(GetTriggerUnit())=='hkni')or(GetUnitTypeId(GetTriggerUnit())=='Nbrn')or(GetUnitTypeId(GetTriggerUnit())=='N00E')or(GetUnitTypeId(GetTriggerUnit())=='Orex')or(GetUnitTypeId(GetTriggerUnit())=='emtg')or(GetUnitTypeId(GetTriggerUnit())=='ngzc')or(GetUnitTypeId(GetTriggerUnit())=='ngzd')or(GetUnitTypeId(GetTriggerUnit())=='ngza')or(GetUnitTypeId(GetTriggerUnit())=='ngz4')or(GetUnitTypeId(GetTriggerUnit())=='nge1')or(GetUnitTypeId(GetTriggerUnit())=='nge2')or(GetUnitTypeId(GetTriggerUnit())=='nge3')
endfunction

function Trig_Training_Door_Func001Func001Func002C takes nothing returns boolean
	return(Trig_Training_Door_Func001Func001Func002Func003C())
endfunction

function Trig_Training_Door_Func001Func001Func003C takes nothing returns boolean
	return(GetTimeOfDay()>=6.)and(GetTimeOfDay()<18.)
endfunction

function Trig_Training_Door_Func001Func001C takes nothing returns boolean
	return(Trig_Training_Door_Func001Func001Func003C())
endfunction

function Trig_Training_Door_Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='u001')
endfunction

function Trig_Training_Door_Actions takes nothing returns nothing
	if(Trig_Training_Door_Func001C())then
		call SetUnitPositionLoc(GetTriggerUnit(),GetRectCenter(udg_rect05))
	else
		if(Trig_Training_Door_Func001Func001C())then
			if(Trig_Training_Door_Func001Func001Func002C())then
			else
				call SetUnitPositionLoc(GetTriggerUnit(),GetRectCenter(udg_rect08))
			endif
		else
			if(Trig_Training_Door_Func001Func001Func001C())then
			else
				call SetUnitPositionLoc(GetTriggerUnit(),GetRectCenter(udg_rect08))
			endif
		endif
	endif
endfunction

function Trig_Unit_enters_Training_Area_Func001Func001Func001Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='Eevi')or(GetUnitTypeId(GetTriggerUnit())=='E001')or(GetUnitTypeId(GetTriggerUnit())=='E000')or(GetUnitTypeId(GetTriggerUnit())=='E006')or(GetUnitTypeId(GetTriggerUnit())=='Udre')or(GetUnitTypeId(GetTriggerUnit())=='Utic')or(GetUnitTypeId(GetTriggerUnit())=='U002')or(GetUnitTypeId(GetTriggerUnit())=='ushd')or(GetUnitTypeId(GetTriggerUnit())=='ugho')or(GetUnitTypeId(GetTriggerUnit())=='uabo')or(GetUnitTypeId(GetTriggerUnit())=='h005')
endfunction

function Trig_Unit_enters_Training_Area_Func001Func001Func001C takes nothing returns boolean
	return(Trig_Unit_enters_Training_Area_Func001Func001Func001Func003C())
endfunction

function Trig_Unit_enters_Training_Area_Func001Func001Func002Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='Nngs')or(GetUnitTypeId(GetTriggerUnit())=='O001')or(GetUnitTypeId(GetTriggerUnit())=='H00U')or(GetUnitTypeId(GetTriggerUnit())=='E009')or(GetUnitTypeId(GetTriggerUnit())=='Otch')or(GetUnitTypeId(GetTriggerUnit())=='H016')or(GetUnitTypeId(GetTriggerUnit())=='Ntin')or(GetUnitTypeId(GetTriggerUnit())=='Nrob')or(GetUnitTypeId(GetTriggerUnit())=='Hmkg')or(GetUnitTypeId(GetTriggerUnit())=='Npbm')or(GetUnitTypeId(GetTriggerUnit())=='npn2')or(GetUnitTypeId(GetTriggerUnit())=='npn5')or(GetUnitTypeId(GetTriggerUnit())=='npn1')or(GetUnitTypeId(GetTriggerUnit())=='npn4')or(GetUnitTypeId(GetTriggerUnit())=='npn3')or(GetUnitTypeId(GetTriggerUnit())=='npn6')or(GetUnitTypeId(GetTriggerUnit())=='Nngs')or(GetUnitTypeId(GetTriggerUnit())=='ntor')or(GetSpellAbilityId()=='Atsp')or(GetSpellAbilityId()=='Atwa')or(GetUnitTypeId(GetTriggerUnit())=='nmed')or(GetUnitTypeId(GetTriggerUnit())=='earc')or(GetUnitTypeId(GetTriggerUnit())=='hrif')or(GetUnitTypeId(GetTriggerUnit())=='hkni')or(GetUnitTypeId(GetTriggerUnit())=='Nbrn')or(GetUnitTypeId(GetTriggerUnit())=='N00E')or(GetUnitTypeId(GetTriggerUnit())=='Orex')or(GetUnitTypeId(GetTriggerUnit())=='emtg')or(GetUnitTypeId(GetTriggerUnit())=='ngzc')or(GetUnitTypeId(GetTriggerUnit())=='ngzd')or(GetUnitTypeId(GetTriggerUnit())=='ngza')or(GetUnitTypeId(GetTriggerUnit())=='ngz4')or(GetUnitTypeId(GetTriggerUnit())=='nge1')or(GetUnitTypeId(GetTriggerUnit())=='nge2')or(GetUnitTypeId(GetTriggerUnit())=='nge3')
endfunction

function Trig_Unit_enters_Training_Area_Func001Func001Func002C takes nothing returns boolean
	return(Trig_Unit_enters_Training_Area_Func001Func001Func002Func003C())
endfunction

function Trig_Unit_enters_Training_Area_Func001Func001Func003C takes nothing returns boolean
	return(GetTimeOfDay()>=6.)and(GetTimeOfDay()<18.)
endfunction

function Trig_Unit_enters_Training_Area_Func001Func001C takes nothing returns boolean
	return(Trig_Unit_enters_Training_Area_Func001Func001Func003C())
endfunction

function Trig_Unit_enters_Training_Area_Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='u001')
endfunction

function Trig_Unit_enters_Training_Area_Actions takes nothing returns nothing
	if(Trig_Unit_enters_Training_Area_Func001C())then
		call SetUnitPositionLoc(GetTriggerUnit(),GetRectCenter(udg_rect05))
	else
		if(Trig_Unit_enters_Training_Area_Func001Func001C())then
			if(Trig_Unit_enters_Training_Area_Func001Func001Func002C())then
			else
				call SetUnitPositionLoc(GetTriggerUnit(),GetRectCenter(udg_rect08))
			endif
		else
			if(Trig_Unit_enters_Training_Area_Func001Func001Func001C())then
			else
				call SetUnitPositionLoc(GetTriggerUnit(),GetRectCenter(udg_rect08))
			endif
		endif
	endif
endfunction

function Trig_Spawn_Spider_From_Hell_Actions takes nothing returns nothing
	call PolledWait(56.)
	set udg_integer04=3
	call CreateNUnitsAtLocFacingLocBJ(3,'u001',Player(12),GetRectCenter(udg_rect05),GetRectCenter(bj_mapInitialPlayableArea))
endfunction

function Trig_Spider_EXP_Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='Eevi')or(GetUnitTypeId(GetTriggerUnit())=='E001')or(GetUnitTypeId(GetTriggerUnit())=='E000')or(GetUnitTypeId(GetTriggerUnit())=='E006')or(GetUnitTypeId(GetTriggerUnit())=='Udre')or(GetUnitTypeId(GetTriggerUnit())=='Utic')or(GetUnitTypeId(GetTriggerUnit())=='U002')or(GetUnitTypeId(GetTriggerUnit())=='Ntin')or(GetUnitTypeId(GetTriggerUnit())=='Hmkg')or(GetUnitTypeId(GetTriggerUnit())=='Npbm')or(GetUnitTypeId(GetTriggerUnit())=='Nngs')
endfunction

function Trig_Spider_EXP_Conditions takes nothing returns boolean
	return(Trig_Spider_EXP_Func001C())and(GetUnitTypeId(GetDyingUnit())=='u001')
endfunction

function Trig_Spider_EXP_Actions takes nothing returns nothing
	call AddHeroXPSwapped(25,GetKillingUnit(),true)
endfunction

function Trig_Units_Dead_Conditions takes nothing returns boolean
	return(GetUnitTypeId(GetDyingUnit())=='u001')and(CountLivingPlayerUnitsOfTypeId('u001',Player(12))==0)
endfunction

function Trig_Units_Dead_Func007001 takes nothing returns boolean
	return(CountLivingPlayerUnitsOfTypeId('u001',Player(12))==0)
endfunction

function Trig_Units_Dead_Actions takes nothing returns nothing
	call DisplayTextToForce(udg_force02,"New wave comes in 15 seconds.")
	set udg_integer04=(udg_integer04+1)
	call TriggerSleepAction(15.)
	if(Trig_Units_Dead_Func007001())then
		call CreateNUnitsAtLoc(udg_integer04,'u001',Player(12),GetRectCenter(udg_rect05),bj_UNIT_FACING)
	endif
endfunction

function Trig_Stop_Human_attacks_Vampires_Func002C takes nothing returns boolean
	return(GetUnitTypeId(GetAttacker())=='hpea')and(GetOwningPlayer(GetTriggerUnit())!=GetOwningPlayer(GetAttacker()))
endfunction

function Trig_Stop_Human_attacks_Vampires_Conditions takes nothing returns boolean
	return(Trig_Stop_Human_attacks_Vampires_Func002C())
endfunction

function Trig_Stop_Human_attacks_Vampires_Actions takes nothing returns nothing
	call IssueImmediateOrderById(GetAttacker(),851972)
endfunction

function Trig_Stop_Human_Attacker_Conditions takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='hpea')and(GetUnitTypeId(GetAttacker())!='Eevi')and(GetUnitTypeId(GetAttacker())!='E001')and(GetUnitTypeId(GetAttacker())!='E000')and(GetUnitTypeId(GetAttacker())!='E006')and(GetUnitTypeId(GetAttacker())!='Udre')and(GetUnitTypeId(GetAttacker())!='Utic')and(GetUnitTypeId(GetAttacker())!='U002')and(GetUnitTypeId(GetAttacker())!='ugho')and(GetUnitTypeId(GetAttacker())!='uabo')and(GetUnitTypeId(GetAttacker())!='ninf')
endfunction

function Trig_Stop_Human_Attacker_Actions takes nothing returns nothing
	call IssueImmediateOrderById(GetAttacker(),851972)
endfunction

function Trig_Stop_Team_Damage_Humans_Func001C takes nothing returns boolean
	return(GetOwningPlayer(GetAttacker())!=GetOwningPlayer(GetTriggerUnit()))and(IsPlayerInForce(GetOwningPlayer(GetTriggerUnit()),udg_force02))and(IsPlayerInForce(GetOwningPlayer(GetAttacker()),udg_force02))
endfunction

function Trig_Stop_Team_Damage_Humans_Conditions takes nothing returns boolean
	return(Trig_Stop_Team_Damage_Humans_Func001C())
endfunction

function Trig_Stop_Team_Damage_Humans_Actions takes nothing returns nothing
	call IssueImmediateOrderById(GetAttacker(),851972)
endfunction

function Trig_Stop_Team_Damage_Vampires_Func002C takes nothing returns boolean
	return(GetOwningPlayer(GetAttacker())!=GetOwningPlayer(GetTriggerUnit()))and(IsPlayerInForce(GetOwningPlayer(GetTriggerUnit()),udg_force01))and(IsPlayerInForce(GetOwningPlayer(GetAttacker()),udg_force01))
endfunction

function Trig_Stop_Team_Damage_Vampires_Conditions takes nothing returns boolean
	return(Trig_Stop_Team_Damage_Vampires_Func002C())
endfunction

function Trig_Stop_Team_Damage_Vampires_Actions takes nothing returns nothing
	call IssueImmediateOrderById(GetAttacker(),851972)
endfunction

function Trig_Building_EXP_for_Vamp_Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetKillingUnit())=='Eevi')or(GetUnitTypeId(GetKillingUnit())=='E001')or(GetUnitTypeId(GetKillingUnit())=='E000')or(GetUnitTypeId(GetKillingUnit())=='E006')or(GetUnitTypeId(GetKillingUnit())=='Udre')or(GetUnitTypeId(GetKillingUnit())=='Utic')or(GetUnitTypeId(GetKillingUnit())=='U002')
endfunction

function Trig_Building_EXP_for_Vamp_Conditions takes nothing returns boolean
	return(Trig_Building_EXP_for_Vamp_Func001C())
endfunction

function Trig_Building_EXP_for_Vamp_Func002Func001Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetDyingUnit())=='o005')or(GetUnitTypeId(GetDyingUnit())=='h00D')
endfunction

function Trig_Building_EXP_for_Vamp_Func002Func001Func002Func001Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='O001')or(GetUnitTypeId(GetTriggerUnit())=='H00U')or(GetUnitTypeId(GetTriggerUnit())=='E009')or(GetUnitTypeId(GetTriggerUnit())=='Otch')or(GetUnitTypeId(GetTriggerUnit())=='H016')or(GetUnitTypeId(GetDyingUnit())=='Ntin')and(GetUnitTypeId(GetDyingUnit())=='Hmkg')and(GetUnitTypeId(GetDyingUnit())=='Npbm')and(GetUnitTypeId(GetDyingUnit())=='Nngs')and(GetUnitTypeId(GetDyingUnit())=='h00H')and(GetUnitTypeId(GetDyingUnit())=='h00I')and(GetUnitTypeId(GetDyingUnit())=='h00L')and(GetUnitTypeId(GetDyingUnit())=='h00E')and(GetUnitTypeId(GetDyingUnit())=='h00G')and(GetUnitTypeId(GetDyingUnit())=='h00F')and(GetUnitTypeId(GetDyingUnit())=='h00J')and(GetUnitTypeId(GetDyingUnit())=='h00K')or(GetUnitTypeId(GetTriggerUnit())=='N00E')or(GetUnitTypeId(GetTriggerUnit())=='Orex')or(GetUnitTypeId(GetTriggerUnit())=='emtg')
endfunction

function Trig_Building_EXP_for_Vamp_Func002Func001Func002Func001Func003Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetDyingUnit())=='n008')or(GetUnitTypeId(GetDyingUnit())=='n007')or(GetUnitTypeId(GetDyingUnit())=='e002')or(GetUnitTypeId(GetDyingUnit())=='e003')or(GetUnitTypeId(GetDyingUnit())=='u004')or(GetUnitTypeId(GetDyingUnit())=='u003')or(GetUnitTypeId(GetDyingUnit())=='h00A')or(GetUnitTypeId(GetDyingUnit())=='h00B')or(GetUnitTypeId(GetDyingUnit())=='h003')or(GetUnitTypeId(GetDyingUnit())=='h00O')or(GetUnitTypeId(GetDyingUnit())=='h00N')or(GetUnitTypeId(GetDyingUnit())=='h00Q')or(GetUnitTypeId(GetDyingUnit())=='h00P')
endfunction

function Trig_Building_EXP_for_Vamp_Func002Func001Func002Func001Func003C takes nothing returns boolean
	return(Trig_Building_EXP_for_Vamp_Func002Func001Func002Func001Func003Func001C())
endfunction

function Trig_Building_EXP_for_Vamp_Func002Func001Func002Func001C takes nothing returns boolean
	return(Trig_Building_EXP_for_Vamp_Func002Func001Func002Func001Func003C())
endfunction

function Trig_Building_EXP_for_Vamp_Func002Func001Func002Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetDyingUnit())=='e004')or(GetUnitTypeId(GetDyingUnit())=='h002')or(GetUnitTypeId(GetDyingUnit())=='o006')
endfunction

function Trig_Building_EXP_for_Vamp_Func002Func001Func002C takes nothing returns boolean
	return(Trig_Building_EXP_for_Vamp_Func002Func001Func002Func003C())
endfunction

function Trig_Building_EXP_for_Vamp_Func002Func001C takes nothing returns boolean
	return(Trig_Building_EXP_for_Vamp_Func002Func001Func001C())
endfunction

function Trig_Building_EXP_for_Vamp_Func002Func002C takes nothing returns boolean
	return(GetUnitTypeId(GetDyingUnit())=='hspt')or(GetUnitTypeId(GetDyingUnit())=='n006')or(GetUnitTypeId(GetDyingUnit())=='n005')or(GetUnitTypeId(GetDyingUnit())=='h008')or(GetUnitTypeId(GetDyingUnit())=='h009')or(GetUnitTypeId(GetDyingUnit())=='h001')or(GetUnitTypeId(GetDyingUnit())=='h000')
endfunction

function Trig_Building_EXP_for_Vamp_Func002C takes nothing returns boolean
	return(Trig_Building_EXP_for_Vamp_Func002Func002C())
endfunction

function Trig_Building_EXP_for_Vamp_Actions takes nothing returns nothing
	if(Trig_Building_EXP_for_Vamp_Func002C())then
		call AddHeroXPSwapped(25,GetKillingUnit(),false)
	else
		if(Trig_Building_EXP_for_Vamp_Func002Func001C())then
			call AddHeroXPSwapped(50,GetKillingUnit(),false)
		else
			if(Trig_Building_EXP_for_Vamp_Func002Func001Func002C())then
				call AddHeroXPSwapped(75,GetKillingUnit(),false)
			else
				if(Trig_Building_EXP_for_Vamp_Func002Func001Func002Func001C())then
					call AddHeroXPSwapped(75,GetKillingUnit(),false)
				else
					if(Trig_Building_EXP_for_Vamp_Func002Func001Func002Func001Func001C())then
						call AddHeroXPSwapped(175,GetKillingUnit(),false)
					endif
				endif
			endif
		endif
	endif
endfunction

function Trig_AVH_Item_Denial_Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='Eevi')or(GetUnitTypeId(GetTriggerUnit())=='E001')or(GetUnitTypeId(GetTriggerUnit())=='E000')or(GetUnitTypeId(GetTriggerUnit())=='E006')or(GetUnitTypeId(GetTriggerUnit())=='Udre')or(GetUnitTypeId(GetTriggerUnit())=='Utic')
endfunction

function Trig_AVH_Item_Denial_Conditions takes nothing returns boolean
	return(Trig_AVH_Item_Denial_Func001C())and(GetItemTypeId(GetManipulatedItem())=='I000')
endfunction

function Trig_AVH_Item_Denial_Actions takes nothing returns nothing
	call RemoveItem(GetManipulatedItem())
	call CreateItemLoc('I000',GetUnitLoc(GetTriggerUnit()))
endfunction

function Trig_VH_Item_Denial_Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='Eevi')or(GetUnitTypeId(GetTriggerUnit())=='E001')or(GetUnitTypeId(GetTriggerUnit())=='E000')or(GetUnitTypeId(GetTriggerUnit())=='E006')or(GetUnitTypeId(GetTriggerUnit())=='Udre')or(GetUnitTypeId(GetTriggerUnit())=='Utic')
endfunction

function Trig_VH_Item_Denial_Conditions takes nothing returns boolean
	return(Trig_VH_Item_Denial_Func001C())and(GetItemTypeId(GetManipulatedItem())=='skul')
endfunction

function Trig_VH_Item_Denial_Actions takes nothing returns nothing
	call RemoveItem(GetManipulatedItem())
	call CreateItemLoc('skul',GetUnitLoc(GetTriggerUnit()))
endfunction

function Trig_Item_Drop_Nosferatu_Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetDyingUnit())=='Eevi')or(GetUnitTypeId(GetDyingUnit())=='E001')
endfunction

function Trig_Item_Drop_Nosferatu_Conditions takes nothing returns boolean
	return(Trig_Item_Drop_Nosferatu_Func001C())
endfunction

function Trig_Item_Drop_Nosferatu_Actions takes nothing returns nothing
	call PlaySoundBJ(udg_sound06)
	call CreateItemLoc('I000',GetUnitLoc(GetDyingUnit()))
	call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(GetPlayerName(GetOwningPlayer(GetTriggerUnit()))+" (Nosferatu) has been defeated."))
endfunction

function Trig_Item_Drop_Dracula_Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetDyingUnit())=='E000')or(GetUnitTypeId(GetDyingUnit())=='E006')
endfunction

function Trig_Item_Drop_Dracula_Conditions takes nothing returns boolean
	return(Trig_Item_Drop_Dracula_Func001C())
endfunction

function Trig_Item_Drop_Dracula_Actions takes nothing returns nothing
	call PlaySoundBJ(udg_sound06)
	call CreateItemLoc('I000',GetUnitLoc(GetDyingUnit()))
	call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(GetPlayerName(GetOwningPlayer(GetTriggerUnit()))+" (Dracula) has been defeated."))
endfunction

function Trig_Item_Drop_Vampire_Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetDyingUnit())=='Udre')and(GetDyingUnit()!=udg_unit03)
endfunction

function Trig_Item_Drop_Vampire_Conditions takes nothing returns boolean
	return(Trig_Item_Drop_Vampire_Func001C())
endfunction

function Trig_Item_Drop_Vampire_Actions takes nothing returns nothing
	call PlaySoundBJ(udg_sound06)
	call CreateItemLoc('skul',GetUnitLoc(GetDyingUnit()))
	call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(GetPlayerName(GetOwningPlayer(GetTriggerUnit()))+" (Vampire) has been defeated."))
endfunction

function Trig_Item_Drop_Ultimate_Evil_Conditions takes nothing returns boolean
	return(GetUnitTypeId(GetDyingUnit())=='Utic')
endfunction

function Trig_Item_Drop_Ultimate_Evil_Actions takes nothing returns nothing
	call PlaySoundBJ(udg_sound06)
	call CreateItemLoc('skul',GetUnitLoc(GetDyingUnit()))
	call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(GetPlayerName(GetOwningPlayer(GetTriggerUnit()))+" (Vampire) has been defeated."))
endfunction

function Trig_Random_Item_Drops_Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetKillingUnit())=='Eevi')or(GetUnitTypeId(GetKillingUnit())=='E001')or(GetUnitTypeId(GetKillingUnit())=='E000')or(GetUnitTypeId(GetKillingUnit())=='E006')or(GetUnitTypeId(GetKillingUnit())=='Udre')or(GetUnitTypeId(GetKillingUnit())=='Utic')or(GetUnitTypeId(GetKillingUnit())=='U002')
endfunction

function Trig_Random_Item_Drops_Conditions takes nothing returns boolean
	return(Trig_Random_Item_Drops_Func001C())
endfunction

function Trig_Random_Item_Drops_Func003001001 takes nothing returns boolean
	return(udg_integer03>=1)
endfunction

function Trig_Random_Item_Drops_Func003001002 takes nothing returns boolean
	return(udg_integer03<=5)
endfunction

function Trig_Random_Item_Drops_Func003001 takes nothing returns boolean
	return GetBooleanAnd(Trig_Random_Item_Drops_Func003001001(),Trig_Random_Item_Drops_Func003001002())
endfunction

function Trig_Random_Item_Drops_Func004001001 takes nothing returns boolean
	return(udg_integer03>=6)
endfunction

function Trig_Random_Item_Drops_Func004001002 takes nothing returns boolean
	return(udg_integer03<=10)
endfunction

function Trig_Random_Item_Drops_Func004001 takes nothing returns boolean
	return GetBooleanAnd(Trig_Random_Item_Drops_Func004001001(),Trig_Random_Item_Drops_Func004001002())
endfunction

function Trig_Random_Item_Drops_Func005001001 takes nothing returns boolean
	return(udg_integer03>=11)
endfunction

function Trig_Random_Item_Drops_Func005001002 takes nothing returns boolean
	return(udg_integer03<=15)
endfunction

function Trig_Random_Item_Drops_Func005001 takes nothing returns boolean
	return GetBooleanAnd(Trig_Random_Item_Drops_Func005001001(),Trig_Random_Item_Drops_Func005001002())
endfunction

function Trig_Random_Item_Drops_Func006001001 takes nothing returns boolean
	return(udg_integer03>=16)
endfunction

function Trig_Random_Item_Drops_Func006001002 takes nothing returns boolean
	return(udg_integer03<=20)
endfunction

function Trig_Random_Item_Drops_Func006001 takes nothing returns boolean
	return GetBooleanAnd(Trig_Random_Item_Drops_Func006001001(),Trig_Random_Item_Drops_Func006001002())
endfunction

function Trig_Random_Item_Drops_Func007001001 takes nothing returns boolean
	return(udg_integer03>=21)
endfunction

function Trig_Random_Item_Drops_Func007001002 takes nothing returns boolean
	return(udg_integer03<=25)
endfunction

function Trig_Random_Item_Drops_Func007001 takes nothing returns boolean
	return GetBooleanAnd(Trig_Random_Item_Drops_Func007001001(),Trig_Random_Item_Drops_Func007001002())
endfunction

function Trig_Random_Item_Drops_Func008001001 takes nothing returns boolean
	return(udg_integer03>=26)
endfunction

function Trig_Random_Item_Drops_Func008001002 takes nothing returns boolean
	return(udg_integer03<=30)
endfunction

function Trig_Random_Item_Drops_Func008001 takes nothing returns boolean
	return GetBooleanAnd(Trig_Random_Item_Drops_Func008001001(),Trig_Random_Item_Drops_Func008001002())
endfunction

function Trig_Random_Item_Drops_Func009001001 takes nothing returns boolean
	return(udg_integer03>=31)
endfunction

function Trig_Random_Item_Drops_Func009001002 takes nothing returns boolean
	return(udg_integer03<=35)
endfunction

function Trig_Random_Item_Drops_Func009001 takes nothing returns boolean
	return GetBooleanAnd(Trig_Random_Item_Drops_Func009001001(),Trig_Random_Item_Drops_Func009001002())
endfunction

function Trig_Random_Item_Drops_Func010001001 takes nothing returns boolean
	return(udg_integer03>=36)
endfunction

function Trig_Random_Item_Drops_Func010001002 takes nothing returns boolean
	return(udg_integer03<=40)
endfunction

function Trig_Random_Item_Drops_Func010001 takes nothing returns boolean
	return GetBooleanAnd(Trig_Random_Item_Drops_Func010001001(),Trig_Random_Item_Drops_Func010001002())
endfunction

function Trig_Random_Item_Drops_Func011001001 takes nothing returns boolean
	return(udg_integer03>=41)
endfunction

function Trig_Random_Item_Drops_Func011001002 takes nothing returns boolean
	return(udg_integer03<=42)
endfunction

function Trig_Random_Item_Drops_Func011001 takes nothing returns boolean
	return GetBooleanAnd(Trig_Random_Item_Drops_Func011001001(),Trig_Random_Item_Drops_Func011001002())
endfunction

function Trig_Random_Item_Drops_Func012001001 takes nothing returns boolean
	return(udg_integer03>=43)
endfunction

function Trig_Random_Item_Drops_Func012001002 takes nothing returns boolean
	return(udg_integer03<=44)
endfunction

function Trig_Random_Item_Drops_Func012001 takes nothing returns boolean
	return GetBooleanAnd(Trig_Random_Item_Drops_Func012001001(),Trig_Random_Item_Drops_Func012001002())
endfunction

function Trig_Random_Item_Drops_Func013001001 takes nothing returns boolean
	return(udg_integer03>=45)
endfunction

function Trig_Random_Item_Drops_Func013001002 takes nothing returns boolean
	return(udg_integer03<=46)
endfunction

function Trig_Random_Item_Drops_Func013001 takes nothing returns boolean
	return GetBooleanAnd(Trig_Random_Item_Drops_Func013001001(),Trig_Random_Item_Drops_Func013001002())
endfunction

function Trig_Random_Item_Drops_Func014001001 takes nothing returns boolean
	return(udg_integer03>=47)
endfunction

function Trig_Random_Item_Drops_Func014001002 takes nothing returns boolean
	return(udg_integer03<=48)
endfunction

function Trig_Random_Item_Drops_Func014001 takes nothing returns boolean
	return GetBooleanAnd(Trig_Random_Item_Drops_Func014001001(),Trig_Random_Item_Drops_Func014001002())
endfunction

function Trig_Random_Item_Drops_Actions takes nothing returns nothing
	set udg_integer03=GetRandomInt(1,1000)
	if(Trig_Random_Item_Drops_Func003001())then
		call CreateItemLoc('I001',GetUnitLoc(GetDyingUnit()))
	endif
	if(Trig_Random_Item_Drops_Func004001())then
		call CreateItemLoc('I001',GetUnitLoc(GetDyingUnit()))
	endif
	if(Trig_Random_Item_Drops_Func005001())then
		call CreateItemLoc('I002',GetUnitLoc(GetDyingUnit()))
	endif
	if(Trig_Random_Item_Drops_Func006001())then
		call CreateItemLoc('I002',GetUnitLoc(GetDyingUnit()))
	endif
	if(Trig_Random_Item_Drops_Func007001())then
		call CreateItemLoc('I006',GetUnitLoc(GetDyingUnit()))
	endif
	if(Trig_Random_Item_Drops_Func008001())then
		call CreateItemLoc('I006',GetUnitLoc(GetDyingUnit()))
	endif
	if(Trig_Random_Item_Drops_Func009001())then
		call CreateItemLoc('I00T',GetUnitLoc(GetDyingUnit()))
	endif
	if(Trig_Random_Item_Drops_Func010001())then
		call CreateItemLoc('I00T',GetUnitLoc(GetDyingUnit()))
	endif
	if(Trig_Random_Item_Drops_Func011001())then
		call CreateItemLoc('I00D',GetUnitLoc(GetDyingUnit()))
	endif
	if(Trig_Random_Item_Drops_Func012001())then
		call CreateItemLoc('I00O',GetUnitLoc(GetDyingUnit()))
	endif
	if(Trig_Random_Item_Drops_Func013001())then
		call CreateItemLoc('I00U',GetUnitLoc(GetDyingUnit()))
	endif
	if(Trig_Random_Item_Drops_Func014001())then
		call CreateItemLoc('I00A',GetUnitLoc(GetDyingUnit()))
	endif
endfunction

function Trig_VampireKilling_Worker_Func002Func002C takes nothing returns boolean
	return(GetUnitTypeId(GetKillingUnit())=='E000')or(GetUnitTypeId(GetKillingUnit())=='E006')or(GetUnitTypeId(GetKillingUnit())=='Eevi')or(GetUnitTypeId(GetKillingUnit())=='E001')or(GetUnitTypeId(GetKillingUnit())=='Udre')or(GetUnitTypeId(GetKillingUnit())=='Utic')or(GetUnitTypeId(GetKillingUnit())=='U002')
endfunction

function Trig_VampireKilling_Worker_Func002C takes nothing returns boolean
	return(GetUnitTypeId(GetDyingUnit())=='hspt')and(Trig_VampireKilling_Worker_Func002Func002C())
endfunction

function Trig_VampireKilling_Worker_Conditions takes nothing returns boolean
	return(Trig_VampireKilling_Worker_Func002C())
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func001Func001Func001Func001Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetKillingUnit())=='Eevi')or(GetUnitTypeId(GetKillingUnit())=='E001')
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func001Func001Func001Func001C takes nothing returns boolean
	return(IsPlayerInForce(GetOwningPlayer(GetKillingUnit()),bj_FORCE_PLAYER[11]))and(Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func001Func001Func001Func001Func003C())
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func001Func001Func001Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetKillingUnit())=='E000')or(GetUnitTypeId(GetKillingUnit())=='E006')
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func001Func001Func001C takes nothing returns boolean
	return(IsPlayerInForce(GetOwningPlayer(GetKillingUnit()),bj_FORCE_PLAYER[10]))and(Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func001Func001Func001Func003C())
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func001Func001Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetKillingUnit())=='Udre')or(GetUnitTypeId(GetKillingUnit())=='Utic')or(GetUnitTypeId(GetKillingUnit())=='U002')
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func001Func001C takes nothing returns boolean
	return(IsPlayerInForce(GetOwningPlayer(GetKillingUnit()),bj_FORCE_PLAYER[9]))and(Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func001Func001Func003C())
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func001Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetKillingUnit())=='Udre')or(GetUnitTypeId(GetKillingUnit())=='Utic')or(GetUnitTypeId(GetKillingUnit())=='U002')
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func001C takes nothing returns boolean
	return(IsPlayerInForce(GetOwningPlayer(GetKillingUnit()),bj_FORCE_PLAYER[8]))and(Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func001Func003C())
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetKillingUnit())=='Udre')or(GetUnitTypeId(GetKillingUnit())=='Utic')or(GetUnitTypeId(GetKillingUnit())=='U002')
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001C takes nothing returns boolean
	return(IsPlayerInForce(GetOwningPlayer(GetKillingUnit()),bj_FORCE_PLAYER[7]))and(Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func003C())
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetKillingUnit())=='Udre')or(GetUnitTypeId(GetKillingUnit())=='Utic')or(GetUnitTypeId(GetKillingUnit())=='U002')
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001C takes nothing returns boolean
	return(IsPlayerInForce(GetOwningPlayer(GetKillingUnit()),bj_FORCE_PLAYER[6]))and(Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func003C())
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetKillingUnit())=='Udre')or(GetUnitTypeId(GetKillingUnit())=='Utic')or(GetUnitTypeId(GetKillingUnit())=='U002')
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001C takes nothing returns boolean
	return(IsPlayerInForce(GetOwningPlayer(GetKillingUnit()),bj_FORCE_PLAYER[5]))and(Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func003C())
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func001Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetKillingUnit())=='Udre')or(GetUnitTypeId(GetKillingUnit())=='Utic')or(GetUnitTypeId(GetKillingUnit())=='U002')
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func001C takes nothing returns boolean
	return(IsPlayerInForce(GetOwningPlayer(GetKillingUnit()),bj_FORCE_PLAYER[4]))and(Trig_VampireKilling_Worker_Func001Func001Func001Func001Func003C())
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetKillingUnit())=='Udre')or(GetUnitTypeId(GetKillingUnit())=='Utic')or(GetUnitTypeId(GetKillingUnit())=='U002')
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func001C takes nothing returns boolean
	return(IsPlayerInForce(GetOwningPlayer(GetKillingUnit()),bj_FORCE_PLAYER[3]))and(Trig_VampireKilling_Worker_Func001Func001Func001Func003C())
endfunction

function Trig_VampireKilling_Worker_Func001Func001Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetKillingUnit())=='Udre')or(GetUnitTypeId(GetKillingUnit())=='Utic')or(GetUnitTypeId(GetKillingUnit())=='U002')
endfunction

function Trig_VampireKilling_Worker_Func001Func001C takes nothing returns boolean
	return(IsPlayerInForce(GetOwningPlayer(GetKillingUnit()),bj_FORCE_PLAYER[2]))and(Trig_VampireKilling_Worker_Func001Func001Func003C())
endfunction

function Trig_VampireKilling_Worker_Func001Func003C takes nothing returns boolean
	return(GetUnitTypeId(GetKillingUnit())=='Udre')or(GetUnitTypeId(GetKillingUnit())=='Utic')or(GetUnitTypeId(GetKillingUnit())=='U002')
endfunction

function Trig_VampireKilling_Worker_Func001C takes nothing returns boolean
	return(IsPlayerInForce(GetOwningPlayer(GetKillingUnit()),bj_FORCE_PLAYER[1]))and(Trig_VampireKilling_Worker_Func001Func003C())
endfunction

function Trig_VampireKilling_Worker_Actions takes nothing returns nothing
	if(Trig_VampireKilling_Worker_Func001C())then
		call CreateNUnitsAtLocFacingLocBJ(1,'ugho',Player(1),GetUnitLoc(GetDyingUnit()),GetUnitLoc(GetKillingUnit()))
		return
	else
		if(Trig_VampireKilling_Worker_Func001Func001C())then
			call CreateNUnitsAtLocFacingLocBJ(1,'ugho',Player(2),GetUnitLoc(GetDyingUnit()),GetUnitLoc(GetKillingUnit()))
			return
		else
			if(Trig_VampireKilling_Worker_Func001Func001Func001C())then
				call CreateNUnitsAtLocFacingLocBJ(1,'ugho',Player(3),GetUnitLoc(GetDyingUnit()),GetUnitLoc(GetKillingUnit()))
				return
			else
				if(Trig_VampireKilling_Worker_Func001Func001Func001Func001C())then
					call CreateNUnitsAtLocFacingLocBJ(1,'ugho',Player(4),GetUnitLoc(GetDyingUnit()),GetUnitLoc(GetKillingUnit()))
					return
				else
					if(Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001C())then
						call CreateNUnitsAtLocFacingLocBJ(1,'ugho',Player(5),GetUnitLoc(GetDyingUnit()),GetUnitLoc(GetKillingUnit()))
						return
					else
						if(Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001C())then
							call CreateNUnitsAtLocFacingLocBJ(1,'ugho',Player(6),GetUnitLoc(GetDyingUnit()),GetUnitLoc(GetKillingUnit()))
							return
						else
							if(Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001C())then
								call CreateNUnitsAtLocFacingLocBJ(1,'ugho',Player(7),GetUnitLoc(GetDyingUnit()),GetUnitLoc(GetKillingUnit()))
								return
							else
								if(Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func001C())then
									call CreateNUnitsAtLocFacingLocBJ(1,'ugho',Player(8),GetUnitLoc(GetDyingUnit()),GetUnitLoc(GetKillingUnit()))
									return
								else
									if(Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func001Func001C())then
										call CreateNUnitsAtLocFacingLocBJ(1,'ugho',Player(9),GetUnitLoc(GetDyingUnit()),GetUnitLoc(GetKillingUnit()))
										return
									else
										if(Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func001Func001Func001C())then
											call CreateNUnitsAtLocFacingLocBJ(1,'ugho',Player(10),GetUnitLoc(GetDyingUnit()),GetUnitLoc(GetKillingUnit()))
											return
										else
											if(Trig_VampireKilling_Worker_Func001Func001Func001Func001Func001Func001Func001Func001Func001Func001Func001C())then
												call CreateNUnitsAtLocFacingLocBJ(1,'ugho',Player(11),GetUnitLoc(GetDyingUnit()),GetUnitLoc(GetKillingUnit()))
												return
											else
												call CreateNUnitsAtLocFacingLocBJ(1,'ugho',Player(0),GetUnitLoc(GetDyingUnit()),GetUnitLoc(GetKillingUnit()))
											endif
										endif
									endif
								endif
							endif
						endif
					endif
				endif
			endif
		endif
	endif
endfunction

function Trig_Detonate_Worker_Conditions takes nothing returns boolean
	return(GetSpellAbilityId()=='A01W')
endfunction

function Trig_Detonate_Worker_Actions takes nothing returns nothing
	call TriggerSleepAction(.01)
	call KillUnit(GetTriggerUnit())
endfunction

function Trig_Special_Effect_on_Hero_Func002C takes nothing returns boolean
	return(GetUnitTypeId(GetEnteringUnit())=='Eevi')or(GetUnitTypeId(GetEnteringUnit())=='Udre')or(GetUnitTypeId(GetEnteringUnit())=='U002')or(GetUnitTypeId(GetEnteringUnit())=='Ntin')or(GetUnitTypeId(GetEnteringUnit())=='Hmkg')or(GetUnitTypeId(GetEnteringUnit())=='Npbm')or(GetUnitTypeId(GetEnteringUnit())=='Nngs')
endfunction

function Trig_Special_Effect_on_Hero_Conditions takes nothing returns boolean
	return(Trig_Special_Effect_on_Hero_Func002C())
endfunction

function Trig_Special_Effect_on_Hero_Func001Func001Func001Func001Func001Func001Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetEnteringUnit())=='Nngs')
endfunction

function Trig_Special_Effect_on_Hero_Func001Func001Func001Func001Func001Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetEnteringUnit())=='Npbm')
endfunction

function Trig_Special_Effect_on_Hero_Func001Func001Func001Func001Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetEnteringUnit())=='Hmkg')
endfunction

function Trig_Special_Effect_on_Hero_Func001Func001Func001Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetEnteringUnit())=='Ntin')
endfunction

function Trig_Special_Effect_on_Hero_Func001Func001Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetEnteringUnit())=='U002')
endfunction

function Trig_Special_Effect_on_Hero_Func001Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetEnteringUnit())=='Udre')
endfunction

function Trig_Special_Effect_on_Hero_Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetEnteringUnit())=='Eevi')
endfunction

function Trig_Special_Effect_on_Hero_Actions takes nothing returns nothing
	if(Trig_Special_Effect_on_Hero_Func001C())then
		call AddSpecialEffectTargetUnitBJ("right hand",GetTriggerUnit(),"BurningHands.mdx")
		call AddSpecialEffectTargetUnitBJ("left hand",GetTriggerUnit(),"BurningHands.mdx")
	else
		if(Trig_Special_Effect_on_Hero_Func001Func001C())then
			call AddSpecialEffectTargetUnitBJ("right hand",GetTriggerUnit(),"DarkHands.mdx")
			call AddSpecialEffectTargetUnitBJ("left hand",GetTriggerUnit(),"DarkHands.mdx")
		else
			if(Trig_Special_Effect_on_Hero_Func001Func001Func001C())then
				call AddSpecialEffectTargetUnitBJ("origin",GetTriggerUnit(),"Enchant.MDX")
			else
				if(Trig_Special_Effect_on_Hero_Func001Func001Func001Func001C())then
					call AddSpecialEffectTargetUnitBJ("right hand",GetTriggerUnit(),"RadianceHands.mdx")
					call AddSpecialEffectTargetUnitBJ("left hand",GetTriggerUnit(),"RadianceHands.mdx")
				else
					if(Trig_Special_Effect_on_Hero_Func001Func001Func001Func001Func001C())then
						call AddSpecialEffectTargetUnitBJ("right hand",GetTriggerUnit(),"StarfireHands.mdx")
						call AddSpecialEffectTargetUnitBJ("left hand",GetTriggerUnit(),"StarfireHands.mdx")
					else
						if(Trig_Special_Effect_on_Hero_Func001Func001Func001Func001Func001Func001C())then
							call AddSpecialEffectTargetUnitBJ("right hand",GetTriggerUnit(),"EarthHands.mdx")
							call AddSpecialEffectTargetUnitBJ("left hand",GetTriggerUnit(),"EarthHands.mdx")
						else
							if(Trig_Special_Effect_on_Hero_Func001Func001Func001Func001Func001Func001Func001C())then
								call AddSpecialEffectTargetUnitBJ("right hand",GetTriggerUnit(),"MoonfireHands.mdx")
								call AddSpecialEffectTargetUnitBJ("left hand",GetTriggerUnit(),"MoonfireHands.mdx")
							endif
						endif
					endif
				endif
			endif
		endif
	endif
endfunction

function Trig_Special_Effect_for_Thousand_Souls_Conditions takes nothing returns boolean
	return(GetSpellAbilityId()=='A01F')
endfunction

function Trig_Special_Effect_for_Thousand_Souls_Actions takes nothing returns nothing
	call AddSpecialEffectTargetUnitBJ("origin",GetSpellAbilityUnit(),"Abilities\\Spells\\Undead\\DeathPact\\DeathPactTarget.mdl")
endfunction

function Trig_Special_Effect_for_Release_Evil_Conditions takes nothing returns boolean
	return(GetSpellAbilityId()=='A01O')
endfunction

function Trig_Special_Effect_for_Release_Evil_Actions takes nothing returns nothing
	call AddSpecialEffectTargetUnitBJ("origin",GetSpellAbilityUnit(),"Abilities\\Spells\\Other\\Doom\\DoomDeath.mdl")
endfunction

function Trig_Human_Killed_Conditions takes nothing returns boolean
	return(IsPlayerInForce(GetOwningPlayer(GetDyingUnit()),udg_force02))and(GetUnitTypeId(GetDyingUnit())=='hpea')and((1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))>0)and((1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))<=12)
endfunction

function Trig_Human_Killed_Func003002 takes nothing returns nothing
	call RemoveUnit(GetEnumUnit())
endfunction

function Trig_Human_Killed_Func009A takes nothing returns nothing
	call SetPlayerAllianceStateBJ(GetOwningPlayer(GetDyingUnit()),GetEnumPlayer(),0)
	call SetPlayerAllianceStateBJ(GetEnumPlayer(),GetOwningPlayer(GetDyingUnit()),0)
endfunction

function Trig_Human_Killed_Func010A takes nothing returns nothing
	call SetPlayerAllianceStateBJ(GetOwningPlayer(GetDyingUnit()),GetEnumPlayer(),3)
	call SetPlayerAllianceStateBJ(GetEnumPlayer(),GetOwningPlayer(GetDyingUnit()),3)
endfunction

function Trig_Human_Killed_Func015Func001Func003001 takes nothing returns boolean
	return(GetHeroLevel(GetKillingUnit())>=4)
endfunction

function Trig_Human_Killed_Func015Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetEnumUnit())=='Udre')
endfunction

function Trig_Human_Killed_Func015A takes nothing returns nothing
	if(Trig_Human_Killed_Func015Func001C())then
		call SetUnitInvulnerable(GetTriggerUnit(),true)
		if(Trig_Human_Killed_Func015Func001Func003001())then
			call SetHeroLevelBJ(GetEnumUnit(),(GetHeroLevel(GetKillingUnit())-3),false)
		endif
	endif
endfunction

function Trig_Human_Killed_Func017002001 takes nothing returns boolean
	return(GetUnitTypeId(GetEnumUnit())=='Udre')
endfunction

function Trig_Human_Killed_Func017002 takes nothing returns nothing
	if(Trig_Human_Killed_Func017002001())then
		call SetUnitInvulnerable(GetTriggerUnit(),false)
	endif
endfunction

function Trig_Human_Killed_Actions takes nothing returns nothing
	call SetPlayerStateBJ(GetOwningPlayer(GetDyingUnit()),PLAYER_STATE_RESOURCE_GOLD,0)
	call SetPlayerStateBJ(GetOwningPlayer(GetDyingUnit()),PLAYER_STATE_RESOURCE_LUMBER,0)
	call ForGroupBJ(GetUnitsOfPlayerAll(GetTriggerPlayer()),function Trig_Human_Killed_Func003002)
	call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(GetPlayerName(GetOwningPlayer(GetTriggerUnit()))+" has fallen and will now be reborn as a Vampire..."))
	call PlaySoundBJ(udg_sound03)
	call CreateNUnitsAtLocFacingLocBJ(1,'Udre',GetOwningPlayer(GetDyingUnit()),GetUnitLoc(GetDyingUnit()),GetUnitLoc(GetKillingUnit()))
	call ForceRemovePlayer(udg_force02,GetTriggerPlayer())
	call ForceAddPlayer(udg_force01,GetTriggerPlayer())
	call ForForce(udg_force02,function Trig_Human_Killed_Func009A)
	call ForForce(udg_force01,function Trig_Human_Killed_Func010A)
	call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(10),5)
	call SetPlayerAllianceStateBJ(GetTriggerPlayer(),Player(11),5)
	call FogEnableOff()
	call FogEnableOn()
	call ForGroupBJ(GetUnitsOfPlayerAll(GetTriggerPlayer()),function Trig_Human_Killed_Func015A)
	call TriggerSleepAction(5.)
	call ForGroupBJ(GetUnitsOfPlayerAll(GetTriggerPlayer()),function Trig_Human_Killed_Func017002)
endfunction

function Trig_Human_Killed_by_Creep_Func007C takes nothing returns boolean
	return(GetUnitTypeId(GetKillingUnit())=='u001')or(GetUnitTypeId(GetKillingUnit())=='ninf')
endfunction

function Trig_Human_Killed_by_Creep_Conditions takes nothing returns boolean
	return(IsPlayerInForce(GetOwningPlayer(GetDyingUnit()),udg_force02))and(GetUnitTypeId(GetDyingUnit())=='hpea')and(Trig_Human_Killed_by_Creep_Func007C())
endfunction

function Trig_Human_Killed_by_Creep_Func003002 takes nothing returns nothing
	call RemoveUnit(GetEnumUnit())
endfunction

function Trig_Human_Killed_by_Creep_Actions takes nothing returns nothing
	call SetPlayerStateBJ(GetOwningPlayer(GetDyingUnit()),PLAYER_STATE_RESOURCE_GOLD,0)
	call SetPlayerStateBJ(GetOwningPlayer(GetDyingUnit()),PLAYER_STATE_RESOURCE_LUMBER,0)
	call ForGroupBJ(GetUnitsOfPlayerAll(GetTriggerPlayer()),function Trig_Human_Killed_by_Creep_Func003002)
	call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(GetPlayerName(GetOwningPlayer(GetTriggerUnit()))+" has been own by creep what a NOOB!!!"))
endfunction

function Trig_Killing_System_Conditions takes nothing returns boolean
	return(GetUnitTypeId(GetDyingUnit())=='hpea')and((1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))>0)and((1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))<=12)
endfunction

function Trig_Killing_System_Func006Func001Func001Func001Func001C takes nothing returns boolean
	return(udg_integers01[(1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))]==6)
endfunction

function Trig_Killing_System_Func006Func001Func001Func001C takes nothing returns boolean
	return(udg_integers01[(1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))]==5)
endfunction

function Trig_Killing_System_Func006Func001Func001C takes nothing returns boolean
	return(udg_integers01[(1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))]==4)
endfunction

function Trig_Killing_System_Func006Func001C takes nothing returns boolean
	return(udg_integers01[(1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))]==3)
endfunction

function Trig_Killing_System_Func006C takes nothing returns boolean
	return(udg_integers01[(1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))]==2)
endfunction

function Trig_Killing_System_Actions takes nothing returns nothing
	set udg_integers01[(1+GetPlayerId(GetOwningPlayer(GetDyingUnit())))]=0
	set udg_integers01[(1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))]=(udg_integers01[(1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))]+1)
	if(Trig_Killing_System_Func006C())then
		call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,8.,(GetPlayerName(GetOwningPlayer(GetKillingUnit()))+" is on a |cffffcc00KILLING SPREE!!!|r"))
		set udg_strings01[(1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))]=" |cffffcc00KILLING SPREE!!!|r"
	else
		if(Trig_Killing_System_Func006Func001C())then
			call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,8.,(GetPlayerName(GetOwningPlayer(GetKillingUnit()))+" is |cffffcc00DOMINATING!!!|r"))
			set udg_strings01[(1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))]=" |cffffcc00DOMINATING!!!|r"
		else
			if(Trig_Killing_System_Func006Func001Func001C())then
				call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,8.,(GetPlayerName(GetOwningPlayer(GetKillingUnit()))+" |cffffcc00UNSTOPABLE!!!|r"))
				set udg_strings01[(1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))]=" |cffffcc00UNSTOPABLE!!!|r"
			else
				if(Trig_Killing_System_Func006Func001Func001Func001C())then
					call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,8.,(GetPlayerName(GetOwningPlayer(GetKillingUnit()))+" |cffffcc00MONSTER KILL!!!|r"))
					set udg_strings01[(1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))]=" |cffffcc00MONSTER KILL!!!|r"
				else
					if(Trig_Killing_System_Func006Func001Func001Func001Func001C())then
						call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,8.,(GetPlayerName(GetOwningPlayer(GetKillingUnit()))+" is |cffffcc00GOD LIKE!!!|r"))
						set udg_strings01[(1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))]=" |cffffcc00GOD LIKE!!!|r"
					endif
				endif
			endif
		endif
	endif
endfunction

function Trig_FirstKill_System_Conditions takes nothing returns boolean
	return(GetUnitTypeId(GetDyingUnit())=='hpea')and((1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))>0)and((1+GetPlayerId(GetOwningPlayer(GetKillingUnit())))<=12)
endfunction

function Trig_FirstKill_System_Actions takes nothing returns nothing
	call DisplayTimedTextToForce(bj_FORCE_ALL_PLAYERS,8.,(GetPlayerName(GetOwningPlayer(GetKillingUnit()))+" has a |cffffcc00NOOB KILL!!!|r"))
	call DisableTrigger(udg_trigger45)
endfunction

function Trig_Vampire_wins_Conditions takes nothing returns boolean
	return(GetUnitTypeId(GetDyingUnit())=='hpea')and(CountLivingPlayerUnitsOfTypeId('hpea',Player(0))==0)and(CountLivingPlayerUnitsOfTypeId('hpea',Player(1))==0)and(CountLivingPlayerUnitsOfTypeId('hpea',Player(2))==0)and(CountLivingPlayerUnitsOfTypeId('hpea',Player(3))==0)and(CountLivingPlayerUnitsOfTypeId('hpea',Player(4))==0)and(CountLivingPlayerUnitsOfTypeId('hpea',Player(5))==0)and(CountLivingPlayerUnitsOfTypeId('hpea',Player(6))==0)and(CountLivingPlayerUnitsOfTypeId('hpea',Player(7))==0)and(CountLivingPlayerUnitsOfTypeId('hpea',Player(8))==0)and(CountLivingPlayerUnitsOfTypeId('hpea',Player(9))==0)
endfunction

function Trig_Vampire_wins_Func006002 takes nothing returns nothing
	call CustomDefeatBJ(GetEnumPlayer(),"Defeat!")
endfunction

function Trig_Vampire_wins_Func007002 takes nothing returns nothing
	call CustomVictoryBJ(GetEnumPlayer(),true,true)
endfunction

function Trig_Vampire_wins_Actions takes nothing returns nothing
	call TriggerSleepAction(1.)
	call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,"The world is doomed...")
	call PlaySoundBJ(udg_sound07)
	call SetTerrainFogExBJ(0,1000.,8000,.0,'d',.0,.0)
	call TriggerSleepAction(14.)
	call ForForce(udg_force02,function Trig_Vampire_wins_Func006002)
	call ForForce(udg_force01,function Trig_Vampire_wins_Func007002)
endfunction

function Trig_VampCount_game_over_Func005002 takes nothing returns nothing
	call CustomVictoryBJ(GetEnumPlayer(),true,true)
endfunction

function Trig_VampCount_game_over_Func006002 takes nothing returns nothing
	call CustomDefeatBJ(GetEnumPlayer(),"Defeat!")
endfunction

function Trig_VampCount_game_over_Actions takes nothing returns nothing
	call DisableTrigger(udg_trigger48)
	call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,"The world is now safe...")
	call PlaySoundBJ(udg_sound01)
	call TriggerSleepAction(14.)
	call ForForce(udg_force02,function Trig_VampCount_game_over_Func005002)
	call ForForce(udg_force01,function Trig_VampCount_game_over_Func006002)
endfunction

function Trig_VampireWinLose_Func002Func001Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetEnumUnit())=='E000')or(GetUnitTypeId(GetEnumUnit())=='E006')or(GetUnitTypeId(GetEnumUnit())=='Eevi')or(GetUnitTypeId(GetEnumUnit())=='E001')or(GetUnitTypeId(GetEnumUnit())=='Udre')or(GetUnitTypeId(GetEnumUnit())=='Utic')
endfunction

function Trig_VampireWinLose_Func002Func001C takes nothing returns boolean
	return(Trig_VampireWinLose_Func002Func001Func001C())
endfunction

function Trig_VampireWinLose_Func002A takes nothing returns nothing
	if(Trig_VampireWinLose_Func002Func001C())then
		set udg_integer01=(udg_integer01+1)
	endif
endfunction

function Trig_VampireWinLose_Func003C takes nothing returns boolean
	return(udg_integer01==0)
endfunction

function Trig_VampireWinLose_Actions takes nothing returns nothing
	set udg_integer01=0
	call ForGroupBJ(GetUnitsInRectAll(udg_rect03),function Trig_VampireWinLose_Func002A)
	if(Trig_VampireWinLose_Func003C())then
		call ConditionalTriggerExecute(udg_trigger47)
	endif
endfunction

function Trig_HumanLeavers_Func001Func001Func001A takes nothing returns nothing
	call SetPlayerAllianceStateBJ(GetTriggerPlayer(),GetEnumPlayer(),5)
endfunction

function Trig_HumanLeavers_Func001Func001Func002C takes nothing returns boolean
	return(GetUnitTypeId(GetEnumUnit())=='E000')or(GetUnitTypeId(GetEnumUnit())=='E006')or(GetUnitTypeId(GetEnumUnit())=='Eevi')or(GetUnitTypeId(GetEnumUnit())=='E001')or(GetUnitTypeId(GetEnumUnit())=='Udre')or(GetUnitTypeId(GetEnumUnit())=='Utic')
endfunction

function Trig_HumanLeavers_Func001Func001C takes nothing returns boolean
	return(Trig_HumanLeavers_Func001Func001Func002C())
endfunction

function Trig_HumanLeavers_Func001Func002Func002002 takes nothing returns nothing
	call RemoveUnit(GetEnumUnit())
endfunction

function Trig_HumanLeavers_Func001Func002Func004Func001C takes nothing returns boolean
	return(GetUnitTypeId(GetEnumUnit())=='hpea')
endfunction

function Trig_HumanLeavers_Func001Func002Func004A takes nothing returns nothing
	if(Trig_HumanLeavers_Func001Func002Func004Func001C())then
		set udg_integer02=(udg_integer02+1)
	endif
endfunction

function Trig_HumanLeavers_Func001Func002Func005C takes nothing returns boolean
	return(udg_integer02==0)
endfunction

function Trig_HumanLeavers_Func001Func002C takes nothing returns boolean
	return(GetUnitTypeId(GetEnumUnit())=='hpea')
endfunction

function Trig_HumanLeavers_Func001A takes nothing returns nothing
	if(Trig_HumanLeavers_Func001Func001C())then
		call ForForce(GetPlayersAllies(GetTriggerPlayer()),function Trig_HumanLeavers_Func001Func001Func001A)
	endif
	if(Trig_HumanLeavers_Func001Func002C())then
		call ForGroupBJ(GetUnitsOfPlayerAll(GetTriggerPlayer()),function Trig_HumanLeavers_Func001Func002Func002002)
		set udg_integer02=0
		call ForGroupBJ(GetUnitsInRectAll(udg_rect03),function Trig_HumanLeavers_Func001Func002Func004A)
		if(Trig_HumanLeavers_Func001Func002Func005C())then
			call ConditionalTriggerExecute(udg_trigger50)
		endif
	endif
endfunction

function Trig_HumanLeavers_Actions takes nothing returns nothing
	call ForGroupBJ(GetUnitsOfPlayerAll(GetTriggerPlayer()),function Trig_HumanLeavers_Func001A)
	call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(GetPlayerName(GetTriggerPlayer())+" has left the game."))
endfunction

function Trig_HumanLeaverGameOver_Func006002 takes nothing returns nothing
	call CustomDefeatBJ(GetEnumPlayer(),"Defeat!")
endfunction

function Trig_HumanLeaverGameOver_Func007002 takes nothing returns nothing
	call CustomVictoryBJ(GetEnumPlayer(),true,true)
endfunction

function Trig_HumanLeaverGameOver_Actions takes nothing returns nothing
	call DisableTrigger(udg_trigger49)
	call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,"The world is doomed...")
	call PlaySoundBJ(udg_sound07)
	call SetTerrainFogExBJ(0,1000.,8000,.0,'d',.0,.0)
	call TriggerSleepAction(14.)
	call ForForce(udg_force02,function Trig_HumanLeaverGameOver_Func006002)
	call ForForce(udg_force01,function Trig_HumanLeaverGameOver_Func007002)
endfunction

function Trig_Vampire_Fusion_Intruction_Actions takes nothing returns nothing
	call DisplayTextToForce(udg_force01,"2 Vampires can get fusioned if they stay in the circles in the middle. They can fusion just every 6 Minutes.")
endfunction

function Trig_Start_Fusion_Timer_Func004002 takes nothing returns nothing
	call TimerDialogDisplayForPlayerBJ(false,bj_lastCreatedTimerDialog,GetEnumPlayer())
endfunction

function Trig_Start_Fusion_Timer_Func006002 takes nothing returns nothing
	call TimerDialogDisplayForPlayerBJ(false,bj_lastCreatedTimerDialog,GetEnumPlayer())
endfunction

function Trig_Start_Fusion_Timer_Actions takes nothing returns nothing
	set udg_boolean03=false
	call StartTimerBJ(udg_timer01,false,360.)
	call CreateTimerDialogBJ(udg_timer01,"Fusion ready in")
	call ForForce(udg_force02,function Trig_Start_Fusion_Timer_Func004002)
	call PolledWait(360.)
	call ForForce(bj_FORCE_ALL_PLAYERS,function Trig_Start_Fusion_Timer_Func006002)
	call DestroyTimerDialog(bj_lastCreatedTimerDialog)
	set udg_boolean03=true
endfunction

function Trig_Vampire_enters_FusionLeft_Conditions takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='Udre')
endfunction

function Trig_Vampire_enters_FusionLeft_Actions takes nothing returns nothing
	set udg_boolean01=true
	call DisplayTextToForce(udg_force01,"Left Fusion Circle is ready")
	call ConditionalTriggerExecute(udg_trigger57)
endfunction

function Trig_Vampire_leaves_FusionLeft_Conditions takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='Udre')
endfunction

function Trig_Vampire_leaves_FusionLeft_Actions takes nothing returns nothing
	set udg_boolean01=false
endfunction

function Trig_Vampire_enters_FusionRight_Conditions takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='Udre')
endfunction

function Trig_Vampire_enters_FusionRight_Actions takes nothing returns nothing
	set udg_boolean02=true
	call DisplayTextToForce(udg_force01,"Right Fusion Circle is ready")
	call ConditionalTriggerExecute(udg_trigger57)
endfunction

function Trig_Vampire_leaves_FusionRight_Conditions takes nothing returns boolean
	return(GetUnitTypeId(GetTriggerUnit())=='Udre')
endfunction

function Trig_Vampire_leaves_FusionRight_Actions takes nothing returns nothing
	set udg_boolean02=false
endfunction

function Trig_Create_new_Unit_Func003001 takes nothing returns boolean
	return(udg_boolean01)
endfunction

function Trig_Create_new_Unit_Func003002 takes nothing returns boolean
	return(udg_boolean02)
endfunction

function Trig_Create_new_Unit_Conditions takes nothing returns boolean
	return(GetBooleanAnd(Trig_Create_new_Unit_Func003001(),Trig_Create_new_Unit_Func003002()))
endfunction

function Trig_Create_new_Unit_Func002Func004002001 takes nothing returns boolean
	return(GetUnitTypeId(GetEnumUnit())=='Udre')
endfunction

function Trig_Create_new_Unit_Func002Func004002 takes nothing returns nothing
	if(Trig_Create_new_Unit_Func002Func004002001())then
		set udg_unit01=GetEnumUnit()
	endif
endfunction

function Trig_Create_new_Unit_Func002Func005002001 takes nothing returns boolean
	return(GetUnitTypeId(GetEnumUnit())=='Udre')
endfunction

function Trig_Create_new_Unit_Func002Func005002 takes nothing returns nothing
	if(Trig_Create_new_Unit_Func002Func005002001())then
		set udg_unit02=GetEnumUnit()
	endif
endfunction

function Trig_Create_new_Unit_Func002Func013001 takes nothing returns boolean
	return(udg_integer03==1)
endfunction

function Trig_Create_new_Unit_Func002Func031001 takes nothing returns boolean
	return(udg_boolean01)
endfunction

function Trig_Create_new_Unit_Func002Func031002 takes nothing returns boolean
	return(udg_boolean02)
endfunction

function Trig_Create_new_Unit_Func002C takes nothing returns boolean
	return(udg_boolean03)and(GetBooleanAnd(Trig_Create_new_Unit_Func002Func031001(),Trig_Create_new_Unit_Func002Func031002()))
endfunction

function Trig_Create_new_Unit_Actions takes nothing returns nothing
	call PolledWait(.1)
	if(Trig_Create_new_Unit_Func002C())then
		call TriggerExecute(udg_trigger52)
		call ForGroupBJ(GetUnitsInRectAll(udg_rect09),function Trig_Create_new_Unit_Func002Func004002)
		call ForGroupBJ(GetUnitsInRectAll(udg_rect10),function Trig_Create_new_Unit_Func002Func005002)
		set udg_player01=GetOwningPlayer(udg_unit01)
		set udg_player02=GetOwningPlayer(udg_unit02)
		call SetUnitOwner(udg_unit02,Player(15),false)
		call SetUnitOwner(udg_unit01,Player(15),false)
		call SetUnitInvulnerable(udg_unit01,true)
		call SetUnitInvulnerable(udg_unit02,true)
		set udg_integer03=GetRandomInt(1,2)
		if(Trig_Create_new_Unit_Func002Func013001())then
			call CreateNUnitsAtLoc(1,'U002',udg_player01,GetRectCenter(udg_rect11),bj_UNIT_FACING)
		else
			call CreateNUnitsAtLoc(1,'U002',udg_player02,GetRectCenter(udg_rect11),bj_UNIT_FACING)
		endif
		set udg_unit03=bj_lastCreatedUnit
		call SetHeroXP(udg_unit03,(GetHeroXP(udg_unit01)+GetHeroXP(udg_unit02)),false)
		call EnableTrigger(udg_trigger59)
		call DisplayTextToForce(GetForceOfPlayer(udg_player01),"Fusion will be broken in 3 Minutes")
		call DisplayTextToForce(GetForceOfPlayer(udg_player02),"Fusion will be broken in 3 Minutes")
		call PolledWait(60.)
		call DisplayTextToForce(GetForceOfPlayer(udg_player01),"Fusion will be broken in 2 Minutes")
		call DisplayTextToForce(GetForceOfPlayer(udg_player02),"Fusion will be broken in 2 Minutes")
		call PolledWait(60.)
		call DisplayTextToForce(GetForceOfPlayer(udg_player01),"Fusion will be broken in 60 Seconds")
		call DisplayTextToForce(GetForceOfPlayer(udg_player02),"Fusion will be broken in 60 Seconds")
		call PolledWait(30.)
		call DisplayTextToForce(GetForceOfPlayer(udg_player01),"Fusion will be broken in 30 Seconds")
		call DisplayTextToForce(GetForceOfPlayer(udg_player02),"Fusion broken in 30 Seconds")
		call PolledWait(30.)
		call DisableTrigger(udg_trigger59)
		call ConditionalTriggerExecute(udg_trigger58)
	endif
endfunction

function Trig_Break_Fusion_Conditions takes nothing returns boolean
	return(IsUnitAliveBJ(udg_unit03))
endfunction

function Trig_Break_Fusion_Actions takes nothing returns nothing
	set udg_integer03=GetHeroXP(udg_unit01)
	call AddHeroXPSwapped(((GetHeroXP(udg_unit03)-(udg_integer03+GetHeroXP(udg_unit02)))/2),udg_unit01,false)
	call AddHeroXPSwapped(((GetHeroXP(udg_unit03)-(udg_integer03+GetHeroXP(udg_unit02)))/2),udg_unit02,false)
	call RemoveUnit(udg_unit03)
	set udg_unit03=null
	call SetUnitOwner(udg_unit01,udg_player01,true)
	call SetUnitInvulnerable(udg_unit01,false)
	set udg_unit01=null
	call SetUnitOwner(udg_unit02,udg_player02,true)
	call SetUnitInvulnerable(udg_unit02,false)
	set udg_unit02=null
endfunction

function Trig_Fusioned_Unit_killed_Conditions takes nothing returns boolean
	return(GetTriggerUnit()==udg_unit03)
endfunction

function Trig_Fusioned_Unit_killed_Actions takes nothing returns nothing
	call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,"Fusioned Vampire is killed. 2 Vampires die now !")
	call SetUnitOwner(udg_unit01,udg_player01,true)
	call SetUnitOwner(udg_unit02,udg_player02,true)
	call SetUnitInvulnerable(udg_unit01,false)
	call SetUnitInvulnerable(udg_unit02,false)
	call ExplodeUnitBJ(udg_unit01)
	set udg_unit01=null
	call ExplodeUnitBJ(udg_unit02)
	set udg_unit02=null
endfunction

function main2 takes nothing returns nothing
	local weathereffect we
	local destructable d
	local trigger t
	local real life
	local player p
	local unit u
	local integer unitID
	local integer i
	call SetCameraBounds(-8192.+GetCameraMargin(CAMERA_MARGIN_LEFT),-8192.+GetCameraMargin(CAMERA_MARGIN_BOTTOM),8192.-GetCameraMargin(CAMERA_MARGIN_RIGHT),8192.-GetCameraMargin(CAMERA_MARGIN_TOP),-8192.+GetCameraMargin(CAMERA_MARGIN_LEFT),8192.-GetCameraMargin(CAMERA_MARGIN_TOP),8192.-GetCameraMargin(CAMERA_MARGIN_RIGHT),-8192.+GetCameraMargin(CAMERA_MARGIN_BOTTOM))
	call SetDayNightModels("Environment\\DNC\\DNCLordaeron\\DNCLordaeronTerrain\\DNCLordaeronTerrain.mdl","Environment\\DNC\\DNCLordaeron\\DNCLordaeronUnit\\DNCLordaeronUnit.mdl")
	call SetTerrainFogEx(0,3000.,5000.,.5,.0,.0,.0)
	set we=AddWeatherEffect(Rect(-8192.,-8192.,8192.,8192.),'SNls')
	call EnableWeatherEffect(we,true)
	call NewSoundEnvironment("Default")
	call SetAmbientDaySound("IceCrownDay")
	call SetAmbientNightSound("IceCrownNight")
	call SetMapMusic("Music",true,0)
	set udg_sound01=CreateSound("Sound\\Music\\mp3Music\\Credits.mp3",false,false,false,10,10,"DefaultEAXON")
	call SetSoundParamsFromLabel(udg_sound01,"CreditsMusic")
	call SetSoundDuration(udg_sound01,83017)
	set udg_sound02=CreateSound("Units\\Demon\\HeroPitLord\\HPitLordWhat1.wav",false,false,true,10,10,"HeroAcksEAX")
	call SetSoundParamsFromLabel(udg_sound02,"HeroPitLordWhat")
	call SetSoundDuration(udg_sound02,2711)
	set udg_sound03=CreateSound("Units\\Demon\\HeroPitLord\\HPitLordYes1.wav",false,false,true,10,10,"HeroAcksEAX")
	call SetSoundParamsFromLabel(udg_sound03,"HeroPitLordYes")
	call SetSoundDuration(udg_sound03,2049)
	set udg_sound04=CreateSound("Units\\Demon\\HeroPitLord\\HPitLordYesAttack1.wav",false,false,true,10,10,"HeroAcksEAX")
	call SetSoundParamsFromLabel(udg_sound04,"HeroPitLordYesAttack")
	call SetSoundDuration(udg_sound04,1908)
	set udg_sound05=CreateSound("Sound\\Dialogue\\UndeadExpCamp\\Undead02x\\L02Shade20.mp3",false,true,false,10,1,"DefaultEAXON")
	call SetSoundParamsFromLabel(udg_sound05,"L02Shade20")
	call SetSoundDuration(udg_sound05,2952)
	call SetSoundPitch(udg_sound05,.8)
	set udg_sound06=CreateSound("Doodads\\Cinematic\\Lightningbolt\\LightningBolt1.wav",false,false,true,10,10,"SpellsEAX")
	call SetSoundParamsFromLabel(udg_sound06,"CinematicLightningBolt")
	call SetSoundDuration(udg_sound06,3001)
	set udg_sound07=CreateSound("Sound\\Music\\mp3Music\\PH1.mp3",false,false,false,10,10,"DefaultEAXON")
	call SetSoundParamsFromLabel(udg_sound07,"PHMusic")
	call SetSoundDuration(udg_sound07,281582)
	call SetSoundVolume(udg_sound07,127)
	set udg_sound08=CreateSound("Sound\\Dialogue\\UndeadCampaign\\Undead05A\\U05ATichondrius01.mp3",false,false,false,10,10,"")
	call SetSoundParamsFromLabel(udg_sound08,"U05ATichondrius01")
	call SetSoundDuration(udg_sound08,6217)
	set udg_rect01=Rect(-352.,-864.,-160.,-672.)
	set udg_rect02=Rect(-608.,-1376.,64.,-1024.)
	set udg_rect03=Rect(-8192.,-8192.,8192.,8192.)
	set udg_rect04=Rect(-800.,-1856.,224.,-160.)
	set udg_rect05=Rect(1376.,1120.,3104.,2752.)
	set we=AddWeatherEffect(udg_rect05,'LRma')
	call EnableWeatherEffect(we,true)
	set udg_rect06=Rect(-1120.,-1120.,-800.,-800.)
	set udg_rect07=Rect(2016.,768.,2464.,1120.)
	set udg_rect08=Rect(2016.,576.,2464.,768.)
	set udg_rect09=Rect(-1728.,-1600.,-1600.,-1472.)
	set udg_rect10=Rect(-1280.,-1600.,-1152.,-1472.)
	set udg_rect11=Rect(-1472.,-1568.,-1408.,-1504.)
	set udg_rect12=Rect(2144.,4672.,8192.,8192.)
	set we=AddWeatherEffect(udg_rect12,'LRaa')
	call EnableWeatherEffect(we,true)
	set udg_rect13=Rect(-1952.,-2112.,800.,640.)
	set we=AddWeatherEffect(udg_rect13,'WOlw')
	call EnableWeatherEffect(we,true)
	call CameraSetupSetField(udg_camerasetup01,CAMERA_FIELD_ZOFFSET,.0,.0)
	call CameraSetupSetField(udg_camerasetup01,CAMERA_FIELD_ROTATION,90.,.0)
	call CameraSetupSetField(udg_camerasetup01,CAMERA_FIELD_ANGLE_OF_ATTACK,340.,.0)
	call CameraSetupSetField(udg_camerasetup01,CAMERA_FIELD_TARGET_DISTANCE,1996.5,.0)
	call CameraSetupSetField(udg_camerasetup01,CAMERA_FIELD_ROLL,.0,.0)
	call CameraSetupSetField(udg_camerasetup01,CAMERA_FIELD_FIELD_OF_VIEW,43.,.0)
	call CameraSetupSetField(udg_camerasetup01,CAMERA_FIELD_FARZ,5000.,.0)
	call CameraSetupSetDestPosition(udg_camerasetup01,-246.1,-951.2,.0)
	call CameraSetupSetField(udg_camerasetup02,CAMERA_FIELD_ZOFFSET,.0,.0)
	call CameraSetupSetField(udg_camerasetup02,CAMERA_FIELD_ROTATION,90.,.0)
	call CameraSetupSetField(udg_camerasetup02,CAMERA_FIELD_ANGLE_OF_ATTACK,300.,.0)
	call CameraSetupSetField(udg_camerasetup02,CAMERA_FIELD_TARGET_DISTANCE,1815.,.0)
	call CameraSetupSetField(udg_camerasetup02,CAMERA_FIELD_ROLL,.0,.0)
	call CameraSetupSetField(udg_camerasetup02,CAMERA_FIELD_FIELD_OF_VIEW,62.,.0)
	call CameraSetupSetField(udg_camerasetup02,CAMERA_FIELD_FARZ,5000.,.0)
	call CameraSetupSetDestPosition(udg_camerasetup02,-220.4,-1187.,.0)
	call SetPlayerTechMaxAllowed(Player(0),'hfoo',0)
	call SetPlayerTechMaxAllowed(Player(0),'hmtm',0)
	call SetPlayerTechMaxAllowed(Player(0),'hgyr',0)
	call SetPlayerTechMaxAllowed(Player(0),'hgry',0)
	call SetPlayerTechMaxAllowed(Player(0),'hmpr',0)
	call SetPlayerTechMaxAllowed(Player(0),'hsor',0)
	call SetPlayerTechMaxAllowed(Player(0),'hmtt',0)
	call SetPlayerTechMaxAllowed(Player(0),'hdhw',0)
	call SetPlayerTechMaxAllowed(Player(0),'htow',0)
	call SetPlayerTechMaxAllowed(Player(0),'hcas',0)
	call SetPlayerTechMaxAllowed(Player(0),'hkee',0)
	call SetPlayerTechMaxAllowed(Player(0),'hlum',0)
	call SetPlayerTechMaxAllowed(Player(0),'hbar',0)
	call SetPlayerTechMaxAllowed(Player(0),'hbla',0)
	call SetPlayerTechMaxAllowed(Player(0),'harm',0)
	call SetPlayerTechMaxAllowed(Player(0),'hars',0)
	call SetPlayerTechMaxAllowed(Player(0),'hgra',0)
	call SetPlayerTechMaxAllowed(Player(0),'hwtw',0)
	call SetPlayerTechMaxAllowed(Player(0),'hvlt',0)
	call SetPlayerTechMaxAllowed(Player(0),'halt',0)
	call SetPlayerTechMaxAllowed(Player(1),'hfoo',0)
	call SetPlayerTechMaxAllowed(Player(1),'hmtm',0)
	call SetPlayerTechMaxAllowed(Player(1),'hgyr',0)
	call SetPlayerTechMaxAllowed(Player(1),'hgry',0)
	call SetPlayerTechMaxAllowed(Player(1),'hmpr',0)
	call SetPlayerTechMaxAllowed(Player(1),'hsor',0)
	call SetPlayerTechMaxAllowed(Player(1),'hmtt',0)
	call SetPlayerTechMaxAllowed(Player(1),'hdhw',0)
	call SetPlayerTechMaxAllowed(Player(2),'hfoo',0)
	call SetPlayerTechMaxAllowed(Player(2),'hmtm',0)
	call SetPlayerTechMaxAllowed(Player(2),'hgyr',0)
	call SetPlayerTechMaxAllowed(Player(2),'hgry',0)
	call SetPlayerTechMaxAllowed(Player(2),'hmpr',0)
	call SetPlayerTechMaxAllowed(Player(2),'hsor',0)
	call SetPlayerTechMaxAllowed(Player(2),'hmtt',0)
	call SetPlayerTechMaxAllowed(Player(2),'hdhw',0)
	call SetPlayerTechMaxAllowed(Player(3),'hfoo',0)
	call SetPlayerTechMaxAllowed(Player(3),'hmtm',0)
	call SetPlayerTechMaxAllowed(Player(3),'hgyr',0)
	call SetPlayerTechMaxAllowed(Player(3),'hgry',0)
	call SetPlayerTechMaxAllowed(Player(3),'hmpr',0)
	call SetPlayerTechMaxAllowed(Player(3),'hsor',0)
	call SetPlayerTechMaxAllowed(Player(3),'hmtt',0)
	call SetPlayerTechMaxAllowed(Player(3),'hdhw',0)
	call SetPlayerTechMaxAllowed(Player(4),'hfoo',0)
	call SetPlayerTechMaxAllowed(Player(4),'hmtm',0)
	call SetPlayerTechMaxAllowed(Player(4),'hgyr',0)
	call SetPlayerTechMaxAllowed(Player(4),'hgry',0)
	call SetPlayerTechMaxAllowed(Player(4),'hmpr',0)
	call SetPlayerTechMaxAllowed(Player(4),'hsor',0)
	call SetPlayerTechMaxAllowed(Player(4),'hmtt',0)
	call SetPlayerTechMaxAllowed(Player(4),'hdhw',0)
	call SetPlayerTechMaxAllowed(Player(5),'hfoo',0)
	call SetPlayerTechMaxAllowed(Player(5),'hmtm',0)
	call SetPlayerTechMaxAllowed(Player(5),'hgyr',0)
	call SetPlayerTechMaxAllowed(Player(5),'hgry',0)
	call SetPlayerTechMaxAllowed(Player(5),'hmpr',0)
	call SetPlayerTechMaxAllowed(Player(5),'hsor',0)
	call SetPlayerTechMaxAllowed(Player(5),'hmtt',0)
	call SetPlayerTechMaxAllowed(Player(5),'hdhw',0)
	call SetPlayerTechMaxAllowed(Player(6),'hfoo',0)
	call SetPlayerTechMaxAllowed(Player(6),'hmtm',0)
	call SetPlayerTechMaxAllowed(Player(6),'hgyr',0)
	call SetPlayerTechMaxAllowed(Player(6),'hgry',0)
	call SetPlayerTechMaxAllowed(Player(6),'hmpr',0)
	call SetPlayerTechMaxAllowed(Player(6),'hsor',0)
	call SetPlayerTechMaxAllowed(Player(6),'hmtt',0)
	call SetPlayerTechMaxAllowed(Player(6),'hdhw',0)
	call SetPlayerTechMaxAllowed(Player(7),'hfoo',0)
	call SetPlayerTechMaxAllowed(Player(7),'hmtm',0)
	call SetPlayerTechMaxAllowed(Player(7),'hgyr',0)
	call SetPlayerTechMaxAllowed(Player(7),'hgry',0)
	call SetPlayerTechMaxAllowed(Player(7),'hmpr',0)
	call SetPlayerTechMaxAllowed(Player(7),'hsor',0)
	call SetPlayerTechMaxAllowed(Player(7),'hmtt',0)
	call SetPlayerTechMaxAllowed(Player(7),'hdhw',0)
	call SetPlayerTechMaxAllowed(Player(8),'hfoo',0)
	call SetPlayerTechMaxAllowed(Player(8),'hmtm',0)
	call SetPlayerTechMaxAllowed(Player(8),'hgyr',0)
	call SetPlayerTechMaxAllowed(Player(8),'hgry',0)
	call SetPlayerTechMaxAllowed(Player(8),'hmpr',0)
	call SetPlayerTechMaxAllowed(Player(8),'hsor',0)
	call SetPlayerTechMaxAllowed(Player(8),'hmtt',0)
	call SetPlayerTechMaxAllowed(Player(8),'hdhw',0)
	call SetPlayerTechMaxAllowed(Player(9),'hfoo',0)
	call SetPlayerTechMaxAllowed(Player(9),'hmtm',0)
	call SetPlayerTechMaxAllowed(Player(9),'hgyr',0)
	call SetPlayerTechMaxAllowed(Player(9),'hgry',0)
	call SetPlayerTechMaxAllowed(Player(9),'hmpr',0)
	call SetPlayerTechMaxAllowed(Player(9),'hsor',0)
	call SetPlayerTechMaxAllowed(Player(9),'hmtt',0)
	call SetPlayerTechMaxAllowed(Player(9),'hdhw',0)
	call SetPlayerTechMaxAllowed(Player(10),'hfoo',0)
	call SetPlayerTechMaxAllowed(Player(10),'hmtm',0)
	call SetPlayerTechMaxAllowed(Player(10),'hgyr',0)
	call SetPlayerTechMaxAllowed(Player(10),'hgry',0)
	call SetPlayerTechMaxAllowed(Player(10),'hmpr',0)
	call SetPlayerTechMaxAllowed(Player(10),'hsor',0)
	call SetPlayerTechMaxAllowed(Player(10),'hmtt',0)
	call SetPlayerTechMaxAllowed(Player(10),'hdhw',0)
	set udg_destructable01=CreateDestructable('OTsp',-256.,-640.,90.,1.,0)
	set p=Player(15)
	set u=CreateUnit(p,'nfoh',-1472.,256.,270.)
	set u=CreateUnit(p,'nmoo',-1088.,256.,270.)
	set u=CreateUnit(p,'n000',-448.,256.,270.)
	set u=CreateUnit(p,'n003',-64.,256.,270.)
	set u=CreateUnit(p,'ncop',-1664.,-1536.,270.)
	set u=CreateUnit(p,'ncop',-1216.,-1536.,270.)
	set p=Player(12)
	set p=Player(15)
	set udg_unit06=CreateUnit(p,'uaco',-256.3,-884.5,90.)
	set udg_unit05=CreateUnit(p,'uaco',-51.2,-823.5,120.)
	set udg_unit04=CreateUnit(p,'uaco',-464.7,-821.1,60.)
	set i=0
	set udg_force01=bj_FORCE_PLAYER[11]
	set udg_force02=bj_FORCE_PLAYER[0]
	set i=0
	loop
		exitwhen(i>1)
		set udg_integers01[i]=0
		set udg_strings01[i]=""
		set i=i+1
	endloop
	call TriggerAddAction(udg_trigger01,function Trig_Player_Groups_Actions)
	call TriggerRegisterTimerEventSingle(udg_trigger02,.03)
	call TriggerAddAction(udg_trigger02,function Trig_VCounter_Actions)
	call TriggerRegisterTimerExpireEvent(udg_trigger03,udg_timer02)
	call TriggerAddAction(udg_trigger03,function Trig_VCounter_expires_Actions)
	call TriggerAddAction(udg_trigger04,function Trig_Limit_Train_Unit_Actions)
	call TriggerRegisterTimerEventSingle(udg_trigger05,240.)
	call TriggerAddAction(udg_trigger05,function Trig_Goldmine_after_4_Minutes_Actions)
	call TriggerAddAction(udg_trigger06,function Trig_Bounty_On_Actions)
	call TriggerAddAction(udg_trigger07,function Trig_Quest_Menu_Actions)
	call TriggerAddAction(udg_trigger08,function Trig_Starting_Lumber_Actions)
	call TriggerAddAction(udg_trigger09,function Trig_Spawn_Players_Actions)
	call TriggerAddAction(udg_trigger10,function Trig_Spawn_Vampire_Actions)
	call TriggerRegisterTimerEventPeriodic(udg_trigger11,60.)
	call TriggerAddAction(udg_trigger11,function Trig_Timed_Lumber_Actions)
	call TriggerAddAction(udg_trigger12,function Trig_Portal_Actions)
	call TriggerAddAction(udg_trigger13,function Trig_Kill_Zone_Switch_Actions)
	call DisableTrigger(udg_trigger14)
	call TriggerAddAction(udg_trigger14,function Trig_Kill_Zone_Kill_Humans_Actions)
	call DisableTrigger(udg_trigger15)
	call TriggerAddAction(udg_trigger15,function Trig_Kill_Zone_Kill_Vampires_Actions)
	call TriggerRegisterTimerEventSingle(udg_trigger16,360.)
	call TriggerAddAction(udg_trigger16,function Trig_Training_Area_Intruction_Actions)
	call TriggerRegisterGameStateEventTimeOfDay(udg_trigger17,EQUAL,6.)
	call TriggerRegisterGameStateEventTimeOfDay(udg_trigger17,EQUAL,18.)
	call TriggerAddAction(udg_trigger17,function Trig_DayTime_turn_to_Morning_or_Night_Actions)
	call TriggerRegisterEnterRectSimple(udg_trigger18,udg_rect07)
	call TriggerAddAction(udg_trigger18,function Trig_Training_Door_Actions)
	call TriggerRegisterEnterRectSimple(udg_trigger19,udg_rect05)
	call TriggerAddAction(udg_trigger19,function Trig_Unit_enters_Training_Area_Actions)
	call TriggerAddAction(udg_trigger20,function Trig_Spawn_Spider_From_Hell_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger21,EVENT_PLAYER_UNIT_DEATH)
	call TriggerAddCondition(udg_trigger21,Condition(function Trig_Spider_EXP_Conditions))
	call TriggerAddAction(udg_trigger21,function Trig_Spider_EXP_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger22,EVENT_PLAYER_UNIT_DEATH)
	call TriggerAddCondition(udg_trigger22,Condition(function Trig_Units_Dead_Conditions))
	call TriggerAddAction(udg_trigger22,function Trig_Units_Dead_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger23,EVENT_PLAYER_UNIT_ATTACKED)
	call TriggerAddCondition(udg_trigger23,Condition(function Trig_Stop_Human_attacks_Vampires_Conditions))
	call TriggerAddAction(udg_trigger23,function Trig_Stop_Human_attacks_Vampires_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger24,EVENT_PLAYER_UNIT_ATTACKED)
	call TriggerAddCondition(udg_trigger24,Condition(function Trig_Stop_Human_Attacker_Conditions))
	call TriggerAddAction(udg_trigger24,function Trig_Stop_Human_Attacker_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger25,EVENT_PLAYER_UNIT_ATTACKED)
	call TriggerAddCondition(udg_trigger25,Condition(function Trig_Stop_Team_Damage_Humans_Conditions))
	call TriggerAddAction(udg_trigger25,function Trig_Stop_Team_Damage_Humans_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger26,EVENT_PLAYER_UNIT_ATTACKED)
	call TriggerAddCondition(udg_trigger26,Condition(function Trig_Stop_Team_Damage_Vampires_Conditions))
	call TriggerAddAction(udg_trigger26,function Trig_Stop_Team_Damage_Vampires_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger27,EVENT_PLAYER_UNIT_DEATH)
	call TriggerAddCondition(udg_trigger27,Condition(function Trig_Building_EXP_for_Vamp_Conditions))
	call TriggerAddAction(udg_trigger27,function Trig_Building_EXP_for_Vamp_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger30,EVENT_PLAYER_UNIT_PICKUP_ITEM)
	call TriggerAddCondition(udg_trigger30,Condition(function Trig_AVH_Item_Denial_Conditions))
	call TriggerAddAction(udg_trigger30,function Trig_AVH_Item_Denial_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger31,EVENT_PLAYER_UNIT_PICKUP_ITEM)
	call TriggerAddCondition(udg_trigger31,Condition(function Trig_VH_Item_Denial_Conditions))
	call TriggerAddAction(udg_trigger31,function Trig_VH_Item_Denial_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger32,EVENT_PLAYER_UNIT_DEATH)
	call TriggerAddCondition(udg_trigger32,Condition(function Trig_Item_Drop_Nosferatu_Conditions))
	call TriggerAddAction(udg_trigger32,function Trig_Item_Drop_Nosferatu_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger33,EVENT_PLAYER_UNIT_DEATH)
	call TriggerAddCondition(udg_trigger33,Condition(function Trig_Item_Drop_Dracula_Conditions))
	call TriggerAddAction(udg_trigger33,function Trig_Item_Drop_Dracula_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger34,EVENT_PLAYER_UNIT_DEATH)
	call TriggerAddCondition(udg_trigger34,Condition(function Trig_Item_Drop_Vampire_Conditions))
	call TriggerAddAction(udg_trigger34,function Trig_Item_Drop_Vampire_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger35,EVENT_PLAYER_UNIT_DEATH)
	call TriggerAddCondition(udg_trigger35,Condition(function Trig_Item_Drop_Ultimate_Evil_Conditions))
	call TriggerAddAction(udg_trigger35,function Trig_Item_Drop_Ultimate_Evil_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger36,EVENT_PLAYER_UNIT_DEATH)
	call TriggerAddCondition(udg_trigger36,Condition(function Trig_Random_Item_Drops_Conditions))
	call TriggerAddAction(udg_trigger36,function Trig_Random_Item_Drops_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger37,EVENT_PLAYER_UNIT_DEATH)
	call TriggerAddCondition(udg_trigger37,Condition(function Trig_VampireKilling_Worker_Conditions))
	call TriggerAddAction(udg_trigger37,function Trig_VampireKilling_Worker_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger38,EVENT_PLAYER_UNIT_SPELL_CAST)
	call TriggerAddCondition(udg_trigger38,Condition(function Trig_Detonate_Worker_Conditions))
	call TriggerAddAction(udg_trigger38,function Trig_Detonate_Worker_Actions)
	call TriggerRegisterEnterRectSimple(udg_trigger39,GetWorldBounds())
	call TriggerAddCondition(udg_trigger39,Condition(function Trig_Special_Effect_on_Hero_Conditions))
	call TriggerAddAction(udg_trigger39,function Trig_Special_Effect_on_Hero_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger40,EVENT_PLAYER_UNIT_SPELL_CAST)
	call TriggerAddCondition(udg_trigger40,Condition(function Trig_Special_Effect_for_Thousand_Souls_Conditions))
	call TriggerAddAction(udg_trigger40,function Trig_Special_Effect_for_Thousand_Souls_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger41,EVENT_PLAYER_UNIT_SPELL_CAST)
	call TriggerAddCondition(udg_trigger41,Condition(function Trig_Special_Effect_for_Release_Evil_Conditions))
	call TriggerAddAction(udg_trigger41,function Trig_Special_Effect_for_Release_Evil_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger42,EVENT_PLAYER_UNIT_DEATH)
	call TriggerAddCondition(udg_trigger42,Condition(function Trig_Human_Killed_Conditions))
	call TriggerAddAction(udg_trigger42,function Trig_Human_Killed_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger43,EVENT_PLAYER_UNIT_DEATH)
	call TriggerAddCondition(udg_trigger43,Condition(function Trig_Human_Killed_by_Creep_Conditions))
	call TriggerAddAction(udg_trigger43,function Trig_Human_Killed_by_Creep_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger44,EVENT_PLAYER_UNIT_DEATH)
	call TriggerAddCondition(udg_trigger44,Condition(function Trig_Killing_System_Conditions))
	call TriggerAddAction(udg_trigger44,function Trig_Killing_System_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger45,EVENT_PLAYER_UNIT_DEATH)
	call TriggerAddCondition(udg_trigger45,Condition(function Trig_FirstKill_System_Conditions))
	call TriggerAddAction(udg_trigger45,function Trig_FirstKill_System_Actions)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger46,EVENT_PLAYER_UNIT_DEATH)
	call TriggerAddCondition(udg_trigger46,Condition(function Trig_Vampire_wins_Conditions))
	call TriggerAddAction(udg_trigger46,function Trig_Vampire_wins_Actions)
	call DisableTrigger(udg_trigger47)
	call TriggerAddAction(udg_trigger47,function Trig_VampCount_game_over_Actions)
	call DisableTrigger(udg_trigger48)
	call TriggerRegisterTimerEventPeriodic(udg_trigger48,5.)
	call TriggerAddAction(udg_trigger48,function Trig_VampireWinLose_Actions)
	call TriggerRegisterPlayerEventLeave(udg_trigger49,Player(0))
	call TriggerRegisterPlayerEventLeave(udg_trigger49,Player(1))
	call TriggerRegisterPlayerEventLeave(udg_trigger49,Player(2))
	call TriggerRegisterPlayerEventLeave(udg_trigger49,Player(3))
	call TriggerRegisterPlayerEventLeave(udg_trigger49,Player(4))
	call TriggerRegisterPlayerEventLeave(udg_trigger49,Player(5))
	call TriggerRegisterPlayerEventLeave(udg_trigger49,Player(6))
	call TriggerRegisterPlayerEventLeave(udg_trigger49,Player(7))
	call TriggerRegisterPlayerEventLeave(udg_trigger49,Player(8))
	call TriggerRegisterPlayerEventLeave(udg_trigger49,Player(9))
	call TriggerRegisterPlayerEventLeave(udg_trigger49,Player(10))
	call TriggerRegisterPlayerEventLeave(udg_trigger49,Player(11))
	call TriggerAddAction(udg_trigger49,function Trig_HumanLeavers_Actions)
	call DisableTrigger(udg_trigger50)
	call TriggerAddAction(udg_trigger50,function Trig_HumanLeaverGameOver_Actions)
	call TriggerRegisterTimerEventSingle(udg_trigger51,420.)
	call TriggerAddAction(udg_trigger51,function Trig_Vampire_Fusion_Intruction_Actions)
	call TriggerAddAction(udg_trigger52,function Trig_Start_Fusion_Timer_Actions)
	call TriggerRegisterEnterRectSimple(udg_trigger53,udg_rect09)
	call TriggerAddCondition(udg_trigger53,Condition(function Trig_Vampire_enters_FusionLeft_Conditions))
	call TriggerAddAction(udg_trigger53,function Trig_Vampire_enters_FusionLeft_Actions)
	call TriggerRegisterLeaveRectSimple(udg_trigger54,udg_rect09)
	call TriggerAddCondition(udg_trigger54,Condition(function Trig_Vampire_leaves_FusionLeft_Conditions))
	call TriggerAddAction(udg_trigger54,function Trig_Vampire_leaves_FusionLeft_Actions)
	call TriggerRegisterEnterRectSimple(udg_trigger55,udg_rect10)
	call TriggerAddCondition(udg_trigger55,Condition(function Trig_Vampire_enters_FusionRight_Conditions))
	call TriggerAddAction(udg_trigger55,function Trig_Vampire_enters_FusionRight_Actions)
	call TriggerRegisterLeaveRectSimple(udg_trigger56,udg_rect10)
	call TriggerAddCondition(udg_trigger56,Condition(function Trig_Vampire_leaves_FusionRight_Conditions))
	call TriggerAddAction(udg_trigger56,function Trig_Vampire_leaves_FusionRight_Actions)
	call TriggerAddCondition(udg_trigger57,Condition(function Trig_Create_new_Unit_Conditions))
	call TriggerAddAction(udg_trigger57,function Trig_Create_new_Unit_Actions)
	call TriggerAddCondition(udg_trigger58,Condition(function Trig_Break_Fusion_Conditions))
	call TriggerAddAction(udg_trigger58,function Trig_Break_Fusion_Actions)
	call DisableTrigger(udg_trigger59)
	call TriggerRegisterAnyUnitEventBJ(udg_trigger59,EVENT_PLAYER_UNIT_DEATH)
	call TriggerAddCondition(udg_trigger59,Condition(function Trig_Fusioned_Unit_killed_Conditions))
	call TriggerAddAction(udg_trigger59,function Trig_Fusioned_Unit_killed_Actions)
	call ConditionalTriggerExecute(udg_trigger01)
	call ConditionalTriggerExecute(udg_trigger04)
	call ConditionalTriggerExecute(udg_trigger06)
	call ConditionalTriggerExecute(udg_trigger07)
	call ConditionalTriggerExecute(udg_trigger08)
	call ConditionalTriggerExecute(udg_trigger09)
	call ConditionalTriggerExecute(udg_trigger10)
	call ConditionalTriggerExecute(udg_trigger12)
	call ConditionalTriggerExecute(udg_trigger13)
	call ConditionalTriggerExecute(udg_trigger20)
endfunction

//===========================================================================
//***************************************************************************
//*
//*Players
//*
//***************************************************************************
//***************************************************************************
//*
//*Main Initialization
//*
//***************************************************************************
//===========================================================================
function main3 takes nothing returns nothing
	local weathereffect we
	call SetCameraBounds(-8192.0+GetCameraMargin(CAMERA_MARGIN_LEFT),-8192.0+GetCameraMargin(CAMERA_MARGIN_BOTTOM),8192.0-GetCameraMargin(CAMERA_MARGIN_RIGHT),8192.0-GetCameraMargin(CAMERA_MARGIN_TOP),-8192.0+GetCameraMargin(CAMERA_MARGIN_LEFT),8192.0-GetCameraMargin(CAMERA_MARGIN_TOP),8192.0-GetCameraMargin(CAMERA_MARGIN_RIGHT),-8192.0+GetCameraMargin(CAMERA_MARGIN_BOTTOM))
	call SetDayNightModels("Environment\\DNC\\DNCLordaeron\\DNCLordaeronTerrain\\DNCLordaeronTerrain.mdl","Environment\\DNC\\DNCLordaeron\\DNCLordaeronUnit\\DNCLordaeronUnit.mdl")
	call SetTerrainFogEx(0,3000.0,5000.0,0.500,0.000,0.000,0.000)
	set we=AddWeatherEffect(Rect(-8192.0,-8192.0,8192.0,8192.0),'SNls')
	call EnableWeatherEffect(we,true)
	call NewSoundEnvironment("Default")
	call SetAmbientDaySound("IceCrownDay")
	call SetAmbientNightSound("IceCrownNight")
	call SetMapMusic("Music",true,0)
	call CreateRegions2()
	call CreateNeutralPassiveBuildings2()
	call CreateNeutralHostile()
	call InitGlobals2()
	set udg_camerasetup01=CreateCameraSetup()
	set udg_camerasetup02=CreateCameraSetup()
	set udg_trigger01=CreateTrigger()
	set udg_trigger02=CreateTrigger()
	set udg_trigger03=CreateTrigger()
	set udg_trigger04=CreateTrigger()
	set udg_trigger05=CreateTrigger()
	set udg_trigger06=CreateTrigger()
	set udg_trigger07=CreateTrigger()
	set udg_trigger08=CreateTrigger()
	set udg_trigger09=CreateTrigger()
	set udg_trigger10=CreateTrigger()
	set udg_trigger11=CreateTrigger()
	set udg_trigger12=CreateTrigger()
	set udg_trigger13=CreateTrigger()
	set udg_trigger14=CreateTrigger()
	set udg_trigger15=CreateTrigger()
	set udg_trigger16=CreateTrigger()
	set udg_trigger17=CreateTrigger()
	set udg_trigger18=CreateTrigger()
	set udg_trigger19=CreateTrigger()
	set udg_trigger20=CreateTrigger()
	set udg_trigger21=CreateTrigger()
	set udg_trigger22=CreateTrigger()
	set udg_trigger23=CreateTrigger()
	set udg_trigger24=CreateTrigger()
	set udg_trigger25=CreateTrigger()
	set udg_trigger26=CreateTrigger()
	set udg_trigger27=CreateTrigger()
	set udg_trigger30=CreateTrigger()
	set udg_trigger31=CreateTrigger()
	set udg_trigger32=CreateTrigger()
	set udg_trigger33=CreateTrigger()
	set udg_trigger34=CreateTrigger()
	set udg_trigger35=CreateTrigger()
	set udg_trigger36=CreateTrigger()
	set udg_trigger37=CreateTrigger()
	set udg_trigger38=CreateTrigger()
	set udg_trigger39=CreateTrigger()
	set udg_trigger40=CreateTrigger()
	set udg_trigger41=CreateTrigger()
	set udg_trigger42=CreateTrigger()
	set udg_trigger43=CreateTrigger()
	set udg_trigger44=CreateTrigger()
	set udg_trigger45=CreateTrigger()
	set udg_trigger46=CreateTrigger()
	set udg_trigger47=CreateTrigger()
	set udg_trigger48=CreateTrigger()
	set udg_trigger49=CreateTrigger()
	set udg_trigger50=CreateTrigger()
	set udg_trigger51=CreateTrigger()
	set udg_trigger52=CreateTrigger()
	set udg_trigger53=CreateTrigger()
	set udg_trigger54=CreateTrigger()
	set udg_trigger55=CreateTrigger()
	set udg_trigger56=CreateTrigger()
	set udg_trigger57=CreateTrigger()
	set udg_trigger58=CreateTrigger()
	set udg_trigger59=CreateTrigger()
	
	call ExecuteFunc("main2")
endfunction

//***************************************************************************
//*
//*Map Configuration
//*
//***************************************************************************
function InitTrig_INIT takes nothing returns nothing
	
	call ExecuteFunc("main3")
endfunction