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

Triggers

Kaeufer und Verkaeufer 2.5.w3x
Variables
triggers
init
Unbezeichneter Auslöser 001
Unbezeichneter Auslöser 002
// Map deprotected by X-deprotect (version 2006-10-02) by zibada
// http://dimon.xgm.ru/xdep/
// Visit our modmaking community at http://xgm.ru/
Name Type is_array initial_value
booleans01 boolean Yes
booleans02 boolean Yes
force01 force No
force02 force No
force03 force No
force04 force No
integers01 integer Yes
locations01 location Yes
locations02 location Yes
rect01 rect No
rect02 rect No
rect03 rect No
rect04 rect No
rect05 rect No
rect06 rect No
rect07 rect No
rect08 rect No
rect09 rect No
rect10 rect No
rect11 rect No
rect12 rect No
rect13 rect No
rect14 rect No
rect15 rect No
rect16 rect No
rect17 rect No
rect18 rect No
rect19 rect No
rect20 rect No
rect21 rect No
rect22 rect No
rect23 rect No
rect24 rect No
rect25 rect No
rect26 rect No
rect27 rect No
rect28 rect No
rects01 rect Yes
rects02 rect Yes
rects03 rect Yes
texttags01 texttag Yes
trigger01 trigger No
trigger02 trigger No
trigger03 trigger No
trigger04 trigger No
trigger05 trigger No
trigger06 trigger No
trigger07 trigger No
trigger08 trigger No
trigger09 trigger No
trigger10 trigger No
trigger11 trigger No
trigger12 trigger No
trigger13 trigger No
trigger14 trigger No
trigger15 trigger No
trigger16 trigger No
trigger17 trigger No 
// 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 InitGlobals2 takes nothing returns nothing
	local integer i=0
	set i=0
	loop
		exitwhen(i>4)
		set udg_rects01[i]=null
		set i=i+1
	endloop
	set udg_force01=CreateForce()
	set udg_force02=CreateForce()
	set i=0
	loop
		exitwhen(i>8)
		set udg_rects02[i]=null
		set i=i+1
	endloop
	set i=0
	loop
		exitwhen(i>8)
		set udg_integers01[i]=0
		set i=i+1
	endloop
	set i=0
	loop
		exitwhen(i>13)
		set udg_booleans01[i]=false
		set i=i+1
	endloop
	set udg_force03=CreateForce()
	set i=0
	loop
		exitwhen(i>13)
		set udg_booleans02[i]=false
		set i=i+1
	endloop
	set udg_force04=CreateForce()
endfunction

//***************************************************************************
//*
//*Unit Creation
//*
//***************************************************************************
//===========================================================================
function CreateBuildingsForPlayer0 takes nothing returns nothing
	local player p=Player(0)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'n001',-320.0,-320.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(1))
	set u=CreateUnit(p,'n002',-832.0,-320.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(0))
	set u=CreateUnit(p,'n003',-1344.0,-320.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(0))
	set u=CreateUnit(p,'n004',-1856.0,-320.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(0))
	set u=CreateUnit(p,'n000',-2368.0,-320.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(0))
endfunction

//===========================================================================
function CreateUnitsForPlayer0 takes nothing returns nothing
	local player p=Player(0)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'e001',-235.3,-639.1,270.000)
endfunction

//===========================================================================
function CreateBuildingsForPlayer1 takes nothing returns nothing
	local player p=Player(1)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'n001',-384.0,1472.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(1))
	set u=CreateUnit(p,'n002',-896.0,1472.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(0))
	set u=CreateUnit(p,'n003',-1408.0,1472.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(0))
	set u=CreateUnit(p,'n004',-1920.0,1472.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(0))
	set u=CreateUnit(p,'n000',-2432.0,1472.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(0))
endfunction

//===========================================================================
function CreateUnitsForPlayer1 takes nothing returns nothing
	local player p=Player(1)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'e001',-194.2,1231.0,270.000)
endfunction

//===========================================================================
function CreateBuildingsForPlayer2 takes nothing returns nothing
	local player p=Player(2)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'n001',2432.0,1472.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(1))
	set u=CreateUnit(p,'n002',1920.0,1472.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(0))
	set u=CreateUnit(p,'n003',1408.0,1472.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(0))
	set u=CreateUnit(p,'n004',896.0,1472.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(0))
	set u=CreateUnit(p,'n000',384.0,1472.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(0))
endfunction

//===========================================================================
function CreateUnitsForPlayer2 takes nothing returns nothing
	local player p=Player(2)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'e001',2518.2,954.2,270.000)
endfunction

//===========================================================================
function CreateBuildingsForPlayer3 takes nothing returns nothing
	local player p=Player(3)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'n001',2432.0,-320.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(1))
	set u=CreateUnit(p,'n002',1920.0,-320.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(0))
	set u=CreateUnit(p,'n003',1408.0,-320.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(0))
	set u=CreateUnit(p,'n004',896.0,-320.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(0))
	set u=CreateUnit(p,'n000',384.0,-320.0,270.000)
	call SetUnitColor(u,ConvertPlayerColor(0))
endfunction

//===========================================================================
function CreateUnitsForPlayer3 takes nothing returns nothing
	local player p=Player(3)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'e001',2616.1,-535.9,270.000)
endfunction

//===========================================================================
function CreateBuildingsForPlayer4 takes nothing returns nothing
	local player p=Player(4)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'e000',2560.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-256.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-2112.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-2112.0,896.0,270.000)
	set u=CreateUnit(p,'e000',-256.0,896.0,270.000)
	set u=CreateUnit(p,'e000',704.0,896.0,270.000)
	set u=CreateUnit(p,'e000',2560.0,896.0,270.000)
	set u=CreateUnit(p,'e000',704.0,-896.0,270.000)
endfunction

//===========================================================================
function CreateBuildingsForPlayer5 takes nothing returns nothing
	local player p=Player(5)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'e000',2496.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-320.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-2176.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-2176.0,896.0,270.000)
	set u=CreateUnit(p,'e000',-320.0,896.0,270.000)
	set u=CreateUnit(p,'e000',640.0,896.0,270.000)
	set u=CreateUnit(p,'e000',2496.0,896.0,270.000)
	set u=CreateUnit(p,'e000',640.0,-896.0,270.000)
