function Trig_Camera_Actions takes nothing returns nothing
local real x=GetUnitX(udg_Unit)+75.*Cos(GetUnitFacing(udg_Unit)*(bj_PI/180.))
local real y=GetUnitY(udg_Unit)+75.*Sin(GetUnitFacing(udg_Unit)*(bj_PI/180.))
call SetCameraField(CAMERA_FIELD_TARGET_DISTANCE,0.,0.)
call SetCameraField(CAMERA_FIELD_ANGLE_OF_ATTACK,360.,0.)
call SetCameraField(CAMERA_FIELD_ROTATION,GetUnitFacing(udg_Unit),0.)
call SetCameraField(CAMERA_FIELD_ZOFFSET,100.,.5)
call PanCameraToTimed(x,y,0.)
if(GetCameraEyePositionX()!=CurrentCameraPosX)or(GetCameraEyePositionY()!=CurrentCameraPosY)then
call BJDebugMsg("DoNoth.()")
endif
set CurrentCameraPosX=GetCameraEyePositionX()
set CurrentCameraPosY=GetCameraEyePositionY()
endfunction
function CamSets__Init takes nothing returns nothing
local trigger t=CreateTrigger()
call TriggerRegisterTimerEvent(t,.1,true)
call TriggerAddAction(t,function Trig_Camera_Actions)
set t=null
endfunction