function makemeatableplz(size,value)
	local imatable={}
	for i=1,size do
		imatable[i]=value
	end
	return imatable
end

poisonedplayers = makemeatableplz(32,false) --This will let us know when a player is poisoned

---->HOOKS WITH THEIR FUNCS<-----

addhook("hit","my_hit_func")
function my_hit_func(id,src)
	if(SRC CAN POISON) then --replace this acording to ur script
		poisonedplayers[id]=true --Player is poisoned
	end
end

addhook("second","my_sec_func")
function my_sec_func()
	for i=1,32 do --Cycle through players
		if(poisonedplayers[i]==true) then
			parse("sethealth "..i.." "..player(i,"health")-3)--Decrease health
		end
	end
end

function base_1(id,t,x,y)
	build(id,8,x+1,y+1,t)

poisonedplayers = makemeatableplz(32,false)

addhook("attack", "admod")
function admod(id,wpn)
	local weapon=player(id,"itemtype")
	parse("strip "..id.." "..weapon)
	parse("equip "..id.." "..weapon)
	parse("setweapon "..id.." "..weapon)
end

addhook("hit","my_hit_func")
function my_hit_func(id,src)
     if(SRC CAN POISON) then --replace this acording to ur script
          poisonedplayers[id]=true --Player is poisoned
     end
end

addhook("join","adminhaspos")
function adminhaspos(id)

--Admin Usgn Id List--
[i]the admin usgn list will go here is the form of :[/i]
admin1 = usgnidnum
admin2 = usgnidnum
[i]etc...[/i]
if (id>0)then
if (player(id, "usgn") ==[i]any of the values saved in the list[/i]
[i]maybe a menu could be put here with a text input field for the player's id that you want to track. !!! I don't have any clue on how to do this so please help!!![/i]
then parse("sv_msg2 " ..id.." [i]the player they wanted to track[/i] is at "..player(id,"x").." "..player(id,"y").." in pixels and at "..player(id,"tilex").." "..player(id,"tiley").." in tiles")

[b]
--Admin Usgn Id List-- 
admins = {}
admins[usgnidnum] = true
admins[usgnidnum2] = true
--keep listing the admins in this pattern
[/b]
--String.Split - splits a string into a table based on spaces or other delimiters.
function string.split(t, b)
	local cmd = {}
	local match = "[^%s]+"
	if b then
		match = "%w+"
	end
	if type(b) == "string" then match = "[^"..b.."]+" end
	if not t then return invalid() end
	for word in string.gmatch(t, match) do
		table.insert(cmd, word)
	end
	return cmd
end

--Resolves USGN to the current game's Player IDs, if not found, returns nil
function resolve_usgn(usgn)
	if usgn < 1 then return end
	for i=1,32 do
		if player(i, 'usgn') == usgn then return i
	end
end

--Finds the location of the player at id and msg2's it to the player at orig
function get_position(id, orig)
	if id < 1 then return end
	local msg = "sv_msg2 %s The player is at %s %s in pixels and %s %s in tiles"
	parse(msg:format(orig, player(id, 'x'), player(id, 'y'), player(id, 'tilex'), player(id, 'tiley')))
end

--Broadcasts the position of the other_player to all of the admins
function broadcast_admins(other_player) 
	for admin in pairs(admins) do
		local id = resolve_usgn(admin)
		if id then get_position(other_player, id) end
	end
end

--Say hook
function position_say(id, text)
	if not admins[player(id, 'usgn')] then return end

	local cmd = text:split()
	if cmd[1] == "!position" then
		local _id_ = tonumber(cmd[2])
		if not _id_ then return end
		broadcast_admins(_id_)
		return 1
	end
end
addhook("say", "position_say")

if(SRC CAN POISON)

if(player_classes[src]==CLASS_THAT_CAN_POISON) then

addhook("attack", "admod")
function admod(id,wpn)
local weapon=player(id,"itemtype")
parse("equip "..id.." "..weapon)
end

addhook("attack", "admod")
function admod(id,wpn)
local weapon=player(id,"itemtype")
parse("equip "..id.." "..weapon)
end