function Trig_Enter_Condition takes nothing returns boolean
    return ( GetObjInt( GetEnteringUnit(), "in house number" ) != FR( GetEnteringUnit() ) )
endfunction

function FR takes unit u returns integer
    local integer i = 0
    local boolean b
    loop
        exitwhen b == true
        set b = RectContainsUnit( udg_HouseR[i], u )
        set i = i + 1
    endloop
    return i
endfunction

function FR takes unit u returns integer
  local integer i = 0
  loop
    exitwhen RectContainsUnit(udg_HouseR[i], u) == true or i >= 8190
    set i = i + 1
  endloop
  return i
endfunction

function FR takes unit u returns integer
  local integer i = 0
  loop    
    exitwhen RectContainsUnit(udg_HouseR[i], u) or i >= 8190
    set i = i + 1
  endloop
  return i+1
endfunction