endfunction

//===========================================================================
function CreateBuildingsForPlayer6 takes nothing returns nothing
	local player p=Player(6)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'e000',2432.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-384.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-2240.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-2240.0,896.0,270.000)
	set u=CreateUnit(p,'e000',-384.0,896.0,270.000)
	set u=CreateUnit(p,'e000',576.0,896.0,270.000)
	set u=CreateUnit(p,'e000',2432.0,896.0,270.000)
	set u=CreateUnit(p,'e000',576.0,-896.0,270.000)
endfunction

//===========================================================================
function CreateBuildingsForPlayer7 takes nothing returns nothing
	local player p=Player(7)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'e000',2368.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-448.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-2304.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-2304.0,896.0,270.000)
	set u=CreateUnit(p,'e000',-448.0,896.0,270.000)
	set u=CreateUnit(p,'e000',512.0,896.0,270.000)
	set u=CreateUnit(p,'e000',2368.0,896.0,270.000)
	set u=CreateUnit(p,'e000',512.0,-896.0,270.000)
endfunction

//===========================================================================
function CreateBuildingsForPlayer8 takes nothing returns nothing
	local player p=Player(8)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'e000',2304.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-512.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-2368.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-2368.0,896.0,270.000)
	set u=CreateUnit(p,'e000',-512.0,896.0,270.000)
	set u=CreateUnit(p,'e000',448.0,896.0,270.000)
	set u=CreateUnit(p,'e000',2304.0,896.0,270.000)
	set u=CreateUnit(p,'e000',448.0,-896.0,270.000)
endfunction

//===========================================================================
function CreateBuildingsForPlayer9 takes nothing returns nothing
	local player p=Player(9)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'e000',2240.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-576.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-2432.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-2432.0,896.0,270.000)
	set u=CreateUnit(p,'e000',-576.0,896.0,270.000)
	set u=CreateUnit(p,'e000',384.0,896.0,270.000)
	set u=CreateUnit(p,'e000',2240.0,896.0,270.000)
	set u=CreateUnit(p,'e000',384.0,-896.0,270.000)
endfunction

//===========================================================================
function CreateBuildingsForPlayer10 takes nothing returns nothing
	local player p=Player(10)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'e000',2176.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-640.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-2496.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-2496.0,896.0,270.000)
	set u=CreateUnit(p,'e000',-640.0,896.0,270.000)
	set u=CreateUnit(p,'e000',320.0,896.0,270.000)
	set u=CreateUnit(p,'e000',2176.0,896.0,270.000)
	set u=CreateUnit(p,'e000',320.0,-896.0,270.000)
endfunction

//===========================================================================
function CreateBuildingsForPlayer11 takes nothing returns nothing
	local player p=Player(11)
	local unit u
	local integer unitID
	local trigger t
	local real life
	set u=CreateUnit(p,'e000',2112.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-704.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-2560.0,-896.0,270.000)
	set u=CreateUnit(p,'e000',-2560.0,896.0,270.000)
	set u=CreateUnit(p,'e000',-704.0,896.0,270.000)
	set u=CreateUnit(p,'e000',256.0,896.0,270.000)
	set u=CreateUnit(p,'e000',2112.0,896.0,270.000)
	set u=CreateUnit(p,'e000',256.0,-896.0,270.000)
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,'ngol',-128.0,-5504.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',-704.0,-5504.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',-6080.0,-3584.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',-5568.0,-3648.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',-6080.0,2560.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',-5568.0,2560.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',-512.0,4352.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',0.0,4288.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',4992.0,3136.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',5504.0,3136.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',4928.0,-3008.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',5440.0,-3008.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',5120.0,6272.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',5632.0,6272.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',-3648.0,6720.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',-3136.0,6720.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',-4736.0,-6656.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',-4224.0,-6656.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',1408.0,-6272.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',1920.0,-6272.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',6784.0,1088.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',6784.0,512.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',-6848.0,768.0,270.000)
	call SetResourceAmount(u,12500)
	set u=CreateUnit(p,'ngol',-6848.0,256.0,270.000)
	call SetResourceAmount(u,12500)
endfunction

//===========================================================================
//===========================================================================
//===========================================================================
//***************************************************************************
//*
//*Regions
//*
//***************************************************************************
function CreateRegions2 takes nothing returns nothing
	local weathereffect we
	set udg_rect01=Rect(-896.0,768.0,32.0,1024.0)
	set udg_rect02=Rect(-2848.0,768.0,-1920.0,1024.0)
	set udg_rect03=Rect(-2848.0,-1024.0,-1920.0,-768.0)
	set udg_rect04=Rect(-896.0,-1024.0,32.0,-736.0)
	set udg_rect05=Rect(-32.0,-1024.0,896.0,-768.0)
	set udg_rect06=Rect(1920.0,-1024.0,2848.0,-768.0)
	set udg_rect07=Rect(-32.0,768.0,896.0,1024.0)
	set udg_rect08=Rect(1920.0,768.0,2848.0,1024.0)
	set udg_rect09=Rect(-2880.0,-64.0,64.0,1824.0)
	set udg_rect10=Rect(-64.0,-1888.0,2880.0,0.0)
	set udg_rect11=Rect(-2848.0,-1824.0,96.0,64.0)
	set udg_rect12=Rect(-32.0,-32.0,2912.0,1856.0)
	set udg_rect13=Rect(-2816.0,32.0,-2048.0,832.0)
	set udg_rect14=Rect(-768.0,32.0,0.0,832.0)
	set udg_rect15=Rect(0.0,-1760.0,768.0,-960.0)
	set udg_rect16=Rect(2048.0,-1760.0,2816.0,-960.0)
	set udg_rect17=Rect(-2816.0,-1760.0,-2048.0,-960.0)
	set udg_rect18=Rect(-768.0,-1760.0,0.0,-960.0)
	set udg_rect19=Rect(0.0,32.0,768.0,832.0)
	set udg_rect20=Rect(2048.0,0.0,2816.0,800.0)
	set udg_rect21=Rect(-2688.0,-1216.0,-2496.0,-1024.0)
	set udg_rect22=Rect(-352.0,-1248.0,-128.0,-1024.0)
	set udg_rect23=Rect(-2688.0,544.0,-2464.0,768.0)
	set udg_rect24=Rect(-352.0,544.0,-128.0,768.0)
	set udg_rect25=Rect(128.0,544.0,320.0,768.0)
	set udg_rect26=Rect(2496.0,544.0,2688.0,768.0)
	set udg_rect27=Rect(128.0,-1216.0,320.0,-1024.0)
	set udg_rect28=Rect(2496.0,-1216.0,2688.0,-1024.0)
