function CameraMovePoint2 takes nothing returns nothing
    timer t = GetExpiredTimer()
    int id = GetHandleId(t)
    unit d = LoadUnitHandle(h, id, 0)
    player p = Player(LoadInteger(h, id, 1))
    real x = 0
    real y = 0
    if GetLocalPlayer() == p then
        x = GetCameraTargetPositionX()
        y = GetCameraTargetPositionY()
    endif
    BJDebugMsg(R2S(x))
    BJDebugMsg(R2S(y))
    SetUnitX(d, x)
    SetUnitY(d, y)
    SetUnitPosition(d,x,y)
    BJDebugMsg(GetUnitName(d))
    BJDebugMsg(R2S(GetUnitX(d))+"Dummy")
    BJDebugMsg(R2S(GetUnitY(d))+"Dummy")
    d = null
    t = null
    p = null
endfunction

function CameraMovePoint takes unit d, int i returns nothing
    timer t = CreateTimer()
    int id = GetHandleId(t)
    SaveUnitHandle(h, id, 0, d)
    SaveInteger(h, id, 1, i)
    TimerStart(t, 0.07, true, function CameraMovePoint2)
    t = null
endfunction