--- Pcs

p_inside = 0  ------ variable to use in other scripts 
p_outside = 0  ------ variable to use in other scripts 
t_stamp_out = 0
t_stamp_in = 0 

function player_in_or_out_init(e)

end

function player_in_or_out_main(e)
 
 if t_stamp_out > 0 and t_stamp_in > 0 then
      if t_stamp_out > t_stamp_in then
	  p_outside = 1
	  p_inside = 0
	  
	  Prompt("player is outside")    ----- remember to remove this line
	  end
	  
	  if t_stamp_in > t_stamp_out then
	  p_inside = 1
	  p_outside = 0
	 
      Prompt("player is inside")     ----- remember to remove this line
 
	  end
 end
  
 
 
 end

--- Pcs

function inside_zone_init(e)

inonce = 0
t_stamp_in = 0
end

function inside_zone_main(e)
 if g_Entity[e]['plrinzone']== 1 and inonce == 0 then
  ActivateIfUsed(e)
  inonce = 1
  t_stamp_in = g_Time
  
 end
		if g_Entity[e]['plrinzone']~= 1 then 
		inonce = 0
		
		end
		
		
end

--- Pcs

function outside_zone_init(e)

outonce = 0
t_stamp_out = 0
end

function outside_zone_main(e)
 if g_Entity[e]['plrinzone']== 1 and outonce == 0 then
  ActivateIfUsed(e)
  outonce = 1
  t_stamp_out = g_Time
   
   
 end
		if g_Entity[e]['plrinzone']~= 1 then 
		outonce = 0
		 
		end
end

function collect_battery_init(e)
have_batery = 0 
end

function collect_battery_main(e)
 PlayerDist = GetPlayerDistance(e)
 if PlayerDist < 80 and g_PlayerHealth > 0 and have_batery == 0 then
   Prompt(" Press E to collect Battery ")
   if GetInKey() == "e" or GetInKey() == "E" then
   have_batery = 1
   PromptDuration("Collected a Battery",3000)
   PlaySound(e,0)
   Destroy(e)
   ActivateIfUsed(e)
   end
   
   end
end

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


function ai_start_relax_init(e)
rd = 0
onecycle = 0
once_rmd = 0
counter = 0
fidge = 0
Include("ai_soldier.lua")
ai_bot_oldhealth[e] = g_Entity[e]['health']
end

function ai_start_relax_main(e)
	PlayerDist = GetPlayerDistance(e)
-----------starting animation --------
	if onecycle == 0 then
		CharacterControlLimbo(e)
		SetAnimationFrames(3000,3100)
		LoopAnimation(e)
		StartTimer(e)
		onecycle = 1
	end
----- here you can decide how you want to call ai_soldier script --------
		if PlayerDist < 500 and g_Entity[e]['plrvisible'] == 1 or g_Entity[e]['health'] < ai_bot_oldhealth[e] then
			UnlockCharacterPosition(e)
			SwitchScript(e,"ai_soldier")
			return
		end	
end

-----script Pcs 
function ai_chair_talk_init(e)
SetAnimation(0)
  
  stopamin1 = 0
  stopamin2 = 0
  stopamin3 = 0
  stopamin4 = 0
  stopamin5 = 0
  once  = 0 
  beenhere = 0
end

function ai_chair_talk_main(e)
  PlayerDist = GetPlayerDistance(e)     
     
	 --------- animation sit -------
	if GetTimer(e)>4000 and stopamin1 == 0 then    
	   SetAnimationFrames(3744,3744)
       PlayAnimation(e)
       stopamin1 = 1
	   StartTimer(e)
	   
		
	end
		
	if PlayerDist < 200 then 	
	
		------ animation standing up ----- 
		if GetTimer(e)>5000 and stopamin2 == 0 then
			SetAnimationFrames(3744,3861)
	        PlayAnimation(e)
			stopamin2 = 1
			StartTimer(e)
			PlaySound(e,4)
		end
    
	
		----------animation idle -------
	if GetTimer(e)>5000 and stopamin3 == 0 then
		stopamin3 = 1
		SetAnimationFrames(3000,3100)
		LoopAnimation(e)
		--stopamin3 = 1
		StartTimer(e)
			if beenhere == 0 then
			PlaySound(e,1)
			end
			if beenhere == 1 then
			PlaySound(e,2)
			end
			if beenhere == 2 then
			PlaySound(e,3)
			end
			beenhere = beenhere +1
	end
	 
	 
		---------animation fidge ------
	if GetTimer(e)>5009 and stopamin4 == 0 then
		SetAnimationFrames(3440,3700)
		PlayAnimation(e)
		stopamin4 = 1
		StartTimer(e)
	end
		------ animation idle ----
	if GetTimer(e)>5000 and stopamin5 == 0 then
		SetAnimationFrames(3000,3100)
		LoopAnimation(e)
		stopamin5 = 1
		StartTimer(e)
	 
	end
	
	
	
	
end
		if PlayerDist > 201 then  
		
		if beenhere == 1 then 
		stopamin2 = 0
		stopamin3 = 0
		end
		if beenhere == 2 then 
		stopamin2 = 0
		stopamin3 = 0
		end
		if beenhere == 3 then 
		beenhere = 1
		end
		------animation sit -------
	  if GetTimer(e)>1000 and stopamin1 == 1 then    
	  SetAnimationFrames(3744,3744)
      LoopAnimation(e)
	  stopamin1 = 0
	  StartTimer(e)
	  
	end
	end
	
end -- off script --

-- Pcs

function play_soft_init(e)
end

function play_soft_main(e)
 if g_Entity[e]['plrinzone']==1 then
  LoopSound(e)
  SetSound(e,0)
  SetSoundVolume(70)
  ActivateIfUsed(e)
  else 
  StopSound(e)
 end
end

-- Script BY Pcs

start_speed = 50
animation_control = 1

function animation_control_init(e)
	SetAnimationSpeed(e,0)
	
end

function animation_control_main(e)

 if animation_control == 1 then
    Prompt("press E to start animation" )
	if GetInKey() == "e" or GetInKey() == "E" then
		SetAnimationSpeed(e,start_speed)
		animation_control = 2
    end
 end
 
 if animation_control == 2 then
    Prompt("press R to stop animation or T to speed or Y to speed down" )
	if GetInKey() == "r" or GetInKey() == "R" then
		SetAnimationSpeed(e,0)
		animation_control = 1
    end
		if GetInKey() == "t" or GetInKey() == "T" then 
		 start_speed = start_speed + 0.1
		 SetAnimationSpeed(e,start_speed)
		end
		if GetInKey() == "y" or GetInKey() == "Y" then 
		 start_speed = start_speed - 0.1
		 SetAnimationSpeed(e,start_speed)
		end
 end
end	

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

function music_fade_init(e)
Disatance1 = 4200 -- put the distance when the sound should start here
SoundStart = 0
end


function  music_fade_main(e)
--Hide(e)
Dist = GetPlayerDistance(e)
SoundStart = Disatance1
if Dist < Disatance1 then 
	Vol = (Distmf/SoundStart)*100
	LoopSound(e,0)
	SetSoundVolume(100 -Vol)
end
ActivateIfUsed(e)
	
end