Absolute noob question: Custom script

Author

Message

HarlsonRS

9

Years of Service

User Offline

Joined: 2nd Apr 2015

Location: Berlin, Germany

Profile

Posted: 6th Apr 2015 16:16 Edited at: 6th Apr 2015 16:28

Link

okay, i tried around a bit myself and also read some stuff that i could find, but here´s the point i have to ask:..
i know that if you change a script and save it (renamed of course to not hurt the original) you also have to have >>function_myscriptname_main and myscriptname_init<< at the top ... so here´s my problem... i want to change some values in the ai_soldier.lua script, just some minor changes like ranges and such... so i didn´t change any values yet, just made a copy of it and called it ai_soldier2.lua and changed the function ai_soldier_init to ai_soldier2_init, and also added function ai_soldier2_main, since it gave me an error code "no function called ai_soldier2_main" when i just set the renamed script to a character without changing anything at first...

well now i added those above and tried it again and the error message says like "expected to end at line 8 near <eof>" ?? what ever that means...

so basically my question is: where exactly does the script ask for the changed name, where do i have to rename stuff so the script would work again (some general info would be cery nice, since i´ll need that for other scripts too i guess...) and what else is important if i rename scripts and/or change values in them?

here´s what the script currntly looks like (mostly still original, as mentioned) with some question commentary added

-- LUA Script - precede every function and global member with lowercase name of script

-- globals for AI enemies
ai_newdest_time = {}
ai_cover_on = {}

-- init when level first runs
[color=green]function ai_soldier2_init(e)[/color]\\\\was already in, just added the "2"\\\\
[color=red]function ai_soldier2_main(e[/color])\\\\added since error asked for it...what i don´t get is it´s not in the original ai_soldier script... :=0\\\
 ai_soldier_state[e] = "patrol"; [color=orange]\\\what about stuff like this? should all ai_soldier functions be renamed to ai_soldier2_XXX ??\\\\[/color]
 ai_soldier_pathindex[e] = -1;
 ai_start_x[e] = nil
 ai_starting_heath[e] = nil
 ai_ran_to_cover[e] = 0
 ModulateSpeed(e,1.0)
 ai_old_health[e] = 0
 CharacterControlStand(e)
 ai_returning_home[e] = 0
 ai_newdest_time[e] = -1
 ai_cover_on[e] = 0
 ai_alerted_spoken[e] = 0
 SetCharacterSound(e,"soldier")
end

-- logic will patrol closest waypoint path, then shoot at player if they
-- get too close, and will run away for cover if their health is low
function ai_soldier_main(e)

-- Detect player distance (note: possible optimization here)
 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));
 
 -- Entity Object Number
 EntObjNo = g_Entity[e]['obj'];

-- Handle health
 if ai_starting_heath[e] == nil then
	ai_starting_heath[e] = g_Entity[e]['health']
 end
  
 -- Store starting point so we can return there if player moves far away
 if ai_start_x[e] == nil then
	ai_start_x[e] = g_Entity[e]['x']
	ai_start_z[e] = g_Entity[e]['z']
	AISetEntityControl(EntObjNo,AI_MANUAL);
 end
 
 -- Patrol Mode
 if ai_soldier_state[e] == "patrol" then
 
  -- Try and find a close path to patrol, just check once for it
  if ai_soldier_pathindex[e] == -1 then
   ai_soldier_pathindex[e] = -2
   CharacterControlArmed(e)
   -- find initial waypoint path to follow
   PathIndex = -1;
   pClosest = 99999;
   for pa = 1, AIGetTotalPaths(), 1 do
    for po = 1 , AIGetPathCountPoints(pa), 1 do
     pDX = g_Entity[e]['x'] - AIPathGetPointX(pa,po);
     pDZ = g_Entity[e]['z'] - AIPathGetPointZ(pa,po);
     pDist = math.sqrt(math.abs(pDX*pDX)+math.abs(pDZ*pDZ));
     if pDist < pClosest and pDist < 200 then
      pClosest = pDist;
      PathIndex = pa;
     end
    end -- po
   end -- pa
   -- follow found path
   if PathIndex > -1 then
    ai_soldier_pathindex[e] = PathIndex;
	ai_path_point_index[e] = 2
	ModulateSpeed(e,1.0)
	SetCharacterToWalk(e)
	ai_path_point_direction[e] = 1
	ai_path_point_max[e] = AIGetPathCountPoints(ai_soldier_pathindex[e])
   end   
  end
  
  -- Force character as unarmed
  CharacterControlUnarmed(e)
  
  -- If set to head home, lets go there
  if ai_returning_home[e] == 1 then
    tDistX = g_Entity[e]['x'] - ai_start_x[e];
    tDistZ = g_Entity[e]['z'] - ai_start_z[e];
	DistToStart = math.sqrt(math.abs(tDistX*tDistX)+math.abs(tDistZ*tDistZ))
	if DistToStart < 200 or GetTimer(e) > ai_combat_state_delay[e] then
		ai_soldier_pathindex[e] = -1
		SetCharacterToWalk(e)
		CharacterControlUnarmed(e)
		AIEntityStop(EntObjNo);
		ModulateSpeed(e,1.0)
		ai_returning_home[e] = 0
		ai_soldier_state[e] = "alerted"
		ai_alerted_mode[e] = 0
	else
		AIEntityGoToPosition(EntObjNo,ai_start_x[e],ai_start_z[e])
	end
	
  -- If we have a path then lets patrol it
  elseif ai_soldier_pathindex[e] > -1 then

