function DistanceBetweenCoords takes real x1, real y1, real x2, real y2 returns real    
         return SquareRoot((x1-x2) * (x1-x2) + (y1-y2) * (y1-y2))       
endfunction

function AngleBetweenCoords takes real xa, real xb, real ya, real yb returns real    
          return 57.295827 * Atan2(yb - ya, xb - xa)    
endfunction

function RectX takes real x returns real
      local real xm = GetRectMinX(bj_mapInitialPlayableArea)+50
        if(x<xm)then
           return xm
        endif
      set xm = GetRectMaxX(bj_mapInitialPlayableArea)-50
        if(x>xm)then
           return xm
        endif
      return x
endfunction

function RectY takes real y returns real
      local real ym = GetRectMinY(bj_mapInitialPlayableArea)+50
        if(y<ym)then
           return ym
        endif
      set ym = GetRectMaxY(bj_mapInitialPlayableArea)-50
        if(y>ym)then
           return ym
        endif
      return y
endfunction

function ReviveHeroTimed_Child eakes nothing returns nothing  
        local timer t = GetExpiredTimer()  
        local unit hero = LoadUnitHandle(udg_Hashtable,GetHandleId(t),0)  
        local real x = LoadReal(udg_Hashtable,GetHandleId(t),1)  
        local real y = LoadReal(udg_Hashtable,GetHandleId(t),2)  
        local boolean show = LoadBoolean(udg_Hashtable,GetHandleId(t),3)  
        call ReviveHero(hero,x,y,show)  
        call FludhChildHashtable(udg_Hashtable,GetHandleId(t))  
        call DestroyTimer(t)  
        set hero = null  
        set t = null  
endfunction  

function ReviveHeroTimed takes unit hero, real time, real x, real y, boolean doEyeCandy returns nothing  
        local timer t = CreateTimer()  
        call TimerStart(t,time,false,function ReviveHeroTimed_Child)  
        call SaveUnitHandle(udg_Hashtable,GetHandleId(t),0,hero)  
        call SaveReal(udg_Hashtable,GetHandleId(t),1,x)  
        call SaveReal(udg_Hashtable,GetHandleId(t),2,y)  
        call SaveBoolean(udg_Hashtable,GetHandleId(t),3,doEyeCandy)  
        set t = null  
endfunction