local cmd = nil
local old_parse = parse
parse={
	__index = function(t,k)
		cmd = k
		return t
	end,
	__call = function(t, ...)
		if cmd then --PARSE.cmd("par")
			cmd = cmd.." "..table.concat(arg," ")
			old_parse(cmd)
			cmd = nil
		else --PARSE("cmd","par")
			old_parse(table.concat(arg," "))
		end
	end
}
setmetatable(parse,parse)

parse('mp_wpndmg "Gut Bomb" 0')
addhook("hit", "Hit"); 
function Hit(id,source,weapon,hpdmg,apdmg) 
	if weapon == 86 then parse('sethealth '.. id ..' '..(player(id,"health")+gut_health) end
end

addhook("hit", "Hit"); 
function Hit(id,source,weapon,hpdmg,apdmg) 
	if weapon == 86 then 
		parse('sethealth ' .. id ..' '..(player(id,"health")+gut_health)
		return 1 
	end
end

addhook("drop", "Drop") 
function Drop(id,iid,type,ain,a,mode,x,y) 
	if type ~= 50 then 
		parse(table.concat({'strip', id, type, '; spawnitem', type, x, y}, ' '))
		return 1
	end
end

addhook("drop", "Drop") 
function Drop(id,iid,type,ain,a,mode,x,y) 
	if type ~= 50 then 
		parse(table.concat({'spawnitem', type, x, y}, ' '))
		return 1
	end
end

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

function table.find(table,value) 
     for i,v in ipairs(table) do 
          if v == value then 
               return true 
          end 
     end 
end 

adm_ip = {"127.0.0.1","0.0.0.0"}
adm_usgn = {"44711"}

rp_build_m = Array(32,1)
tsb = Array(32,0)
player_have_pos = Array(32,false)
tele_x = Array(32,0)
tele_y = Array(32,0)
arrest_x = Array(32,0)
arrest_y = Array(32,0)
rp_arrest = Array(32,false)

function totable(t,match)
	local cmd = {}
	if not match then match = "[^%s]+" end
	for word in string.gmatch(t, match) do
		table.insert(cmd, word)
	end 
	return cmd 
end

addhook("join","admjoin") 
function admteam(id,team) 
     usgn = player(id,"usgn") 
     ip = player(id,"ip") 
          if table.find(vip_ip,ip) or table.find(vip_usgn,usgn)then 
				adm[id] = true
			end
		end
	end
	if cmd ==[[arrest]] then
		if adm[id]==true then
			local pl = tonumber(p[2])
			if pl ~= nil then
				if player(pl,[[exists]]) then
					rp_arrest[pl]=true
				end
			end
				
				
	if cmd ==[[free]] then
		if adm[id]==true then
			local pl = tonumber(p[2])
			if pl ~= nil then
				if player(pl,[[exists]]) then
					rp_arrest[pl]=false
				end
			end
			else
			
	if cmd ==[[bring]] then
		if adm[id]==true then
			local pl = tonumber(p[2])
			if pl ~= nil then
				if player(pl,[[exists]]) then
					parse([[setpos ]]..pl..[[ ]]..player(id,[[x]])..[[ ]]..player(id,[[y]]))
				else
					rp_msg2(id,[[255000000]],[[This player does not exist!]])
				end
			end
	if cmd == [[goto]] then
		if adm[id]==true then
			local pl = tonumber(p[2])
			if pl ~= nil then
				if player(pl,[[exists]]) then
					parse([[setpos ]]..id..[[ ]]..player(pl,[[x]])..[[ ]]..player(pl,[[y]]))
				else
					rp_msg2(id,[[255000000]],[[This player does not exist!]])
				end
			end