ai_patrol_x[e] = AIPathGetPointX(ai_soldier_pathindex[e],ai_path_point_index[e])
	ai_patrol_z[e] = AIPathGetPointZ(ai_soldier_pathindex[e],ai_path_point_index[e])
	AIEntityGoToPosition(EntObjNo,ai_patrol_x[e],ai_patrol_z[e])
    tDistX = g_Entity[e]['x'] - ai_patrol_x[e]
    tDistZ = g_Entity[e]['z'] - ai_patrol_z[e]
	DistFromPath = math.sqrt(math.abs(tDistX*tDistX)+math.abs(tDistZ*tDistZ))	
	
	if DistFromPath < 50 then
		if ai_path_point_direction[e] == 1 then
			ai_path_point_index[e] = ai_path_point_index[e] + 1
			if ( ai_path_point_index[e] > ai_path_point_max[e] ) then
				ai_path_point_index[e] = ai_path_point_max[e] -1
				ai_path_point_direction[e] = 0
			end
		else
			ai_path_point_index[e] = ai_path_point_index[e] - 1
			if ( ai_path_point_index[e] < 1 ) then
				ai_path_point_index[e] = 2
				ai_path_point_direction[e] = 1
			end		
		end
	end
  else
	CharacterControlFidget(e)
  end
  
  ai_soldier_AggroCheck(e)
  ai_soldier_AlertAggroCheck(e)
  
  -- Alerted, perhaps player is near or gunshots can be heard?
  if PlayerDist < AIGetEntityViewRange(EntObjNo) / 3 or AIGetEntityHeardSound(EntObjNo) == 1 then
	ai_soldier_state[e] = "alerted"
	ai_alerted_mode[e] = 0
	ai_alert_x = g_Entity[e]['x']
	ai_alert_z = g_Entity[e]['z']
	ai_alert_counter = 10
	ai_alert_entity = e
  end
  
 end
 
  -- alerted mode
 if ai_soldier_state[e] == "alerted" then
 
 	LookAtPlayer(e) 
 
	-- alert taken out
	if g_Entity[e]['plrvisible'] == 1 then 
		ai_soldier_state[e] = "combat";
		PlayCombatMusic(8000,500)
		ai_combat_mode[e] = 0
		-- Add this enemy as a point of aggro, alerting anyone near to join the fight
		ai_aggro_entity = e
		ai_aggro_x = g_Entity[e]['x']
		ai_aggro_z = g_Entity[e]['z']
		AISetEntityControl(EntObjNo,AI_MANUAL)
		AIEntityStop(EntObjNo)
		CharacterControlArmed(e)
		SetCharacterToRun(e)
	else	
	   if ai_alerted_mode[e] == 0 then	  
		tSpeed = math.random(100,130) / 100.0
		ModulateSpeed(e,tSpeed)   
		angle = math.random(360)
		ai_dest_x[e] = g_PlayerPosX + (math.sin(angle) * 150)
		ai_dest_z[e] = g_PlayerPosZ + (math.cos(angle) * 150)	  
		AIEntityGoToPosition(EntObjNo,ai_dest_x[e],ai_dest_z[e]) 
		ai_alerted_state_delay[e] = math.random(0,1)
		ai_alerted_old_time[e] = os.clock()
		CharacterControlArmed(e)
		ai_alerted_mode[e] = 1
		if ai_alerted_spoken[e] == 0 then
			PlayCharacterSound(e,"onAlert")
			ai_alerted_spoken[e] = 1
		end

-- Target the player, run in to attack
		elseif ai_alerted_mode[e] == 1 then 
		LookAtPlayer(e) 	
		 if os.clock() - ai_alerted_old_time[e] > ai_alerted_state_delay[e] then
			ai_alerted_state_delay[e] = 2
			ai_alerted_mode[e] = 2	
			AIEntityGoToPosition(EntObjNo,ai_dest_x[e],ai_dest_z[e]) 
		 end
		 
		elseif ai_alerted_mode[e] == 2 then
			 if os.clock() - ai_alerted_old_time[e] > ai_alerted_state_delay[e] then		
				AIEntityStop(EntObjNo)
				ai_alerted_mode[e] = 0
				ai_soldier_state[e] = "patrol";
				ai_soldier_AggroCheck(e)
			 end		
		end
		
		if g_Entity[e]['plrvisible'] == 1 then
			ai_soldier_state[e] = "combat";
			PlayCombatMusic(8000,500)
			ai_combat_mode[e] = 0
			-- Add this enemy as a point of aggro, alerting anyone near to join the fight
			ai_aggro_entity = e
			ai_aggro_x = g_Entity[e]['x']
			ai_aggro_z = g_Entity[e]['z']
			AISetEntityControl(EntObjNo,AI_MANUAL)
			AIEntityStop(EntObjNo)
			CharacterControlArmed(e)
			SetCharacterToRun(e)
		end	
	 end
 end

-- Combat mode
 if ai_soldier_state[e] == "combat" then

-- Look at player
  LookAtPlayer(e)

