local tdist = 99999 --starting minimum distance
	for ee = 1, g_EntityElementMax, 1 do --loop through all entities
		if ee ~= e then --not including the entity running the script
			if ai_soldier_state[ee] == nil and ai_bot_state[ee] == nil then --didn't want AI characters so we check they dont have a state
				if g_Entity[ee]['health'] > 0 then --only entity's that are alive
					ddx = math.abs(g_Entity[ee]['x'] - g_PlayerPosX)
					ddy = math.abs(g_Entity[ee]['y'] - g_PlayerPosY)
					ddz = math.abs(g_Entity[ee]['z'] - g_PlayerPosZ)
					ddd = math.sqrt((ddx*ddx)+(ddy*ddy)+(ddz*ddz)) --work out and store the distance temporarily
					if ddd < tdist then --if closer than our minimum range 
						tdist = ddd --update the minimum range with the temp distance we just worked out 
						lclosestee = ee --this entity is now the closest 
					end
				end
			end
		end
	end

    local tdist = math.huge --starting minimum distance
    local lclosestee  = 0
    local px, py, pz = g_PlayerPosX, g_PlayerPosY, g_PlayerPosZ
    for k, v in pairs( g_Entity ) do   --loop through all entities
        if k == nil then continue end
        if k == e then continue end  -- not including the entity running the script
        if ai_soldier_state[ k ] == nil and ai_bot_state[ k ] == nil then --didn't want AI characters so we check they dont have a state
            if v.health > 0 then --only entity's that are alive
                local ddx, ddy, ddz = v.x - px, v.y - py, v.z - pz
                local ddd = ddx*ddx + ddy*ddy + ddz*ddz  --work out and store the distance temporarily
                if ddd < tdist then --if closer than our minimum range so far
                    tdist = ddd         --update the minimum range with the temp distance we just worked out 
                    lclosestee = k    --this entity is now the closest 
                end
            end
        end
    end

local tdist = math.huge --starting minimum distance
local lclosestee  = 0
local Ent = g_Entity[ e ]
for k, v in pairs( g_Entity ) do   --loop through all entities
    if k == nil then continue end
    if k == e then continue end  -- not including the entity running the script
    if ai_soldier_state[ k ] == nil and ai_bot_state[ k ] == nil then --didn't want AI characters so we check they dont have a state
        if v.health > 0 then --only entity's that are alive
            local ddx, ddy, ddz = v.x - Ent.x, v.y - Ent.y, v.z - Ent.z
            local ddd = ddx*ddx + ddy*ddy + ddz*ddz  --work out and store the distance temporarily
            if ddd < tdist then --if closer than our minimum range so far
                tdist = ddd         --update the minimum range with the temp distance we just worked out 
                lclosestee = k    --this entity is now the closest 
            end
        end
    end
end

local U = require "scriptbank\\utillib"

in _main:

local Ent = g_Entity[ e ]
local elist = U.ClosestEntities( 3000, 10, Ent.x, Ent.z )

--Author: AmenMoses
-- some changes to suit my needs - 3com

local U = require "scriptbank\\utillib"

function nearest_init(e)
end

function nearest_main(e)

local Ent = g_Entity[ e ]
local elist = U.ClosestEntities( 3000, 10, Ent.x, Ent.z )
local eNum = 10
local text_x = 50
local text_y = 4
	
	file = io.open ("nearest_List.txt", "w+")
		io.output(file)
	
	for n = 1,#elist,1 do
		if n >= eNum then 
			break
		else
			if elist[n] ~= nil then 
				if elist[n] ~= e then 			
					TextCenterOnX(text_x,text_y,3,elist[n] .."\n" )
					io.write("nearest pos: " ..elist[n] .."\n")
					text_y = text_y + eNum
				end					
			end	--elist[n]
		end --n
	end --for
		io.close(file)
end --main

file = io.open ("nearest_List.txt", "a+")
io.output(file)
io.write("nearest pos: " ..elist[n] .."\n")
io.close(file)

local U = require "scriptbank\\utillib"

function nearest_init(e)
end

function nearest_main(e)

    local Ent = g_Entity[ e ]
    local elist = U.ClosestEntities( 3000, 10, Ent.x, Ent.z )
    local eNum = 10
    local text_x = 50
    local text_y = 5
	
    file = io.open ("nearest_List.txt", "a+")
    io.output(file)
		
    for k, v in ipairs( elist ) do
        TextCenterOnX( text_x, text_y + eNum * ( k - 1), 3, v  )
        io.write( "nearest pos: " .. v .."\n")
    end
    io.close(file)
end --main