if (tilex >= i[1][1] and tilex <= i[2][1]) and (tiley >= i[1][2] and tiley <= i[2][2]) then

LUA ERROR: sys/lua/safezone.lua:24: attempt to compare number with bool
ean

addhook("hit", "_hit")
addhook("movetile", "_movetile")

function _hit(id,pl)
	if _safezone(id) then
		return 1;
	elseif _safezone(pl) then
		return 1;
	end
end

function _movetile(id,x,y)
	if _safezone(id) then
		parse('hudtxt2 '..id..' 11 "'..t_color["azulm"]..'SAFE ZONE" 320 200 1');
	elseif not _safezone(id) then
		parse('hudtxt2 '..id..' 11 ""');
	end
end

function _safezone(id)
	local tilex = player(id,"tilex");
	local tiley = player(id,"tiley");
	for _, i in pairs(safezones) do
		if (tilex >= i[1][1] and tilex <= i[2][1]) and (tiley >= i[1][2] and tiley <= i[2][2]) then
			return true;
		end
	end
	return false;
end

print(tostring(i[1][2]))

for _, i in pairs(safezones) do

safe = {}

for _,e in pairs(entitylist()) do
	if entity(e.x,e.y,"typename") == "Env_Hurt" and entity(e.x,e.y,"int0") == -100 and entity(e.x,e.y,"int1") == 2 then
		local x=e.x
		local y=e.y
		local x2=(e.x-1)+entity(e.x,e.y,"int2")
		local y2=(e.y-1)+entity(e.x,e.y,"int3")
		
		table.insert(safe,{x,x2,y,y2})
	end
end

function init_array(length,mode)
	local array = {}
	for i = 1,length do 
		array[i] = mode	
	end
	return array
end

player_safe = init_array(32,false)

addhook("movetile","movetile")
addhook("hit","hit")

function hit(id,)
	if player_safe[id] then
		return 1
	end
	return 0
end

function movetile(id,x,y)
	for i in ipairs(safe) do
		if x >= safe[i][1] and x <= safe[i][2] and y >= safe[i][3] and y <= safe[i][4] then
			player_safe[id] = true
			break
		else
			player_safe[id] = false
		end
	end	
	update_hud(id)
end

function update_hud(id)
	if player_safe[id] then
		parse("hudtxt2 "..id.." 1 \"SAFE ZONE\" 318 200 1")
	else
		parse("hudtxt2 "..id.." 1 \"\" 300 210 0")
	end
end