-- If we are the soldier with aggro then update our position so if we run near to others, we can alert them to the fight
  if ai_aggro_entity ~= null then
		if ai_aggro_entity == e then
			ai_aggro_x = g_Entity[e]['x']
			ai_aggro_z = g_Entity[e]['z']
		end
  end
	
  -- Kick off combat by choosing a destination to head for around the player
  if ai_combat_mode[e] == 0 then
    
	tSpeed = math.random(100,130) / 100.0
	ModulateSpeed(e,tSpeed)
   
	angle = math.random(360)
	
	ai_dest_x[e] = g_PlayerPosX + (math.sin(angle) * 200)
	ai_dest_z[e] = g_PlayerPosZ - (math.cos(angle) * 200)
	
	-- Check if we can get to the new position without going around something
	if ( AICouldSee ( EntObjNo , ai_dest_x[e] , g_Entity[e]['y'] , ai_dest_z[e] ) == 0 )  then
		ai_dest_x[e] = g_PlayerPosX;
		ai_dest_z[e] = g_PlayerPosZ;
	end
	
	if PlayerDist < AI_CLOSEST_TO_PLAYER then
		ai_dest_x[e] = g_Entity[e]['x']
		ai_dest_z[e] = g_Entity[e]['z']		
	end
	
	
	-- FORCE ENEMY ONTO STOP FOR TEST - STAY PUT!
	--ai_dest_x[e] = g_Entity[e]['x']
	--ai_dest_z[e] = g_Entity[e]['z']		
		
		
	StartTimer(e)
	
	CharacterControlArmed(e)
	ai_combat_mode[e] = 1
	
	ai_cover_on[e] = AIEntityMoveToCover(EntObjNo,g_PlayerPosX,g_PlayerPosZ)
	if ai_cover_on[e] == 0 then 
		AIEntityGoToPosition(EntObjNo,ai_dest_x[e],ai_dest_z[e])
		ai_combat_state_delay[e] = math.random(250,500)
	else
		ai_combat_state_delay[e] = math.random(1000,2000)
	end

-- Target the player, wait a short time then run in to attack
  elseif ai_combat_mode[e] == 1 then 
  
	if GetTimer(e) > ai_combat_state_delay[e] then
		ai_combat_state_delay[e] = math.random(1000,2500)
		StartTimer(e)
		ai_combat_mode[e] = 2
	end
	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)	
	end
	
  -- Run to destination for a small amount of time
  elseif ai_combat_mode[e] == 2 then   
  
	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)
	end

if (GetTimer(e) > ai_combat_state_delay[e]) or PlayerDist <= AI_CLOSEST_TO_PLAYER then
		ai_combat_mode[e] = 3
	end

-- Target the player
  elseif ai_combat_mode[e] == 3 then
  
	CharacterControlArmed(e)
	ai_combat_mode[e] = 4
	if ai_cover_on[e] == 1 then
		ai_combat_state_delay[e] = math.random(500,1500)
	else
		ai_combat_state_delay[e] = math.random(250,500)
	end
	StartTimer(e)

-- Shoot the player if we can, if not head off to find him
  elseif ai_combat_mode[e] == 4 then
  	
	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)
	end
  
	if ai_cover_on[e] == 1 then
		CharacterControlDucked(e)	
	end
			   
	-- Once our shooting time has ended, lets go back to mode 0 and start over
	-- If we cannot see the player, wait a short time before hunting him down
	if GetTimer(e) > ai_combat_state_delay[e] then
		CharacterControlStand(e)
		if g_Entity[e]['plrvisible'] == 0 then
			ai_combat_mode[e] = 7
			ai_cover_on[e] = 0
			ai_combat_state_delay[e] = math.random(1000,2000)
			StartTimer(e)
			AIEntityGoToPosition(EntObjNo,g_PlayerPosX,g_PlayerPosZ)
		else 		
			ai_combat_mode[e] = 0
		end
	end 
	
	ai_old_health[e] = g_Entity[e]['health']				
   
   -- In cover, we wait a while, shoot if we can see the player, before venturing out again
   elseif ai_combat_mode[e] == 5 then
	CharacterControlArmed(e)
	
	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)	
	end
    
	if GetTimer(e) > ai_combat_old_time[e] then	
		ModulateSpeed(e,1.0)
		--AIEntityStop(EntObjNo)
		ai_combat_mode[e] = 0
	end
	  
  -- Out of the range of the player, heading back to start point for a while, once there going back to Patrol mode
  elseif ai_combat_mode[e] == 6 then
	ai_returning_home[e] = 1
	SetCharacterToWalk(e)
	CharacterControlUnarmed(e)	
	AIEntityGoToPosition(EntObjNo,ai_start_x[e],ai_start_z[e])
	ai_soldier_state[e] = "patrol"
	ai_combat_state_delay[e] = 3000
	StartTimer(e)
	tSpeed = math.random(100,130) / 100.0
	ModulateSpeed(e,tSpeed)	
	return
  
  -- Unable to see the player to shoot, so heading after him
  elseif ai_combat_mode[e] == 7 then
  
  	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)	
	end	
	
	AIEntityGoToPosition(EntObjNo,g_PlayerPosX,g_PlayerPosZ)
  
	if ( g_Entity[e]['plrvisible'] == 1 or PlayerDist <= AI_CLOSEST_TO_PLAYER ) and GetTimer(e) > ai_combat_state_delay[e] then
		ai_combat_mode[e] = 0
	end
	
  elseif ai_combat_mode[e] == 8 then

ai_combat_mode[e] = 9
	AIEntityStop(EntObjNo)
	
  elseif ai_combat_mode[e] == 9 then

ai_combat_mode[e] = 10
  	
	-- Pick left or right strafe
	if ( math.random(0,1) == 0 ) then
		SetCharacterToStrafeLeft(e)
	else
		SetCharacterToStrafeRight(e)
	end		
	
	ai_combat_old_time[e] = os.clock()

elseif ai_combat_mode[e] == 10 then

-- We can see the player, lets shoot him!
	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)
	end