endfunction

//***************************************************************************
//*
//*Triggers
//*
//***************************************************************************
//===========================================================================
//Trigger:Nahkampf-Initialisierung
//
//Vorgegebene Nahkampf-Spielinitialisierung für alle Spieler
//===========================================================================
function Trig_Nahkampf_Initialisierung_Actions takes nothing returns nothing
	call TriggerExecute(udg_trigger02)
	call TriggerExecute(udg_trigger05)
	call FogEnableOff()
	call FogMaskEnableOff()
endfunction

//===========================================================================
//===========================================================================
//Trigger:Init regions
//===========================================================================
function Trig_Init_regions_Actions takes nothing returns nothing
	set udg_rects01[0]=udg_rect11
	set udg_locations01[1]=GetRectCenter(udg_rect21)
	set udg_locations02[1]=GetRectCenter(udg_rect22)
	set udg_rects01[1]=udg_rect09
	set udg_locations01[2]=GetRectCenter(udg_rect23)
	set udg_locations02[2]=GetRectCenter(udg_rect24)
	set udg_rects01[2]=udg_rect12
	set udg_locations01[3]=GetRectCenter(udg_rect25)
	set udg_locations02[3]=GetRectCenter(udg_rect26)
	set udg_rects01[3]=udg_rect10
	set udg_locations01[4]=GetRectCenter(udg_rect27)
	set udg_locations02[4]=GetRectCenter(udg_rect28)
	//-
	set udg_rects02[0]=udg_rect03
	set udg_rects03[0]=udg_rect17
	set udg_rects02[1]=udg_rect04
	set udg_rects03[1]=udg_rect18
	set udg_rects02[2]=udg_rect02
	set udg_rects03[2]=udg_rect13
	set udg_rects02[3]=udg_rect01
	set udg_rects03[3]=udg_rect14
	set udg_rects02[4]=udg_rect07
	set udg_rects03[4]=udg_rect19
	set udg_rects02[5]=udg_rect08
	set udg_rects03[5]=udg_rect20
	set udg_rects02[6]=udg_rect05
	set udg_rects03[6]=udg_rect15
	set udg_rects02[7]=udg_rect06
	set udg_rects03[7]=udg_rect16
	call TriggerExecute(udg_trigger03)
endfunction

//===========================================================================
//===========================================================================
//Trigger:Init Players
//===========================================================================
function Trig_Init_Players_Func001Func001Func001Func001A takes nothing returns nothing
	call RemoveUnit(GetEnumUnit())
endfunction

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

function Trig_Init_Players_Func001Func001Func001C takes nothing returns boolean
	if(not(GetForLoopIndexA()<=4))then
		return false
	endif
	return true
endfunction

function Trig_Init_Players_Func001Func001Func007C takes nothing returns boolean
	if(not(GetForLoopIndexA()<=4))then
		return false
	endif
	return true
endfunction

function Trig_Init_Players_Func001Func001C takes nothing returns boolean
	if(not(GetPlayerSlotState(ConvertedPlayer(GetForLoopIndexA()))==PLAYER_SLOT_STATE_PLAYING))then
		return false
	endif
	if(not(GetPlayerController(ConvertedPlayer(GetForLoopIndexA()))==MAP_CONTROL_USER))then
		return false
	endif
	return true
endfunction

function Trig_Init_Players_Func002A takes nothing returns nothing
	call SetForceAllianceStateBJ(GetForceOfPlayer(GetEnumPlayer()),udg_force01,bj_ALLIANCE_ALLIED)
	call SetForceAllianceStateBJ(GetForceOfPlayer(GetEnumPlayer()),udg_force02,bj_ALLIANCE_ALLIED)
endfunction

function Trig_Init_Players_Func003A takes nothing returns nothing
	call SetForceAllianceStateBJ(GetForceOfPlayer(GetEnumPlayer()),udg_force01,bj_ALLIANCE_ALLIED)
	call SetForceAllianceStateBJ(GetForceOfPlayer(GetEnumPlayer()),udg_force02,bj_ALLIANCE_UNALLIED)
endfunction

function Trig_Init_Players_Func009A takes nothing returns nothing
	call ResetToGameCameraForPlayer(GetEnumPlayer(),3.00)
endfunction

