function ai_soldier_init(e)
	ai_soldier_combatshoot.init(e,ai_combattype_regular)
end
function ai_soldier_main(e)
	AI_Attach_health_bar ( e )
	
	
	ai_soldier_combatshoot.main(e,ai_combattype_regular,ai_movetype_usespeed,ai_attacktype_canfire)
[img]https://forum.game-guru.com/attachment/29357[/img]


end

function module_combatcore.fireweapon(e)
 if ai_bot_state[e] ~= ai_state_startreload and ai_bot_state[e] ~= ai_state_reload and ai_bot_state[e] ~= ai_state_reloadsettle and g_Entity[e]['plrvisible'] == 1 then
	PromptLocal(e,"*")--Prompt(shots_fired)
 	AttachHealthBar( e )
	shots_fired = shots_fired + 1---pcs mod
	if GetAmmoClip(e) > 0 then
		FireWeapon(e)
	else
		tReloadFinishFrame = GetEntityAnimationFinish(e,4)
	if tReloadFinishFrame > 0 then 
		ai_bot_state[e] = ai_state_startreload 
	end
	end
 
 
 end

if ai_bot_state[e] ~= ai_state_startreload and ai_bot_state[e] ~= ai_state_reload and ai_bot_state[e] ~= ai_state_reloadsettle and g_Entity[e]['plrvisible'] == 1 then
  PromptLocal(e,"*")--Prompt(shots_fired)
  healthbar = 1
  AttachHealthBar( e )
  shots_fired = shots_fired + 1---pcs mod
  if GetAmmoClip(e) > 0 then
   FireWeapon(e)
  else
   tReloadFinishFrame = GetEntityAnimationFinish(e,4)
   if tReloadFinishFrame > 0 then 
    ai_bot_state[e] = ai_state_startreload 
   end
  end
 else
 healthbar = 0
 
 end

local aiBot = ai_bot_state

if RealFireWeapon == nil then
		if module_combatcore.fireweapon ~= nil then
			RealFireWeapon = module_combatcore.fireweapon
			module_combatcore.fireweapon = MyFireWeapon
		end

--By Pcs


function a_init(e)

end

local stop = nil
local function my_stop(e)
	if GetInKey() == "r" or GetInKey() == "R" then
		--Prompt("enter")
		stop(e)
 
 
	end
 end

function a_main(e)
 
 if stop  == nil then
	stop = module_combatcore.donotmove
	module_combatcore.donotmove = my_stop
 end
 
 
end

-- create local name to store the *real* function we are overriding
local RealFireWeapon = nil

-- create the function we want to replace it with, make sure the parameter lists are the same!
local function MyFireWeapon( e )
	-- do the extra code we need for our script
	if aiBot[e] ~= ai_state_startreload  and
	   aiBot[e] ~= ai_state_reload       and 
	   aiBot[e] ~= ai_state_reloadsettle and 
	   gEnt[e].plrvisible == 1           then
	   
		AttachHealthBar( e )
	end

	-- now call the *real* script
	RealFireWeapon( e )
end	

function _main ...
	-- the first time the script is run our local copy of the *real* function needs to be initialised
	if RealFireWeapon == nil then
		-- but only if the *real* function has already been defined!
		if module_combatcore.fireweapon ~= nil then
			RealFireWeapon = module_combatcore.fireweapon

			-- and now we can overwrite the global table to point at our replacement function
			module_combatcore.fireweapon = MyFireWeapon
		end
	end

--By Pcs


function a_init(e)

end

local stop = nil
local function my_stop(e)
	if GetInKey() ~= "r" and GetInKey() ~= "R" then
		--Prompt("enter")
		stop(e)
 
 
	end
 end

function a_main(e)
 
if stop  == nil then
	if module_combatcore.patrol ~= nil and my_stop ~= nil then
		stop = module_combatcore.patrol
		module_combatcore.patrol = my_stop
	end
 end
 
 
end