-- LUA Script - precede every function and global member with lowercase name of script + '_main'
-- Player Converse

texttime={}
stage={}
fin={}
function converse2_init(e)
texttime[e]=0
stage[e]=0
fin[e]=0
end

function converse2_main(e)
 PlayerDist = GetPlayerDistance(e)
 if PlayerDist < 100 then
  if g_KeyPressE==1 and GetTimer(e)>texttime[e] and fin[e]==0 then
   texttime[e]=GetTimer(e)+1000
   stage[e]=stage[e]+1
   SetAnimationFrames(3220,3260)
   if stage[e]<4 then
     PlayAnimation(e)
   end
  end
  if stage[e]==1 then
   TextCenterOnX(50,50,3,"Hello.")
  end
  if stage[e]==2 then
   TextCenterOnX(50,50,3,"I like turtles.")
  end
  if stage[e]==3 then
   TextCenterOnX(50,50,3,"Bibble.")
  end
  if stage[e]==4 then
   fin[e]=1
   stage[e]=5
   SetAnimationFrames(210,318)
   LoopAnimation(e)
  end
 end
 if PlayerDist>100 and stage[e]>0 then
  fin[e]=0
  stage[e]=0
  SetAnimationFrames(210,318)
  LoopAnimation(e)
 end
 Prompt(stage[e])
end

-- LUA Script - precede every function and global member with lowercase name of script + '_main'
-- Player Converse



function random_animation_init(e)
rd = 0
onecycle = 0
once_rmd = 0
counter = 0
end

function random_animation_main(e)
	
-----------starting animation --------
 if GetTimer(e)>5000 and onecycle == 0 then
    CharacterControlLimbo(e)
    EntObjNo = g_Entity[e]['obj']
    AIEntityStop(EntObjNo)
    SetActivated(e,0)
    SetAnimationFrames(3000,3090)
    LoopAnimation(e)
    StartTimer(e)
	--once_rmd = 0
	onecycle = 1
	end
	--------- random number -------
	if once_rmd == 0 and counter > 100 then
	rd = math.random(1,7)
	once_rmd = 1 
	counter = 0
	onecycle = 0
	--Prompt(rd)
	end
Prompt(rd)
	-------- do new anitation if random number is 1 ---------
	if rd == 1then
	CharacterControlLimbo(e)
    EntObjNo = g_Entity[e]['obj']
    AIEntityStop(EntObjNo)
    SetActivated(e,0)
    SetAnimationFrames(3429,3700)
    PlayAnimation(e)
	--StartTimer(e)
	if GetAnimationFrame(e) >= 3699 then
	
	onecycle = 0
	once_rmd = 0
	end
	else
	-----time delay to start random cycle ----
	if counter < 101 then
	counter = counter + 1 
	--onecycle = 0
	once_rmd = 0
	end
end
 
end

-- LUA Script - precede every function and global member with lowercase name of script + '_main'
-- Player Converse
-- script Pcs


function random_animation_init(e)
rd = 0
onecycle = 0
once_rmd = 0
counter = 0
fidge = 0
Include("ai_soldier.lua")

end

function random_animation_main(e)
	PlayerDist = GetPlayerDistance(e)
-----------starting animation --------
	if onecycle == 0 then
		CharacterControlLimbo(e)
		SetAnimationFrames(3000,3100)
		LoopAnimation(e)
		StartTimer(e)
		onecycle = 1
	end
	--------- random number -------
	counter = counter + 1 -----time delay to start random cycle ----
	
	if counter >= 100 then 
	once_rmd = 0
	end
	
	if once_rmd == 0 and rd ~= 1 then
		counter = 0
		rd = math.random(1,10)
		once_rmd = 1 
		counter = 0
		end
Prompt(rd)
	-------- do new animation if random number is 1 ---------
	if rd == 1 and fidge == 0 then
		if GetTimer(e)>7000 then
			CharacterControlLimbo(e)
			SetAnimationFrames(3429,3700)
			PlayAnimation(e)
			fidge = 1
			once_rmd = 0
			rd = 0
			StartTimer(e)
			
		end
		
	end
	---back to normal animation loop --- 
	
	if GetTimer(e)>10000 then
	rd = 0
	fidge = 0
		CharacterControlLimbo(e)
		EntObjNo = g_Entity[e]['obj']
		AIEntityStop(EntObjNo)
		SetActivated(e,0)
		SetAnimationFrames(3000,3100)
		LoopAnimation(e)
		StartTimer(e)
   end						
 
end