function Trig_Init_Players_Actions takes nothing returns nothing
	set bj_forLoopAIndex=1
	set bj_forLoopAIndexEnd=12
	loop
		exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
		if(Trig_Init_Players_Func001Func001C())then
			call SetPlayerStateBJ(ConvertedPlayer(GetForLoopIndexA()),PLAYER_STATE_FOOD_CAP_CEILING,100000000)
			call SetPlayerStateBJ(ConvertedPlayer(GetForLoopIndexA()),PLAYER_STATE_RESOURCE_FOOD_CAP,100000000)
			call TriggerRegisterPlayerEventLeave(udg_trigger17,ConvertedPlayer(GetForLoopIndexA()))
			call TriggerRegisterPlayerEventEndCinematic(udg_trigger09,ConvertedPlayer(GetForLoopIndexA()))
			call ForceAddPlayerSimple(ConvertedPlayer(GetForLoopIndexA()),udg_force03)
			if(Trig_Init_Players_Func001Func001Func007C())then
				call SetPlayerStateBJ(ConvertedPlayer(GetForLoopIndexA()),PLAYER_STATE_RESOURCE_GOLD,750)
				call SetPlayerStateBJ(ConvertedPlayer(GetForLoopIndexA()),PLAYER_STATE_RESOURCE_LUMBER,100000000)
				call ForceAddPlayerSimple(ConvertedPlayer(GetForLoopIndexA()),udg_force01)
			else
				call TriggerRegisterPlayerChatEvent(udg_trigger07,ConvertedPlayer(GetForLoopIndexA()),"-help",false)
				call SetPlayerStateBJ(ConvertedPlayer(GetForLoopIndexA()),PLAYER_STATE_RESOURCE_GOLD,250)
				call SetPlayerStateBJ(ConvertedPlayer(GetForLoopIndexA()),PLAYER_STATE_RESOURCE_LUMBER,750)
				call ForceAddPlayerSimple(ConvertedPlayer(GetForLoopIndexA()),udg_force02)
				call ForceAddPlayerSimple(ConvertedPlayer(GetForLoopIndexA()),udg_force04)
				call PanCameraToTimedLocWithZForPlayer(ConvertedPlayer(GetForLoopIndexA()),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(ConvertedPlayer(GetForLoopIndexA()),'e000'))),200.00,0)
			endif
		else
			if(Trig_Init_Players_Func001Func001Func001C())then
				call ForGroupBJ(GetUnitsInRectAll(udg_rects01[(GetForLoopIndexA()-1)]),function Trig_Init_Players_Func001Func001Func001Func002A)
			else
				call ForGroupBJ(GetUnitsOfPlayerAll(ConvertedPlayer(GetForLoopIndexA())),function Trig_Init_Players_Func001Func001Func001Func001A)
			endif
		endif
		set bj_forLoopAIndex=bj_forLoopAIndex+1
	endloop
	call ForForce(udg_force01,function Trig_Init_Players_Func002A)
	call ForForce(udg_force02,function Trig_Init_Players_Func003A)
	call DisplayTimedTextToForce(udg_force02,60.00,"TRIGSTR_056")
	call DisplayTimedTextToForce(udg_force01,90.00,"TRIGSTR_057")
	call CreateQuestBJ(bj_QUESTTYPE_REQ_DISCOVERED,"TRIGSTR_052","TRIGSTR_053","ReplaceableTextures\\WorldEditUI\\DoodadPlaceholder.blp")
	call CreateQuestBJ(bj_QUESTTYPE_REQ_DISCOVERED,"TRIGSTR_054","TRIGSTR_055","ReplaceableTextures\\WorldEditUI\\DoodadPlaceholder.blp")
	call TriggerSleepAction(7.00)
	call ForForce(udg_force02,function Trig_Init_Players_Func009A)
endfunction

//===========================================================================
//===========================================================================
//Trigger:Init sell
//===========================================================================
function Trig_Init_sell_Actions takes nothing returns nothing
	set bj_forLoopAIndex=0
	set bj_forLoopAIndexEnd=7
	loop
		exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
		call CreateTextTagLocBJ("TRIGSTR_026",GetRectCenter(udg_rects03[GetForLoopIndexA()]),0,10,100,100.00,10.00,0)
		set udg_texttags01[GetForLoopIndexA()]=GetLastCreatedTextTag()
		set bj_forLoopAIndex=bj_forLoopAIndex+1
	endloop
endfunction

//===========================================================================
//===========================================================================
//Trigger:Help
//===========================================================================
function Trig_Help_Conditions takes nothing returns boolean
	if(not(IsPlayerInForce(GetTriggerPlayer(),udg_force04)==true))then
		return false
	endif
	if(not(IsTriggerEnabled(udg_trigger09)==false))then
		return false
	endif
	return true
endfunction

function Trig_Help_Func003Func004A takes nothing returns nothing
	call PanCameraToTimedLocWithZForPlayer(GetEnumPlayer(),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(GetEnumPlayer(),'e000'))),200.00,2.00)
endfunction

function Trig_Help_Func003Func009A takes nothing returns nothing
	call ResetToGameCameraForPlayer(GetEnumPlayer(),2.00)
endfunction

function Trig_Help_Func003C takes nothing returns boolean
	if(not(CountPlayersInForceBJ(udg_force04)>0))then
		return false
	endif
	return true
endfunction

function Trig_Help_Actions takes nothing returns nothing
	if(Trig_Help_Func003C())then
		call EnableTrigger(udg_trigger09)
		call ForForce(udg_force04,function Trig_Help_Func003Func004A)
		call SetUserControlForceOff(udg_force04)
		call ShowInterfaceForceOff(udg_force04,2.00)
		call TriggerSleepAction(2)
		call TransmissionFromUnitTypeWithNameBJ(udg_force04,ForcePickRandomPlayer(udg_force04),'e000',"TRIGSTR_061",GetRectCenter(GetPlayableMapRect()),null,"TRIGSTR_062",bj_TIMETYPE_ADD,10.00,true)
		call ForForce(udg_force04,function Trig_Help_Func003Func009A)
		call SetUserControlForceOn(udg_force04)
		call ShowInterfaceForceOn(udg_force04,2)
		call DisableTrigger(udg_trigger09)
	else
		call DisableTrigger(udg_trigger07)
		call DisableTrigger(udg_trigger08)
	endif
endfunction

//===========================================================================
//===========================================================================
//Trigger:Help2
//===========================================================================
function Trig_Help2_Conditions takes nothing returns boolean
	if(not(IsTriggerEnabled(udg_trigger09)==false))then
		return false
	endif
	return true
endfunction

function Trig_Help2_Func002Func004A takes nothing returns nothing
	call PanCameraToTimedLocWithZForPlayer(GetEnumPlayer(),GetUnitLoc(GroupPickRandomUnit(GetUnitsOfPlayerAndTypeId(GetEnumPlayer(),'e000'))),200.00,2.00)
endfunction

function Trig_Help2_Func002Func009A takes nothing returns nothing
	call ResetToGameCameraForPlayer(GetEnumPlayer(),2.00)
endfunction

function Trig_Help2_Func002C takes nothing returns boolean
	if(not(CountPlayersInForceBJ(udg_force04)>0))then
		return false
	endif
	return true
endfunction

function Trig_Help2_Actions takes nothing returns nothing
	if(Trig_Help2_Func002C())then
		call EnableTrigger(udg_trigger09)
		call ForForce(udg_force04,function Trig_Help2_Func002Func004A)
		call SetUserControlForceOff(udg_force04)
		call ShowInterfaceForceOff(udg_force04,2.00)
		call TriggerSleepAction(2)
		call TransmissionFromUnitTypeWithNameBJ(udg_force04,ForcePickRandomPlayer(udg_force04),'e000',"TRIGSTR_063",GetRectCenter(GetPlayableMapRect()),null,"TRIGSTR_064",bj_TIMETYPE_ADD,10.00,true)
		call ForForce(udg_force04,function Trig_Help2_Func002Func009A)
		call SetUserControlForceOn(udg_force04)
		call ShowInterfaceForceOn(udg_force04,2)
		call DisableTrigger(udg_trigger09)
	else
		call DisableTrigger(udg_trigger07)
		call DisableTrigger(udg_trigger08)
	endif