if os.clock() - ai_combat_old_time[e] > ai_combat_state_delay[e] then
		ai_combat_state_delay[e] = math.random(1,3)
		ai_combat_mode[e] = 4
		ai_old_health[e] = g_Entity[e]['health']
	end
	
	elseif ai_combat_mode[e] == 11 then
	
	if g_Entity[e]['plrvisible'] == 1 then
		if os.clock() - ai_combat_old_time[e] > ai_combat_state_delay[e] then
			CharacterControlStand(e)
			ai_combat_old_time[e] = os.clock()
			ai_combat_state_delay[e] = 1			
			ai_combat_mode[e] = 12
		end
	end	
	
	if ai_combat_mode[e] == 12 then
  
		if g_Entity[e]['plrvisible'] == 1 then
			FireWeapon(e)	
		end

if os.clock() - ai_combat_old_time[e] > ai_combat_state_delay[e] then
			ai_combat_mode[e] = 4
		end
       	
	
	end
       
  end   
  
  -- If health is below 30, run and hide, then head to mode 5
  if g_Entity[e]['health'] < 30  and ai_combat_mode[e] ~= 4 and ai_ran_to_cover[e] == 0 then
	ModulateSpeed(e,1.3)
	ai_ran_to_cover[e] = 1
	AISetEntityControl(EntObjNo,AI_MANUAL);
	a=AIEntityMoveToCover(EntObjNo,g_PlayerPosX,g_PlayerPosZ);
	ai_combat_old_time[e] = 3000
	StartTimer(e)
	ai_combat_mode[e] = 5
  end   
  
  -- When player out of range, return to patrol
  if PlayerDist > AIGetEntityViewRange(EntObjNo)*1.5 then
	ai_combat_mode[e] = 6		
  end

end

-- Debug prompt 
 --if (ai_combat_mode[e] ~= nil) then
 -- PromptLocal(e,"SS:" .. ai_soldier_state[e] .. " CM:" .. ai_combat_mode[e] .. " PV:" .. g_Entity[e]['plrvisible'] )
 --end

end

function ai_soldier_AggroCheck(e)
  -- If there player is in range and we can see him, or we have been shot, move into combat mode
  if PlayerDist < AIGetEntityViewRange(EntObjNo) then 
	if g_Entity[e]['plrvisible'] == 1 or g_Entity[e]['health'] < ai_starting_heath[e] then
		ai_soldier_state[e] = "combat";
		PlayCombatMusic(8000,500)
		ai_combat_mode[e] = 0
		PlayCharacterSound(e,"onAggro")
		-- Add this enemy as a point of aggro, alerting anyone near to join the fight
		ai_aggro_entity = e
		ai_aggro_x = g_Entity[e]['x']
		ai_aggro_z = g_Entity[e]['z']		
		ai_alert_x = g_Entity[e]['x']
		ai_alert_z = g_Entity[e]['z']
		AISetEntityControl(EntObjNo,AI_MANUAL)
		AIEntityStop(EntObjNo);   
		SetCharacterToRun(e)
	else
		-- We cant see the player, but perhaps we are near someone that can
		if ai_aggro_entity ~= nil then
			tDistX = g_Entity[e]['x'] - ai_aggro_x
			tDistZ = g_Entity[e]['z'] - ai_aggro_z		  
			tDist = math.sqrt(math.abs(tDistX*tDistX)+math.abs(tDistZ*tDistZ))			   
			if tDist < ai_aggro_range then
			   ai_soldier_state[e] = "combat";
			   PlayCombatMusic(8000,500)
			   ai_combat_mode[e] = 0
			   AISetEntityControl(EntObjNo,AI_MANUAL)
			   AIEntityStop(EntObjNo);   
			   SetCharacterToRun(e)
			end	
	   end
	end
  end
end

function ai_soldier_AlertAggroCheck(e)
	-- If there is an alert close by  
	if e == ai_alert_entity then
		ai_alert_counter = ai_alert_counter - 1
		if ai_alert_counter <= 0 then
			ai_alert_x = -10000
			ai_alert_z = -10000
			ai_alert_entity = 0  
		end
	end	
	pDX = g_Entity[e]['x'] - ai_alert_x
	pDZ = g_Entity[e]['z'] - ai_alert_z;
	pDist = math.sqrt(math.abs(pDX*pDX)+math.abs(pDZ*pDZ));
	if pDist < 800 then
		ai_soldier_state[e] = "alerted"
		ai_alerted_mode[e] = 0		
	end  
end

function ai_soldier_exit(e)
	PlayCharacterSound(e,"onDeath")
end

+ Code Snippet

-- LUA Script - precede every function and global member with lowercase name of script

-- globals for AI enemies
ai_newdest_time = {}
ai_cover_on = {}

-- init when level first runs
[color=green]function ai_soldier2_init(e)[/color]\\\\was already in, just added the "2"\\\\
[color=red]function ai_soldier2_main(e[/color])\\\\added since error asked for it...what i don´t get is it´s not in the original ai_soldier script... :=0\\\
 ai_soldier_state[e] = "patrol"; [color=orange]\\\what about stuff like this? should all ai_soldier functions be renamed to ai_soldier2_XXX ??\\\\[/color]
 ai_soldier_pathindex[e] = -1;
 ai_start_x[e] = nil
 ai_starting_heath[e] = nil
 ai_ran_to_cover[e] = 0
 ModulateSpeed(e,1.0)
 ai_old_health[e] = 0
 CharacterControlStand(e)
 ai_returning_home[e] = 0
 ai_newdest_time[e] = -1
 ai_cover_on[e] = 0
 ai_alerted_spoken[e] = 0
 SetCharacterSound(e,"soldier")
