
I want your help with my script , it's this , no problem with it , but i want to add godmode in admin and mod menu and say option , and make F4 to teleport from place to another just to admin , like in Starkkz admin script , can you help me ?
godMode={} addhook("serveraction","_serveraction") addhook("join","_join") addhook("hit","_hit") function _join(id) godMode[id]=false end function _serveraction(id,action) if action==3 then if godMode[id]==false then msg2(id,"GodMode Activated") godMode[id]=true else msg2(id,"GodMode Deactivated") godMode[id]=false end end end function _hit(id) if godMode[id]==true then return 1 end end
godmode = {} addhook("join","_join") function _join(id) 	godmode[id]=0 end addhook("say","_say") function _say(id,txt) 	if txt:sub(1,4)=="!god" then 		if godmode[id]==1 then 			godmode[id]=0 			msg2(id,"Godmode deactivated!") 			return 1 		else 			godmode[id]=1 			msg2(id,"Godmode activated!") 			return 1 		end 	end end addhook("hit","_hit") function _hit(id,source) 	if godmode[id]==1 then 		return 1 	end end
godMode={} addhook("serveraction","_serveraction") addhook("join","_join") addhook("hit","_hit") addhook("menu","_menu") addhook("say","_say") function _join(id) godMode[id]=0 end function _serveraction(id,action) if action==1 then menu(id,"Admin menu,God mode|"..godMode[id].."") end end function _hit(id) if godMode[id]==1 then return 1 end end function _menu(id,title,button) if title=="Admin menu" then if button==1 and godMode[id]==0 then msg2(id,"GodMode Activated") godMode[id]=1 elseif button==1 and godMode[id]==1 then msg2(id,"GodMode Deactivated") godMode[id]=0 end end end function _say(id,txt) if godMode[id]==1 then msg2(id,"©555555555"..player(id,"name").."(Admin): "..txt) return 1 end end
adminlist={114160}
---- hook and function for _, usgn in ipairs(adminlist) do if player(id,'usgn') == usgn then end end end
function initArray(m) local array = {} for i = 1, m do array[i]=0 end return array end color_admin=initArray(32) admincolor=initArray(32) admin_color_name=initArray(32) admin_color_name[0]="white" admin_color_name[1]="black" admin_color_name[2]="green" admin_color_name[3]="brown" admin_color_name[4]="purple" admin_color_name[5]="blue" admincolor[0]="©255255255" ---- white admincolor[1]="©000000000" ----- black admincolor[2]="©000555000" ----green admincolor[3]="©15075 0" ----brown admincolor[4]="©191 0255" ---- purple admincolor[5]="©30 144255" ---- blue -- Change the USGN-ID in this "{","}". Example: {1,12,123,1234,12345,123456,1234567,12345678,123456789} Admins = {120840,114540,114940,120792,129519,124200,125610,105111,130196,107398,19952,114160} -- Every ID is Admin Mods = {} -- Every ID is Mod godMode={} -- Huds -- addhook("ms100","t") function t() for id=1,32 do if player(id,"exists") then parse('hudtxt2 '..id..' 1 " ©000255000Kills: '..player(id,'score')..'" 10 150') parse('hudtxt2 '..id..' 2 " ©055140233Deaths: '..player(id,'deaths')..'" 10 165') parse('hudtxt2 '..id..' 3 " ©255000000Health: '..player(id,'health')..'" 10 180') parse('hudtxt2 '..id..' 4 " ©255255000Name: '..player(id,'name')..'" 10 135') parse('hudtxt2 '..id..' 5 " ©255255000Money: '..player(id,'money')..'" 10 210') parse('hudtxt2 '..id..' 6 " ©255255000"..game("sv_name").." 10 500') parse('hudtxt2 '..id..' 7 " ©000255000[PK]Admin script V0.1.2" 250 20') parse('hudtxt2 '..id..' 8 " ©255128000Server Name: '..game("sv_name")..'" 250 35') parse('hudtxt2 '..id..' 9 " ©255255255U.S.G.N. # id: '..player(id,'usgn')..'" 10 195') parse('hudtxt2 '..id..' 10 " ©333222111Max Players: '..game("sv_maxplayers")..'" 10 225') parse('hudtxt2 '..id..' 11 " ©111222333Armor: '..player(id,'armor')..'" 10 240') end end end -- Admin join -- addhook("join","adminiuserjoin") function adminiuserjoin(id) godMode[id]=0 for _, usgn in ipairs(Admins) do if player(id,"usgn") == usgn then color_admin[id]=0 msg("©255128000 "..player(id,"name").." joined the server !@C") end end msg2(id,"Welcome on my Server, "..player(id,"name").."!") end addhook("minute","adsminute") function adsminute() 	msg("©666222653This server is powered by") 	msg("©666222653[PK]Admin script V0.1.2") end -- No Teamkill -- addhook("kill","NoTeamKill") function NoTeamKill(killer,victim,weapon,x,y) if player(killer,"team") == player(victim,"team") then msg2(killer,"©255000000You killed "..player(victim,"name").." don't do it again!") msg("©255000000"..player(killer,"name").." killed "..player(victim,"name")) end end -- Admin Say -- addhook("say","adminsay") function adminsay(id,txt) for _, usgn in ipairs(Admins) do if player(id,'usgn') == usgn then msg(""..admincolor[color_admin[id]]..""..player(id,"name").." (Admin): "..txt) return 1 end for _, usgn in ipairs(Mods) do if player(id,'usgn') == usgn then msg("©100000000"..player(id,"name").." (Mod): "..txt) return 1 end if player(id,"usgn")>=1 then msg("©100100100"..player(id,"name").." (User): "..txt) return 1 else msg("©000000000"..player(id,"name").." (Non-User): "..txt) return 1 end end end end -- Admin Punish -- addhook ("say","sayfuncs") function sayfuncs(id,txt,usgn) for _, usgn in ipairs(Admins) do if player(id,'usgn') == usgn then if (txt=="!rs") then parse ("setscore "..id.." ..sc") parse ("setdeaths "..id.." ..sc") end if (txt=="@kick 1") then parse ('kick 1') end if (txt=="@kick 2") then parse ('kick 2') end if (txt=="@kick 3") then parse ('kick 3') end if (txt=="@kick 4") then parse ('kick 4') end if (txt=="@kick 5") then parse ('kick 5') end if (txt=="@kick 6") then parse ('kick 6') end if (txt=="@kick 7") then parse ('kick 7') end if (txt=="@kick 8") then parse ('kick 8') end if (txt=="@kick 9") then parse ('kick 9') end if (txt=="@kick 10") then parse ('kick 10') end if (txt=="@kick 11") then parse ('kick 11') end if (txt=="@kick 12") then parse ('kick 12') end if (txt=="@kick 13") then parse ('kick 13') end if (txt=="@kick 14") then parse ('kick 14') end if (txt=="@kick 15") then parse ('kick 15') end if (txt=="@kick 16") then parse ('kick 16') end if (txt=="@kick 17") then parse ('kick 17') end if (txt=="@kick 18") then parse ('kick 18') end if (txt=="@kick 19") then parse ('kick 19') end if (txt=="@kick 20") then parse ('kick 20') end if (txt=="@kick 21") then parse ('kick 21') end if (txt=="@kick 22") then parse ('kick 22') end if (txt=="@kick 23") then parse ('kick 23') end if (txt=="@kick 24") then parse ('kick 24') end if (txt=="@kick 25") then parse ('kick 25') end if (txt=="@kick 26") then parse ('kick 26') end if (txt=="@kick 27") then parse ('kick 27') end if (txt=="@kick 28") then parse ('kick 28') end if (txt=="@kick 29") then parse ('kick 29') end if (txt=="@kick 30") then parse ('kick 30') end if (txt=="@kick 31") then parse ('kick 31') end if (txt=="@kick 32") then parse ('kick 32') end if (txt=="@ban 1") then parse ('banip 1') end if (txt=="@ban 2") then parse ('banip 2') end if (txt=="@ban 3") then parse ('banip 3') end if (txt=="@ban 4") then parse ('banip 4') end if (txt=="@ban 5") then parse ('banip 5') end if (txt=="@ban 6") then parse ('banip 6') end if (txt=="@ban 7") then parse ('banip 7') end if (txt=="@ban 8") then parse ('banip 8') end if (txt=="@ban 9") then parse ('banip 9') end if (txt=="@ban 10") then parse ('banip 10') end if (txt=="@ban 11") then parse ('banip 11') end if (txt=="@ban 12") then parse ('banip 12') end if (txt=="@ban 13") then parse ('banip 13') end if (txt=="@ban 14") then parse ('banip 14') end if (txt=="@ban 15") then parse ('banip 15') end if (txt=="@ban 16") then parse ('banip 16') end if (txt=="@ban 17") then parse ('banip 17') end if (txt=="@ban 18") then parse ('banip 18') end if (txt=="@ban 19") then parse ('banip 19') end if (txt=="@ban 20") then parse ('banip 20') end if (txt=="@ban 21") then parse ('banip 21') end if (txt=="@ban 22") then parse ('banip 22') end if (txt=="@ban 23") then parse ('banip 23') end if (txt=="@ban 24") then parse ('banip 24') end if (txt=="@ban 25") then parse ('banip 25') end if (txt=="@ban 26") then parse ('banip 26') end if (txt=="@ban 27") then parse ('banip 27') end if (txt=="@ban 28") then parse ('banip 28') end if (txt=="@ban 29") then parse ('banip 29') end if (txt=="@ban 30") then parse ('banip 30') end if (txt=="@ban 31") then parse ('banip 31') end if (txt=="@ban 32") then parse ('banip 32') end if (txt=="@freeze 1") then parse ('speedmod 1 -30') end if (txt=="@freeze 2") then parse ('speedmod 2 -30') end if (txt=="@freeze 3") then parse ('speedmod 3 -30') end if (txt=="@freeze 4") then parse ('speedmod 4 -30') end if (txt=="@freeze 5") then parse ('speedmod 5 -30') end if (txt=="@freeze 6") then parse ('speedmod 6 -30') end if (txt=="@freeze 7") then parse ('speedmod 7 -30') end if (txt=="@freeze 8") then parse ('speedmod 8 -30') end if (txt=="@freeze 9") then parse ('speedmod 9 -30') end if (txt=="@freeze 10") then parse ('speedmod 10 -30') end if (txt=="@freeze 11") then parse ('speedmod 11 -30') end if (txt=="@freeze 12") then parse ('speedmod 12 -30') end if (txt=="@freeze 13") then parse ('speedmod 13 -30') end if (txt=="@freeze 14") then parse ('speedmod 14 -30') end if (txt=="@freeze 15") then parse ('speedmod 15 -30') end if (txt=="@freeze 16") then parse ('speedmod 16 -30') end if (txt=="@freeze 17") then parse ('speedmod 17 -30') end if (txt=="@freeze 18") then parse ('speedmod 18 -30') end if (txt=="@freeze 19") then parse ('speedmod 19 -30') end if (txt=="@freeze 20") then parse ('speedmod 20 -30') end if (txt=="@freeze 21") then parse ('speedmod 21 -30') end if (txt=="@freeze 22") then parse ('speedmod 22 -30') end if (txt=="@freeze 23") then parse ('speedmod 23 -30') end if (txt=="@freeze 24") then parse ('speedmod 24 -30') end if (txt=="@freeze 25") then parse ('speedmod 25 -30') end if (txt=="@freeze 26") then parse ('speedmod 26 -30') end if (txt=="@freeze 27") then parse ('speedmod 27 -30') end if (txt=="@freeze 28") then parse ('speedmod 28 -30') end if (txt=="@freeze 29") then parse ('speedmod 29 -30') end if (txt=="@freeze 30") then parse ('speedmod 30 -30') end if (txt=="@freeze 31") then parse ('speedmod 31 -30') end if (txt=="@freeze 32") then parse ('speedmod 32 -30') end if (txt=="@unfreeze 1") then parse ('speedmod 1 0') end if (txt=="@unfreeze 2") then parse ('speedmod 2 0') end if (txt=="@unfreeze 3") then parse ('speedmod 3 0') end if (txt=="@unfreeze 4") then parse ('speedmod 4 0') end if (txt=="@unfreeze 5") then parse ('speedmod 5 0') end if (txt=="@unfreeze 6") then parse ('speedmod 6 0') end if (txt=="@unfreeze 7") then parse ('speedmod 7 0') end if (txt=="@unfreeze 8") then parse ('speedmod 8 0') end if (txt=="@unfreeze 9") then parse ('speedmod 9 0') end if (txt=="@unfreeze 10") then parse ('speedmod 10 0') end if (txt=="@unfreeze 11") then parse ('speedmod 11 0') end if (txt=="@unfreeze 12") then parse ('speedmod 12 0') end if (txt=="@unfreeze 13") then parse ('speedmod 13 0') end if (txt=="@unfreeze 14") then parse ('speedmod 14 0') end if (txt=="@unfreeze 15") then parse ('speedmod 15 0') end if (txt=="@unfreeze 16") then parse ('speedmod 16 0') end if (txt=="@unfreeze 17") then parse ('speedmod 17 0') end if (txt=="@unfreeze 18") then parse ('speedmod 18 0') end if (txt=="@unfreeze 19") then parse ('speedmod 19 0') end if (txt=="@unfreeze 20") then parse ('speedmod 20 0') end if (txt=="@unfreeze 21") then parse ('speedmod 21 0') end if (txt=="@unfreeze 22") then parse ('speedmod 22 0') end if (txt=="@unfreeze 23") then parse ('speedmod 23 0') end if (txt=="@unfreeze 24") then parse ('speedmod 24 0') end if (txt=="@unfreeze 25") then parse ('speedmod 25 0') end if (txt=="@unfreeze 26") then parse ('speedmod 26 0') end if (txt=="@unfreeze 27") then parse ('speedmod 27 0') end if (txt=="@unfreeze 28") then parse ('speedmod 28 0') end if (txt=="@unfreeze 29") then parse ('speedmod 29 0') end if (txt=="@unfreeze 30") then parse ('speedmod 30 0') end if (txt=="@unfreeze 31") then parse ('speedmod 31 0') end if (txt=="@unfreeze 32") then parse ('speedmod 32 0') end if (txt=="@spec 1") then parse('makespec 1') end if (txt=="@spec 2") then parse('makespec 2') end if (txt=="@spec 3") then parse('makespec 3') end if (txt=="@spec 4") then parse('makespec 4') end if (txt=="@spec 5") then parse('makespec 5') end if (txt=="@spec 6") then parse('makespec 6') end if (txt=="@spec 7") then parse('makespec 7') end if (txt=="@spec 8") then parse('makespec 8') end if (txt=="@spec 9") then parse('makespec 9') end if (txt=="@spec 10") then parse('makespec 10') end if (txt=="@spec 11") then parse('makespec 11') end if (txt=="@spec 12") then parse('makespec 12') end if (txt=="@spec 13") then parse('makespec 13') end if (txt=="@spec 14") then parse('makespec 14') end if (txt=="@spec 15") then parse('makespec 15') end if (txt=="@spec 16") then parse('makespec 16') end if (txt=="@spec 17") then parse('makespec 17') end if (txt=="@spec 18") then parse('makespec 18') end if (txt=="@spec 19") then parse('makespec 19') end if (txt=="@spec 20") then parse('makespec 20') end if (txt=="@spec 21") then parse('makespec 21') end if (txt=="@spec 22") then parse('makespec 22') end if (txt=="@spec 23") then parse('makespec 23') end if (txt=="@spec 24") then parse('makespec 24') end if (txt=="@spec 25") then parse('makespec 25') end if (txt=="@spec 26") then parse('makespec 26') end if (txt=="@spec 27") then parse('makespec 27') end if (txt=="@spec 28") then parse('makespec 28') end if (txt=="@spec 29") then parse('makespec 29') end if (txt=="@spec 30") then parse('makespec 30') end if (txt=="@spec 31") then parse('makespec 31') end if (txt=="@spec 32") then parse('makespec 32') end if (txt=="@freeze all") then parse('speedmod 1 -30') parse('speedmod 2 -30') parse('speedmod 3 -30') parse('speedmod 4 -30') parse('speedmod 5 -30') parse('speedmod 6 -30') parse('speedmod 7 -30') parse('speedmod 8 -30') parse('speedmod 9 -30') parse('speedmod 10 -30') parse('speedmod 11 -30') parse('speedmod 12 -30') parse('speedmod 13 -30') parse('speedmod 14 -30') parse('speedmod 15 -30') parse('speedmod 16 -30') parse('speedmod 17 -30') parse('speedmod 18 -30') parse('speedmod 19 -30') parse('speedmod 20 -30') parse('speedmod 21 -30') parse('speedmod 22 -30') parse('speedmod 23 -30') parse('speedmod 24 -30') parse('speedmod 25 -30') parse('speedmod 26 -30') parse('speedmod 27 -30') parse('speedmod 28 -30') parse('speedmod 29 -30') parse('speedmod 30 -30') parse('speedmod 31 -30') parse('speedmod 32 -30') end if (txt=="@unfreeze all") then parse('speedmod 1 0') parse('speedmod 2 0') parse('speedmod 3 0') parse('speedmod 4 0') parse('speedmod 5 0') parse('speedmod 6 0') parse('speedmod 7 0') parse('speedmod 8 0') parse('speedmod 9 0') parse('speedmod 10 0') parse('speedmod 11 0') parse('speedmod 12 0') parse('speedmod 13 0') parse('speedmod 14 0') parse('speedmod 15 0') parse('speedmod 16 0') parse('speedmod 17 0') parse('speedmod 18 0') parse('speedmod 19 0') parse('speedmod 20 0') parse('speedmod 21 0') parse('speedmod 22 0') parse('speedmod 23 0') parse('speedmod 24 0') parse('speedmod 25 0') parse('speedmod 26 0') parse('speedmod 27 0') parse('speedmod 28 0') parse('speedmod 29 0') parse('speedmod 30 0') parse('speedmod 31 0') parse('speedmod 32 0') end if (txt=="@specall") then parse('makespec 1') parse('makespec 2') parse('makespec 3') parse('makespec 4') parse('makespec 5') parse('makespec 6') parse('makespec 7') parse('makespec 8') parse('makespec 9') parse('makespec 10') parse('makespec 11') parse('makespec 12') parse('makespec 13') parse('makespec 14') parse('makespec 15') parse('makespec 16') parse('makespec 17') parse('makespec 18') parse('makespec 19') parse('makespec 20') parse('makespec 21') parse('makespec 22') parse('makespec 23') parse('makespec 24') parse('makespec 25') parse('makespec 26') parse('makespec 27') parse('makespec 28') parse('makespec 29') parse('makespec 30') parse('makespec 31') parse('makespec 32') end end end end -- Serveraction for Admin&Mod -- addhook("serveraction","adminaction") function adminaction(id,b) if b == 1 then for _, usgn in ipairs(Admins) do if player(id,'usgn') == usgn then menu(id,"Admin Menu,Kill every Player|Everyone,Give energie ,Training Rounds Menu,Build Options,Restart Round|In 3 Seconds,Mapchange,Fog of war,Game mode,Admin menu 2") return 1 end end for _, usgn in ipairs(Mods) do if player(id,'usgn') == usgn then menu(id,"Mod Menu,Buy Menu,Game mode,Build Options,Hats,Training Rounds,Bot menu") return 1 end end end end -- Menu Settings -- addhook("menu","adminmenu") function adminmenu(id,t,b) if t=="Admin Menu" then if b==1 then msg("©255000000Everyone dies from the admin!@C") for _, pl in ipairs(player(0, "tableliving")) do parse("killplayer " .. pl) end elseif b==2 then menu(id,"Admin Energie,Give everyone +10 Energie,Give everyone +20 Energie,Give everyone +30 Energie, Give everyone +50 Energie, Give everyone +100 Energie,Set HP to 50, Set HP to 10") elseif b==3 then menu(id,"Training Rounds,M4A1 + AK-47 Round,Knife Round,M3 Round,FN F2000 Round,AWP + SCOUT Round,deadly Round,Mini Round,Laser Round,Portal & M4A1 & AK41 Round") elseif b==4 then menu(id,"Build Options,Turrets,Dispenser,Supply,Gate Field") elseif b==5 then parse("restartround 3") elseif b==6 then menu(id,"Map change,M4A1_Deagle,fr33kz,awp grey,awp mexico,de dust,cs italy,de infernopod,dm_dust,dm_dust_xmas") elseif b==7 then menu(id,"Fog of war,ON,OFF") elseif b==8 then menu(id,"Game mode,Standard,Deathmatch,Team deathmatch,Constructions,Zombies") elseif b==9 then menu(id,"Admin menu 2,Friendly fire,Hats,Freeze time,Info,Start money,Infinite ammo,Bot menu,Admin menu,Admin menu 3") end elseif t == "Admin Energie" then if type(b) == "number" and b > 0 then if b > 5 then if b == 6 then for _, id in ipairs(player(0, "tableliving")) do parse("sethealth "..id.." 50") end elseif b==7 then for _, id in ipairs(player(0, "tableliving")) do parse("sethealth "..id.." 10") end end else local c = { 10, 20, 30, 50, 100 } for _, id in ipairs(player(0, "tableliving")) do msg2(id,"©255000000Your Energy increases by " .. c[b] .. "!") parse('setmaxhealth ' .. id .. ' ' .. player(id, "health") + c[b]) end end end elseif t=="Training Rounds" then if b==1 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 32") parse("equip "..pl.." 30") parse("equip "..pl.." 3") end msg("©255000000M4A1,AK-47 Round!@C") elseif b==2 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 50") end msg("©255000000Knife Round!@C") elseif b==3 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 10") parse("equip "..pl.." 3") parse("speedmod "..pl.." 5") end msg("©255000000M3 Round!@C") elseif b==4 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 91") parse("equip "..pl.." 3") parse("speedmod "..pl.." -5") end msg("©255000000FN F2000 Round!@C") elseif b==5 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 35") parse("equip "..pl.." 34") parse("equip "..pl.." 3") end msg("©255000000AWP + SCOUT Round!@C") elseif b==6 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 46") parse("equip "..pl.." 47") parse("equip "..pl.." 90") end msg("©255000000deadly Round!@C") elseif b==7 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 38") parse("equip "..pl.." 39") parse("equip "..pl.." 6") end msg("©255000000Mini Round!@C") elseif b==8 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 45") parse("equip "..pl.." 6") end msg("©255000000Laser Round!@C") elseif b==9 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 88") parse("equip "..pl.." 32") parse("equip "..pl.." 30") parse("equip "..pl.." 3") end msg("©255000000Portal & M4A1 & AK41 Round!@C") end elseif t=="Build Options" then if b==1 then menu(id,"Turrets,1 Turret,2 Turrets,5 Turrets,10 Turrets,15 Turrets,20 Turrets,30 Turrets,50 Turrets,Unlimit Turrets") elseif b==2 then menu(id,"Dispenser,1 Dispenser,2 Dispenser,5 Dispenser,10 Dispenser,15 Dispenser,20 Dispenser,30 Dispenser,50 Dispenser,Unlimit Dispenser") elseif b==3 then menu(id,"Supply,1 Supply,2 Supply,5 Supply,10 Supply,15 Supply,20 Supply,30 Supply,50 Supply,Unlimit Supply") elseif b==4 then menu(id,"GateField,1 Gate Field,2 Gate Field,5 Gate Field,10 Gate Field,15 Gate Field,20 Gate Field,30 Gate Field,50 Gate Field,Unlimit Gate Field") end elseif t=="Turrets" then if type(b) == "number" and b > 0 then local c = { 1, 2, 5, 10, 15, 20, 30, 50, 9999 } msg("©255000000You can build " .. c[b] .. " Turrets now!") parse('mp_building_limit "turret" ' .. c[b]) end elseif t=="Dispenser" then if type(b) == "number" and b > 0 then local c = { 1, 2, 5, 10, 15, 20, 30, 50, 9999 } msg("©255000000You can build " .. c[b] .. " Dispensers now!") parse('mp_building_limit "dispenser" ' .. c[b]) end elseif t=="Supply" then if type(b) == "number" and b > 0 then local c = { 1, 2, 5, 10, 15, 20, 30, 50, 9999 } msg("©255000000You can build " .. c[b] .. " Supplys now!") parse('mp_building_limit "supply" ' .. c[b]) end elseif t=="GateField" then if type(b) == "number" and b > 0 then local c = { 1, 2, 5, 10, 15, 20, 30, 50, 9999 } msg("©255000000You can build " .. c[b] .. " Gate Fields now!") parse('mp_building_limit "gate field" ' .. c[b]) end elseif t=="Map change" then if b==1 then parse("map aim_m4a1_deagle") elseif b==2 then parse("map aim_fr33kz") elseif b==3 then parse("map awp_grey") elseif b==4 then parse("map awp_mexico") elseif b==5 then parse("map de_dust") elseif b==6 then parse("map cs_italy") elseif b==7 then parse("map de_infernopod") elseif b==8 then parse("map dm_dust") elseif b==9 then parse("map dm_dust_xmas") end elseif t=="Fog of war" then if b==1 then parse("sv_fow 1") elseif b==2 then parse("sv_fow 2") end elseif t=="Game mode" then if b==1 then parse("sv_gamemode 0") elseif b==2 then parse("sv_gamemode 1") elseif b==3 then parse("sv_gamemode 2") elseif b==4 then parse("sv_gamemode 3") elseif b==5 then parse("sv_gamemode 4") end elseif t=="Admin menu 2" then if b==1 then menu(id,"Friendly fire,ON,OFF") elseif b==2 then menu(id,"Hats,Sonic,No Hat") elseif b==3 then menu(id,"Freeze time,No sec [0],3 Sec,5 Sec") elseif b==4 then msg2(id,"©999999999Server Name: "..game("sv_name")) msg2(id,"©999999999Script made by : Pirates killer") msg2(id,"©999999999Script version : 0.1.2") elseif b==5 then menu(id,"Start money,2000$,4500$,8000$,16000$") elseif b==6 then menu(id,"Infinite ammo,ON,OFF") elseif b==7 then parse("bot") elseif b==8 then menu(id,"Admin menu 2,Friendly fire,Hats,Freeze time,Info,Start money,Infinite ammo,Bot menu,Admin menu,Admin menu 3") elseif b==9 then menu(id,"Admin menu 3,God mode|"..godMode[id]..",Admin tag color|"..admin_color_name[color_admin[id]]..",,,,,,Admin menu,Admin menu 2") end elseif t=="Admin menu 3" then if b==1 and godMode[id]==0 then msg2(id,"GodMode Activated") godMode[id]=1 elseif b==1 and godMode[id]==1 then msg2(id,"GodMode Deactivated") godMode[id]=0 elseif b==2 then menu(id,"Admin tag color,White,Black,Green,Brown,Purple,blue,,,Admin menu 3") elseif b==8 then menu(id,"Admin Menu,Kill every Player|Everyone,Give energie ,Training Rounds Menu,Build Options,Restart Round|In 3 Seconds,Mapchange,Fog of war,Game mode,Admin menu 2") elseif b==9 then menu(id,"Admin menu 2,Friendly fire,Hats,Freeze time,Info,Start money,Infinite ammo,Bot menu,Admin menu,Admin menu 3") end elseif t=="Admin tag color" then if b==1 then color_admin[id]=0 msg2(id,""..admincolor[color_admin[id]].."Your admin tag color is "..admin_color_name[color_admin[id]].."") elseif b==2 then color_admin[id]=1 msg2(id,""..admincolor[color_admin[id]].."Your admin tag color is "..admin_color_name[color_admin[id]].."") elseif b==3 then color_admin[id]=2 msg2(id,""..admincolor[color_admin[id]].."Your admin tag color is "..admin_color_name[color_admin[id]].."") elseif b==4 then color_admin[id]=3 msg2(id,""..admincolor[color_admin[id]].."Your admin tag color is "..admin_color_name[color_admin[id]].."") elseif b==5 then color_admin[id]=4 msg2(id,""..admincolor[color_admin[id]].."Your admin tag color is "..admin_color_name[color_admin[id]].."") elseif b==6 then color_admin[id]=5 msg2(id,""..admincolor[color_admin[id]].."Your admin tag color is "..admin_color_name[color_admin[id]].."") elseif b==9 then menu(id,"Admin menu 3,God mode|"..godMode[id]..",Admin tag color|"..admin_color_name[color_admin[id]]..",,,,,,Admin menu,Admin menu 2") end elseif t=="Friendly fire" then if b==1 then parse("sv_friendlyfire 1") elseif b==2 then parse("sv_friendlyfire 2") end elseif t=="Hats" then if b==1 then freeimage(id) id1=image("gfx/hc/attribs/sonic.png",1,1,200+id) imagealpha(id1,1.0) elseif b==2 then freeimage(id) imagealpha(id1,1.0) end elseif t=="Freeze time" then if b==1 then parse("mp_freezetime 0") elseif b==2 then parse("mp_freezetime 3") elseif b==3 then parse("mp_freezetime 5") end elseif t=="Start money" then if b==1 then parse("mp_startmoney 2000") elseif b==2 then parse("mp_startmoney 4500") elseif b==3 then parse("mp_startmoney 8000") elseif b==4 then parse("mp_startmoney 16000") end elseif t=="Infinite ammo" then if b==1 then parse("mp_infammo 1") elseif b==2 then parse("mp_infammo 0") end elseif t=="Mod Menu" then if b==1 then menu(id,"Buy Menu,Gas Grenade|3.000$,Shield|3.000$,Chainsaw|6.500$,Wrench|4.500$") elseif b==2 then menu(id,"Game mode,Standard,Deathmatch,Team deathmatch,Constructions,Zombies") elseif b==3 then menu(id,"Build Options,Turrets,Dispenser,Supply,Gate Field") elseif b==4 then menu(id,"Hats,Sonic,No Hat") elseif b==5 then menu(id,"Training Rounds,M4A1 + AK-47 Round,Knife Round,M3 Round,FN F2000 Round,AWP + SCOUT Round,deadly Round,Mini Round,Laser Round,Portal & M4A1 & AK41 Round") elseif b==6 then parse("bot") end elseif t=="Buy Menu" then local a, c = { 3000, 3000, 6500, 4500 }, { 72, 41, 85, 74 } if type(b) == "number" and b > 0 and b < 5 then if player(id, "money") >= a[b] then msg2(id,"©255000000You bought a " .. itemtype(c[b], "name") .. "!@C") parse("equip " .. id .. " " .. c[b]) parse("setmoney " .. id .. " " .. player(id, "money") - a[b]) end elseif t=="Game mode" then if b==1 then parse("sv_gamemode 0") elseif b==2 then parse("sv_gamemode 1") elseif b==3 then parse("sv_gamemode 2") elseif b==4 then parse("sv_gamemode 3") elseif b==5 then parse("sv_gamemode 4") end elseif t=="Build Options" then if b==1 then menu(id,"Turrets,1 Turret,2 Turrets,5 Turrets,10 Turrets,15 Turrets,20 Turrets,30 Turrets,50 Turrets,Unlimit Turrets") elseif b==2 then menu(id,"Dispenser,1 Dispenser,2 Dispenser,5 Dispenser,10 Dispenser,15 Dispenser,20 Dispenser,30 Dispenser,50 Dispenser,Unlimit Dispenser") elseif b==3 then menu(id,"Supply,1 Supply,2 Supply,5 Supply,10 Supply,15 Supply,20 Supply,30 Supply,50 Supply,Unlimit Supply") elseif b==4 then menu(id,"GateField,1 Gate Field,2 Gate Field,5 Gate Field,10 Gate Field,15 Gate Field,20 Gate Field,30 Gate Field,50 Gate Field,Unlimit Gate Field") end elseif t=="Turrets" then if type(b) == "number" and b > 0 then local c = { 1, 2, 5, 10, 15, 20, 30, 50, 9999 } msg("©255000000You can build " .. c[b] .. " Turrets now!") parse('mp_building_limit "turret" ' .. c[b]) end elseif t=="Dispenser" then if type(b) == "number" and b > 0 then local c = { 1, 2, 5, 10, 15, 20, 30, 50, 9999 } msg("©255000000You can build " .. c[b] .. " Dispensers now!") parse('mp_building_limit "dispenser" ' .. c[b]) end elseif t=="Supply" then if type(b) == "number" and b > 0 then local c = { 1, 2, 5, 10, 15, 20, 30, 50, 9999 } msg("©255000000You can build " .. c[b] .. " Supplys now!") parse('mp_building_limit "supply" ' .. c[b]) end elseif t=="GateField" then if type(b) == "number" and b > 0 then local c = { 1, 2, 5, 10, 15, 20, 30, 50, 9999 } msg("©255000000You can build " .. c[b] .. " Gate Fields now!") parse('mp_building_limit "gate field" ' .. c[b]) end elseif t=="Hats" then if b==1 then freeimage(id) id1=image("gfx/hc/attribs/sonic.png",1,1,200+id) imagealpha(id1,1.0) elseif b==2 then freeimage(id) imagealpha(id1,1.0) end elseif t=="Training Rounds" then if b==1 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 32") parse("equip "..pl.." 30") parse("equip "..pl.." 3") end msg("©255000000M4A1,AK-47 Round!@C") elseif b==2 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 50") end msg("©255000000Knife Round!@C") elseif b==3 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 10") parse("equip "..pl.." 3") parse("speedmod "..pl.." 5") end msg("©255000000M3 Round!@C") elseif b==4 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 91") parse("equip "..pl.." 3") parse("speedmod "..pl.." -5") end msg("©255000000FN F2000 Round!@C") elseif b==5 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 35") parse("equip "..pl.." 34") parse("equip "..pl.." 3") end msg("©255000000AWP + SCOUT Round!@C") elseif b==6 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 46") parse("equip "..pl.." 47") parse("equip "..pl.." 90") end msg("©255000000deadly Round!@C") elseif b==7 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 38") parse("equip "..pl.." 39") parse("equip "..pl.." 6") end msg("©255000000Mini Round!@C") elseif b==8 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 45") parse("equip "..pl.." 6") end msg("©255000000Laser Round!@C") elseif b==9 then for _, pl in ipairs(player(0, "tableliving")) do parse("strip "..pl) parse("equip "..pl.." 88") parse("equip "..pl.." 32") parse("equip "..pl.." 30") parse("equip "..pl.." 3") end msg("©255000000Portal & M4A1 & AK41 Round!@C") end end end end -------------god mode -------------------- addhook("hit","_hit") function _hit(id) if godMode[id]==1 then return 1 end end