endfunction

//===========================================================================
//===========================================================================
//Trigger:lol
//===========================================================================
function Trig_lol_Func002C takes nothing returns boolean
	return true
endfunction

function Trig_lol_Actions takes nothing returns nothing
	call DisplayTimedTextToForce(GetPlayersAll(),60.00,(GetPlayerName(GetTriggerPlayer())+" meint, er/sie bräuchte keine hilfe und hat das hilfsvideo abgebrochen. -help um es nocheinmal anzuzeigen"))
	if(Trig_lol_Func002C())then
		call ForceRemovePlayerSimple(GetTriggerPlayer(),udg_force04)
		call TransmissionFromUnitTypeWithNameBJ(udg_force04,ForcePickRandomPlayer(udg_force04),'e000',"TRIGSTR_065",GetRectCenter(GetPlayableMapRect()),null,"TRIGSTR_066",bj_TIMETYPE_ADD,10.00,true)
		call ResetToGameCameraForPlayer(GetTriggerPlayer(),2.00)
		call SetUserControlForceOn(GetForceOfPlayer(GetTriggerPlayer()))
		call ShowInterfaceForceOn(GetForceOfPlayer(GetTriggerPlayer()),2)
		call DisplayTimedTextToForce(GetForceOfPlayer(GetTriggerPlayer()),60.00,"TRIGSTR_067")
	else
	endif
endfunction

//===========================================================================
//===========================================================================
//Trigger:defead
//===========================================================================
function Trig_defead_Func006C takes nothing returns boolean
	if((IsUnitType(GetDyingUnit(),UNIT_TYPE_TOWNHALL)==true))then
		return true
	endif
	if((GetUnitTypeId(GetDyingUnit())=='ugol'))then
		return true
	endif
	return false
endfunction

function Trig_defead_Func007001001002001 takes nothing returns boolean
	return(IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)==true)
endfunction

function Trig_defead_Func007001001002002 takes nothing returns boolean
	return(GetUnitTypeId(GetFilterUnit())=='ugol')
endfunction

function Trig_defead_Func007001001002 takes nothing returns boolean
	return GetBooleanOr(Trig_defead_Func007001001002001(),Trig_defead_Func007001001002002())
endfunction

function Trig_defead_Conditions takes nothing returns boolean
	if(not(GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))>4))then
		return false
	endif
	if(not(IsPlayerInForce(GetOwningPlayer(GetDyingUnit()),udg_force03)==true))then
		return false
	endif
	if(not(udg_booleans01[GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))]==true))then
		return false
	endif
	if(not Trig_defead_Func006C())then
		return false
	endif
	if(not(CountUnitsInGroup(GetUnitsOfPlayerMatching(GetOwningPlayer(GetDyingUnit()),Condition(function Trig_defead_Func007001001002)))==0))then
		return false
	endif
	return true
endfunction

function Trig_defead_Actions takes nothing returns nothing
	call DisplayTimedTextToForce(GetPlayersAll(),30,(GetPlayerName(GetOwningPlayer(GetDyingUnit()))+("has been defeaded by "+GetPlayerName(GetOwningPlayer(GetKillingUnitBJ())))))
	call CustomDefeatBJ(GetOwningPlayer(GetDyingUnit()),"TRIGSTR_068")
endfunction

//===========================================================================
//===========================================================================
//Trigger:pay
//===========================================================================
function Trig_pay_Conditions takes nothing returns boolean
	if(not(GetSpellAbilityId()=='Aroa'))then
		return false
	endif
	return true
endfunction

function Trig_pay_Func002Func001Func001Func001C takes nothing returns boolean
	if(not(udg_integers01[GetForLoopIndexA()]>0))then
		return false
	endif
	if(not(udg_integers01[GetForLoopIndexA()]>GetPlayerState(GetOwningPlayer(GetTriggerUnit()),PLAYER_STATE_RESOURCE_GOLD)))then
		return false
	endif
	if(not(CountUnitsInGroup(GetUnitsInRectAll(udg_rects03[GetForLoopIndexA()]))>0))then
		return false
	endif
	return true
endfunction

function Trig_pay_Func002Func001Func001Func002Func006001001002001 takes nothing returns boolean
	return(IsUnitAliveBJ(GetFilterUnit())==true)
endfunction

function Trig_pay_Func002Func001Func001Func002Func006001001002002 takes nothing returns boolean
	return(IsUnitType(GetFilterUnit(),UNIT_TYPE_PEON)==true)
endfunction

function Trig_pay_Func002Func001Func001Func002Func006001001002 takes nothing returns boolean
	return GetBooleanAnd(Trig_pay_Func002Func001Func001Func002Func006001001002001(),Trig_pay_Func002Func001Func001Func002Func006001001002002())
endfunction

function Trig_pay_Func002Func001Func001Func002C takes nothing returns boolean
	if(not(udg_booleans01[GetConvertedPlayerId(GetOwningPlayer(GetTriggerUnit()))]==false))then
		return false
	endif
	if(not(CountUnitsInGroup(GetUnitsInRectMatching(udg_rects03[GetForLoopIndexA()],Condition(function Trig_pay_Func002Func001Func001Func002Func006001001002)))>0))then
		return false
	endif
	return true
endfunction

function Trig_pay_Func002Func001Func001Func003Func007001002001 takes nothing returns boolean
	return(GetUnitTypeId(GetFilterUnit())!='e002')
endfunction

function Trig_pay_Func002Func001Func001Func003Func007001002002 takes nothing returns boolean
	return(GetUnitTypeId(GetFilterUnit())!='e001')
endfunction

function Trig_pay_Func002Func001Func001Func003Func007001002 takes nothing returns boolean
	return GetBooleanAnd(Trig_pay_Func002Func001Func001Func003Func007001002001(),Trig_pay_Func002Func001Func001Func003Func007001002002())
endfunction