end

-- logic will patrol closest waypoint path, then shoot at player if they
-- get too close, and will run away for cover if their health is low
function ai_soldier_main(e)

 -- Detect player distance (note: possible optimization here)
 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));
 
 -- Entity Object Number
 EntObjNo = g_Entity[e]['obj'];

 -- Handle health
 if ai_starting_heath[e] == nil then
	ai_starting_heath[e] = g_Entity[e]['health']
 end
  
 -- Store starting point so we can return there if player moves far away
 if ai_start_x[e] == nil then
	ai_start_x[e] = g_Entity[e]['x']
	ai_start_z[e] = g_Entity[e]['z']
	AISetEntityControl(EntObjNo,AI_MANUAL);
 end
 
 -- Patrol Mode
 if ai_soldier_state[e] == "patrol" then
 
  -- Try and find a close path to patrol, just check once for it
  if ai_soldier_pathindex[e] == -1 then
   ai_soldier_pathindex[e] = -2
   CharacterControlArmed(e)
   -- find initial waypoint path to follow
   PathIndex = -1;
   pClosest = 99999;
   for pa = 1, AIGetTotalPaths(), 1 do
    for po = 1 , AIGetPathCountPoints(pa), 1 do
     pDX = g_Entity[e]['x'] - AIPathGetPointX(pa,po);
     pDZ = g_Entity[e]['z'] - AIPathGetPointZ(pa,po);
     pDist = math.sqrt(math.abs(pDX*pDX)+math.abs(pDZ*pDZ));
     if pDist < pClosest and pDist < 200 then
      pClosest = pDist;
      PathIndex = pa;
     end
    end -- po
   end -- pa
   -- follow found path
   if PathIndex > -1 then
    ai_soldier_pathindex[e] = PathIndex;
	ai_path_point_index[e] = 2
	ModulateSpeed(e,1.0)
	SetCharacterToWalk(e)
	ai_path_point_direction[e] = 1
	ai_path_point_max[e] = AIGetPathCountPoints(ai_soldier_pathindex[e])
   end   
  end
  
  -- Force character as unarmed
  CharacterControlUnarmed(e)
  
  -- If set to head home, lets go there
  if ai_returning_home[e] == 1 then
    tDistX = g_Entity[e]['x'] - ai_start_x[e];
    tDistZ = g_Entity[e]['z'] - ai_start_z[e];
	DistToStart = math.sqrt(math.abs(tDistX*tDistX)+math.abs(tDistZ*tDistZ))
	if DistToStart < 200 or GetTimer(e) > ai_combat_state_delay[e] then
		ai_soldier_pathindex[e] = -1
		SetCharacterToWalk(e)
		CharacterControlUnarmed(e)
		AIEntityStop(EntObjNo);
		ModulateSpeed(e,1.0)
		ai_returning_home[e] = 0
		ai_soldier_state[e] = "alerted"
		ai_alerted_mode[e] = 0
	else
		AIEntityGoToPosition(EntObjNo,ai_start_x[e],ai_start_z[e])
	end
	
  -- If we have a path then lets patrol it
  elseif ai_soldier_pathindex[e] > -1 then 

	ai_patrol_x[e] = AIPathGetPointX(ai_soldier_pathindex[e],ai_path_point_index[e])
	ai_patrol_z[e] = AIPathGetPointZ(ai_soldier_pathindex[e],ai_path_point_index[e])
	AIEntityGoToPosition(EntObjNo,ai_patrol_x[e],ai_patrol_z[e])
    tDistX = g_Entity[e]['x'] - ai_patrol_x[e]
    tDistZ = g_Entity[e]['z'] - ai_patrol_z[e]
	DistFromPath = math.sqrt(math.abs(tDistX*tDistX)+math.abs(tDistZ*tDistZ))	
	
	if DistFromPath < 50 then
		if ai_path_point_direction[e] == 1 then
			ai_path_point_index[e] = ai_path_point_index[e] + 1
			if ( ai_path_point_index[e] > ai_path_point_max[e] ) then
				ai_path_point_index[e] = ai_path_point_max[e] -1
				ai_path_point_direction[e] = 0
			end
		else
			ai_path_point_index[e] = ai_path_point_index[e] - 1
			if ( ai_path_point_index[e] < 1 ) then
				ai_path_point_index[e] = 2
				ai_path_point_direction[e] = 1
			end		
		end
	end
  else
	CharacterControlFidget(e)
  end
  
  ai_soldier_AggroCheck(e)
  ai_soldier_AlertAggroCheck(e)
  
  -- Alerted, perhaps player is near or gunshots can be heard?
  if PlayerDist < AIGetEntityViewRange(EntObjNo) / 3 or AIGetEntityHeardSound(EntObjNo) == 1 then
	ai_soldier_state[e] = "alerted"
	ai_alerted_mode[e] = 0
	ai_alert_x = g_Entity[e]['x']
	ai_alert_z = g_Entity[e]['z']
	ai_alert_counter = 10
	ai_alert_entity = e
  end
  
 end
 
  -- alerted mode
 if ai_soldier_state[e] == "alerted" then
 
 	LookAtPlayer(e) 
 
	-- alert taken out
	if g_Entity[e]['plrvisible'] == 1 then 
		ai_soldier_state[e] = "combat";
		PlayCombatMusic(8000,500)
		ai_combat_mode[e] = 0
		-- Add this enemy as a point of aggro, alerting anyone near to join the fight
		ai_aggro_entity = e
		ai_aggro_x = g_Entity[e]['x']
		ai_aggro_z = g_Entity[e]['z']
		AISetEntityControl(EntObjNo,AI_MANUAL)
		AIEntityStop(EntObjNo)
		CharacterControlArmed(e)
		SetCharacterToRun(e)
	else	
	   if ai_alerted_mode[e] == 0 then	  
		tSpeed = math.random(100,130) / 100.0
		ModulateSpeed(e,tSpeed)   
		angle = math.random(360)
		ai_dest_x[e] = g_PlayerPosX + (math.sin(angle) * 150)
		ai_dest_z[e] = g_PlayerPosZ + (math.cos(angle) * 150)	  
		AIEntityGoToPosition(EntObjNo,ai_dest_x[e],ai_dest_z[e]) 
		ai_alerted_state_delay[e] = math.random(0,1)
		ai_alerted_old_time[e] = os.clock()
		CharacterControlArmed(e)
		ai_alerted_mode[e] = 1
		if ai_alerted_spoken[e] == 0 then
			PlayCharacterSound(e,"onAlert")
			ai_alerted_spoken[e] = 1
		end

		-- Target the player, run in to attack
		elseif ai_alerted_mode[e] == 1 then 
		LookAtPlayer(e) 	
		 if os.clock() - ai_alerted_old_time[e] > ai_alerted_state_delay[e] then
			ai_alerted_state_delay[e] = 2
			ai_alerted_mode[e] = 2	
			AIEntityGoToPosition(EntObjNo,ai_dest_x[e],ai_dest_z[e]) 
		 end
		 
		elseif ai_alerted_mode[e] == 2 then
			 if os.clock() - ai_alerted_old_time[e] > ai_alerted_state_delay[e] then		
				AIEntityStop(EntObjNo)
				ai_alerted_mode[e] = 0
				ai_soldier_state[e] = "patrol";
				ai_soldier_AggroCheck(e)
			 end		
		end
		
		if g_Entity[e]['plrvisible'] == 1 then
			ai_soldier_state[e] = "combat";
			PlayCombatMusic(8000,500)
			ai_combat_mode[e] = 0
			-- Add this enemy as a point of aggro, alerting anyone near to join the fight
			ai_aggro_entity = e
			ai_aggro_x = g_Entity[e]['x']
			ai_aggro_z = g_Entity[e]['z']
			AISetEntityControl(EntObjNo,AI_MANUAL)
			AIEntityStop(EntObjNo)
			CharacterControlArmed(e)
			SetCharacterToRun(e)
		end	
	 end
 end

 -- Combat mode
 if ai_soldier_state[e] == "combat" then

  -- Look at player
  LookAtPlayer(e)

  -- If we are the soldier with aggro then update our position so if we run near to others, we can alert them to the fight
  if ai_aggro_entity ~= null then
		if ai_aggro_entity == e then
			ai_aggro_x = g_Entity[e]['x']
			ai_aggro_z = g_Entity[e]['z']
		end
  end
	
  -- Kick off combat by choosing a destination to head for around the player
  if ai_combat_mode[e] == 0 then
    
	tSpeed = math.random(100,130) / 100.0
	ModulateSpeed(e,tSpeed)
   
	angle = math.random(360)
	
	ai_dest_x[e] = g_PlayerPosX + (math.sin(angle) * 200)
	ai_dest_z[e] = g_PlayerPosZ - (math.cos(angle) * 200)
	
	-- Check if we can get to the new position without going around something
	if ( AICouldSee ( EntObjNo , ai_dest_x[e] , g_Entity[e]['y'] , ai_dest_z[e] ) == 0 )  then
		ai_dest_x[e] = g_PlayerPosX;
		ai_dest_z[e] = g_PlayerPosZ;
	end
	
	if PlayerDist < AI_CLOSEST_TO_PLAYER then
		ai_dest_x[e] = g_Entity[e]['x']
		ai_dest_z[e] = g_Entity[e]['z']		
	end
	
	
	-- FORCE ENEMY ONTO STOP FOR TEST - STAY PUT!
	--ai_dest_x[e] = g_Entity[e]['x']
	--ai_dest_z[e] = g_Entity[e]['z']		
		
		
	StartTimer(e)
	
	CharacterControlArmed(e)
	ai_combat_mode[e] = 1
	
	ai_cover_on[e] = AIEntityMoveToCover(EntObjNo,g_PlayerPosX,g_PlayerPosZ)
	if ai_cover_on[e] == 0 then 
		AIEntityGoToPosition(EntObjNo,ai_dest_x[e],ai_dest_z[e])
		ai_combat_state_delay[e] = math.random(250,500)
	else
		ai_combat_state_delay[e] = math.random(1000,2000)
	end

  -- Target the player, wait a short time then run in to attack
  elseif ai_combat_mode[e] == 1 then 
  
	if GetTimer(e) > ai_combat_state_delay[e] then
		ai_combat_state_delay[e] = math.random(1000,2500)
		StartTimer(e)
		ai_combat_mode[e] = 2
	end
	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)	
	end
	
  -- Run to destination for a small amount of time
  elseif ai_combat_mode[e] == 2 then   
  
	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)
	end

	if (GetTimer(e) > ai_combat_state_delay[e]) or PlayerDist <= AI_CLOSEST_TO_PLAYER then
		ai_combat_mode[e] = 3
	end	

  -- Target the player
  elseif ai_combat_mode[e] == 3 then
  
	CharacterControlArmed(e)
	ai_combat_mode[e] = 4
	if ai_cover_on[e] == 1 then
		ai_combat_state_delay[e] = math.random(500,1500)
	else
		ai_combat_state_delay[e] = math.random(250,500)
	end
	StartTimer(e)

  -- Shoot the player if we can, if not head off to find him
  elseif ai_combat_mode[e] == 4 then
  	
	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)
	end
  
	if ai_cover_on[e] == 1 then
		CharacterControlDucked(e)	
	end
			   
	-- Once our shooting time has ended, lets go back to mode 0 and start over
	-- If we cannot see the player, wait a short time before hunting him down
	if GetTimer(e) > ai_combat_state_delay[e] then
		CharacterControlStand(e)
		if g_Entity[e]['plrvisible'] == 0 then
			ai_combat_mode[e] = 7
			ai_cover_on[e] = 0
			ai_combat_state_delay[e] = math.random(1000,2000)
			StartTimer(e)
			AIEntityGoToPosition(EntObjNo,g_PlayerPosX,g_PlayerPosZ)
		else 		
			ai_combat_mode[e] = 0
		end
	end 
	
	ai_old_health[e] = g_Entity[e]['health']				
   
   -- In cover, we wait a while, shoot if we can see the player, before venturing out again
   elseif ai_combat_mode[e] == 5 then
	CharacterControlArmed(e)
	
	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)	
	end
    
	if GetTimer(e) > ai_combat_old_time[e] then	
		ModulateSpeed(e,1.0)
		--AIEntityStop(EntObjNo)
		ai_combat_mode[e] = 0
	end
	  
  -- Out of the range of the player, heading back to start point for a while, once there going back to Patrol mode
  elseif ai_combat_mode[e] == 6 then
	ai_returning_home[e] = 1
	SetCharacterToWalk(e)
	CharacterControlUnarmed(e)	
	AIEntityGoToPosition(EntObjNo,ai_start_x[e],ai_start_z[e])
	ai_soldier_state[e] = "patrol"
	ai_combat_state_delay[e] = 3000
	StartTimer(e)
	tSpeed = math.random(100,130) / 100.0
	ModulateSpeed(e,tSpeed)	
	return
  
  -- Unable to see the player to shoot, so heading after him
  elseif ai_combat_mode[e] == 7 then
  
  	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)	
	end	
	
	AIEntityGoToPosition(EntObjNo,g_PlayerPosX,g_PlayerPosZ)
  
	if ( g_Entity[e]['plrvisible'] == 1 or PlayerDist <= AI_CLOSEST_TO_PLAYER ) and GetTimer(e) > ai_combat_state_delay[e] then
		ai_combat_mode[e] = 0
	end
	
  elseif ai_combat_mode[e] == 8 then

	ai_combat_mode[e] = 9
	AIEntityStop(EntObjNo)
	
  elseif ai_combat_mode[e] == 9 then

	ai_combat_mode[e] = 10
  	
	-- Pick left or right strafe
	if ( math.random(0,1) == 0 ) then
		SetCharacterToStrafeLeft(e)
	else
		SetCharacterToStrafeRight(e)
	end		
	
	ai_combat_old_time[e] = os.clock()	

  elseif ai_combat_mode[e] == 10 then

	-- We can see the player, lets shoot him!
	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)
	end

	if os.clock() - ai_combat_old_time[e] > ai_combat_state_delay[e] then
		ai_combat_state_delay[e] = math.random(1,3)
		ai_combat_mode[e] = 4
		ai_old_health[e] = g_Entity[e]['health']
	end
	
	elseif ai_combat_mode[e] == 11 then
	
	if g_Entity[e]['plrvisible'] == 1 then
		if os.clock() - ai_combat_old_time[e] > ai_combat_state_delay[e] then
			CharacterControlStand(e)
			ai_combat_old_time[e] = os.clock()
			ai_combat_state_delay[e] = 1			
			ai_combat_mode[e] = 12
		end
	end	
	
	if ai_combat_mode[e] == 12 then
  
		if g_Entity[e]['plrvisible'] == 1 then
			FireWeapon(e)	
		end

		if os.clock() - ai_combat_old_time[e] > ai_combat_state_delay[e] then
			ai_combat_mode[e] = 4
		end
       	
	
	end
       
  end   
  
  -- If health is below 30, run and hide, then head to mode 5
  if g_Entity[e]['health'] < 30  and ai_combat_mode[e] ~= 4 and ai_ran_to_cover[e] == 0 then
	ModulateSpeed(e,1.3)
	ai_ran_to_cover[e] = 1
	AISetEntityControl(EntObjNo,AI_MANUAL);
	a=AIEntityMoveToCover(EntObjNo,g_PlayerPosX,g_PlayerPosZ);
	ai_combat_old_time[e] = 3000
	StartTimer(e)
	ai_combat_mode[e] = 5
  end   
  
  -- When player out of range, return to patrol
  if PlayerDist > AIGetEntityViewRange(EntObjNo)*1.5 then
	ai_combat_mode[e] = 6		
  end

 end

 -- Debug prompt 
 --if (ai_combat_mode[e] ~= nil) then
 -- PromptLocal(e,"SS:" .. ai_soldier_state[e] .. " CM:" .. ai_combat_mode[e] .. " PV:" .. g_Entity[e]['plrvisible'] )
 --end

