function Trig_Chooser_Actions takes nothing returns nothing
    call SetUnitPositionLoc( GetSoldUnit(), GetRandomLocInRect(gg_rct________________001) )
    call SmartCameraPanBJ( GetOwningPlayer(GetSoldUnit()), GetUnitLoc(GetSoldUnit()), 1.50 )
endfunction

//===========================================================================
function InitTrig_Chooser takes nothing returns nothing
    set gg_trg_Chooser = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_Chooser, EVENT_PLAYER_UNIT_SELL )
    call TriggerAddAction( gg_trg_Chooser, function Trig_Chooser_Actions )
endfunction

function SmartCameraPanBJ takes player whichPlayer, location loc, real duration returns nothing
    local real dist
    if (GetLocalPlayer() == whichPlayer) then
        // Use only local code (no net traffic) within this block to avoid desyncs.

        set dist = DistanceBetweenPoints(loc, GetCameraTargetPositionLoc())
        if (dist >= bj_SMARTPAN_TRESHOLD_SNAP) then
            // If the user is too far away, snap the camera.
            call PanCameraToTimed(GetLocationX(loc), GetLocationY(loc), 0)
        elseif (dist >= bj_SMARTPAN_TRESHOLD_PAN) then
            // If the user is moderately close, pan the camera.
            call PanCameraToTimed(GetLocationX(loc), GetLocationY(loc), duration)
        else
            // User is close enough, so don't touch the camera.
        endif
    endif
endfunction

function Trig_Teleport_Actions takes nothing returns nothing
    local integer i = 1
    set i = GetRandomInt(1, 8)
    call SetUnitPositionLoc( GetEnteringUnit(), GetRandomLocInRect(udg_obl[i]) )
    call SmartCameraPanBJ( GetOwningPlayer(GetEnteringUnit()), GetUnitLoc(GetEnteringUnit()), 1.50 )
endfunction

//===========================================================================
function InitTrig_Teleport takes nothing returns nothing
    set gg_trg_Teleport = CreateTrigger(  )
    call TriggerRegisterEnterRectSimple( gg_trg_Teleport, gg_rct_Portal )
    call TriggerAddAction( gg_trg_Teleport, function Trig_Teleport_Actions )
endfunction