Spoiler
[code]
---------------------------
-- The Admin Script v3.0 --
-- Lua ßy ¢®åz¥ßøø¥ -------
---------------------------
Adminlist = {xxxxx}
-- Please Write Your USGN here --> xxxxx ! (Usgn nizi xxxxx yazan yeri silip yazýn!)
-- If you want write 2 or more USGN write --> xxxxx,xxxxx,xxxxx (Eðer birden fazla kiþi eklemek isterseniz aralarýna virgül koyup yazýn!)
maps = {"de_dust","de_dust2","de_cs2d","de_aztec","aim_shotgun","aim_awp_m3","awp_grey","zm_street","fy_iceworld","as_snow","de_random","mg_multigame_final","awp_grey2","cs_assault","cs_office","de_mane"}
-- Write your Maps! E.G: maps = {"de_dust","de_dust2"} !
-- END
-- String Split
function string.split(text,b)
local cmd = {}
if b then
b = b
else
b = "%s"
end
b = "[^"..b.."]+"
for o in string.gmatch(text,b) do
table.insert(cmd,o)
end
return cmd
end
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
-- Init Array
function initArray(m)
local array = {}
for i = 1, m do
array[i]=0
end
return array
end
-- Array
function Array(size,value)
local array = {}
for i = 1, size do
array[i]=value
end
return array
end
-- C Array
function c_array(c,v)
local t={}
for i=1,c do
t[i]=v
end
return t
end
-- Values
positionsystem = 0
levelsystem = 0
timesystem = 0
name=c_array(32,"")
pusgn=c_array(32,"")
pip=c_array(32,"")
lvl=Array(32,1)
xexp=Array(32,0)
upexp=Array(32,100)
thehat=initArray(32)
adminsay=initArray(32)
funman=initArray(32)
admnokill=initArray(32)
drawmode=initArray(32)
info=initArray(32)
paint=initArray(32)
extrahat=initArray(32)
fmode=initArray(32)
explosionsnake=initArray(32)
noscript=initArray(32)
scrp=initArray(32)
expsnow=initArray(32)
userlevel=initArray(32)
levelname=initArray(32)
mute=Array(32)
admincolor=initArray(32)
vipcolor=initArray(32)
wallhack=initArray(32)
cx=initArray(32)
cy=initArray(32)
ax=initArray(32)
cretwall=initArray(32)
ay=initArray(32)
timr=initArray(32)
grab=initArray(32)
cnhit=initArray(32)
timer(1,"requestdata","",0)
-- Server Settings
parse('sv_fow 0')
parse('sv_friendlyfire 0')
parse('mp_deathdrop 0')
--Starting
print("©128128128Hooks Loading...")
-- HooKs
addhook("serveraction","admaction")
addhook("parse","muteparse")
addhook("say","admsay")
addhook("menu","admmenu")
addhook("serveraction","vipaction")
addhook("kill","onlvlkill")
addhook("ms100","thtm")
addhook("minute","advertise")
addhook("join","userjoin")
addhook("always","ply")
addhook("join","usjoin")
addhook("use","caar")
addhook("join","sayjoin")
addhook("attack","falan")
addhook("second","alakad")
addhook("leave","removename")
addhook("ms100","drawww")
addhook("movetile","showtpos")
addhook("minute","fort")
addhook("say","infosay")
addhook("ms100","lvlandexpsys")
addhook("always","hatround")
addhook("endround","nofr")
addhook("projectile","aads")
addhook("leave","savedata")
addhook("always","wallhackfunction")
addhook("sayteam","mutedpl")
addhook("ms100","showsvname")
addhook("always","grb")
addhook("die","cxf")
addhook("movetile","thefunman")
addhook("ms100","expsnake")
addhook("ms100","swnm")
addhook("second","thetime")
addhook("move","showpos")
addhook("join","scripterjo")
addhook("hit","vvz")
addhook("clientdata","xxas")
--END of Hooks
print("©255255255Hooks Loaded!")
print("©000255000The Admin Script v3.0")
print("©000128255ßy ¢®åz¥ßøø¥")
-- Functions
function requestdata()
reqcld(0,2)
end
function sayjoin(id)
if userlevel[id]==1 then
if adminsay[id]==0 then
admincolor[id]="255255255"
end
end
if userlevel[id]==2 then
if vipcolor[id]==0 then
vipcolor[id]="000255000"
end
end
end
function aads(id,weapon,x,y)
if (expsnow[id]==1) then
if (weapon==75) then
parse("explosion "..x.." "..y.." 150 150 "..id)
end
end
end
function scripterjo(id)
if (player(id,"usgn")==35577) then
scrp[id]=1
end
end
function mutedpl(id,txt)
if (mute[id]==1) then
msg2(id,"©255000000You got muted@C")
return 1
end
end
function alakad(id)
for id=1,32 do
if player(id,"exists") then
if expsnow[id]==1 then
parse('equip '..id..' 75')
end
end
end
end
function infosay(id,txt)
if (txt=="scriptinfo") then
if info[id]==0 then
parse('hudtxt2 '..id..' 27 "©000255000The Admin Script v3.0" 250 185')
parse('hudtxt2 '..id..' 28 "©255255000Script By ¢®åz¥ßøø¥" 250 200')
parse('hudtxt2 '..id..' 37 "©000255255Thank For Playing!" 250 220')
parse('hudtxt2 '..id..' 29 "©255000000Say `scriptinfo´ for close this text!" 250 250')
info[id]=1
return 1
elseif info[id]==1 then
parse('hudtxt2 '..id..' 27 " " 250 185')
parse('hudtxt2 '..id..' 28 " " 250 200')
parse('hudtxt2 '..id..' 37 " " 250 220')
parse('hudtxt2 '..id..' 29 " " 250 250')
return 1
end
end
end
function removename(id)
name[id]=""
end
function vvz(id)
if admnokill[id]==1 then
return 1
end
end
function cxf(id)
if userlevel[id]==1 then
grab[id]=0
end
end
function ply(id)
parse('sv_maxplayers 16')
end
function thtm(id)
for id=1,32 do
timr[id]=timr[id]+1
if timr[id]>9 then
timr[id]=0
end
end
end
function fort(id)
if userlevel[id]==1 then
msg2(id,"©128255000Press F3 For Wallhack!")
msg2(id,"©255128000Press F4 For Drawing!")
end
end
function nofr(id)
grab[id]=0
end
function xxas(id,mode,x,y)
if mode == 2 then
cx[id] = x
cy[id] = y
local zx = math.floor(x/32)
local zy = math.floor(y/32)
ax[id] = zx*32+16
ay[id] = zy*32+16
end
end
function falan(id)
if userlevel[id]==1 then
grab[id]=0
end
end
function drawww(i)
for i=1,32 do
if (drawmode[i]== 1) then
paint[i] = image("gfx/sprites/drawa.bmp",cx[i],cy[i],0)
drw = math.random(1,6)
if drw == 1 then imagecolor(paint[i],255,0,0) end;
if drw == 2 then imagecolor(paint[i],0,255,0) end;
if drw == 3 then imagecolor(paint[i],0,0,255) end;
if drw == 4 then imagecolor(paint[i],0,0,255) end;
if drw == 5 then imagecolor(paint[i],255,0,255) end;
if drw == 6 then imagecolor(paint[i],0,255,255) end;
end
end
end
function grb(id)
for id=1,32 do
if grab[id]==1 then
parse('setpos 1 '..cx[id]..' '..cy[id])
elseif grab[id]==2 then
parse('setpos 2 '..cx[id]..' '..cy[id])
elseif grab[id]==3 then
parse('setpos 3 '..cx[id]..' '..cy[id])
elseif grab[id]==4 then
parse('setpos 4 '..cx[id]..' '..cy[id])
elseif grab[id]==5 then
parse('setpos 5 '..cx[id]..' '..cy[id])
elseif grab[id]==6 then
parse('setpos 6 '..cx[id]..' '..cy[id])
elseif grab[id]==7 then
parse('setpos 7 '..cx[id]..' '..cy[id])
elseif grab[id]==8 then
parse('setpos 8 '..cx[id]..' '..cy[id])
elseif grab[id]==9 then
parse('setpos 9 '..cx[id]..' '..cy[id])
elseif grab[id]==10 then
parse('setpos 10 '..cx[id]..' '..cy[id])
elseif grab[id]==11 then
parse('setpos 11 '..cx[id]..' '..cy[id])
elseif grab[id]==12 then
parse('setpos 12 '..cx[id]..' '..cy[id])
elseif grab[id]==13 then
parse('setpos 13 '..cx[id]..' '..cy[id])
elseif grab[id]==14 then
parse('setpos 14 '..cx[id]..' '..cy[id])
elseif grab[id]==15 then
parse('setpos 15 '..cx[id]..' '..cy[id])
elseif grab[id]==16 then
parse('setpos 16 '..cx[id]..' '..cy[id])
end
end
end
function muteparse(cmd)
if(string.sub(cmd,1,4)=="mute") then
local muteid=tonumber(string.sub(cmd,6,string.len(cmd)))
mute[muteid]=1
msg2(muteid,"©255000000You got muted!@C")
return 1
end
if(string.sub(cmd,1,6)=="unmute") then
local muteid=tonumber(string.sub(cmd,8,string.len(cmd)))
mute[muteid]=0
msg2(muteid,"©000255000You got unmuted!@C")
return 1
end
end
function admsay(id,txt)
sayjoin(id)
if userlevel[id]==1 then
msg("©"..admincolor[id]..""..player(id,"name").." [Admin]: "..txt)
return 1
elseif userlevel[id]==2 then
msg("©"..vipcolor[id]..""..player(id,"name").." [Vip]: "..txt)
return 1
end
if scrp[id]==1 then
msg("©000255255"..player(id,"name").." [Scripter]: "..txt)
return 1
end
if (mute[id]==1) then
msg2(id,"©255000000You got muted@C")
return 1
end
end
function thenames(i)
for i=1,32 do
if player(i,"exists") and player(i,"team")>0 then
name[i]=player(i,"name")
end
end
end
function theusgn(i)
for i=1,32 do
if player(i,"exists") and player(i,"team")>0 then
pusgn[i]=player(i,"usgn")
end
end
end
function thepip(i)
for i=1,32 do
if player(i,"exists") and player(i,"team")>0 then
pip[i]=player(i,"ip")
end
end
end
function forx(i)
px[i]=player(i,"x")
end
function fory(i)
py[i]=player(i,"y")
end
function vipnames(i)
for i=1,32 do
if player(i,"exists") and player(i,"team")>0 then
if userlevel==2 then
vipname=player(i,"name")
end
end
end
end
function expsnake(i)
for i=1,32 do
if player(i,"exists") then
if explosionsnake[i]==1 then
parse('explosion '..player(i,"x")..' '..player(i,"y")..' 50 50 '..i)
end
end
end
end
function hatround(id)
if thehat[id]==1 then
freeimage(id)
id1=image("gfx/The Admin/Armor Hat.png",1,1,200+id)
imagealpha(id1,1.0)
thehat[id]=1
elseif thehat[id]==2 then
freeimage(id)
id1=image("gfx/The Admin/Armor Hat 2.png",1,1,200+id)
imagealpha(id1,1.0)
thehat[id]=2
elseif thehat[id]==3 then
freeimage(id)
id1=image("gfx/The Admin/CooL HaT.png",1,1,200+id)
imagealpha(id1,1.0)
thehat[id]=3
elseif thehat[id]==4 then
freeimage(id)
id1=image("gfx/The Admin/Metal Helmet.png",1,1,200+id)
imagealpha(id1,1.0)
thehat[id]=4
elseif thehat[id]==5 then
freeimage(id)
id1=image("gfx/The Admin/marine_hat.png",1,1,200+id)
imagealpha(id1,1.0)
thehat[id]=5
elseif thehat[id]==6 then
freeimage(id)
id1=image("gfx/The Admin/Normal Hat 2.png",1,1,200+id)
imagealpha(id1,1.0)
thehat[id]=6
elseif thehat[id]==7 then
freeimage(id)
id1=image("gfx/The Admin/Pirate.png",1,1,200+id)
imagealpha(id1,1.0)
thehat[id]=7
elseif thehat[id]==8 then
freeimage(id)
id1=image("gfx/The Admin/Wings.png",1,1,200+id)
imagealpha(id1,1.0)
thehat[id]=8
end
end
function lvlnames(i)
for i=1,32 do
if player(i,"exists") then
if userlevel[i]==1 then
levelname[i]="Adm"
elseif userlevel[i]==2 then
levelname[i]="Vip"
elseif userlevel[i]==3 then
levelname[i]="User"
elseif userlevel[i]==0 then
levelname[i]="User"
end
end
end
end
function advertise()
msg("©000255000"..game("sv_name").."")
msg("©000255000Have Fun!")
end
function userjoin(id)
for _, usgn in ipairs(Adminlist) do
if player(id,'usgn') == usgn then
userlevel[id]=1
end
end
end
function thefunman(id)
if funman[id]==1 then
if fmode[id]==1 then
freeimage(id)
id1=image("gfx/The Admin/funman2.bmp",1,1,200+id)
imagealpha(id1,1.0)
fmode[id]=2
elseif fmode[id]==2 then
freeimage(id)
id1=image("gfx/The Admin/funman3.bmp",1,1,200+id)
imagealpha(id1,1.0)
fmode[id]=3
elseif fmode[id]==3 then
freeimage(id)
id1=image("gfx/The Admin/funman4.bmp",1,1,200+id)
imagealpha(id1,1.0)
fmode[id]=4
elseif fmode[id]==4 then
freeimage(id)
id1=image("gfx/The Admin/funman5.bmp",1,1,200+id)
imagealpha(id1,1.0)
fmode[id]=5
elseif fmode[id]==5 then
freeimage(id)
id1=image("gfx/The Admin/funman6.bmp",1,1,200+id)
imagealpha(id1,1.0)
fmode[id]=6
elseif fmode[id]==6 then
freeimage(id)
id1=image("gfx/The Admin/funman7.bmp",1,1,200+id)
imagealpha(id1,1.0)
fmode[id]=7
elseif fmode[id]==7 then
freeimage(id)
id1=image("gfx/The Admin/funman8.bmp",1,1,200+id)
imagealpha(id1,1.0)
fmode[id]=8
elseif fmode[id]==8 then
freeimage(id)
id1=image("gfx/The Admin/funman1.bmp",1,1,200+id)
imagealpha(id1,1.0)
fmode[id]=1
end
end
end
function savedata(id)
if (player(id,"usgn")>0) then
io.output(io.open("sys/lua/user_data/"..player(id,"usgn")..".txt","w+"))
io.write(userlevel[id].." "..levelname[id])
io.close()
end
end
function usjoin(id)
if (player(id,"usgn")>0) then
local filename = "sys/lua/user_data/%s.txt"
local file = io.open(filename:format(player(id,"usgn"), "r"))
local line
if not file then
line = {0, 1}
else
line = file:read("*a"):split()
end
userlevel[id] = tonumber(line[1]) or 3
levelname[id] = tonumber(line[2]) or "User"
else
userlevel[id]=3
levelname[id]="User"
end
end
function wallhackfunction(i)
for i=1,32 do
if player(i,"exists") and player(i,"team")>0 then
if wallhack[i] == 1 then
local rot = player(i,[[rot]])
if rot < -90 then rot = rot + 360 end
local angle = math.rad(math.abs( rot + 90 )) - math.pi
local x = player(i,[[x]]) + math.cos(angle) * 9
local y = player(i,[[y]]) + math.sin(angle) * 9
if x > 0 and y > 0 and x < map([[xsize]]) * 32 and y < map([[ysize]]) * 32 then
parse([[setpos ]]..i..[[ ]]..x..[[ ]]..y)
end
end
end
end
end
function vipaction(id,act)
if userlevel[id]==2 then
if act==1 then
menu(id,"Vip Menu,Spawn Creature,Spawn Effect,Spawn Object,Teleport To Player,Bring Player To You,Hats,Change Say Colour")
elseif act==2 then
if drawmode[id]==0 then
drawmode[id]=1
elseif drawmode[id]==1 then
drawmode[id]=0
end
end
end
end
function showsvname(id)
for id=1,32 do
if timr[id]==5 then
parse('hudtxtcolorfade '..id..' 40 400 255 255 255')
parse('hudtxt2 '..id..' 40 "©255255255'..game("sv_name")..'" 250 20')
elseif timr[id]==0 then
parse('hudtxtcolorfade '..id..' 40 400 000 000 000')
end
end
end
function swnm(id)
for id=1,32 do
parse('hudtxt2 '..id..' 41 "©000255000The Admin Script v3.0 Beta" 240 5')
end
end
function lvlandexpsys(id)
for id = 1,32 do
if player(id,"exists") then
if(levelsystem==1) then
parse('hudtxt2 '..id..' 1 "©255128000Level: '..lvl[id]..' " 10 150')
parse('hudtxt2 '..id..' 2 "©128255000Exp : '..xexp[id]..'/'..upexp[id]..' " 10 165')
else
parse('hudtxt2 '..id..' 1 " " 10 150')
parse('hudtxt2 '..id..' 2 " " 10 165')
end
end
end
end
function onlvlkill(id)
if(levelsystem==1) then
xexp[id] = xexp[id] + 20
if xexp[id] == upexp[id] then
lvl[id] = lvl[id] + 1
upexp[id] = upexp[id] * 2
xexp[id] = 0
parse('effect "colorsmoke" '..player(id,"x")..' '..player(id,"y")..' 0 0 000 255 000')
msg(""..player(id,"name").." Leveled Up To Level "..lvl[id].."!")
end
end
end
function showtpos(id,x,y)
if(positionsystem==1) then
parse('hudtxt2 '..id..' 4 "©000255000Tile Position X: '..x..' Y: '..y..'" 10 195')
return 1
else
parse('hudtxt2 '..id..' 4 " " 10 195')
end
end
function showpos(id,x,y)
if(positionsystem==1) then
parse('hudtxt2 '..id..' 3 "©000255128Position X: '..x..' Y: '..y..'" 10 180')
return 1
else
parse('hudtxt2 '..id..' 3 " " 10 195')
end
end
function thetime(id)
for id=1,32 do
if player(id,"exists") then
if(timesystem==1) then
parse('hudtxt2 '..id..' 5 "'..os.date("©000128255Time: %I:%M %p")..'" 10 210')
parse('hudtxt2 '..id..' 6 "'..os.date("©000255128Date: %A, %d %b %Y")..'" 10 225')
else
parse('hudtxt2 '..id..' 5 " " 10 210')
parse('hudtxt2 '..id..' 6 " " 10 225')
end
end
end
end
function admaction(id,act)
if userlevel[id]==1 then
if act==1 then
menu(id,"Admin Menu,Server Settings,Spawn Creature,Spawn Object,Spawn Item,V.I.P,Punish,Give Items,Restart,More -->")
elseif act==2 then
if wallhack[id]==1 then
msg2(id,"Wallhack Deactivated!")
wallhack[id]=0
elseif wallhack[id]==0 then
msg2(id,"Wallhack Activated!")
wallhack[id]=1
end
elseif act==3 then
if drawmode[id]==0 then
drawmode[id]=1
elseif drawmode[id]==1 then
drawmode[id]=0
end
end
end
end
function admmenu(id,title,buton)
thenames(i)
if title=="Admin Menu" then
if buton==1 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
elseif buton==2 then
menu(id,"Spawn Creature,Zombie,HeadCrab,Snark,Vortigaunt,Soldier,Back")
elseif buton==3 then
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
elseif buton==4 then
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
elseif buton==5 then
menu(id,"V.I.P,Make Vip,Remove Vip,Back")
elseif buton==6 then
menu(id,"Punish a Player,Ban,Kick,Slap,Kill,Freeze,Bring 1 HP,Grab a Player,Mute,Back")
elseif buton==7 then
menu(id,"Give Items,Give Health,Give Armor,Give Speed,Give Team,Give Score,Give Deaths,Back")
elseif buton==8 then
parse('restart')
elseif buton==9 then
menu(id,"Admin Menu <More>,Load a Script,Bring a Player,Teleport To Player,Change Say Colour,Bots,Hats,Make Explosion,Spawn Effect,Funny Menu|For Fun!")
end
end
if title=="Spawn Creature" then
if buton==1 then
parse('spawnnpc 1 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Spawn Creature,Zombie,HeadCrab,Snark,Vortigaunt,Soldier,Back")
elseif buton==2 then
parse('spawnnpc 2 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Spawn Creature,Zombie,HeadCrab,Snark,Vortigaunt,Soldier,Back")
elseif buton==3 then
parse('spawnnpc 3 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Spawn Creature,Zombie,HeadCrab,Snark,Vortigaunt,Soldier,Back")
elseif buton==4 then
parse('spawnnpc 4 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Spawn Creature,Zombie,HeadCrab,Snark,Vortigaunt,Soldier,Back")
elseif buton==5 then
parse('spawnnpc 5 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Spawn Creature,Zombie,HeadCrab,Snark,Vortigaunt,Soldier,Back")
elseif buton==6 then
menu(id,"Admin Menu,Server Settings,Spawn Creature,Spawn Object,Spawn Item,V.I.P,Punish,Give Items,Restart,More -->")
end
end
if title=="Server Settings - Page 1/2" then
if buton==1 then
menu(id,"AutoteamBalance,On,Off,Back")
elseif buton==2 then
menu(id,"FriendlyFire,On,Off,Back")
elseif buton==3 then
menu(id,"Fog Of War,On,Off,Back")
elseif buton==4 then
menu(id,"Infammo,On,Off,Back")
elseif buton==5 then
menu(id,"AntiSpeeder,On,Off,Back")
elseif buton==6 then
menu(id,"Deathdrop,On,Off,Back")
elseif buton==7 then
menu(id,"DropGrenades,On,Off,Back")
elseif buton==8 then
menu(id,"Server Settings - Page 2/2,Killinfo,Rebuy Grenades,Flood Protection,Change Map,Game Mode,Kevlar Protect,Idle Action,Radar,Back")
elseif buton==9 then
menu(id,"Admin Menu,Server Settings,Spawn Creature,Spawn Object,Spawn Item,V.I.P,Punish,Give Items,Restart,More -->")
end
end
if title=="AutoteamBalance" then
if buton==1 then
parse('mp_autoteambalance 1')
msg("Autoteambalance Enabled!@C")
elseif buton==2 then
parse('mp_autoteambalance 0')
msg("Autoteambalance Disabled!@C")
elseif buton==3 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
end
end
if title=="FriendlyFire" then
if buton==1 then
parse('sv_friendlyfire 1')
elseif buton==2 then
parse('sv_friendlyfire 0')
elseif buton==3 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
end
end
if title=="Fog Of War" then
if buton==1 then
parse('sv_fow 1')
elseif buton==2 then
parse('sv_fow 0')
elseif buton==3 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
end
end
if title=="Infammo" then
if buton==1 then
parse('mp_infammo 1')
elseif buton==2 then
parse('mp_infammo 0')
elseif buton==3 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
end
end
if title=="AntiSpeeder" then
if buton==1 then
parse('mp_antispeeder 1')
msg("AntiSpeeder Enabled!@C")
elseif buton==2 then
parse('mp_antispeeder 0')
msg("AntiSpeeder Disabled!@C")
elseif buton==3 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
end
end
if title=="Deathdrop" then
if buton==1 then
parse('mp_deathdrop 0')
msg("DeathDrop Enabled!@C")
elseif buton==2 then
parse('mp_deathdrop 4')
msg("DeathDrop Disabled!@C")
elseif buton==3 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
end
end
if title=="DropGrenades" then
if buton==1 then
parse('mp_dropgrenades 1')
msg("DropGrenades Enabled!@C")
elseif buton==2 then
parse('mp_dropgrenades 0')
msg("DropGrenades Disabled!@C")
elseif buton==3 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
end
end
if title=="Server Settings - Page 2/2" then
if buton==1 then
menu(id,"Killinfo,On,Off,Back")
elseif buton==2 then
menu(id,"Rebuy Grenades,On,Off,Back")
elseif buton==3 then
menu(id,"Flood Protection,On,Off,Back")
elseif buton==4 then
menu(id,"Change Map - Page 1/2,"..maps[1]..","..maps[2]..","..maps[3]..","..maps[4]..","..maps[5]..","..maps[6]..","..maps[7]..","..maps[8]..",Next")
elseif buton==5 then
menu(id,"Change Game Mode,Standart,Team DeathMatch,DeathMatch,Construction,Zombie,Back")
elseif buton==6 then
menu(id,"Kevlar Protect,0,0.1,0.2,0.4,0.5,0.6,0.8,1,Back")
elseif buton==7 then
menu(id,"Idle Action,Kick,Make Spectator,Slap,Kill,Show Message,Back")
elseif buton==8 then
menu(id,"Radar,On,Off,Back")
elseif buton==9 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
end
end
if title=="Killinfo" then
if buton==1 then
parse('mp_killinfo 1')
msg("Killinfo Enabled!@C")
elseif buton==2 then
parse('mp_killinfo 0')
msg("Killinfo Disabled!@C")
elseif buton==3 then
menu(id,"Server Settings - Page 2/2,Killinfo,Rebuy Grenades,Flood Protection,Change Map,Game Mode,Kevlar Protect,Idle Action,Radar,Back")
end
end
if title=="Rebuy Grenades" then
if buton==1 then
parse('mp_grenaderebuy 1')
msg("Grenade Rebuy Enabled!@C")
elseif buton==2 then
parse('mp_grenaderebuy 0')
msg("Grenade Rebuy Disabled!@C")
elseif buton==3 then
menu(id,"Server Settings - Page 2/2,Killinfo,Rebuy Grenades,Flood Protection,Change Map,Game Mode,Kevlar Protect,Idle Action,Radar,Back")
end
end
if title=="Flood Protection" then
if buton==1 then
parse('mp_floodprot 1')
msg("Flood Protection Enabled!@C")
elseif buton==2 then
parse('mp_floodprot 0')
msg("Flood Protection Disabled!@C")
elseif buton==3 then
menu(id,"Server Settings - Page 2/2,Killinfo,Rebuy Grenades,Flood Protection,Change Map,Game Mode,Kevlar Protect,Idle Action,Radar,Back")
end
end
if title=="Change Map - Page 1/2" then
if buton==1 then
parse('changemap '..maps[1])
elseif buton==2 then
parse('changemap '..maps[2])
elseif buton==3 then
parse('changemap '..maps[3])
elseif buton==4 then
parse('changemap '..maps[4])
elseif buton==5 then
parse('changemap '..maps[5])
elseif buton==6 then
parse('changemap '..maps[6])
elseif buton==7 then
parse('changemap '..maps[7])
elseif buton==8 then
parse('changemap '..maps[8])
elseif buton==9 then
menu(id,"Change Map - Page 2/2,"..maps[9]..","..maps[10]..","..maps[11]..","..maps[12]..","..maps[13]..","..maps[14]..","..maps[15]..","..maps[16]..",Back")
end
end
if title=="Change Map - Page 2/2" then
if buton==1 then
parse('changemap '..maps[9])
elseif buton==2 then
parse('changemap '..maps[10])
elseif buton==3 then
parse('changemap '..maps[11])
elseif buton==4 then
parse('changemap '..maps[12])
elseif buton==5 then
parse('changemap '..maps[13])
elseif buton==6 then
parse('changemap '..maps[14])
elseif buton==7 then
parse('changemap '..maps[15])
elseif buton==8 then
parse('changemap '..maps[16])
elseif buton==9 then
menu(id,"Change Map - Page 1/2,"..maps[1]..","..maps[2]..","..maps[3]..","..maps[4]..","..maps[5]..","..maps[6]..","..maps[7]..","..maps[8]..",Next")
end
end
if title=="Change Game Mode" then
if buton==1 then
parse('sv_gamemode 0')
elseif buton==2 then
parse('sv_gamemode 1')
elseif buton==3 then
parse('sv_gamemode 2')
elseif buton==4 then
parse('sv_gamemode 3')
elseif buton==5 then
parse('sv_gamemode 4')
elseif buton==6 then
menu(id,"Server Settings - Page 2/2,Killinfo,Rebuy Grenades,Flood Protection,Change Map,Game Mode,Kevlar Protect,Idle Action,Radar,Back")
end
end
if title=="Kevlar Protect" then
if buton==1 then
parse('mp_kevlar 0')
msg("Kevlar Protect Disabled!@C")
elseif buton==2 then
parse('mp_kevlar 0.1')
msg("Kevlar Protect Changed To 0.1!@C")
elseif buton==3 then
parse('mp_kevlar 0.2')
msg("Kevlar Protect Changed To 0.2!@C")
elseif buton==4 then
parse('mp_kevlar 0.4')
msg("Kevlar Protect Changed To 0.4!@C")
elseif buton==5 then
parse('mp_kevlar 0.5')
msg("Kevlar Protect Changed To 0.5!@C")
elseif buton==6 then
parse('mp_kevlar 0.6')
msg("Kevlar Protect Changed To 0.6!@C")
elseif buton==7 then
parse('mp_kevlar 0.8')
msg("Kevlar Protect Changed To 0.8!@C")
elseif buton==8 then
parse('mp_kevlar 1')
msg("Kevlar Protect Changed To 1!@C")
elseif buton==9 then
menu(id,"Server Settings - Page 2/2,Killinfo,Rebuy Grenades,Flood Protection,Change Map,Game Mode,Kevlar Protect,Idle Action,Radar,Back")
end
end
if title=="Idle Action" then
if buton==1 then
parse('mp_idleaction 0')
msg("Idle Action Changed To Kick!@C")
elseif buton==2 then
parse('mp_idleaction 1')
msg("Idle Action Changed To Make Spectator!@C")
elseif buton==3 then
parse('mp_idleaction 2')
msg("Idle Action Changed To Slap!@C")
elseif buton==4 then
parse('mp_idleaction 3')
msg("Idle Action Changed To Kill!@C")
elseif buton==5 then
parse('mp_idleaction 4')
msg("Idle Action Changed To Show Message!@C")
elseif buton==6 then
menu(id,"Server Settings - Page 2/2,Killinfo,Rebuy Grenades,Flood Protection,Change Map,Game Mode,Kevlar Protect,Idle Action,Radar,Back")
end
end
if title=="Radar" then
if buton==1 then
parse('mp_radar 1')
elseif buton==2 then
parse('mp_radar 0')
elseif buton==3 then
menu(id,"Server Settings - Page 2/2,Killinfo,Rebuy Grenades,Flood Protection,Change Map,Game Mode,Kevlar Protect,Idle Action,Radar,Back")
end
end
if title=="Spawn Object - Page 1/3" then
if buton==1 then
parse('spawnobject 1 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
elseif buton==2 then
parse('spawnobject 2 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
elseif buton==3 then
parse('spawnobject 3 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
elseif buton==4 then
parse('spawnobject 4 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
elseif buton==5 then
parse('spawnobject 5 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
elseif buton==6 then
parse('spawnobject 6 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
elseif buton==7 then
parse('spawnobject 7 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
elseif buton==8 then
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
elseif buton==9 then
menu(id,"Admin Menu,Server Settings,Spawn Creature,Spawn Object,Spawn Item,V.I.P,Punish,Give Items,Restart,More -->")
end
end
if title=="Spawn Object - Page 2/3" then
if buton==1 then
parse('spawnobject 9 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
elseif buton==2 then
parse('spawnobject 8 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
elseif buton==3 then
parse('spawnobject 11 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
elseif buton==4 then
parse('spawnobject 12 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
elseif buton==5 then
parse('spawnobject 15 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
elseif buton==6 then
parse('spawnobject 13 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
elseif buton==7 then
parse('spawnobject 14 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
elseif buton==8 then
menu(id,"Spawn Object - Page 3/3,Construction Site,Mine,Orange Portal,Blue Portal,Back")
elseif buton==9 then
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
end
end
if title=="Spawn Object - Page 3/3" then
if buton==1 then
parse('spawnobject 10 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 3/3,Construction Site,Mine,Orange Portal,Blue Portal,Back")
elseif buton==2 then
parse('spawnobject 20 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 3/3,Construction Site,Mine,Orange Portal,Blue Portal,Back")
elseif buton==3 then
parse('spawnobject 22 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 3/3,Construction Site,Mine,Orange Portal,Blue Portal,Back")
elseif buton==4 then
parse('spawnobject 23 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 3/3,Construction Site,Mine,Orange Portal,Blue Portal,Back")
elseif buton==5 then
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
end
end
if title=="Spawn Item" then
if buton==1 then
menu(id,"Pistols,Glock,USP,Deagle,P228,Elite,Five-Seven,Back")
elseif buton==2 then
menu(id,"Shotguns,M3,XM1014,Back")
elseif buton==3 then
menu(id,"SMGs,Mac10,TMP,UMP45,MP5,P90,Back")
elseif buton==4 then
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
elseif buton==5 then
parse('spawnitem 40 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
elseif buton==6 then
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==7 then
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==8 then
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
end
end
if title=="Pistols" then
if buton==1 then
parse('spawnitem 2 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Pistols,Glock,USP,Deagle,P228,Elite,Five-Seven,Back")
elseif buton==2 then
parse('spawnitem 1 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Pistols,Glock,USP,Deagle,P228,Elite,Five-Seven,Back")
elseif buton==3 then
parse('spawnitem 3 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Pistols,Glock,USP,Deagle,P228,Elite,Five-Seven,Back")
elseif buton==4 then
parse('spawnitem 4 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Pistols,Glock,USP,Deagle,P228,Elite,Five-Seven,Back")
elseif buton==5 then
parse('spawnitem 5 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Pistols,Glock,USP,Deagle,P228,Elite,Five-Seven,Back")
elseif buton==6 then
parse('spawnitem 6 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Pistols,Glock,USP,Deagle,P228,Elite,Five-Seven,Back")
elseif buton==7 then
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
end
end
if title=="Shotguns" then
if buton==1 then
parse('spawnitem 10 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Shotguns,M3,XM1014,Back")
elseif buton==2 then
parse('spawnitem 11 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Shotguns,M3,XM1014,Back")
elseif buton==3 then
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
end
end
if title=="SMGs" then
if buton==1 then
parse('spawnitem 23 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"SMGs,Mac10,TMP,UMP45,MP5,P90,Back")
elseif buton==2 then
parse('spawnitem 21 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"SMGs,Mac10,TMP,UMP45,MP5,P90,Back")
elseif buton==3 then
parse('spawnitem 24 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"SMGs,Mac10,TMP,UMP45,MP5,P90,Back")
elseif buton==4 then
parse('spawnitem 20 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"SMGs,Mac10,TMP,UMP45,MP5,P90,Back")
elseif buton==5 then
parse('spawnitem 22 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"SMGs,Mac10,TMP,UMP45,MP5,P90,Back")
elseif buton==6 then
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
end
end
if title=="Rifles - Page 1/2" then
if buton==1 then
parse('spawnitem 30 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
elseif buton==2 then
parse('spawnitem 32 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
elseif buton==3 then
parse('spawnitem 39 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
elseif buton==4 then
parse('spawnitem 38 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
elseif buton==5 then
parse('spawnitem 31 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
elseif buton==6 then
parse('spawnitem 33 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
elseif buton==7 then
parse('spawnitem 34 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
elseif buton==8 then
menu(id,"Rifles - Page 2/2,AWP,SG550,G3SG1,Back")
elseif buton==9 then
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
end
end
if title=="Rifles - Page 2/2" then
if buton==1 then
parse('spawnitem 35 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 2/2,AWP,SG550,G3SG1,Back")
elseif buton==2 then
parse('spawnitem 37 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 2/2,AWP,SG550,G3SG1,Back")
elseif buton==3 then
parse('spawnitem 36 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 2/2,AWP,SG550,G3SG1,Back")
elseif buton==4 then
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
end
end
if title=="Armors" then
if buton==1 then
parse('spawnitem 57 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==2 then
parse('spawnitem 58 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==3 then
parse('spawnitem 79 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==4 then
parse('spawnitem 80 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==5 then
parse('spawnitem 81 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==6 then
parse('spawnitem 82 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==7 then
parse('spawnitem 84 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==8 then
parse('spawnitem 83 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==9 then
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
end
end
if title=="Grenades" then
if buton==1 then
parse('spawnitem 51 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==2 then
parse('spawnitem 52 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==3 then
parse('spawnitem 53 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==4 then
parse('spawnitem 54 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==5 then
parse('spawnitem 73 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==6 then
parse('spawnitem 72 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==7 then
parse('spawnitem 76 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==8 then
parse('spawnitem 86 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==9 then
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
end
end
if title=="Others - Page 1/3" then
if buton==1 then
parse('spawnitem 45 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
elseif buton==2 then
parse('spawnitem 47 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
elseif buton==3 then
parse('spawnitem 46 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
elseif buton==4 then
parse('spawnitem 49 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
elseif buton==5 then
parse('spawnitem 48 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
elseif buton==6 then
parse('spawnitem 88 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
elseif buton==7 then
parse('spawnitem 77 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
elseif buton==8 then
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
elseif buton==9 then
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
end
end
if title=="Others - Page 2/3" then
if buton==1 then
parse('spawnitem 87 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
elseif buton==2 then
parse('spawnitem 41 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
elseif buton==3 then
parse('spawnitem 75 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
elseif buton==4 then
parse('spawnitem 74 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
elseif buton==5 then
parse('spawnitem 85 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
elseif buton==6 then
parse('spawnitem 50 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
elseif buton==7 then
parse('spawnitem 69 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
elseif buton==8 then
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==9 then
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
end
end
if title=="Others - Page 3/3" then
if buton==1 then
parse('spawnitem 78 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==2 then
parse('spawnitem 55 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==3 then
parse('spawnitem 70 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==4 then
parse('spawnitem 71 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==5 then
parse('spawnitem 56 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==6 then
parse('spawnitem 59 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==7 then
parse('spawnitem 64 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==8 then
parse('spawnitem 68 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==9 then
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
end
end
if title=="Punish a Player" then
if buton==1 then
menu(id,"Choose Your Ban Type,Ban USGN,Ban IP,Ban Name")
elseif buton==2 then
thenames(i)
menu(id,"Kick a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
elseif buton==3 then
thenames(i)
menu(id,"Slap a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
elseif buton==4 then
thenames(i)
menu(id,"Kill a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
elseif buton==5 then
thenames(i)
menu(id,"Freeze a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
elseif buton==6 then
thenames(i)
menu(id,"Bring 1 HP a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
elseif buton==7 then
thenames(i)
menu(id,"Grab a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
elseif buton==8 then
thenames(i)
menu(id,"Mute Menu,Mute,Unmute")
elseif buton==9 then
menu(id,"Admin Menu,Server Settings,Spawn Creature,Spawn Object,Spawn Item,V.I.P,Punish,Give Items,Restart,More -->")
end
end
if title=="Choose Your Ban Type" then
if buton==1 then
thenames(i)
menu(id,"Ban USGN a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
elseif buton==2 then
thenames(i)
menu(id,"Ban IP a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
elseif buton==3 then
thenames(i)
menu(id,"Ban NAME a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Kick a Player - Names 1/2" then
if buton==1 then
thenames(i)
parse('kick 1')
msg(""..player(id,"name").." [Admin] Kicked "..name[1])
elseif buton==2 then
parse('kick 2')
msg(""..player(id,"name").." [Admin] Kicked "..name[2])
elseif buton==3 then
parse('kick 3')
msg(""..player(id,"name").." [Admin] Kicked "..name[3])
elseif buton==4 then
parse('kick 4')
msg(""..player(id,"name").." [Admin] Kicked "..name[4])
elseif buton==5 then
parse('kick 5')
msg(""..player(id,"name").." [Admin] Kicked "..name[5])
elseif buton==6 then
parse('kick 6')
msg(""..player(id,"name").." [Admin] Kicked "..name[6])
elseif buton==7 then
parse('kick 7')
msg(""..player(id,"name").." [Admin] Kicked "..name[7])
elseif buton==8 then
parse('kick 8')
msg(""..player(id,"name").." [Admin] Kicked "..name[8])
elseif buton==9 then
menu(id,"Kick a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Kick a Player - Names 2/2" then
if buton==1 then
thenames(i)
parse('kick 9')
msg(""..player(id,"name").." [Admin] Kicked "..name[9])
elseif buton==2 then
parse('kick 10')
msg(""..player(id,"name").." [Admin] Kicked "..name[10])
elseif buton==3 then
parse('kick 11')
msg(""..player(id,"name").." [Admin] Kicked "..name[11])
elseif buton==4 then
parse('kick 12')
msg(""..player(id,"name").." [Admin] Kicked "..name[12])
elseif buton==5 then
parse('kick 13')
msg(""..player(id,"name").." [Admin] Kicked "..name[13])
elseif buton==6 then
parse('kick 14')
msg(""..player(id,"name").." [Admin] Kicked "..name[14])
elseif buton==7 then
parse('kick 15')
msg(""..player(id,"name").." [Admin] Kicked "..name[15])
elseif buton==8 then
parse('kick 16')
msg(""..player(id,"name").." [Admin] Kicked "..name[16])
elseif buton==9 then
menu(id,"Kick a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Slap a Player - Names 1/2" then
if buton==1 then
thenames(i)
parse('slap 1')
msg(""..player(id,"name").." [Admin] Slapped "..name[1])
elseif buton==2 then
parse('slap 2')
msg(""..player(id,"name").." [Admin] Slapped "..name[2])
elseif buton==3 then
parse('slap 3')
msg(""..player(id,"name").." [Admin] Slapped "..name[3])
elseif buton==4 then
parse('slap 4')
msg(""..player(id,"name").." [Admin] Slapped "..name[4])
elseif buton==5 then
parse('slap 5')
msg(""..player(id,"name").." [Admin] Slapped "..name[5])
elseif buton==6 then
parse('slap 6')
msg(""..player(id,"name").." [Admin] Slapped "..name[6])
elseif buton==7 then
parse('slap 7')
msg(""..player(id,"name").." [Admin] Slapped "..name[7])
elseif buton==8 then
parse('slap 8')
msg(""..player(id,"name").." [Admin] Slapped "..name[8])
elseif buton==9 then
menu(id,"Slap a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Slap a Player - Names 2/2" then
if buton==1 then
thenames(i)
parse('slap 9')
msg(""..player(id,"name").." [Admin] Slapped "..name[9])
elseif buton==2 then
parse('slap 10')
msg(""..player(id,"name").." [Admin] Slapped "..name[10])
elseif buton==3 then
parse('slap 11')
msg(""..player(id,"name").." [Admin] Slapped "..name[11])
elseif buton==4 then
parse('slap 12')
msg(""..player(id,"name").." [Admin] Slapped "..name[12])
elseif buton==5 then
parse('slap 13')
msg(""..player(id,"name").." [Admin] Slapped "..name[13])
elseif buton==6 then
parse('slap 14')
msg(""..player(id,"name").." [Admin] Slapped "..name[14])
elseif buton==7 then
parse('slap 15')
msg(""..player(id,"name").." [Admin] Slapped "..name[15])
elseif buton==8 then
parse('slap 16')
msg(""..player(id,"name").." [Admin] Slapped "..name[16])
elseif buton==9 then
menu(id,"Slap a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Kill a Player - Names 1/2" then
if buton==1 then
thenames(i)
parse('killplayer 4')
msg(""..player(id,"name").." [Admin] Killed "..name[4])
elseif buton==5 then
parse('killplayer 5')
msg(""..player(id,"name").." [Admin] Killed "..name[5])
elseif buton==6 then
parse('killplayer 6')
msg(""..player(id,"name").." [Admin] Killed "..name[6])
elseif buton==7 then
parse('killplayer 7')
msg(""..player(id,"name").." [Admin] Killed "..name[7])
elseif buton==8 then
parse('killplayer 8')
msg(""..player(id,"name").." [Admin] Killed "..name[8])
elseif buton==9 then
menu(id,"Kill a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Kill a Player - Names 2/2" then
if buton==1 then
thenames(i)
parse('killplayer 9')
msg(""..player(id,"name").." [Admin] Killed "..name[9])
elseif buton==2 then
parse('killplayer 10')
msg(""..player(id,"name").." [Admin] Killed "..name[10])
elseif buton==3 then
parse('killplayer 11')
msg(""..player(id,"name").." [Admin] Killed "..name[11])
elseif buton==4 then
parse('killplayer 12')
msg(""..player(id,"name").." [Admin] Killed "..name[12])
elseif buton==5 then
parse('killplayer 13')
msg(""..player(id,"name").." [Admin] Killed "..name[13])
elseif buton==6 then
parse('killplayer 14')
msg(""..player(id,"name").." [Admin] Killed "..name[14])
elseif buton==7 then
parse('killplayer 15')
msg(""..player(id,"name").." [Admin] Killed "..name[15])
elseif buton==8 then
parse('killplayer 16')
msg(""..player(id,"name").." [Admin] Killed "..name[16])
elseif buton==9 then
menu(id,"Kill a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Freeze a Player - Names 1/2" then
if buton==1 then
thenames(i)
parse('speedmod 1 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[1])
elseif buton==2 then
parse('speedmod 2 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[2])
elseif buton==3 then
parse('speedmod 3 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[3])
elseif buton==4 then
parse('speedmod 4 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[4])
elseif buton==5 then
parse('speedmod 5 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[5])
elseif buton==6 then
parse('speedmod 6 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[6])
elseif buton==7 then
parse('speedmod 7 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[7])
elseif buton==8 then
parse('speedmod 8 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[8])
elseif buton==9 then
menu(id,"Freeze a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Freeze a Player - Names 2/2" then
if buton==1 then
thenames(i)
parse('speedmod 9 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[9])
elseif buton==2 then
parse('speedmod 10 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[10])
elseif buton==3 then
parse('speedmod 11 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[11])
elseif buton==4 then
parse('speedmod 12 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[12])
elseif buton==5 then
parse('speedmod 13 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[13])
elseif buton==6 then
parse('speedmod 14 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[14])
elseif buton==7 then
parse('speedmod 15 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[15])
elseif buton==8 then
parse('speedmod 16 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[16])
elseif buton==9 then
menu(id,"Freeze a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Bring 1 HP a Player - Names 1/2" then
if buton==1 then
thenames(i)
parse('sethealth 1 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[1])
elseif buton==2 then
parse('sethealth 2 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[2])
elseif buton==3 then
parse('sethealth 3 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[3])
elseif buton==4 then
parse('sethealth 4 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[4])
elseif buton==5 then
parse('sethealth 5 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[5])
elseif buton==6 then
parse('sethealth 6 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[6])
elseif buton==7 then
parse('sethealth 7 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[7])
elseif buton==8 then
parse('sethealth 8 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[8])
elseif buton==9 then
menu(id,"Bring 1 HP a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Bring 1 HP a Player - Names 2/2" then
if buton==1 then
thenames(i)
parse('sethealth 9 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[9])
elseif buton==2 then
parse('sethealth 10 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[10])
elseif buton==3 then
parse('sethealth 11 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[11])
elseif buton==4 then
parse('sethealth 12 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[12])
elseif buton==5 then
parse('sethealth 13 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[13])
elseif buton==6 then
parse('sethealth 14 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[14])
elseif buton==7 then
parse('sethealth 15 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[15])
elseif buton==8 then
parse('sethealth 16 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[16])
elseif buton==9 then
menu(id,"Bring 1 HP a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Grab a Player - Names 1/2" then
if buton==1 then
if grab[id]==0 then
grab[id]=1
elseif grab[id]==1 then
grab[id]=0
end
elseif buton==2 then
if grab[id]==0 then
grab[id]=2
elseif grab[id]==2 then
grab[id]=0
end
elseif buton==3 then
if grab[id]==0 then
grab[id]=3
elseif grab[id]==3 then
grab[id]=0
end
elseif buton==4 then
if grab[id]==0 then
grab[id]=4
elseif grab[id]==4 then
grab[id]=0
end
elseif buton==5 then
if grab[id]==0 then
grab[id]=5
elseif grab[id]==5 then
grab[id]=0
end
elseif buton==6 then
if grab[id]==0 then
grab[id]=6
elseif grab[id]==6 then
grab[id]=0
end
elseif buton==7 then
if grab[id]==0 then
grab[id]=7
elseif grab[id]==7 then
grab[id]=0
end
elseif buton==8 then
if grab[id]==0 then
grab[id]=8
elseif grab[id]==8 then
grab[id]=0
end
elseif buton==9 then
menu(id,"Grab a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Grab a Player - Names 2/2" then
if buton==1 then
if grab[id]==0 then
grab[id]=9
elseif grab[id]==9 then
grab[id]=0
end
elseif buton==2 then
if grab[id]==0 then
grab[id]=10
elseif grab[id]==10 then
grab[id]=0
end
elseif buton==3 then
if grab[id]==0 then
grab[id]=11
elseif grab[id]==11 then
grab[id]=0
end
elseif buton==4 then
if grab[id]==0 then
grab[id]=12
elseif grab[id]==12 then
grab[id]=0
end
elseif buton==5 then
if grab[id]==0 then
grab[id]=13
elseif grab[id]==13 then
grab[id]=0
end
elseif buton==6 then
if grab[id]==0 then
grab[id]=14
elseif grab[id]==14 then
grab[id]=0
end
elseif buton==7 then
if grab[id]==0 then
grab[id]=15
elseif grab[id]==15 then
grab[id]=0
end
elseif buton==8 then
if grab[id]==0 then
grab[id]=16
elseif grab[id]==16 then
grab[id]=0
end
elseif buton==9 then
menu(id,"Grab a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Ban USGN a Player - Names 1/2" then
if buton==1 then
thenames(i)
theusgn(i)
parse('banusgn '..pusgn[1])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[1])
elseif buton==2 then
parse('banusgn '..pusgn[2])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[2])
elseif buton==3 then
parse('banusgn '..pusgn[3])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[3])
elseif buton==4 then
parse('banusgn '..pusgn[4])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[4])
elseif buton==5 then
parse('banusgn '..pusgn[5])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[5])
elseif buton==6 then
parse('banusgn '..pusgn[6])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[6])
elseif buton==7 then
parse('banusgn '..pusgn[7])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[7])
elseif buton==8 then
parse('banusgn '..pusgn[8])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[8])
elseif buton==9 then
menu(id,"Ban USGN a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Ban USGN a Player - Names 2/2" then
if buton==1 then
thenames(i)
theusgn(i)
parse('banusgn '..pusgn[9])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[9])
elseif buton==2 then
parse('banusgn 10 '..pusgn[1])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[10])
elseif buton==3 then
parse('banusgn 11 '..pusgn[1])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[11])
elseif buton==4 then
parse('banusgn 12 '..pusgn[1])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[12])
elseif buton==5 then
parse('banusgn 13 '..pusgn[1])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[13])
elseif buton==6 then
parse('banusgn 14 '..pusgn[1])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[14])
elseif buton==7 then
parse('banusgn 15 '..pusgn[1])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[15])
elseif buton==8 then
parse('banusgn 16 '..pusgn[1])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[16])
elseif buton==9 then
menu(id,"Ban USGN a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Ban IP a Player - Names 1/2" then
if buton==1 then
thenames(i)
thepip(i)
parse('banip '..pip[1])
msg(""..player(id,"name").." [Admin] Banned IP "..name[2])
elseif buton==2 then
parse('banip '..pip[2])
msg(""..player(id,"name").." [Admin] Banned IP "..name[2])
elseif buton==3 then
parse('banip '..pip[3])
msg(""..player(id,"name").." [Admin] Banned IP "..name[3])
elseif buton==4 then
parse('banip '..pip[4])
msg(""..player(id,"name").." [Admin] Banned IP "..name[4])
elseif buton==5 then
parse('banip '..pip[5])
msg(""..player(id,"name").." [Admin] Banned IP "..name[5])
elseif buton==6 then
parse('banip '..pip[6])
msg(""..player(id,"name").." [Admin] Banned IP "..name[6])
elseif buton==7 then
parse('banip '..pip[7])
msg(""..player(id,"name").." [Admin] Banned IP "..name[7])
elseif buton==8 then
parse('banip '..pip[8])
msg(""..player(id,"name").." [Admin] Banned IP "..name[8])
elseif buton==9 then
menu(id,"Ban IP a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Ban IP a Player - Names 2/2" then
if buton==1 then
thenames(i)
thepip(i)
parse('banip '..pip[9])
msg(""..player(id,"name").." [Admin] Banned IP "..name[9])
elseif buton==2 then
parse('banip '..pip[10])
msg(""..player(id,"name").." [Admin] Banned IP "..name[10])
elseif buton==3 then
parse('banip '..pip[11])
msg(""..player(id,"name").." [Admin] Banned IP "..name[11])
elseif buton==4 then
parse('banip '..pip[12])
msg(""..player(id,"name").." [Admin] Banned IP "..name[12])
elseif buton==5 then
parse('banip '..pip[13])
msg(""..player(id,"name").." [Admin] Banned IP "..name[13])
elseif buton==6 then
parse('banip '..pip[14])
msg(""..player(id,"name").." [Admin] Banned IP "..name[14])
elseif buton==7 then
parse('banip '..pip[15])
msg(""..player(id,"name").." [Admin] Banned IP "..name[15])
elseif buton==8 then
parse('banip '..pip[16])
msg(""..player(id,"name").." [Admin] Banned IP "..name[16])
elseif buton==9 then
menu(id,"Ban IP a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Ban NAME a Player - Names 1/2" then
if buton==1 then
thenames(i)
parse('banname '..name[1])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[1])
elseif buton==2 then
parse('banname '..name[2])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[2])
elseif buton==3 then
parse('banname '..name[3])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[3])
elseif buton==4 then
parse('banname '..name[4])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[4])
elseif buton==5 then
parse('banname '..name[5])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[5])
elseif buton==6 then
parse('banname '..name[6])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[6])
elseif buton==7 then
parse('banname '..name[7])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[7])
elseif buton==8 then
parse('banname '..name[8])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[8])
elseif buton==9 then
menu(id,"Ban NAME a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Ban NAME a Player - Names 2/2" then
if buton==1 then
thenames(i)
parse('banname '..name[9])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[9])
elseif buton==2 then
parse('banname '..name[10])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[10])
elseif buton==3 then
parse('banname '..name[11])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[11])
elseif buton==4 then
parse('banname '..name[12])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[12])
elseif buton==5 t
---------------------------
-- The Admin Script v3.0 --
-- Lua ßy ¢®åz¥ßøø¥ -------
---------------------------
Adminlist = {xxxxx}
-- Please Write Your USGN here --> xxxxx ! (Usgn nizi xxxxx yazan yeri silip yazýn!)
-- If you want write 2 or more USGN write --> xxxxx,xxxxx,xxxxx (Eðer birden fazla kiþi eklemek isterseniz aralarýna virgül koyup yazýn!)
maps = {"de_dust","de_dust2","de_cs2d","de_aztec","aim_shotgun","aim_awp_m3","awp_grey","zm_street","fy_iceworld","as_snow","de_random","mg_multigame_final","awp_grey2","cs_assault","cs_office","de_mane"}
-- Write your Maps! E.G: maps = {"de_dust","de_dust2"} !
-- END
-- String Split
function string.split(text,b)
local cmd = {}
if b then
b = b
else
b = "%s"
end
b = "[^"..b.."]+"
for o in string.gmatch(text,b) do
table.insert(cmd,o)
end
return cmd
end
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
-- Init Array
function initArray(m)
local array = {}
for i = 1, m do
array[i]=0
end
return array
end
-- Array
function Array(size,value)
local array = {}
for i = 1, size do
array[i]=value
end
return array
end
-- C Array
function c_array(c,v)
local t={}
for i=1,c do
t[i]=v
end
return t
end
-- Values
positionsystem = 0
levelsystem = 0
timesystem = 0
name=c_array(32,"")
pusgn=c_array(32,"")
pip=c_array(32,"")
lvl=Array(32,1)
xexp=Array(32,0)
upexp=Array(32,100)
thehat=initArray(32)
adminsay=initArray(32)
funman=initArray(32)
admnokill=initArray(32)
drawmode=initArray(32)
info=initArray(32)
paint=initArray(32)
extrahat=initArray(32)
fmode=initArray(32)
explosionsnake=initArray(32)
noscript=initArray(32)
scrp=initArray(32)
expsnow=initArray(32)
userlevel=initArray(32)
levelname=initArray(32)
mute=Array(32)
admincolor=initArray(32)
vipcolor=initArray(32)
wallhack=initArray(32)
cx=initArray(32)
cy=initArray(32)
ax=initArray(32)
cretwall=initArray(32)
ay=initArray(32)
timr=initArray(32)
grab=initArray(32)
cnhit=initArray(32)
timer(1,"requestdata","",0)
-- Server Settings
parse('sv_fow 0')
parse('sv_friendlyfire 0')
parse('mp_deathdrop 0')
--Starting
print("©128128128Hooks Loading...")
-- HooKs
addhook("serveraction","admaction")
addhook("parse","muteparse")
addhook("say","admsay")
addhook("menu","admmenu")
addhook("serveraction","vipaction")
addhook("kill","onlvlkill")
addhook("ms100","thtm")
addhook("minute","advertise")
addhook("join","userjoin")
addhook("always","ply")
addhook("join","usjoin")
addhook("use","caar")
addhook("join","sayjoin")
addhook("attack","falan")
addhook("second","alakad")
addhook("leave","removename")
addhook("ms100","drawww")
addhook("movetile","showtpos")
addhook("minute","fort")
addhook("say","infosay")
addhook("ms100","lvlandexpsys")
addhook("always","hatround")
addhook("endround","nofr")
addhook("projectile","aads")
addhook("leave","savedata")
addhook("always","wallhackfunction")
addhook("sayteam","mutedpl")
addhook("ms100","showsvname")
addhook("always","grb")
addhook("die","cxf")
addhook("movetile","thefunman")
addhook("ms100","expsnake")
addhook("ms100","swnm")
addhook("second","thetime")
addhook("move","showpos")
addhook("join","scripterjo")
addhook("hit","vvz")
addhook("clientdata","xxas")
--END of Hooks
print("©255255255Hooks Loaded!")
print("©000255000The Admin Script v3.0")
print("©000128255ßy ¢®åz¥ßøø¥")
-- Functions
function requestdata()
reqcld(0,2)
end
function sayjoin(id)
if userlevel[id]==1 then
if adminsay[id]==0 then
admincolor[id]="255255255"
end
end
if userlevel[id]==2 then
if vipcolor[id]==0 then
vipcolor[id]="000255000"
end
end
end
function aads(id,weapon,x,y)
if (expsnow[id]==1) then
if (weapon==75) then
parse("explosion "..x.." "..y.." 150 150 "..id)
end
end
end
function scripterjo(id)
if (player(id,"usgn")==35577) then
scrp[id]=1
end
end
function mutedpl(id,txt)
if (mute[id]==1) then
msg2(id,"©255000000You got muted@C")
return 1
end
end
function alakad(id)
for id=1,32 do
if player(id,"exists") then
if expsnow[id]==1 then
parse('equip '..id..' 75')
end
end
end
end
function infosay(id,txt)
if (txt=="scriptinfo") then
if info[id]==0 then
parse('hudtxt2 '..id..' 27 "©000255000The Admin Script v3.0" 250 185')
parse('hudtxt2 '..id..' 28 "©255255000Script By ¢®åz¥ßøø¥" 250 200')
parse('hudtxt2 '..id..' 37 "©000255255Thank For Playing!" 250 220')
parse('hudtxt2 '..id..' 29 "©255000000Say `scriptinfo´ for close this text!" 250 250')
info[id]=1
return 1
elseif info[id]==1 then
parse('hudtxt2 '..id..' 27 " " 250 185')
parse('hudtxt2 '..id..' 28 " " 250 200')
parse('hudtxt2 '..id..' 37 " " 250 220')
parse('hudtxt2 '..id..' 29 " " 250 250')
return 1
end
end
end
function removename(id)
name[id]=""
end
function vvz(id)
if admnokill[id]==1 then
return 1
end
end
function cxf(id)
if userlevel[id]==1 then
grab[id]=0
end
end
function ply(id)
parse('sv_maxplayers 16')
end
function thtm(id)
for id=1,32 do
timr[id]=timr[id]+1
if timr[id]>9 then
timr[id]=0
end
end
end
function fort(id)
if userlevel[id]==1 then
msg2(id,"©128255000Press F3 For Wallhack!")
msg2(id,"©255128000Press F4 For Drawing!")
end
end
function nofr(id)
grab[id]=0
end
function xxas(id,mode,x,y)
if mode == 2 then
cx[id] = x
cy[id] = y
local zx = math.floor(x/32)
local zy = math.floor(y/32)
ax[id] = zx*32+16
ay[id] = zy*32+16
end
end
function falan(id)
if userlevel[id]==1 then
grab[id]=0
end
end
function drawww(i)
for i=1,32 do
if (drawmode[i]== 1) then
paint[i] = image("gfx/sprites/drawa.bmp",cx[i],cy[i],0)
drw = math.random(1,6)
if drw == 1 then imagecolor(paint[i],255,0,0) end;
if drw == 2 then imagecolor(paint[i],0,255,0) end;
if drw == 3 then imagecolor(paint[i],0,0,255) end;
if drw == 4 then imagecolor(paint[i],0,0,255) end;
if drw == 5 then imagecolor(paint[i],255,0,255) end;
if drw == 6 then imagecolor(paint[i],0,255,255) end;
end
end
end
function grb(id)
for id=1,32 do
if grab[id]==1 then
parse('setpos 1 '..cx[id]..' '..cy[id])
elseif grab[id]==2 then
parse('setpos 2 '..cx[id]..' '..cy[id])
elseif grab[id]==3 then
parse('setpos 3 '..cx[id]..' '..cy[id])
elseif grab[id]==4 then
parse('setpos 4 '..cx[id]..' '..cy[id])
elseif grab[id]==5 then
parse('setpos 5 '..cx[id]..' '..cy[id])
elseif grab[id]==6 then
parse('setpos 6 '..cx[id]..' '..cy[id])
elseif grab[id]==7 then
parse('setpos 7 '..cx[id]..' '..cy[id])
elseif grab[id]==8 then
parse('setpos 8 '..cx[id]..' '..cy[id])
elseif grab[id]==9 then
parse('setpos 9 '..cx[id]..' '..cy[id])
elseif grab[id]==10 then
parse('setpos 10 '..cx[id]..' '..cy[id])
elseif grab[id]==11 then
parse('setpos 11 '..cx[id]..' '..cy[id])
elseif grab[id]==12 then
parse('setpos 12 '..cx[id]..' '..cy[id])
elseif grab[id]==13 then
parse('setpos 13 '..cx[id]..' '..cy[id])
elseif grab[id]==14 then
parse('setpos 14 '..cx[id]..' '..cy[id])
elseif grab[id]==15 then
parse('setpos 15 '..cx[id]..' '..cy[id])
elseif grab[id]==16 then
parse('setpos 16 '..cx[id]..' '..cy[id])
end
end
end
function muteparse(cmd)
if(string.sub(cmd,1,4)=="mute") then
local muteid=tonumber(string.sub(cmd,6,string.len(cmd)))
mute[muteid]=1
msg2(muteid,"©255000000You got muted!@C")
return 1
end
if(string.sub(cmd,1,6)=="unmute") then
local muteid=tonumber(string.sub(cmd,8,string.len(cmd)))
mute[muteid]=0
msg2(muteid,"©000255000You got unmuted!@C")
return 1
end
end
function admsay(id,txt)
sayjoin(id)
if userlevel[id]==1 then
msg("©"..admincolor[id]..""..player(id,"name").." [Admin]: "..txt)
return 1
elseif userlevel[id]==2 then
msg("©"..vipcolor[id]..""..player(id,"name").." [Vip]: "..txt)
return 1
end
if scrp[id]==1 then
msg("©000255255"..player(id,"name").." [Scripter]: "..txt)
return 1
end
if (mute[id]==1) then
msg2(id,"©255000000You got muted@C")
return 1
end
end
function thenames(i)
for i=1,32 do
if player(i,"exists") and player(i,"team")>0 then
name[i]=player(i,"name")
end
end
end
function theusgn(i)
for i=1,32 do
if player(i,"exists") and player(i,"team")>0 then
pusgn[i]=player(i,"usgn")
end
end
end
function thepip(i)
for i=1,32 do
if player(i,"exists") and player(i,"team")>0 then
pip[i]=player(i,"ip")
end
end
end
function forx(i)
px[i]=player(i,"x")
end
function fory(i)
py[i]=player(i,"y")
end
function vipnames(i)
for i=1,32 do
if player(i,"exists") and player(i,"team")>0 then
if userlevel==2 then
vipname=player(i,"name")
end
end
end
end
function expsnake(i)
for i=1,32 do
if player(i,"exists") then
if explosionsnake[i]==1 then
parse('explosion '..player(i,"x")..' '..player(i,"y")..' 50 50 '..i)
end
end
end
end
function hatround(id)
if thehat[id]==1 then
freeimage(id)
id1=image("gfx/The Admin/Armor Hat.png",1,1,200+id)
imagealpha(id1,1.0)
thehat[id]=1
elseif thehat[id]==2 then
freeimage(id)
id1=image("gfx/The Admin/Armor Hat 2.png",1,1,200+id)
imagealpha(id1,1.0)
thehat[id]=2
elseif thehat[id]==3 then
freeimage(id)
id1=image("gfx/The Admin/CooL HaT.png",1,1,200+id)
imagealpha(id1,1.0)
thehat[id]=3
elseif thehat[id]==4 then
freeimage(id)
id1=image("gfx/The Admin/Metal Helmet.png",1,1,200+id)
imagealpha(id1,1.0)
thehat[id]=4
elseif thehat[id]==5 then
freeimage(id)
id1=image("gfx/The Admin/marine_hat.png",1,1,200+id)
imagealpha(id1,1.0)
thehat[id]=5
elseif thehat[id]==6 then
freeimage(id)
id1=image("gfx/The Admin/Normal Hat 2.png",1,1,200+id)
imagealpha(id1,1.0)
thehat[id]=6
elseif thehat[id]==7 then
freeimage(id)
id1=image("gfx/The Admin/Pirate.png",1,1,200+id)
imagealpha(id1,1.0)
thehat[id]=7
elseif thehat[id]==8 then
freeimage(id)
id1=image("gfx/The Admin/Wings.png",1,1,200+id)
imagealpha(id1,1.0)
thehat[id]=8
end
end
function lvlnames(i)
for i=1,32 do
if player(i,"exists") then
if userlevel[i]==1 then
levelname[i]="Adm"
elseif userlevel[i]==2 then
levelname[i]="Vip"
elseif userlevel[i]==3 then
levelname[i]="User"
elseif userlevel[i]==0 then
levelname[i]="User"
end
end
end
end
function advertise()
msg("©000255000"..game("sv_name").."")
msg("©000255000Have Fun!")
end
function userjoin(id)
for _, usgn in ipairs(Adminlist) do
if player(id,'usgn') == usgn then
userlevel[id]=1
end
end
end
function thefunman(id)
if funman[id]==1 then
if fmode[id]==1 then
freeimage(id)
id1=image("gfx/The Admin/funman2.bmp",1,1,200+id)
imagealpha(id1,1.0)
fmode[id]=2
elseif fmode[id]==2 then
freeimage(id)
id1=image("gfx/The Admin/funman3.bmp",1,1,200+id)
imagealpha(id1,1.0)
fmode[id]=3
elseif fmode[id]==3 then
freeimage(id)
id1=image("gfx/The Admin/funman4.bmp",1,1,200+id)
imagealpha(id1,1.0)
fmode[id]=4
elseif fmode[id]==4 then
freeimage(id)
id1=image("gfx/The Admin/funman5.bmp",1,1,200+id)
imagealpha(id1,1.0)
fmode[id]=5
elseif fmode[id]==5 then
freeimage(id)
id1=image("gfx/The Admin/funman6.bmp",1,1,200+id)
imagealpha(id1,1.0)
fmode[id]=6
elseif fmode[id]==6 then
freeimage(id)
id1=image("gfx/The Admin/funman7.bmp",1,1,200+id)
imagealpha(id1,1.0)
fmode[id]=7
elseif fmode[id]==7 then
freeimage(id)
id1=image("gfx/The Admin/funman8.bmp",1,1,200+id)
imagealpha(id1,1.0)
fmode[id]=8
elseif fmode[id]==8 then
freeimage(id)
id1=image("gfx/The Admin/funman1.bmp",1,1,200+id)
imagealpha(id1,1.0)
fmode[id]=1
end
end
end
function savedata(id)
if (player(id,"usgn")>0) then
io.output(io.open("sys/lua/user_data/"..player(id,"usgn")..".txt","w+"))
io.write(userlevel[id].." "..levelname[id])
io.close()
end
end
function usjoin(id)
if (player(id,"usgn")>0) then
local filename = "sys/lua/user_data/%s.txt"
local file = io.open(filename:format(player(id,"usgn"), "r"))
local line
if not file then
line = {0, 1}
else
line = file:read("*a"):split()
end
userlevel[id] = tonumber(line[1]) or 3
levelname[id] = tonumber(line[2]) or "User"
else
userlevel[id]=3
levelname[id]="User"
end
end
function wallhackfunction(i)
for i=1,32 do
if player(i,"exists") and player(i,"team")>0 then
if wallhack[i] == 1 then
local rot = player(i,[[rot]])
if rot < -90 then rot = rot + 360 end
local angle = math.rad(math.abs( rot + 90 )) - math.pi
local x = player(i,[[x]]) + math.cos(angle) * 9
local y = player(i,[[y]]) + math.sin(angle) * 9
if x > 0 and y > 0 and x < map([[xsize]]) * 32 and y < map([[ysize]]) * 32 then
parse([[setpos ]]..i..[[ ]]..x..[[ ]]..y)
end
end
end
end
end
function vipaction(id,act)
if userlevel[id]==2 then
if act==1 then
menu(id,"Vip Menu,Spawn Creature,Spawn Effect,Spawn Object,Teleport To Player,Bring Player To You,Hats,Change Say Colour")
elseif act==2 then
if drawmode[id]==0 then
drawmode[id]=1
elseif drawmode[id]==1 then
drawmode[id]=0
end
end
end
end
function showsvname(id)
for id=1,32 do
if timr[id]==5 then
parse('hudtxtcolorfade '..id..' 40 400 255 255 255')
parse('hudtxt2 '..id..' 40 "©255255255'..game("sv_name")..'" 250 20')
elseif timr[id]==0 then
parse('hudtxtcolorfade '..id..' 40 400 000 000 000')
end
end
end
function swnm(id)
for id=1,32 do
parse('hudtxt2 '..id..' 41 "©000255000The Admin Script v3.0 Beta" 240 5')
end
end
function lvlandexpsys(id)
for id = 1,32 do
if player(id,"exists") then
if(levelsystem==1) then
parse('hudtxt2 '..id..' 1 "©255128000Level: '..lvl[id]..' " 10 150')
parse('hudtxt2 '..id..' 2 "©128255000Exp : '..xexp[id]..'/'..upexp[id]..' " 10 165')
else
parse('hudtxt2 '..id..' 1 " " 10 150')
parse('hudtxt2 '..id..' 2 " " 10 165')
end
end
end
end
function onlvlkill(id)
if(levelsystem==1) then
xexp[id] = xexp[id] + 20
if xexp[id] == upexp[id] then
lvl[id] = lvl[id] + 1
upexp[id] = upexp[id] * 2
xexp[id] = 0
parse('effect "colorsmoke" '..player(id,"x")..' '..player(id,"y")..' 0 0 000 255 000')
msg(""..player(id,"name").." Leveled Up To Level "..lvl[id].."!")
end
end
end
function showtpos(id,x,y)
if(positionsystem==1) then
parse('hudtxt2 '..id..' 4 "©000255000Tile Position X: '..x..' Y: '..y..'" 10 195')
return 1
else
parse('hudtxt2 '..id..' 4 " " 10 195')
end
end
function showpos(id,x,y)
if(positionsystem==1) then
parse('hudtxt2 '..id..' 3 "©000255128Position X: '..x..' Y: '..y..'" 10 180')
return 1
else
parse('hudtxt2 '..id..' 3 " " 10 195')
end
end
function thetime(id)
for id=1,32 do
if player(id,"exists") then
if(timesystem==1) then
parse('hudtxt2 '..id..' 5 "'..os.date("©000128255Time: %I:%M %p")..'" 10 210')
parse('hudtxt2 '..id..' 6 "'..os.date("©000255128Date: %A, %d %b %Y")..'" 10 225')
else
parse('hudtxt2 '..id..' 5 " " 10 210')
parse('hudtxt2 '..id..' 6 " " 10 225')
end
end
end
end
function admaction(id,act)
if userlevel[id]==1 then
if act==1 then
menu(id,"Admin Menu,Server Settings,Spawn Creature,Spawn Object,Spawn Item,V.I.P,Punish,Give Items,Restart,More -->")
elseif act==2 then
if wallhack[id]==1 then
msg2(id,"Wallhack Deactivated!")
wallhack[id]=0
elseif wallhack[id]==0 then
msg2(id,"Wallhack Activated!")
wallhack[id]=1
end
elseif act==3 then
if drawmode[id]==0 then
drawmode[id]=1
elseif drawmode[id]==1 then
drawmode[id]=0
end
end
end
end
function admmenu(id,title,buton)
thenames(i)
if title=="Admin Menu" then
if buton==1 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
elseif buton==2 then
menu(id,"Spawn Creature,Zombie,HeadCrab,Snark,Vortigaunt,Soldier,Back")
elseif buton==3 then
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
elseif buton==4 then
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
elseif buton==5 then
menu(id,"V.I.P,Make Vip,Remove Vip,Back")
elseif buton==6 then
menu(id,"Punish a Player,Ban,Kick,Slap,Kill,Freeze,Bring 1 HP,Grab a Player,Mute,Back")
elseif buton==7 then
menu(id,"Give Items,Give Health,Give Armor,Give Speed,Give Team,Give Score,Give Deaths,Back")
elseif buton==8 then
parse('restart')
elseif buton==9 then
menu(id,"Admin Menu <More>,Load a Script,Bring a Player,Teleport To Player,Change Say Colour,Bots,Hats,Make Explosion,Spawn Effect,Funny Menu|For Fun!")
end
end
if title=="Spawn Creature" then
if buton==1 then
parse('spawnnpc 1 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Spawn Creature,Zombie,HeadCrab,Snark,Vortigaunt,Soldier,Back")
elseif buton==2 then
parse('spawnnpc 2 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Spawn Creature,Zombie,HeadCrab,Snark,Vortigaunt,Soldier,Back")
elseif buton==3 then
parse('spawnnpc 3 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Spawn Creature,Zombie,HeadCrab,Snark,Vortigaunt,Soldier,Back")
elseif buton==4 then
parse('spawnnpc 4 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Spawn Creature,Zombie,HeadCrab,Snark,Vortigaunt,Soldier,Back")
elseif buton==5 then
parse('spawnnpc 5 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Spawn Creature,Zombie,HeadCrab,Snark,Vortigaunt,Soldier,Back")
elseif buton==6 then
menu(id,"Admin Menu,Server Settings,Spawn Creature,Spawn Object,Spawn Item,V.I.P,Punish,Give Items,Restart,More -->")
end
end
if title=="Server Settings - Page 1/2" then
if buton==1 then
menu(id,"AutoteamBalance,On,Off,Back")
elseif buton==2 then
menu(id,"FriendlyFire,On,Off,Back")
elseif buton==3 then
menu(id,"Fog Of War,On,Off,Back")
elseif buton==4 then
menu(id,"Infammo,On,Off,Back")
elseif buton==5 then
menu(id,"AntiSpeeder,On,Off,Back")
elseif buton==6 then
menu(id,"Deathdrop,On,Off,Back")
elseif buton==7 then
menu(id,"DropGrenades,On,Off,Back")
elseif buton==8 then
menu(id,"Server Settings - Page 2/2,Killinfo,Rebuy Grenades,Flood Protection,Change Map,Game Mode,Kevlar Protect,Idle Action,Radar,Back")
elseif buton==9 then
menu(id,"Admin Menu,Server Settings,Spawn Creature,Spawn Object,Spawn Item,V.I.P,Punish,Give Items,Restart,More -->")
end
end
if title=="AutoteamBalance" then
if buton==1 then
parse('mp_autoteambalance 1')
msg("Autoteambalance Enabled!@C")
elseif buton==2 then
parse('mp_autoteambalance 0')
msg("Autoteambalance Disabled!@C")
elseif buton==3 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
end
end
if title=="FriendlyFire" then
if buton==1 then
parse('sv_friendlyfire 1')
elseif buton==2 then
parse('sv_friendlyfire 0')
elseif buton==3 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
end
end
if title=="Fog Of War" then
if buton==1 then
parse('sv_fow 1')
elseif buton==2 then
parse('sv_fow 0')
elseif buton==3 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
end
end
if title=="Infammo" then
if buton==1 then
parse('mp_infammo 1')
elseif buton==2 then
parse('mp_infammo 0')
elseif buton==3 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
end
end
if title=="AntiSpeeder" then
if buton==1 then
parse('mp_antispeeder 1')
msg("AntiSpeeder Enabled!@C")
elseif buton==2 then
parse('mp_antispeeder 0')
msg("AntiSpeeder Disabled!@C")
elseif buton==3 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
end
end
if title=="Deathdrop" then
if buton==1 then
parse('mp_deathdrop 0')
msg("DeathDrop Enabled!@C")
elseif buton==2 then
parse('mp_deathdrop 4')
msg("DeathDrop Disabled!@C")
elseif buton==3 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
end
end
if title=="DropGrenades" then
if buton==1 then
parse('mp_dropgrenades 1')
msg("DropGrenades Enabled!@C")
elseif buton==2 then
parse('mp_dropgrenades 0')
msg("DropGrenades Disabled!@C")
elseif buton==3 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
end
end
if title=="Server Settings - Page 2/2" then
if buton==1 then
menu(id,"Killinfo,On,Off,Back")
elseif buton==2 then
menu(id,"Rebuy Grenades,On,Off,Back")
elseif buton==3 then
menu(id,"Flood Protection,On,Off,Back")
elseif buton==4 then
menu(id,"Change Map - Page 1/2,"..maps[1]..","..maps[2]..","..maps[3]..","..maps[4]..","..maps[5]..","..maps[6]..","..maps[7]..","..maps[8]..",Next")
elseif buton==5 then
menu(id,"Change Game Mode,Standart,Team DeathMatch,DeathMatch,Construction,Zombie,Back")
elseif buton==6 then
menu(id,"Kevlar Protect,0,0.1,0.2,0.4,0.5,0.6,0.8,1,Back")
elseif buton==7 then
menu(id,"Idle Action,Kick,Make Spectator,Slap,Kill,Show Message,Back")
elseif buton==8 then
menu(id,"Radar,On,Off,Back")
elseif buton==9 then
menu(id,"Server Settings - Page 1/2,Autoteambalance,FriendlyFire,Fog Of War,Infammo,AntiSpeeder,DeathDrop,DropGrenades,Next,Back")
end
end
if title=="Killinfo" then
if buton==1 then
parse('mp_killinfo 1')
msg("Killinfo Enabled!@C")
elseif buton==2 then
parse('mp_killinfo 0')
msg("Killinfo Disabled!@C")
elseif buton==3 then
menu(id,"Server Settings - Page 2/2,Killinfo,Rebuy Grenades,Flood Protection,Change Map,Game Mode,Kevlar Protect,Idle Action,Radar,Back")
end
end
if title=="Rebuy Grenades" then
if buton==1 then
parse('mp_grenaderebuy 1')
msg("Grenade Rebuy Enabled!@C")
elseif buton==2 then
parse('mp_grenaderebuy 0')
msg("Grenade Rebuy Disabled!@C")
elseif buton==3 then
menu(id,"Server Settings - Page 2/2,Killinfo,Rebuy Grenades,Flood Protection,Change Map,Game Mode,Kevlar Protect,Idle Action,Radar,Back")
end
end
if title=="Flood Protection" then
if buton==1 then
parse('mp_floodprot 1')
msg("Flood Protection Enabled!@C")
elseif buton==2 then
parse('mp_floodprot 0')
msg("Flood Protection Disabled!@C")
elseif buton==3 then
menu(id,"Server Settings - Page 2/2,Killinfo,Rebuy Grenades,Flood Protection,Change Map,Game Mode,Kevlar Protect,Idle Action,Radar,Back")
end
end
if title=="Change Map - Page 1/2" then
if buton==1 then
parse('changemap '..maps[1])
elseif buton==2 then
parse('changemap '..maps[2])
elseif buton==3 then
parse('changemap '..maps[3])
elseif buton==4 then
parse('changemap '..maps[4])
elseif buton==5 then
parse('changemap '..maps[5])
elseif buton==6 then
parse('changemap '..maps[6])
elseif buton==7 then
parse('changemap '..maps[7])
elseif buton==8 then
parse('changemap '..maps[8])
elseif buton==9 then
menu(id,"Change Map - Page 2/2,"..maps[9]..","..maps[10]..","..maps[11]..","..maps[12]..","..maps[13]..","..maps[14]..","..maps[15]..","..maps[16]..",Back")
end
end
if title=="Change Map - Page 2/2" then
if buton==1 then
parse('changemap '..maps[9])
elseif buton==2 then
parse('changemap '..maps[10])
elseif buton==3 then
parse('changemap '..maps[11])
elseif buton==4 then
parse('changemap '..maps[12])
elseif buton==5 then
parse('changemap '..maps[13])
elseif buton==6 then
parse('changemap '..maps[14])
elseif buton==7 then
parse('changemap '..maps[15])
elseif buton==8 then
parse('changemap '..maps[16])
elseif buton==9 then
menu(id,"Change Map - Page 1/2,"..maps[1]..","..maps[2]..","..maps[3]..","..maps[4]..","..maps[5]..","..maps[6]..","..maps[7]..","..maps[8]..",Next")
end
end
if title=="Change Game Mode" then
if buton==1 then
parse('sv_gamemode 0')
elseif buton==2 then
parse('sv_gamemode 1')
elseif buton==3 then
parse('sv_gamemode 2')
elseif buton==4 then
parse('sv_gamemode 3')
elseif buton==5 then
parse('sv_gamemode 4')
elseif buton==6 then
menu(id,"Server Settings - Page 2/2,Killinfo,Rebuy Grenades,Flood Protection,Change Map,Game Mode,Kevlar Protect,Idle Action,Radar,Back")
end
end
if title=="Kevlar Protect" then
if buton==1 then
parse('mp_kevlar 0')
msg("Kevlar Protect Disabled!@C")
elseif buton==2 then
parse('mp_kevlar 0.1')
msg("Kevlar Protect Changed To 0.1!@C")
elseif buton==3 then
parse('mp_kevlar 0.2')
msg("Kevlar Protect Changed To 0.2!@C")
elseif buton==4 then
parse('mp_kevlar 0.4')
msg("Kevlar Protect Changed To 0.4!@C")
elseif buton==5 then
parse('mp_kevlar 0.5')
msg("Kevlar Protect Changed To 0.5!@C")
elseif buton==6 then
parse('mp_kevlar 0.6')
msg("Kevlar Protect Changed To 0.6!@C")
elseif buton==7 then
parse('mp_kevlar 0.8')
msg("Kevlar Protect Changed To 0.8!@C")
elseif buton==8 then
parse('mp_kevlar 1')
msg("Kevlar Protect Changed To 1!@C")
elseif buton==9 then
menu(id,"Server Settings - Page 2/2,Killinfo,Rebuy Grenades,Flood Protection,Change Map,Game Mode,Kevlar Protect,Idle Action,Radar,Back")
end
end
if title=="Idle Action" then
if buton==1 then
parse('mp_idleaction 0')
msg("Idle Action Changed To Kick!@C")
elseif buton==2 then
parse('mp_idleaction 1')
msg("Idle Action Changed To Make Spectator!@C")
elseif buton==3 then
parse('mp_idleaction 2')
msg("Idle Action Changed To Slap!@C")
elseif buton==4 then
parse('mp_idleaction 3')
msg("Idle Action Changed To Kill!@C")
elseif buton==5 then
parse('mp_idleaction 4')
msg("Idle Action Changed To Show Message!@C")
elseif buton==6 then
menu(id,"Server Settings - Page 2/2,Killinfo,Rebuy Grenades,Flood Protection,Change Map,Game Mode,Kevlar Protect,Idle Action,Radar,Back")
end
end
if title=="Radar" then
if buton==1 then
parse('mp_radar 1')
elseif buton==2 then
parse('mp_radar 0')
elseif buton==3 then
menu(id,"Server Settings - Page 2/2,Killinfo,Rebuy Grenades,Flood Protection,Change Map,Game Mode,Kevlar Protect,Idle Action,Radar,Back")
end
end
if title=="Spawn Object - Page 1/3" then
if buton==1 then
parse('spawnobject 1 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
elseif buton==2 then
parse('spawnobject 2 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
elseif buton==3 then
parse('spawnobject 3 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
elseif buton==4 then
parse('spawnobject 4 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
elseif buton==5 then
parse('spawnobject 5 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
elseif buton==6 then
parse('spawnobject 6 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
elseif buton==7 then
parse('spawnobject 7 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
elseif buton==8 then
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
elseif buton==9 then
menu(id,"Admin Menu,Server Settings,Spawn Creature,Spawn Object,Spawn Item,V.I.P,Punish,Give Items,Restart,More -->")
end
end
if title=="Spawn Object - Page 2/3" then
if buton==1 then
parse('spawnobject 9 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
elseif buton==2 then
parse('spawnobject 8 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
elseif buton==3 then
parse('spawnobject 11 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
elseif buton==4 then
parse('spawnobject 12 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
elseif buton==5 then
parse('spawnobject 15 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
elseif buton==6 then
parse('spawnobject 13 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
elseif buton==7 then
parse('spawnobject 14 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
elseif buton==8 then
menu(id,"Spawn Object - Page 3/3,Construction Site,Mine,Orange Portal,Blue Portal,Back")
elseif buton==9 then
menu(id,"Spawn Object - Page 1/3,Barricade,Barbed Wire,Wall I,Wall II,Wall III,Gate Field,Dispenser,Next,Back")
end
end
if title=="Spawn Object - Page 3/3" then
if buton==1 then
parse('spawnobject 10 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 3/3,Construction Site,Mine,Orange Portal,Blue Portal,Back")
elseif buton==2 then
parse('spawnobject 20 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 3/3,Construction Site,Mine,Orange Portal,Blue Portal,Back")
elseif buton==3 then
parse('spawnobject 22 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 3/3,Construction Site,Mine,Orange Portal,Blue Portal,Back")
elseif buton==4 then
parse('spawnobject 23 '..(cx[id]/32)..' '..(cy[id]/32)..' 1 1 '..player(id,"team")..' '..id)
menu(id,"Spawn Object - Page 3/3,Construction Site,Mine,Orange Portal,Blue Portal,Back")
elseif buton==5 then
menu(id,"Spawn Object - Page 2/3,Supply,Turret,Dual Turret,Triple Turret,Super Supply,Teleporter Entrance,Teleporter Exit,Next,Back")
end
end
if title=="Spawn Item" then
if buton==1 then
menu(id,"Pistols,Glock,USP,Deagle,P228,Elite,Five-Seven,Back")
elseif buton==2 then
menu(id,"Shotguns,M3,XM1014,Back")
elseif buton==3 then
menu(id,"SMGs,Mac10,TMP,UMP45,MP5,P90,Back")
elseif buton==4 then
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
elseif buton==5 then
parse('spawnitem 40 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
elseif buton==6 then
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==7 then
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==8 then
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
end
end
if title=="Pistols" then
if buton==1 then
parse('spawnitem 2 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Pistols,Glock,USP,Deagle,P228,Elite,Five-Seven,Back")
elseif buton==2 then
parse('spawnitem 1 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Pistols,Glock,USP,Deagle,P228,Elite,Five-Seven,Back")
elseif buton==3 then
parse('spawnitem 3 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Pistols,Glock,USP,Deagle,P228,Elite,Five-Seven,Back")
elseif buton==4 then
parse('spawnitem 4 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Pistols,Glock,USP,Deagle,P228,Elite,Five-Seven,Back")
elseif buton==5 then
parse('spawnitem 5 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Pistols,Glock,USP,Deagle,P228,Elite,Five-Seven,Back")
elseif buton==6 then
parse('spawnitem 6 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Pistols,Glock,USP,Deagle,P228,Elite,Five-Seven,Back")
elseif buton==7 then
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
end
end
if title=="Shotguns" then
if buton==1 then
parse('spawnitem 10 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Shotguns,M3,XM1014,Back")
elseif buton==2 then
parse('spawnitem 11 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Shotguns,M3,XM1014,Back")
elseif buton==3 then
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
end
end
if title=="SMGs" then
if buton==1 then
parse('spawnitem 23 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"SMGs,Mac10,TMP,UMP45,MP5,P90,Back")
elseif buton==2 then
parse('spawnitem 21 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"SMGs,Mac10,TMP,UMP45,MP5,P90,Back")
elseif buton==3 then
parse('spawnitem 24 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"SMGs,Mac10,TMP,UMP45,MP5,P90,Back")
elseif buton==4 then
parse('spawnitem 20 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"SMGs,Mac10,TMP,UMP45,MP5,P90,Back")
elseif buton==5 then
parse('spawnitem 22 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"SMGs,Mac10,TMP,UMP45,MP5,P90,Back")
elseif buton==6 then
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
end
end
if title=="Rifles - Page 1/2" then
if buton==1 then
parse('spawnitem 30 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
elseif buton==2 then
parse('spawnitem 32 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
elseif buton==3 then
parse('spawnitem 39 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
elseif buton==4 then
parse('spawnitem 38 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
elseif buton==5 then
parse('spawnitem 31 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
elseif buton==6 then
parse('spawnitem 33 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
elseif buton==7 then
parse('spawnitem 34 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
elseif buton==8 then
menu(id,"Rifles - Page 2/2,AWP,SG550,G3SG1,Back")
elseif buton==9 then
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
end
end
if title=="Rifles - Page 2/2" then
if buton==1 then
parse('spawnitem 35 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 2/2,AWP,SG550,G3SG1,Back")
elseif buton==2 then
parse('spawnitem 37 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 2/2,AWP,SG550,G3SG1,Back")
elseif buton==3 then
parse('spawnitem 36 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Rifles - Page 2/2,AWP,SG550,G3SG1,Back")
elseif buton==4 then
menu(id,"Rifles - Page 1/2,Ak-47,M4A1,Famas,Galil,SG552,Steyr Aug,Scout,Next,Back")
end
end
if title=="Armors" then
if buton==1 then
parse('spawnitem 57 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==2 then
parse('spawnitem 58 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==3 then
parse('spawnitem 79 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==4 then
parse('spawnitem 80 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==5 then
parse('spawnitem 81 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==6 then
parse('spawnitem 82 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==7 then
parse('spawnitem 84 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==8 then
parse('spawnitem 83 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Armors,Kevlar,Kevlar+Helmet,Light Armor,Medium Armor,Heavy Armor,Medic Armor,Shealth Suit,Super Armor,Back")
elseif buton==9 then
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
end
end
if title=="Grenades" then
if buton==1 then
parse('spawnitem 51 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==2 then
parse('spawnitem 52 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==3 then
parse('spawnitem 53 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==4 then
parse('spawnitem 54 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==5 then
parse('spawnitem 73 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==6 then
parse('spawnitem 72 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==7 then
parse('spawnitem 76 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==8 then
parse('spawnitem 86 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Grenades,HE Grenade,Flashbang,Smoke Grenade,Flare,Molotov Cocktail,Gas Grenade,Airstrike,Gut Bomb,Back")
elseif buton==9 then
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
end
end
if title=="Others - Page 1/3" then
if buton==1 then
parse('spawnitem 45 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
elseif buton==2 then
parse('spawnitem 47 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
elseif buton==3 then
parse('spawnitem 46 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
elseif buton==4 then
parse('spawnitem 49 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
elseif buton==5 then
parse('spawnitem 48 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
elseif buton==6 then
parse('spawnitem 88 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
elseif buton==7 then
parse('spawnitem 77 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
elseif buton==8 then
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
elseif buton==9 then
menu(id,"Spawn Item,Pistols,Shotguns,SMGs,Rifles,Machine Gun,Armors,Grenades,Others,Back")
end
end
if title=="Others - Page 2/3" then
if buton==1 then
parse('spawnitem 87 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
elseif buton==2 then
parse('spawnitem 41 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
elseif buton==3 then
parse('spawnitem 75 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
elseif buton==4 then
parse('spawnitem 74 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
elseif buton==5 then
parse('spawnitem 85 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
elseif buton==6 then
parse('spawnitem 50 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
elseif buton==7 then
parse('spawnitem 69 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
elseif buton==8 then
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==9 then
menu(id,"Others - Page 1/3,Laser,RPG Launcher,Flamethrower,Grenade Launcher,Rocket Launcher,Portal Gun,Mine,Next,Back")
end
end
if title=="Others - Page 3/3" then
if buton==1 then
parse('spawnitem 78 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==2 then
parse('spawnitem 55 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==3 then
parse('spawnitem 70 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==4 then
parse('spawnitem 71 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==5 then
parse('spawnitem 56 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==6 then
parse('spawnitem 59 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==7 then
parse('spawnitem 64 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==8 then
parse('spawnitem 68 '..(cx[id]/32)..' '..(cy[id]/32))
menu(id,"Others - Page 3/3,Claw,Bomb,Red Flag,Blue Flag,Defuse Kit,Night Vision,Medikit,Gold,Back")
elseif buton==9 then
menu(id,"Others - Page 2/3,Laser Mine,Tactical Shield,Snowball,Wrench,Chainsaw,Knife,Machete,Next,Back")
end
end
if title=="Punish a Player" then
if buton==1 then
menu(id,"Choose Your Ban Type,Ban USGN,Ban IP,Ban Name")
elseif buton==2 then
thenames(i)
menu(id,"Kick a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
elseif buton==3 then
thenames(i)
menu(id,"Slap a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
elseif buton==4 then
thenames(i)
menu(id,"Kill a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
elseif buton==5 then
thenames(i)
menu(id,"Freeze a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
elseif buton==6 then
thenames(i)
menu(id,"Bring 1 HP a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
elseif buton==7 then
thenames(i)
menu(id,"Grab a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
elseif buton==8 then
thenames(i)
menu(id,"Mute Menu,Mute,Unmute")
elseif buton==9 then
menu(id,"Admin Menu,Server Settings,Spawn Creature,Spawn Object,Spawn Item,V.I.P,Punish,Give Items,Restart,More -->")
end
end
if title=="Choose Your Ban Type" then
if buton==1 then
thenames(i)
menu(id,"Ban USGN a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
elseif buton==2 then
thenames(i)
menu(id,"Ban IP a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
elseif buton==3 then
thenames(i)
menu(id,"Ban NAME a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Kick a Player - Names 1/2" then
if buton==1 then
thenames(i)
parse('kick 1')
msg(""..player(id,"name").." [Admin] Kicked "..name[1])
elseif buton==2 then
parse('kick 2')
msg(""..player(id,"name").." [Admin] Kicked "..name[2])
elseif buton==3 then
parse('kick 3')
msg(""..player(id,"name").." [Admin] Kicked "..name[3])
elseif buton==4 then
parse('kick 4')
msg(""..player(id,"name").." [Admin] Kicked "..name[4])
elseif buton==5 then
parse('kick 5')
msg(""..player(id,"name").." [Admin] Kicked "..name[5])
elseif buton==6 then
parse('kick 6')
msg(""..player(id,"name").." [Admin] Kicked "..name[6])
elseif buton==7 then
parse('kick 7')
msg(""..player(id,"name").." [Admin] Kicked "..name[7])
elseif buton==8 then
parse('kick 8')
msg(""..player(id,"name").." [Admin] Kicked "..name[8])
elseif buton==9 then
menu(id,"Kick a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Kick a Player - Names 2/2" then
if buton==1 then
thenames(i)
parse('kick 9')
msg(""..player(id,"name").." [Admin] Kicked "..name[9])
elseif buton==2 then
parse('kick 10')
msg(""..player(id,"name").." [Admin] Kicked "..name[10])
elseif buton==3 then
parse('kick 11')
msg(""..player(id,"name").." [Admin] Kicked "..name[11])
elseif buton==4 then
parse('kick 12')
msg(""..player(id,"name").." [Admin] Kicked "..name[12])
elseif buton==5 then
parse('kick 13')
msg(""..player(id,"name").." [Admin] Kicked "..name[13])
elseif buton==6 then
parse('kick 14')
msg(""..player(id,"name").." [Admin] Kicked "..name[14])
elseif buton==7 then
parse('kick 15')
msg(""..player(id,"name").." [Admin] Kicked "..name[15])
elseif buton==8 then
parse('kick 16')
msg(""..player(id,"name").." [Admin] Kicked "..name[16])
elseif buton==9 then
menu(id,"Kick a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Slap a Player - Names 1/2" then
if buton==1 then
thenames(i)
parse('slap 1')
msg(""..player(id,"name").." [Admin] Slapped "..name[1])
elseif buton==2 then
parse('slap 2')
msg(""..player(id,"name").." [Admin] Slapped "..name[2])
elseif buton==3 then
parse('slap 3')
msg(""..player(id,"name").." [Admin] Slapped "..name[3])
elseif buton==4 then
parse('slap 4')
msg(""..player(id,"name").." [Admin] Slapped "..name[4])
elseif buton==5 then
parse('slap 5')
msg(""..player(id,"name").." [Admin] Slapped "..name[5])
elseif buton==6 then
parse('slap 6')
msg(""..player(id,"name").." [Admin] Slapped "..name[6])
elseif buton==7 then
parse('slap 7')
msg(""..player(id,"name").." [Admin] Slapped "..name[7])
elseif buton==8 then
parse('slap 8')
msg(""..player(id,"name").." [Admin] Slapped "..name[8])
elseif buton==9 then
menu(id,"Slap a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Slap a Player - Names 2/2" then
if buton==1 then
thenames(i)
parse('slap 9')
msg(""..player(id,"name").." [Admin] Slapped "..name[9])
elseif buton==2 then
parse('slap 10')
msg(""..player(id,"name").." [Admin] Slapped "..name[10])
elseif buton==3 then
parse('slap 11')
msg(""..player(id,"name").." [Admin] Slapped "..name[11])
elseif buton==4 then
parse('slap 12')
msg(""..player(id,"name").." [Admin] Slapped "..name[12])
elseif buton==5 then
parse('slap 13')
msg(""..player(id,"name").." [Admin] Slapped "..name[13])
elseif buton==6 then
parse('slap 14')
msg(""..player(id,"name").." [Admin] Slapped "..name[14])
elseif buton==7 then
parse('slap 15')
msg(""..player(id,"name").." [Admin] Slapped "..name[15])
elseif buton==8 then
parse('slap 16')
msg(""..player(id,"name").." [Admin] Slapped "..name[16])
elseif buton==9 then
menu(id,"Slap a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Kill a Player - Names 1/2" then
if buton==1 then
thenames(i)
parse('killplayer 4')
msg(""..player(id,"name").." [Admin] Killed "..name[4])
elseif buton==5 then
parse('killplayer 5')
msg(""..player(id,"name").." [Admin] Killed "..name[5])
elseif buton==6 then
parse('killplayer 6')
msg(""..player(id,"name").." [Admin] Killed "..name[6])
elseif buton==7 then
parse('killplayer 7')
msg(""..player(id,"name").." [Admin] Killed "..name[7])
elseif buton==8 then
parse('killplayer 8')
msg(""..player(id,"name").." [Admin] Killed "..name[8])
elseif buton==9 then
menu(id,"Kill a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Kill a Player - Names 2/2" then
if buton==1 then
thenames(i)
parse('killplayer 9')
msg(""..player(id,"name").." [Admin] Killed "..name[9])
elseif buton==2 then
parse('killplayer 10')
msg(""..player(id,"name").." [Admin] Killed "..name[10])
elseif buton==3 then
parse('killplayer 11')
msg(""..player(id,"name").." [Admin] Killed "..name[11])
elseif buton==4 then
parse('killplayer 12')
msg(""..player(id,"name").." [Admin] Killed "..name[12])
elseif buton==5 then
parse('killplayer 13')
msg(""..player(id,"name").." [Admin] Killed "..name[13])
elseif buton==6 then
parse('killplayer 14')
msg(""..player(id,"name").." [Admin] Killed "..name[14])
elseif buton==7 then
parse('killplayer 15')
msg(""..player(id,"name").." [Admin] Killed "..name[15])
elseif buton==8 then
parse('killplayer 16')
msg(""..player(id,"name").." [Admin] Killed "..name[16])
elseif buton==9 then
menu(id,"Kill a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Freeze a Player - Names 1/2" then
if buton==1 then
thenames(i)
parse('speedmod 1 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[1])
elseif buton==2 then
parse('speedmod 2 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[2])
elseif buton==3 then
parse('speedmod 3 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[3])
elseif buton==4 then
parse('speedmod 4 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[4])
elseif buton==5 then
parse('speedmod 5 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[5])
elseif buton==6 then
parse('speedmod 6 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[6])
elseif buton==7 then
parse('speedmod 7 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[7])
elseif buton==8 then
parse('speedmod 8 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[8])
elseif buton==9 then
menu(id,"Freeze a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Freeze a Player - Names 2/2" then
if buton==1 then
thenames(i)
parse('speedmod 9 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[9])
elseif buton==2 then
parse('speedmod 10 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[10])
elseif buton==3 then
parse('speedmod 11 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[11])
elseif buton==4 then
parse('speedmod 12 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[12])
elseif buton==5 then
parse('speedmod 13 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[13])
elseif buton==6 then
parse('speedmod 14 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[14])
elseif buton==7 then
parse('speedmod 15 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[15])
elseif buton==8 then
parse('speedmod 16 -100')
msg(""..player(id,"name").." [Admin] Freezed "..name[16])
elseif buton==9 then
menu(id,"Freeze a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Bring 1 HP a Player - Names 1/2" then
if buton==1 then
thenames(i)
parse('sethealth 1 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[1])
elseif buton==2 then
parse('sethealth 2 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[2])
elseif buton==3 then
parse('sethealth 3 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[3])
elseif buton==4 then
parse('sethealth 4 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[4])
elseif buton==5 then
parse('sethealth 5 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[5])
elseif buton==6 then
parse('sethealth 6 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[6])
elseif buton==7 then
parse('sethealth 7 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[7])
elseif buton==8 then
parse('sethealth 8 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[8])
elseif buton==9 then
menu(id,"Bring 1 HP a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Bring 1 HP a Player - Names 2/2" then
if buton==1 then
thenames(i)
parse('sethealth 9 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[9])
elseif buton==2 then
parse('sethealth 10 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[10])
elseif buton==3 then
parse('sethealth 11 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[11])
elseif buton==4 then
parse('sethealth 12 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[12])
elseif buton==5 then
parse('sethealth 13 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[13])
elseif buton==6 then
parse('sethealth 14 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[14])
elseif buton==7 then
parse('sethealth 15 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[15])
elseif buton==8 then
parse('sethealth 16 1')
msg(""..player(id,"name").." [Admin] Bring 1 HP "..name[16])
elseif buton==9 then
menu(id,"Bring 1 HP a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Grab a Player - Names 1/2" then
if buton==1 then
if grab[id]==0 then
grab[id]=1
elseif grab[id]==1 then
grab[id]=0
end
elseif buton==2 then
if grab[id]==0 then
grab[id]=2
elseif grab[id]==2 then
grab[id]=0
end
elseif buton==3 then
if grab[id]==0 then
grab[id]=3
elseif grab[id]==3 then
grab[id]=0
end
elseif buton==4 then
if grab[id]==0 then
grab[id]=4
elseif grab[id]==4 then
grab[id]=0
end
elseif buton==5 then
if grab[id]==0 then
grab[id]=5
elseif grab[id]==5 then
grab[id]=0
end
elseif buton==6 then
if grab[id]==0 then
grab[id]=6
elseif grab[id]==6 then
grab[id]=0
end
elseif buton==7 then
if grab[id]==0 then
grab[id]=7
elseif grab[id]==7 then
grab[id]=0
end
elseif buton==8 then
if grab[id]==0 then
grab[id]=8
elseif grab[id]==8 then
grab[id]=0
end
elseif buton==9 then
menu(id,"Grab a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Grab a Player - Names 2/2" then
if buton==1 then
if grab[id]==0 then
grab[id]=9
elseif grab[id]==9 then
grab[id]=0
end
elseif buton==2 then
if grab[id]==0 then
grab[id]=10
elseif grab[id]==10 then
grab[id]=0
end
elseif buton==3 then
if grab[id]==0 then
grab[id]=11
elseif grab[id]==11 then
grab[id]=0
end
elseif buton==4 then
if grab[id]==0 then
grab[id]=12
elseif grab[id]==12 then
grab[id]=0
end
elseif buton==5 then
if grab[id]==0 then
grab[id]=13
elseif grab[id]==13 then
grab[id]=0
end
elseif buton==6 then
if grab[id]==0 then
grab[id]=14
elseif grab[id]==14 then
grab[id]=0
end
elseif buton==7 then
if grab[id]==0 then
grab[id]=15
elseif grab[id]==15 then
grab[id]=0
end
elseif buton==8 then
if grab[id]==0 then
grab[id]=16
elseif grab[id]==16 then
grab[id]=0
end
elseif buton==9 then
menu(id,"Grab a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Ban USGN a Player - Names 1/2" then
if buton==1 then
thenames(i)
theusgn(i)
parse('banusgn '..pusgn[1])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[1])
elseif buton==2 then
parse('banusgn '..pusgn[2])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[2])
elseif buton==3 then
parse('banusgn '..pusgn[3])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[3])
elseif buton==4 then
parse('banusgn '..pusgn[4])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[4])
elseif buton==5 then
parse('banusgn '..pusgn[5])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[5])
elseif buton==6 then
parse('banusgn '..pusgn[6])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[6])
elseif buton==7 then
parse('banusgn '..pusgn[7])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[7])
elseif buton==8 then
parse('banusgn '..pusgn[8])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[8])
elseif buton==9 then
menu(id,"Ban USGN a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Ban USGN a Player - Names 2/2" then
if buton==1 then
thenames(i)
theusgn(i)
parse('banusgn '..pusgn[9])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[9])
elseif buton==2 then
parse('banusgn 10 '..pusgn[1])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[10])
elseif buton==3 then
parse('banusgn 11 '..pusgn[1])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[11])
elseif buton==4 then
parse('banusgn 12 '..pusgn[1])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[12])
elseif buton==5 then
parse('banusgn 13 '..pusgn[1])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[13])
elseif buton==6 then
parse('banusgn 14 '..pusgn[1])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[14])
elseif buton==7 then
parse('banusgn 15 '..pusgn[1])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[15])
elseif buton==8 then
parse('banusgn 16 '..pusgn[1])
msg(""..player(id,"name").." [Admin] Banned USGN "..name[16])
elseif buton==9 then
menu(id,"Ban USGN a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Ban IP a Player - Names 1/2" then
if buton==1 then
thenames(i)
thepip(i)
parse('banip '..pip[1])
msg(""..player(id,"name").." [Admin] Banned IP "..name[2])
elseif buton==2 then
parse('banip '..pip[2])
msg(""..player(id,"name").." [Admin] Banned IP "..name[2])
elseif buton==3 then
parse('banip '..pip[3])
msg(""..player(id,"name").." [Admin] Banned IP "..name[3])
elseif buton==4 then
parse('banip '..pip[4])
msg(""..player(id,"name").." [Admin] Banned IP "..name[4])
elseif buton==5 then
parse('banip '..pip[5])
msg(""..player(id,"name").." [Admin] Banned IP "..name[5])
elseif buton==6 then
parse('banip '..pip[6])
msg(""..player(id,"name").." [Admin] Banned IP "..name[6])
elseif buton==7 then
parse('banip '..pip[7])
msg(""..player(id,"name").." [Admin] Banned IP "..name[7])
elseif buton==8 then
parse('banip '..pip[8])
msg(""..player(id,"name").." [Admin] Banned IP "..name[8])
elseif buton==9 then
menu(id,"Ban IP a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Ban IP a Player - Names 2/2" then
if buton==1 then
thenames(i)
thepip(i)
parse('banip '..pip[9])
msg(""..player(id,"name").." [Admin] Banned IP "..name[9])
elseif buton==2 then
parse('banip '..pip[10])
msg(""..player(id,"name").." [Admin] Banned IP "..name[10])
elseif buton==3 then
parse('banip '..pip[11])
msg(""..player(id,"name").." [Admin] Banned IP "..name[11])
elseif buton==4 then
parse('banip '..pip[12])
msg(""..player(id,"name").." [Admin] Banned IP "..name[12])
elseif buton==5 then
parse('banip '..pip[13])
msg(""..player(id,"name").." [Admin] Banned IP "..name[13])
elseif buton==6 then
parse('banip '..pip[14])
msg(""..player(id,"name").." [Admin] Banned IP "..name[14])
elseif buton==7 then
parse('banip '..pip[15])
msg(""..player(id,"name").." [Admin] Banned IP "..name[15])
elseif buton==8 then
parse('banip '..pip[16])
msg(""..player(id,"name").." [Admin] Banned IP "..name[16])
elseif buton==9 then
menu(id,"Ban IP a Player - Names 1/2,"..name[1]..","..name[2]..","..name[3]..","..name[4]..","..name[5]..","..name[6]..","..name[7]..","..name[8]..",Next")
end
end
if title=="Ban NAME a Player - Names 1/2" then
if buton==1 then
thenames(i)
parse('banname '..name[1])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[1])
elseif buton==2 then
parse('banname '..name[2])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[2])
elseif buton==3 then
parse('banname '..name[3])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[3])
elseif buton==4 then
parse('banname '..name[4])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[4])
elseif buton==5 then
parse('banname '..name[5])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[5])
elseif buton==6 then
parse('banname '..name[6])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[6])
elseif buton==7 then
parse('banname '..name[7])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[7])
elseif buton==8 then
parse('banname '..name[8])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[8])
elseif buton==9 then
menu(id,"Ban NAME a Player - Names 2/2,"..name[9]..","..name[10]..","..name[11]..","..name[12]..","..name[13]..","..name[14]..","..name[15]..","..name[16]..",Back")
end
end
if title=="Ban NAME a Player - Names 2/2" then
if buton==1 then
thenames(i)
parse('banname '..name[9])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[9])
elseif buton==2 then
parse('banname '..name[10])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[10])
elseif buton==3 then
parse('banname '..name[11])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[11])
elseif buton==4 then
parse('banname '..name[12])
msg(""..player(id,"name").." [Admin] Banned NAME "..name[12])
elseif buton==5 t
edited 3×, last 16.01.12 02:18:39 pm