end

function ai_soldier_AggroCheck(e)
  -- If there player is in range and we can see him, or we have been shot, move into combat mode
  if PlayerDist < AIGetEntityViewRange(EntObjNo) then 
	if g_Entity[e]['plrvisible'] == 1 or g_Entity[e]['health'] < ai_starting_heath[e] then
		ai_soldier_state[e] = "combat";
		PlayCombatMusic(8000,500)
		ai_combat_mode[e] = 0
		PlayCharacterSound(e,"onAggro")
		-- Add this enemy as a point of aggro, alerting anyone near to join the fight
		ai_aggro_entity = e
		ai_aggro_x = g_Entity[e]['x']
		ai_aggro_z = g_Entity[e]['z']		
		ai_alert_x = g_Entity[e]['x']
		ai_alert_z = g_Entity[e]['z']
		AISetEntityControl(EntObjNo,AI_MANUAL)
		AIEntityStop(EntObjNo);   
		SetCharacterToRun(e)
	else
		-- We cant see the player, but perhaps we are near someone that can
		if ai_aggro_entity ~= nil then
			tDistX = g_Entity[e]['x'] - ai_aggro_x
			tDistZ = g_Entity[e]['z'] - ai_aggro_z		  
			tDist = math.sqrt(math.abs(tDistX*tDistX)+math.abs(tDistZ*tDistZ))			   
			if tDist < ai_aggro_range then
			   ai_soldier_state[e] = "combat";
			   PlayCombatMusic(8000,500)
			   ai_combat_mode[e] = 0
			   AISetEntityControl(EntObjNo,AI_MANUAL)
			   AIEntityStop(EntObjNo);   
			   SetCharacterToRun(e)
			end	
	   end
	end
  end