function Trig_pay_Func002Func001Func001Func003Func007A takes nothing returns nothing
	call SetUnitPositionLoc(GetEnumUnit(),GetPlayerStartLocationLoc(GetOwningPlayer(GetTriggerUnit())))
	call SetUnitOwner(GetEnumUnit(),GetOwningPlayer(GetTriggerUnit()),true)
endfunction

function Trig_pay_Func002Func001Func001Func003Func008Func001Func001Func002001 takes nothing returns boolean
	return(GetPlayerTechCountSimple('Rguv',GetOwningPlayer(GetSpellAbilityUnit()))<GetPlayerTechMaxAllowedSwap('Rguv',GetOwningPlayer(GetSpellAbilityUnit())))
endfunction

function Trig_pay_Func002Func001Func001Func003Func008Func001Func001C takes nothing returns boolean
	if(not('guvi'==GetItemTypeId(GetEnumItem())))then
		return false
	endif
	return true
endfunction

function Trig_pay_Func002Func001Func001Func003Func008Func001Func002001 takes nothing returns boolean
	return(GetPlayerTechCountSimple('R000',GetOwningPlayer(GetSpellAbilityUnit()))<GetPlayerTechMaxAllowedSwap('R000',GetOwningPlayer(GetSpellAbilityUnit())))
endfunction

function Trig_pay_Func002Func001Func001Func003Func008Func001C takes nothing returns boolean
	if(not('gfor'==GetItemTypeId(GetEnumItem())))then
		return false
	endif
	return true
endfunction

function Trig_pay_Func002Func001Func001Func003Func008A takes nothing returns nothing
	if(Trig_pay_Func002Func001Func001Func003Func008Func001C())then
		if(Trig_pay_Func002Func001Func001Func003Func008Func001Func002001())then
			call SetPlayerTechResearchedSwap('R000',(GetPlayerTechCountSimple('R000',GetOwningPlayer(GetSpellAbilityUnit()))+1),GetOwningPlayer(GetSpellAbilityUnit()))
		else
			call DoNothing()
		endif
		call RemoveItem(GetEnumItem())
	else
		if(Trig_pay_Func002Func001Func001Func003Func008Func001Func001C())then
			if(Trig_pay_Func002Func001Func001Func003Func008Func001Func001Func002001())then
				call SetPlayerTechResearchedSwap('Rguv',(GetPlayerTechCountSimple('Rguv',GetOwningPlayer(GetEnumUnit()))+1),GetOwningPlayer(GetSpellAbilityUnit()))
			else
				call DoNothing()
			endif
			call RemoveItem(GetEnumItem())
		else
			call SetItemPositionLoc(GetEnumItem(),GetPlayerStartLocationLoc(GetOwningPlayer(GetSpellAbilityUnit())))
		endif
	endif
endfunction

function Trig_pay_Func002Func001Func001Func003C takes nothing returns boolean
	if(not(udg_booleans01[GetConvertedPlayerId(GetOwningPlayer(GetTriggerUnit()))]==true))then
		return false
	endif
	return true
endfunction

function Trig_pay_Func002Func001Func001Func006C takes nothing returns boolean
	if((CountUnitsInGroup(GetUnitsInRectAll(udg_rects03[GetForLoopIndexA()]))>0))then
		return true
	endif
	return false
endfunction

function Trig_pay_Func002Func001Func001C takes nothing returns boolean
	if(not(udg_integers01[GetForLoopIndexA()]>0))then
		return false
	endif
	if(not(udg_integers01[GetForLoopIndexA()]<=GetPlayerState(GetOwningPlayer(GetTriggerUnit()),PLAYER_STATE_RESOURCE_GOLD)))then
		return false
	endif
	if(not Trig_pay_Func002Func001Func001Func006C())then
		return false
	endif
	return true
endfunction

function Trig_pay_Func002Func001C takes nothing returns boolean
	if(not(RectContainsUnit(udg_rects02[GetForLoopIndexA()],GetTriggerUnit())==true))then
		return false
	endif
	return true
endfunction

function Trig_pay_Actions takes nothing returns nothing
	set bj_forLoopAIndex=0
	set bj_forLoopAIndexEnd=7
	loop
		exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
		if(Trig_pay_Func002Func001C())then
			if(Trig_pay_Func002Func001Func001C())then
				if(Trig_pay_Func002Func001Func001Func002C())then
					set udg_booleans01[GetConvertedPlayerId(GetOwningPlayer(GetTriggerUnit()))]=true
					call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetTriggerUnit())),"TRIGSTR_047")
					call ForceRemovePlayerSimple(GetOwningPlayer(GetTriggerUnit()),udg_force04)
					call AdjustPlayerStateBJ(750,GetOwningPlayer(GetTriggerUnit()),PLAYER_STATE_RESOURCE_GOLD)
				else
				endif
				if(Trig_pay_Func002Func001Func001Func003C())then
					call AdjustPlayerStateBJ((0-udg_integers01[GetForLoopIndexA()]),GetOwningPlayer(GetTriggerUnit()),PLAYER_STATE_RESOURCE_GOLD)
					call AdjustPlayerStateBJ((2*udg_integers01[GetForLoopIndexA()]),GetOwningPlayer(GroupPickRandomUnit(GetUnitsInRectAll(udg_rects03[GetForLoopIndexA()]))),PLAYER_STATE_RESOURCE_GOLD)
					set udg_integers01[GetForLoopIndexA()]=0
					call SetTextTagTextBJ(udg_texttags01[GetForLoopIndexA()],"TRIGSTR_046",10)
					call ForGroupBJ(GetUnitsInRectMatching(udg_rects03[GetForLoopIndexA()],Condition(function Trig_pay_Func002Func001Func001Func003Func007001002)),function Trig_pay_Func002Func001Func001Func003Func007A)
					call EnumItemsInRectBJ(udg_rects03[GetForLoopIndexA()],function Trig_pay_Func002Func001Func001Func003Func008A)
					call PanCameraToTimedLocForPlayer(GetOwningPlayer(GetTriggerUnit()),GetPlayerStartLocationLoc(GetOwningPlayer(GetTriggerUnit())),0)
				else
					call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetTriggerUnit())),"TRIGSTR_048")
				endif
			else
				if(Trig_pay_Func002Func001Func001Func001C())then
					call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetTriggerUnit())),"TRIGSTR_058")
				else
					call DisplayTextToForce(GetForceOfPlayer(GetOwningPlayer(GetTriggerUnit())),"TRIGSTR_049")
				endif
			endif
		else
		endif
		set bj_forLoopAIndex=bj_forLoopAIndex+1
	endloop
