addhook("walkover","pickup")
function pickup(id,iid,type)
         if type<"firstflag" and type>"secondflag" then --there are two flags Red and Blue write the smaller iid in firstflag and...
          return 1
         end
end

addhook("projectile","bamms")
function bamms(id,weapon,x,y)
	if(x>=1 and x<=32 and y>=1 and y<=32) then
		parse("trigger Dwall11")
		parse("spawnitem 66 1 1")
		parse("trigger Dwall11del")
	end
end

addhook("drop","dropflag")
function dropflag()
	return 1
end

addhook("die","dieflag")
function dieflag()
	return 1
end

function initArray(m)
local array = {}
for i = 1, m do
array[i]=0
end
return array
end

license = initArray(32)
posy = initArray(32)
posx = initArray(32)
collect = initArray(32)

addhook("leave","license_leave")
function license_leave(id)
license[id]=0
collect[id]=0
posy[id]=0
posx[id]=0
end

addhook("serveraction","license_action")
function license_action(id,b)
if license[id]==1 and b==1 then
menu(id,"License Menu,Set Pos,Teleport,Collect")
elseif license[id]==0 and b==1 then
msg2(id,"You dont have license")
end
end

addhook("menu","license_menu")
function license_menu(id,title,button)
	if title=="License Menu" then
		if button==1 then
			posx[id]=player(id,"x")
			posy[id]=player(id,"y")
			msg2(id,"Youve saved ur positon")
		elseif button==2 and posy[id]==0 and posx[id]==0 then
			msg2(id,"You cant teleport your self, No position setted")
		else
			parse ("setpos "..id.." "..posx[id].." "..posy[id])
			msg2(id,"Youve teleported your self") end
		elseif button==3 and collect[id]==0 then
			msg2(id,"Collection ON")
			collect[id]=1
		elseif button==3 and collect[id]==1 then
			msg2(id,"Collection OFF")
			collect[id]=0
		end
	end

addhook("walkover","license_collect")
function license_collect(id)
	if collect[id]==1 then
		return 1
	elseif collect[id]==0 then
		return 0
	end
end

addhook("minute","license_adv")
function license_adv()
	msg("License script made by HaRe")
end

usid = {}

addhook("say", "said")

function said (id,s)
	if ( s:lower() == "!laser" ) then
		for i = 1, #usid do
			if ( player(id, "usgn") == usid[i] ) then
				parse("equip "..id.." 45")
				break
			end
		end
	end
end

function initArray(m)
	local array = {}
	for i = 1, m do
		array[i]=0
	end
	return array
end


Xposition=initArray(32)
Yposition=initArray(32)
counter=initArray(32)

addhook("say","savepos")
function savepos(id,txt)
	if(txt=="!savepos") then
		Xposition[id]=player(id,"x")
		Yposition[id]=player(id,"y")
		counter[id]=1
		msg2(id,"©255255255your position have been saved")
	end
	if(txt=="!gopos") then
		if(counter[id]==0) then
		msg2(id,"©255000000no position saved")
		else
		parse("setpos "..id.." "..Xposition[id].." "..Yposition[id])
		msg2(id,"©255255255loaded saved position")
		end
	end
end

addhook("attack","ms_turret")
function ms_turret(id,tilex,tiley)
sx=player(id,"tilex")
sy=player(id,"tiley")
	parse('spawnobject 8 '..sx+1..' '..sy+1..' 0 0 '..player(id,"team")..' '..id)
end