end

function ai_soldier_AlertAggroCheck(e)
	-- If there is an alert close by  
	if e == ai_alert_entity then
		ai_alert_counter = ai_alert_counter - 1
		if ai_alert_counter <= 0 then
			ai_alert_x = -10000
			ai_alert_z = -10000
			ai_alert_entity = 0  
		end
	end	
	pDX = g_Entity[e]['x'] - ai_alert_x
	pDZ = g_Entity[e]['z'] - ai_alert_z;
	pDist = math.sqrt(math.abs(pDX*pDX)+math.abs(pDZ*pDZ));
	if pDist < 800 then
		ai_soldier_state[e] = "alerted"
		ai_alerted_mode[e] = 0		
	end  
end

function ai_soldier_exit(e)
	PlayCharacterSound(e,"onDeath")
end

EDIT!
doh..., or can we make it short and just say that´s what "-- LUA Script - precede every function and global member with lowercase name of script" tries to tell me ? oO

so i´d have to rename them all like << ai_soldier2_exit(e) >> ?

and i just realised that ai_soldier_main is called further down... but all threads i have seen so far stated both _main and _init would be opening the scripts (more or less)

sorry again, total noob i know, but i´m trying to get some logic into a chaotic mind here

PM

Corno_1

GameGuru Tool Maker