endfunction

//===========================================================================
//===========================================================================
//Trigger:set price
//===========================================================================
function Trig_set_price_Conditions takes nothing returns boolean
	if(not(SubStringBJ(GetEventPlayerChatString(),1,5)=="set1 "))then
		return false
	endif
	return true
endfunction

function Trig_set_price_Func002C takes nothing returns boolean
	if(not(udg_integers01[((GetConvertedPlayerId(GetTriggerPlayer())*2)-2)]>0))then
		return false
	endif
	return true
endfunction

function Trig_set_price_Actions takes nothing returns nothing
	set udg_integers01[((GetConvertedPlayerId(GetTriggerPlayer())*2)-2)]=S2I(SubStringBJ(GetEventPlayerChatString(),6,10))
	if(Trig_set_price_Func002C())then
		call SetTextTagTextBJ(udg_texttags01[((GetConvertedPlayerId(GetTriggerPlayer())*2)-2)],I2S(udg_integers01[((GetConvertedPlayerId(GetTriggerPlayer())*2)-2)]),10)
	else
		call SetTextTagTextBJ(udg_texttags01[((GetConvertedPlayerId(GetTriggerPlayer())*2)-2)],"TRIGSTR_028",10)
	endif
endfunction

//===========================================================================
//===========================================================================
//Trigger:set price2
//===========================================================================
function Trig_set_price2_Conditions takes nothing returns boolean
	if(not(SubStringBJ(GetEventPlayerChatString(),1,5)=="set2 "))then
		return false
	endif
	return true
endfunction

function Trig_set_price2_Func002C takes nothing returns boolean
	if(not(udg_integers01[((GetConvertedPlayerId(GetTriggerPlayer())*2)-1)]>0))then
		return false
	endif
	return true
endfunction

function Trig_set_price2_Actions takes nothing returns nothing
	set udg_integers01[((GetConvertedPlayerId(GetTriggerPlayer())*2)-1)]=S2I(SubStringBJ(GetEventPlayerChatString(),6,10))
	if(Trig_set_price2_Func002C())then
		call SetTextTagTextBJ(udg_texttags01[((GetConvertedPlayerId(GetTriggerPlayer())*2)-1)],I2S(udg_integers01[((GetConvertedPlayerId(GetTriggerPlayer())*2)-1)]),10)
	else
		call SetTextTagTextBJ(udg_texttags01[((GetConvertedPlayerId(GetTriggerPlayer())*2)-1)],"TRIGSTR_030",10)
	endif
endfunction

//===========================================================================
//===========================================================================
//Trigger:Side change
//===========================================================================
function Trig_Side_change_Conditions takes nothing returns boolean
	if(not(GetSpellAbilityId()=='A002'))then
		return false
	endif
	return true
endfunction

function Trig_Side_change_Actions takes nothing returns nothing
	call SetUnitPositionLoc(GetSpellAbilityUnit(),udg_locations02[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))])
endfunction

//===========================================================================
//===========================================================================
//Trigger:Side change Kopieren
//===========================================================================
function Trig_Side_change_Kopieren_Conditions takes nothing returns boolean
	if(not(GetSpellAbilityId()=='A002'))then
		return false
	endif
	return true
endfunction

function Trig_Side_change_Kopieren_Actions takes nothing returns nothing
	call SetUnitPositionLoc(GetSpellAbilityUnit(),udg_locations01[GetConvertedPlayerId(GetOwningPlayer(GetSpellAbilityUnit()))])
endfunction

//===========================================================================
//===========================================================================
//Trigger:Next Items
//===========================================================================
function Trig_Next_Items_Actions takes nothing returns nothing
endfunction

//===========================================================================
//===========================================================================
//Trigger:Leave
//===========================================================================
function Trig_Leave_Func002A takes nothing returns nothing
	call RemoveUnit(GetEnumUnit())
endfunction

function Trig_Leave_Actions takes nothing returns nothing
	call ForceRemovePlayerSimple(GetTriggerPlayer(),udg_force04)
	call ForGroupBJ(GetUnitsOfPlayerAll(GetTriggerPlayer()),function Trig_Leave_Func002A)
endfunction

