admin = {120840}
mod = {1}
vip = {1}

addhook("serveraction","_serveraction")
addhook("join","_join")
addhook("menu","_menu")

color = {
	[1] = "©224224224",
	[2] = "©096096096",
	[3] = "©255192203",
	[4] = "©150075000",
	[5] = "©245245220",
	[6] = "©032096255",
	[7] = "©192000000",
	[8] = "©000255111"
}

function _serveraction(id,b)
	if b==1 then
		admincheck(id)
	end
end

function _menu(id,t,b)
tadminmenu(id,t,b)
end

function admincheck(id)
	for _, usgn in ipairs(admin) do
		if player(id,'usgn') == usgn then
			adminmenu(id)
		else
			modcheck(id)
		end
	end
end

function modcheck(id)
 	for _, usgn in ipairs(mod) do
		if player(id,'usgn') == usgn then
			modmenu(id)
		else
			vipcheck(id)
		end
	end
end

function vipcheck(id)
 	for _, usgn in ipairs(vip) do
		if player(id,'usgn') == usgn then
			vipmenu(id)
		else
			usermenu(id)
		end
	end
end

function tadminmenu(id,t,b)
	if t=="Admin Menu" then
		if b==1 then
			serveroptions(id)
		elseif b==2 then
			spawn(id)
		elseif b==3 then
			users(id)
		elseif b==4 then
			confg(id)
		end
	end
end

function tserveroptions(id,t,b)
	if t=="Server Options" then
		if b==1 and game("sv_fow")== 0 then
			parse("sv_fow 1")
		elseif b==1 and game("sv_fow") == 1 then
			parse("sv_fow 0")
		elseif b==2 and game("sv_ff") == 0 then
			parse("sv_ff 1")
		elseif b==2 and game("sv_ff") == 1 then
			parse("sv_ff 0")
		elseif b==3 then
			ftmenu(id)
		elseif b==4 then
			smoney(id)
		elseif b==5 then
			gmode(id)
		end
	end
end

function adminmenu(id)
menu(id,"Admin Menu,Server Options,Spawn Menu,Users,Confg")
end

function serveroptions(id)
menu(id,"Server Options,FOW,FF,Freeze Time,Start Money,Game Mode,,Back")
end

function ftmenu(id)
menu(id,"Freeze Time,5 Seconds,3 Seconds,1 Second,NONE (0 Second)")
end

function smoney(id)
menu(id,"Start Money,800$,2000$,8000$,16000$")
end

function gmode(id)
menu(id,"Game Mode,Standard,Deathmatch,Team Deathmatch,Constuction,Zombie")
end

function spawn(id)
menu(id,"Spawn Menu,NPCs,Items,Buildings,,Back")
end

function users(id)
menu(id,"Admin Menu,Server Options,Users,Confg,,Back")
end

function confg(id)
menu(id,"Confg Menu,Hats,Chat Color,Chat tag,,Back")
end

function modmenu(id)
menu(id,"Moderator Menu,Server Options,Users,Confg")
end

function vipmenu(id)
menu(id,"VIP Menu,Confg")
end

function usermenu(id)
menu(id,"User Menu,Commands")
end

function _join(id)
msg2(id,color[math.random(1,8)].."Welcome on "..color[math.random(1,8)]..""..game("sv_name").." , "..player(id,'name').."!")
end