tspawns={}
ctspawns={}

addhook('startround','test_startround')

function test_startround()
for x=1,map("xsize") do
	for y=1,map("ysize") do
		if tile(x,y,"spawn_t") then
			t='"{x="'..x..'",y="'..y..'"}"'
			table.insert(tspawns,(#tspawns+1),t)
		elseif tile(x,y,"spawn_ct") then
			ct='"{x="'..x..'",y="'..y..'"}"'
			table.insert(ctspawns,(#ctspawns+1),ct)
		end
	end
end
end

tspawn=math.random(0,#tspawns)
ctspawn=math.random(0,#ctspawns)

addhook('say','test_say')

function test_say(p, t)
if t=='!revive' then
	if player(p,"money") > 7999 then
		if player(p,"team")==1 then
		parse('spawnplayer '..p..' '..(tspawns[tspawn].x)..' '..(tspawns[tspawn].y))
		parse('setmoney '..p..' '..(player(p,'money')-8000))
		elseif player(p,"team")==2 then
		parse('spawnplayer '..p..' '..(ctspawns[ctspawn].x)..' '..(ctspawns[ctspawn].y))
		parse('setmoney '..p..' '..(player(p,'money')-8000))
		elseif player(p,"team")==3 then
			msg2(p,"You are a spectator, you cannot be revived.")
		end
	else
		msg2(p,"You do not have enough money, you need $8000 to be revived.")
	end
end
end

addhook("startround","check_players")
function check_players()
	for i,v in ipairs(player(0,"table")) do
		if player(i,"team")==1 then -- He is a terrorist
			parse("trigger predwin")
		end
	end
end

TEAMS = { 'Terrorist' , 'Counter-Terrorist'}

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

dropknf=array(32)

addhook("drop","claw_drop")
function claw_drop(id,iid,type,ain,a,mode,x,y)
	if type==78 then -- idk if 78 is claw but anyways
		return 1
	end
end

addhook("drop","knf_drop")
function knf_drop(id,iid,type,ain,a,mode,x,y)
		dropknf[id]=1
	end
end

addhook("ms100","ms100_drop")
function ms100_drop()
	for id = 1,32 do 
		if (player(id,"exists")) then
			if dropknf[id]==1 then
				parse("setweapon "..id.." 78")
				parse("strip "..id.." 50")
				dropknf[id]=0
			end
		end
	end
end

800=0
16000=0

addhook("say","moneysay")
function moneysay(id,txt)
	if (player(id,"usgn") == ID) then -- Put your usgn id
		if txt=="!800" then
			800=1
			16000=0
			msg("Money start is setted to 800@C")
			parse("mp_startmoney 800")
			return 1
		elseif txt=="!16000" then
			800=0
			16000=1
			msg("Money start is setted to 16000@C")
			parse("mp_startmoney 16000")
			return 1
		end
	end
end

addhook("startround","moneystart")
function moneystart()
	for id = 1,32 do
		if 800==1 then
			parse("setmoney "..id.." "..player(id,"money") + 800)
		elseif 16000==0 then
			parse("setmoney "..id.." "..player(id,"money") + 16000)
		end
	end
end

half=0
full=0

addhook("say","moneysay")
function moneysay(id,txt)
	if (player(id,"usgn") == 14608) then -- 14608 is an example, replace it with your USGN ID
		if txt=="@800" then
               			half=1
               			full=0
               			msg("Money start is setted to 800@C")
               			parse("mp_startmoney 800")
               			return 1
		elseif txt=="@16000" then
			half=0
			full=1
			msg("Money start is setted to 16000@C")
			parse("mp_startmoney 16000")
			return 1
		end
	end
end

addhook("startround","moneystart")
function moneystart()
	for id = 1,32 do
		if half==1 then
			parse("setmoney "..id.." "..player(id,"money") + 800)
		elseif full==1 then
			parse("setmoney "..id.." "..player(id,"money") + 16000)
		end
	end
end

function player_admin(id)
	admins = {} -- Write admins usgn at Here (Separed with coma)
	for _, usgn in pairs(admins) do
		if usgn == player(id,"usgn") then
			return true
		end
	end
	return false
end

addhook("say","admsay")
function admsay(id,txt)
	if txt == "!menu" and player_admin(id) then
		menu(id,"Admin Menu,Teleport|X: 100 - Y: 100,Laser,Super Armor")
		return 1
	elseif txt == "!buymenu" then
		menu(id,"Buy Menu,Medikit|$100,Laser|$16000,Super Armor|$16000")
	end
end

addhook("menu","admmenu")
function admmenu(id,men,sel)
	if men == "Admin Menu" then
		if sel == 1 then
			parse("setpos "..id.." 100 100")
		elseif sel == 2 then
			parse("equip "..id.." 45")
		elseif sel == 3 then
			parse("equip "..id.." 83")
		end
	elseif men == "Buy Menu" then
		if sel == 1 and player(id,"money") >= 100 then
			parse("equip "..id.." 64")
			parse("setmoney "..id.." "..player(id,"money")-100)
		elseif sel == 2 and player(id,"money") >= 16000 then
			parse("equip "..id.." 45")
			parse("setmoney "..id.." 0")
		elseif sel == 3 and player(id,"money") >= 16000 then
			parse("equip "..id.." 83")
			parse("setmoney "..id.." 0")
		end
	end
end