//===========================================================================
//===========================================================================
//===========================================================================
//***************************************************************************
//*
//*Upgrades
//*
//***************************************************************************
//***************************************************************************
//*
//*Players
//*
//***************************************************************************
//***************************************************************************
//*
//*Main Initialization
//*
//***************************************************************************
//===========================================================================
function main2 takes nothing returns nothing
	call SetCameraBounds(-7424.0+GetCameraMargin(CAMERA_MARGIN_LEFT),-7680.0+GetCameraMargin(CAMERA_MARGIN_BOTTOM),7424.0-GetCameraMargin(CAMERA_MARGIN_RIGHT),7168.0-GetCameraMargin(CAMERA_MARGIN_TOP),-7424.0+GetCameraMargin(CAMERA_MARGIN_LEFT),7168.0-GetCameraMargin(CAMERA_MARGIN_TOP),7424.0-GetCameraMargin(CAMERA_MARGIN_RIGHT),-7680.0+GetCameraMargin(CAMERA_MARGIN_BOTTOM))
	call SetDayNightModels("Environment\\DNC\\DNCDalaran\\DNCDalaranTerrain\\DNCDalaranTerrain.mdl","Environment\\DNC\\DNCDalaran\\DNCDalaranUnit\\DNCDalaranUnit.mdl")
	call NewSoundEnvironment("Default")
	call SetAmbientDaySound("DalaranDay")
	call SetAmbientNightSound("DalaranNight")
	call SetMapMusic("Music",true,0)
	call CreateRegions2()
	call SetPlayerTechResearched(Player(0),'Rusp',1)
	call SetPlayerTechResearched(Player(0),'Reht',1)
	call SetPlayerTechResearched(Player(1),'Rusp',1)
	call SetPlayerTechResearched(Player(1),'Reht',1)
	call SetPlayerTechResearched(Player(2),'Rusp',1)
	call SetPlayerTechResearched(Player(2),'Reht',1)
	call SetPlayerTechResearched(Player(3),'Rusp',1)
	call SetPlayerTechResearched(Player(3),'Reht',1)
	call CreateNeutralPassiveBuildings2()
	call CreateBuildingsForPlayer0()
	call CreateBuildingsForPlayer1()
	call CreateBuildingsForPlayer2()
	call CreateBuildingsForPlayer3()
	call CreateBuildingsForPlayer4()
	call CreateBuildingsForPlayer5()
	call CreateBuildingsForPlayer6()
	call CreateBuildingsForPlayer7()
	call CreateBuildingsForPlayer8()
	call CreateBuildingsForPlayer9()
	call CreateBuildingsForPlayer10()
	call CreateBuildingsForPlayer11()
	call CreateUnitsForPlayer0()
	call CreateUnitsForPlayer1()
	call CreateUnitsForPlayer2()
	call CreateUnitsForPlayer3()
	call InitGlobals2()
	set udg_trigger01=CreateTrigger()
	call TriggerAddAction(udg_trigger01,function Trig_Nahkampf_Initialisierung_Actions)
	set udg_trigger02=CreateTrigger()
	call TriggerAddAction(udg_trigger02,function Trig_Init_regions_Actions)
	set udg_trigger03=CreateTrigger()
	call TriggerAddAction(udg_trigger03,function Trig_Init_Players_Actions)
	set udg_trigger05=CreateTrigger()
	call TriggerAddAction(udg_trigger05,function Trig_Init_sell_Actions)
	set udg_trigger07=CreateTrigger()
	call TriggerAddCondition(udg_trigger07,Condition(function Trig_Help_Conditions))
	call TriggerAddAction(udg_trigger07,function Trig_Help_Actions)
	set udg_trigger08=CreateTrigger()
	call TriggerRegisterTimerEventPeriodic(udg_trigger08,60.00)
	call TriggerAddCondition(udg_trigger08,Condition(function Trig_Help2_Conditions))
	call TriggerAddAction(udg_trigger08,function Trig_Help2_Actions)
	set udg_trigger09=CreateTrigger()
	call DisableTrigger(udg_trigger09)
	call TriggerAddAction(udg_trigger09,function Trig_lol_Actions)
	set udg_trigger10=CreateTrigger()
	call TriggerRegisterAnyUnitEventBJ(udg_trigger10,EVENT_PLAYER_UNIT_DEATH)
	call TriggerAddCondition(udg_trigger10,Condition(function Trig_defead_Conditions))
	call TriggerAddAction(udg_trigger10,function Trig_defead_Actions)
	set udg_trigger11=CreateTrigger()
	call TriggerRegisterAnyUnitEventBJ(udg_trigger11,EVENT_PLAYER_UNIT_SPELL_CAST)
	call TriggerAddCondition(udg_trigger11,Condition(function Trig_pay_Conditions))
	call TriggerAddAction(udg_trigger11,function Trig_pay_Actions)
	set udg_trigger12=CreateTrigger()
	call TriggerRegisterPlayerChatEvent(udg_trigger12,Player(0),"set1 ",false)
	call TriggerRegisterPlayerChatEvent(udg_trigger12,Player(1),"set1 ",false)
	call TriggerRegisterPlayerChatEvent(udg_trigger12,Player(2),"set1 ",false)
	call TriggerRegisterPlayerChatEvent(udg_trigger12,Player(3),"set1 ",false)
	call TriggerAddCondition(udg_trigger12,Condition(function Trig_set_price_Conditions))
	call TriggerAddAction(udg_trigger12,function Trig_set_price_Actions)
	set udg_trigger13=CreateTrigger()
	call TriggerRegisterPlayerChatEvent(udg_trigger13,Player(0),"set2 ",false)
	call TriggerRegisterPlayerChatEvent(udg_trigger13,Player(1),"set2 ",false)
	call TriggerRegisterPlayerChatEvent(udg_trigger13,Player(2),"set2 ",false)
	call TriggerRegisterPlayerChatEvent(udg_trigger13,Player(3),"set2 ",false)
	call TriggerAddCondition(udg_trigger13,Condition(function Trig_set_price2_Conditions))
	call TriggerAddAction(udg_trigger13,function Trig_set_price2_Actions)
	set udg_trigger14=CreateTrigger()
	call TriggerRegisterAnyUnitEventBJ(udg_trigger14,EVENT_PLAYER_UNIT_SPELL_CAST)
	call TriggerAddCondition(udg_trigger14,Condition(function Trig_Side_change_Conditions))
	call TriggerAddAction(udg_trigger14,function Trig_Side_change_Actions)
	set udg_trigger15=CreateTrigger()
	call TriggerRegisterAnyUnitEventBJ(udg_trigger15,EVENT_PLAYER_UNIT_SPELL_ENDCAST)
	call TriggerAddCondition(udg_trigger15,Condition(function Trig_Side_change_Kopieren_Conditions))
	call TriggerAddAction(udg_trigger15,function Trig_Side_change_Kopieren_Actions)
	set udg_trigger16=CreateTrigger()
	call TriggerAddAction(udg_trigger16,function Trig_Next_Items_Actions)
	set udg_trigger17=CreateTrigger()
	call TriggerAddAction(udg_trigger17,function Trig_Leave_Actions)
	call ConditionalTriggerExecute(udg_trigger01)
endfunction

//***************************************************************************
//*
//*Map Configuration
//*
//***************************************************************************
function InitTrig_init takes nothing returns nothing
	
	call ExecuteFunc("main2")
endfunction
Unbezeichneter Auslöser 001
Events
Time - Every 2 seconds of game time
Conditions
Actions
Unit Group - Pick every unit in (Units in (Playable map area)) and do (Actions)
Loop - Actions
Neutral Building - Add 10 gold to (Picked unit)
Unbezeichneter Auslöser 002
Events
Map initialization
Conditions
Actions
Player - Add 1000 to Player 1 (Red) . Current gold
Player - Add 1000 to Player 2 (Blue) . Current gold
Player - Add 1000 to Player 3 (Teal) . Current gold
Player - Add 1000 to Player 4 (Purple) . Current gold
Top