14

Years of Service

User Offline

Joined: 3rd Nov 2010

Location:

Profile

Posted: 6th Apr 2015 16:35

Link

every function has a body which is surrunded by

+ Code Snippet

function nameOfFunction()

end

you simply forgot the end after function ai_soldier2_init(e)

+ Code Snippet

function ai_soldier2_init(e)

end

the message already said that

it expected an "end" after line 8

My dream is to develope games, which makes fun when I create it and fun when other people play it.

PM

HarlsonRS

9

Years of Service

User Offline

Joined: 2nd Apr 2015

Location: Berlin, Germany

Profile

Posted: 6th Apr 2015 16:45 Edited at: 6th Apr 2015 16:47

Link

ahm okay, but i didn´t change the script other than renaming said function from soldier to soldier2, so the "end" must have been there already...

so i guess it´s that i added soldier2_main right after that and forgot to add "end" for that function? would make sense

so since there is already a soldier_main further down i´ll just remove my added one, rename the original and see what happens

PM

HarlsonRS

9

Years of Service

User Offline

Joined: 2nd Apr 2015

Location: Berlin, Germany

Profile

Posted: 6th Apr 2015 16:55

Link

great works... so i take it that the call for _init and everything after that untill "end" belongs together and is put into one "frame" that gets closed by "end"... same for the further down "_main" ...

but i was sure i have seen both main and init in 2 lines after another... or am i just plain wrong here ?

PM

smallg

Community Leader

19

Years of Service

User Offline

Joined: 8th Dec 2005

Location:

Profile

Posted: 6th Apr 2015 17:43 Edited at: 6th Apr 2015 17:46

Link

edit: missed the first question - yes that's correct, everything in 'init(e)' is called right at the start and is 1 frame as you say - think of it as a setup
*note though that there are a lot of things that dont work here - such as finding out the g_Entity[e]['health'] etc or referencing objects/entities with a higher number*

no you must close the init(e) with an end before you call the main(e)

- even if it's empty like so...

+ Code Snippet

function myscript_init(e)
end
function myscript_main(e)
--code here
end
function myscript_exit(e)
end

*note* the 'exit' part is currently optional but previously the init(e) part didnt exist at all but is now required so it might be a good idea to include it just in case of more future changes

life\'s one big game

windows vista ultimate

i5 @3.3ghz, 4gb ram, geforce gtx460, directx 11

PM Email

HarlsonRS

9

Years of Service

User Offline

Joined: 2nd Apr 2015

Location: Berlin, Germany

Profile

Posted: 6th Apr 2015 21:43 Edited at: 6th Apr 2015 21:46

Link

ah alright, thanks alot (both of you) ...i think i get it...last question: can i keep this thread here for more questions (script related of course)? i would just post "question added" and add the question as q2, q3 etc. in the opener...

not a fan of posting every question in a new thread,becomes messy

PM

Scripts / Absolute noob question: Custom script