((код jass

globals
integer KeyX = StringHash("RectX") ключ для координаты Х, вдург еще что надо будет сохранить на id ректа...
integer KeyY = StringHash("RectY") ключ для координаты Y, вдург еще что надо будет сохранить на id ректа...
endglobals

function Trig_NO_LEFT_AREA_Conditions takes nothing returns boolean
return not IsUnitType(GetTriggerUnit(), UNIT_TYPE_STRUCTURE)
endfunction

function Trig_NO_LEFT_AREA_Actions takes nothing returns nothing
local integer id = GetHandleId( GetTriggeringRegion() )
local real TX = LoadReal( bj_lastCreatedHashtable, id,KeyX)
local real TY = LoadReal( bj_lastCreatedHashtable, id,KeyY)
local unit Leaver = GetTriggerUnit()

call DestroyEffect( AddSpecialEffect( "Abilities\\Spells\\NightElf\\Blink\\BlinkTarget.mdl", TX, TY ) )
call SetUnitX( Leaver, TX )
call SetUnitY( Leaver, TY )

set Leaver = null
endfunction

===========================================================================
function InitTrig_NO_LEFT_AREA takes nothing returns nothing
local region rectRegion
local integer id

set gg_trg_NO_LEFT_AREA = CreateTrigger( )
set bj_lastCreatedHashtable = InitHashtable()

set rectRegion = CreateRegion() создаём рект.
call RegionAddRect(rectRegion, gg_rct________________000) добовляем рект в область.
call TriggerRegisterLeaveRegion(gg_trg_NO_LEFT_AREA, rectRegion, null) создаём событие на данный рект.

set id = GetHandleId(rectRegion) берем id от ректа.
call SaveReal( bj_lastCreatedHashtable, id,KeyX, GetRectCenterX(gg_rct________________000) ) сохраняем координату Х, на id ректа.
call SaveReal( bj_lastCreatedHashtable, id,KeyY, GetRectCenterY(gg_rct________________000) ) сохраняем координату Y, на id ректа.

set rectRegion = CreateRegion()
call RegionAddRect(rectRegion, gg_rct________________001)
call TriggerRegisterLeaveRegion(gg_trg_NO_LEFT_AREA, rectRegion, null)

set id = GetHandleId(rectRegion)
call SaveReal( bj_lastCreatedHashtable, id,KeyX, GetRectCenterX(gg_rct________________001) )
call SaveReal( bj_lastCreatedHashtable, id,KeyY, GetRectCenterY(gg_rct________________001) )


call TriggerAddCondition( gg_trg_NO_LEFT_AREA, Condition( function Trig_NO_LEFT_AREA_Conditions ) )
call TriggerAddAction( gg_trg_NO_LEFT_AREA, function Trig_NO_LEFT_AREA_Actions )

set rectRegion = null
endfunction
))

((код jass

globals
integer KeyLoc = StringHash("LocXY") ключ для точки центра региона.
endglobals

function Trig_NO_LEFT_AREA_Conditions takes nothing returns boolean
return not IsUnitType(GetTriggerUnit(), UNIT_TYPE_STRUCTURE)
endfunction

function Trig_NO_LEFT_AREA_Actions takes nothing returns nothing
local location TempLoc = LoadLocationHandle( bj_lastCreatedHashtable, GetHandleId( GetTriggeringRegion() ), KeyLoc )
local unit Leaver = GetTriggerUnit()

call DestroyEffect( AddSpecialEffectLoc( "Abilities\\Spells\\NightElf\\Blink\\BlinkTarget.mdl", TempLoc ) )
call SetUnitX( Leaver, GetLocationX( TempLoc ) )
call SetUnitY( Leaver, GetLocationY( TempLoc ) )

call SetUnitPositionLocBJ( Leaver, TempLoc )

set Leaver = null
set TempLoc = null
endfunction

===========================================================================
function InitTrig_NO_LEFT_AREA takes nothing returns nothing
local region rectRegion
local integer FirstRectId
local rect TempRect
local integer nIndex = 0

set gg_trg_NO_LEFT_AREA = CreateTrigger( )
set bj_lastCreatedHashtable = InitHashtable()

set FirstRectId = GetHandleId(gg_rct________________000) самая первая область которую вы создали на карте.

loop
exitwhen nIndex > 99

call SaveFogStateHandle( bj_lastCreatedHashtable, 0, 0, ConvertFogState( FirstRectId + nIndex ) )
set TempRect = LoadRectHandle( bj_lastCreatedHashtable, 0, 0 )

if TempRect != null then
set rectRegion = CreateRegion()
call RegionAddRect( rectRegion, TempRect )
call TriggerRegisterLeaveRegion(gg_trg_NO_LEFT_AREA, rectRegion, null)
call SaveLocationHandle( bj_lastCreatedHashtable, GetHandleId( rectRegion ), KeyLoc, GetRectCenterLoc( TempRect ) )
endif

set nIndex = nIndex + 1
endloop

call TriggerAddCondition( gg_trg_NO_LEFT_AREA, Condition( function Trig_NO_LEFT_AREA_Conditions ) )
call TriggerAddAction( gg_trg_NO_LEFT_AREA, function Trig_NO_LEFT_AREA_Actions )

set TempRect = null
set rectRegion = null
endfunction
))