function test_init(e)
end
       
function test_main(e)
 PlayerDX = g_Entity[e]['x'] - g_PlayerPosX;
 PlayerDY = g_Entity[e]['y'] - g_PlayerPosY;
 PlayerDZ = g_Entity[e]['z'] - g_PlayerPosZ;
 PlayerDist = math.sqrt(math.abs(PlayerDX*PlayerDX)+math.abs(PlayerDY*PlayerDY)+math.abs(PlayerDZ*PlayerDZ));
  
 if PlayerDist > 1000 then
  SetAnimation(1);
  if g_Entity[e]['animating'] == 0 then
  LoopAnimation(e);
  g_Entity[e]['animating'] = 1
  end
  Prompt("Working Ani 1");
  MoveForward(e,-25);
   end
  SetAnimation(0);
  if g_Entity[e]['animating'] == 0 then
  LoopAnimation(e);
  g_Entity[e]['animating'] = 1
   end   
   Prompt("Working Ani 2");
  MoveForward(e,-10);
 end

;anim
animmax          = 3
anim0            = 3,61
anim1            = 802,841
anim2            = 942,1141

if g_Entity[e]['animating'] == 1 then 

-- anim_test.lua
--
-- anim test with timer
--
-- author : J_C
--
--  this is free to all 
-- 

local anim = {}

local st_anim = 0;
local max_anim = 2;

local timerStarted = {};

-- this is called by GG at start-up - only once
function anim_test_init(e)
   
   -- start with animation (st_anim = 0) for this entity [e] 
   anim[e] = st_anim;
   -- tell code the timer has not been started for this [e] entity
   timerStarted[e] = 0;
   
end

-- this is called by GGs main loop every FPS of your PC
function anim_test_main(e)

	PlayerDist = GetPlayerDistance(e)
	
    -- if player is not too close
	if PlayerDist > 1000 then	
	    -- we can try do our animation
		do_my_animation(e);	
		
		-- show what [e] is doing
		PromptLocal(e,"Animate num "..anim[e])
		
		-- show what timer is doing
		Prompt(" Timer "..GetTimer(e))		
	else	
	   -- let [e] tell us to move back
	   PromptLocal(e, "Too close - move back")		
	end
end

-- this is called by our main function above...
function do_my_animation(e)

    -- check if this is first time - and start timer
    if timerStarted[e] == 0 then
	   -- set this... so we will not do this again
	   timerStarted[e] = 1;
	   StartTimer(e);
	   return
	end
	
	-- 20 seconds = 20000 timer ticks ... 1000 ticks per second
    if GetTimer(e) < 20000 then
      --  [e] is not animating so animate
	  if g_Entity[e]['animating'] == 0 then 
	    -- this is the anim from the FPE file 0,1,2
		SetAnimation(anim[e]);
		LoopAnimation(e);
		--PlayAnimation(e);
		g_Entity[e]['animating'] = 1
	  end
	else
		-- time up - change to next animation
	     -- but 1st stop old animation
		StopAnimation(e);
		-- work out next animation
		anim[e] = anim[e] + 1
		if anim[e] > max_anim then
			-- go back to start anim
			anim[e] = st_anim;
		end
	    -- now we must re-start the clock timer for this [e] entity
		StartTimer(e);		
	 end
		
end

if SetAnimation(anim[e]) == 2 then
MoveForward(e,50)
end

-- anim_test.lua
--
-- anim test with timer
--
-- author : J_C
--
--  this is free to all 
-- 

local anim = {}

local st_anim = 0;
local max_anim = 2;

local timerStarted = {};

-- this is called by GG at start-up - only once
function anim_test_init(e)
   
   -- start with animation (st_anim = 0) for this entity [e] 
   anim[e] = st_anim;
   -- tell code the timer has not been started for this [e] entity
   timerStarted[e] = 0;
   
end

-- this is called by GGs main loop every FPS of your PC
function anim_test_main(e)

	PlayerDist = GetPlayerDistance(e)
	
    -- if player is not too close
	if PlayerDist > 1000 then	
	    -- we can try do our animation
		do_my_animation(e);	
		
		-- show what [e] is doing
		PromptLocal(e,"Animate num "..anim[e])
		
		-- show what timer is doing
		Prompt(" Timer "..GetTimer(e))		
	else	
	   -- let [e] tell us to move back
	   PromptLocal(e, "Too close - move back")		
	end
end

-- this is called by our main function above...
function do_my_animation(e)

    -- check if this is first time - and start timer
    if timerStarted[e] == 0 then
	   -- set this... so we will not do this again
	   timerStarted[e] = 1;
	   StartTimer(e);
	   return
	end
	
	-- 20 seconds = 20000 timer ticks ... 1000 ticks per second
    if GetTimer(e) < 20000 then
      --  [e] is not animating so animate
	  if g_Entity[e]['animating'] == 0 then 
	    -- this is the anim from the FPE file 0,1,2
		SetAnimation(anim[e]);
		LoopAnimation(e);
		--PlayAnimation(e);
		g_Entity[e]['animating'] = 1
	  end
	
	  -- do movement for each animation
	  do_moves_for_animation(e, anim[e]);
	  	  
	else
		-- time up - change to next animation
	     -- but 1st stop old animation
		StopAnimation(e);
		-- work out next animation
		anim[e] = anim[e] + 1
		if anim[e] > max_anim then
			-- go back to start anim
			anim[e] = st_anim;
		end
	    -- now we must re-start the clock timer for this [e] entity
		StartTimer(e);		
	 end
		
end

function do_moves_for_animation(e, anm)

	  if anm == 0 then 
	     -- anim 0
		 
	  elseif anm == 1 then
	    -- anim 1
	  
	  elseif anm == 2 then
	    -- anim 2
		MoveForward(e, 50);
		
	  end

end