Page 1 of 7 123 ... LastLast
Results 1 to 15 of 96
  1. #1
    snixzz8's Avatar
    Join Date
    Jun 2013
    Gender
    male
    Posts
    98
    Reputation
    10
    Thanks
    76

    Making scripts for people [FREE]

    I'm bored and have nothing better to do, so post if you want a script made
    I won't do anything that will be very time consuming, but I will do simple ESPs and shit like that
    Please don't ask me to do anything that's already been posted.

    Please explain in full detail what you want the script to do.

  2. The Following User Says Thank You to snixzz8 For This Useful Post:

    MineMineKiller (07-03-2013)

  3. #2
    MineMineKiller's Avatar
    Join Date
    May 2013
    Gender
    male
    Posts
    60
    Reputation
    10
    Thanks
    24
    My Mood
    Tired
    Help me fix my fucking stupid ass hack?

  4. #3
    snixzz8's Avatar
    Join Date
    Jun 2013
    Gender
    male
    Posts
    98
    Reputation
    10
    Thanks
    76
    Quote Originally Posted by MineMineKiller View Post
    Help me fix my fucking stupid ass hack?
    sure, post it or some shit

  5. #4
    MineMineKiller's Avatar
    Join Date
    May 2013
    Gender
    male
    Posts
    60
    Reputation
    10
    Thanks
    24
    My Mood
    Tired
    Also how did you get so good at lua? Did you learn it in school?


    ---------- Post added at 02:29 PM ---------- Previous post was at 02:28 PM ----------

    [/COLOR]Test the shit yourself the frame wont fucking work as I want it too. I'm srsly like dun right now.
    Last edited by MineMineKiller; 07-03-2013 at 02:10 PM.

  6. #5
    snixzz8's Avatar
    Join Date
    Jun 2013
    Gender
    male
    Posts
    98
    Reputation
    10
    Thanks
    76
    Quote Originally Posted by MineMineKiller View Post
    Also how did you get so good at lua? Did you learn it in school?

    Here's my shitty hack.

    Code:
    local TopFrame
    local AimbotButton
    local NoSpreadButton
    local RapidFireOffButton
    local RapidFireButton
    local SpeedhackButton
    local BypasserButton
    local NoclipButton
    local MorbusButton
    
    local X = -50
    local Y = -100
     
    local KeyPos =  {      
            {X+5, Y+100, 25, 25, -2.2, 3.45, 1.3, -0},
            {X+37.5, Y+100, 25, 25, -0.6, 1.85, 1.3, -0},
            {X+70, Y+100, 25, 25, 1.0, 0.25, 1.3, -0},
     
            {X+5, Y+132.5, 25, 25, -2.2, 3.45, 2.9, -1.6},
            {X+37.5, Y+132.5, 25, 25, -0.6, 1.85, 2.9, -1.6},
            {X+70, Y+132.5, 25, 25, 1.0, 0.25, 2.9, -1.6},
     
            {X+5, Y+165, 25, 25, -2.2, 3.45, 4.55, -3.3},
            {X+37.5, Y+165, 25, 25, -0.6, 1.85, 4.55, -3.3},
            {X+70, Y+165, 25, 25, 1.0, 0.25, 4.55, -3.3},
     
            {X+5, Y+67.5, 50, 25, -2.2, 4.7, -0.3, 1.6},
            {X+60, Y+67.5, 35, 25, 0.3, 1.65, -0.3, 1.6}
    }
     
    local function FindDisplayText(ent)
            if ent.GetDisplayText then
                    return ent:GetDisplayText()
            else
                    return ent.Entity:GetNetworkedInt("keypad_num")
            end
    end
     
    local function FindStatus(ent)
            if ent.GetStatus then
                    return ent:GetStatus()
            elseif ent.Entity:GetNetworkedBool("keypad_access") and ent.Entity:GetNetworkedBool("keypad_showaccess") then
                    return 1
            elseif not ent.Entity:GetNetworkedBool("keypad_access") and ent.Entity:GetNetworkedBool("keypad_showaccess") then
                    return 2
            else
                    return 0
            end
    end
     
    hook.Add("Think", "Somethingoranotherthatissomething", function()
            for k,v in pairs(player.GetAll()) do
                    local kp = v:GetEyeTrace().Entity
                    if IsValid(kp) and (string.find(kp:GetClass(), "keypad") and not(string.find(v:GetClass(), "cracker") or string.find(v:GetClass(), "checker"))) and v:EyePos():Distance(kp:GetPos()) <= 70 then
                            kp.tempCode = kp.tempCode or ""
                            kp.tempText = kp.tempText or ""
                            kp.tempStatus = kp.tempStatus or 0
                           
                            if (FindDisplayText(kp) != kp.tempText) or (FindStatus(kp) != kp.tempStatus) then
                                    kp.tempText = FindDisplayText(kp)
                                    kp.tempStatus = FindStatus(kp)
                                   
                                    local tr = util.TraceLine({
                                            start = v:EyePos(),
                                            endpos = v:GetAimVector() * 32 + v:EyePos(),
                                            filter = v
                                    })
                                   
                                    local pos = kp:WorldToLocal(tr.HitPos)
                                   
                                    for i,p in pairs(KeyPos) do
                                            local x = (pos.y - p[5]) / (p[5] + p[6])
                                            local y = 1 - (pos.z + p[7]) / (p[7] + p[8])
                                           
                                            if (x >= 0 and y >= 0 and x <= 1 and y <= 1) then
                                                    if i == 11 then
                                                            if kp.tempStatus == 1 then
                                                                    kp.code = kp.tempCode
                                                                    kp.tempCode = ""
                                                            elseif kp.tempStatus == 2 then
                                                                    kp.tempCode = ""
                                                            end
                                                    elseif i == 10 then
                                                            kp.tempCode = ""
                                                    elseif i > 0 then
                                                            kp.tempCode = kp.tempCode..i
                                                    end
                                            end
                                    end
                            end
                    end
            end
    end)
     
    hook.Add( "HUDPaint", "somethingoranotherthatissomethingelse", function()
            local e = LocalPlayer():GetEyeTrace().Entity
            if IsValid(e) and string.find(e:GetClass(), "keypad") then
                    local text = e.code or "Not Found"
                    draw.WordBox( 8, ScrW() / 2, ScrH() / 2, text, "Default", Color(50,50,75,100), Color(255,255,255,255) )
            end
           
            for k,v in pairs(ents.GetAll()) do
                    if IsValid(v) then
                            if string.find(v:GetClass(), "keypad") and not(string.find(v:GetClass(), "cracker") or string.find(v:GetClass(), "checker")) then
                                    if v != e then
                                            local pos = v:GetPos():ToScreen()
                                            if IsValid(v) and v.code then
                                                    draw****undedBox( 4, pos.x-5, pos.y-5, 20, 20, Color( 0, 255, 0, 150 ) )
                                            else
                                                    draw****undedBox( 4, pos.x-5, pos.y-5, 20, 20, Color( 255, 0, 0, 150 ) )
                                            end
                                    end
                            end
                    end
            end
    end)
    
    function muudeahack()
    TopFrame = vgui.Create('DFrame')
    TopFrame:SetSize(160, 254)
    TopFrame:SetPos(5, 5)
    TopFrame:SetTitle('Muudea Hack v1.0')
    TopFrame:SetDeleteOnClose(false)
    TopFrame:MakePopup()
    AimbotButton = vgui.Create('DButton')
    AimbotButton:SetSize(160, 25)
    AimbotButton:SetPos(5, 90)
    AimbotButton:SetText('Aimbot')
    AimbotButton:SetVisible('true')
    AimbotButton:SetParent('TopFrame')
    AimbotButton.DoClick = function()
    hook.Add( "Think", "ThinkAboutIt", function()
    	if input.IsKeyDown(KEY_T) then
    		local closest = nil
    		
    		local hitpos = LocalPlayer():GetEyeTrace()
    		
    		for k, v in pairs( ents.FindInSphere(hitpos.HitPos,500) ) do
    			if v:IsPlayer() and v != LocalPlayer() then
    				if v:Alive() then
    					closest = v
    				end
    			end
    		end
    		
    		if closest and closest:IsPlayer() and closest:Alive() then
    			local head = closest:LookupBone("ValveBiped.Bip01_Head1")
    			local headpos, headang = closest:GetBonePosition(head)
    			
    			LocalPlayer():SetEyeAngles( (headpos-LocalPlayer():GetShootPos()):Angle() )
    			end
    		end
    	end)
    end
    NoSpreadButton = vgui.Create('DButton')
    NoSpreadButton:SetSize(160, 25)
    NoSpreadButton:SetPos(5, 180)
    NoSpreadButton:SetText('No Spread')
    NoSpreadButton:SetVisible('true')
    NoSpreadButton:SetParent('TopFrame')
    NoSpreadButton.DoClick = function()
    require( "nospread" )
     
    local NormalCones                       = {
            [ "weapon_cs_base" ]    = true,
            [ "weapon_zs_base" ]    = true,
    }
     
    local HL2Cones                          = {
            [ "weapon_pistol" ]     = Vector( 0.0100, 0.0100, 0.0100 ),
            [ "weapon_smg1" ]               = Vector( 0.04362, 0.04362, 0.04362 ),
            [ "weapon_ar2" ]                = Vector( 0.02618, 0.02618, 0.02618 ),
            [ "weapon_shotgun" ]    = Vector( 0.08716, 0.08716, 0.08716 ),
    }
     
    function GetCone( wep )
            if !IsValid( wep ) then return 0 end
           
            if HL2Cones[ wep:GetClass() ] then return HL2Cones[ wep:GetClass() ] end
            if NormalCones[ wep.Base ] then return wep.Cone or wep.Primary.Cone or 0 end
           
            local Cone = wep.Cone
           
            if !Cone then
                    Cone = wep.Primary and wep.Primary.Cone or 0
            end
           
            return Cone
    end
     
    function PredictSpread( cmd, ang )
    local w = LocalPlayer():GetActiveWeapon()
    local vecCone, valCone = Vector( 0, 0, 0 )
            if ( w && w:IsValid() && ( type( w.Initialize ) == "function" ) ) then
                    valCone = GetCone( w )                    
                    if ( type( valCone ) == "number" ) then
                            vecCone = Vector( -valCone, -valCone, -valCone )                      
                    elseif ( type( valCone ) == "Vector" ) then
                            vecCone = valCone * -1    
                    elseif bit.band( cmd:GetButtons(), IN_SPEED ) or bit.band( cmd:GetButtons(), IN_JUMP ) then
                            vecCone = valCone + (cone * 2 )                        
                    end
            else
                    if ( w:IsValid() ) then
                            local class = w:GetClass()
                            if ( HL2Cones[ class ] ) then
                                    vecCone = HL2Cones[ class ]
                            end
                    end
            end
    return DS_manipulateShot( DS_md5PseudoRandom( DS_getUCMDCommandNumber( cmd ) ), ang:Forward(), vecCone ):Angle()
    end
     
    local angles = Angle( 0, 0, 0 )
     
    function GetAngles()
            if ( !ValidEntity( LocalPlayer() ) ) then return end
            angles = LocalPlayer():EyeAngles()
    end
     
    function Parkinsons( ucmd )
            angles.p = math.NormalizeAngle( angles.p )
            angles.y = math.NormalizeAngle( angles.y )
           
            local correct = 1
            angles.y = math.NormalizeAngle( angles.y + ( ucmd:GetMouseX() * -0.022 * correct ) )
            angles.p = math.Clamp( angles.p + ( ucmd:GetMouseY() * 0.022 * correct ), -89, 90 )
            ucmd:SetViewAngles( angles )
           
            if ( ucmd:GetButtons() && IN_ATTACK > 0 ) then
                    local FakeAngle = PredictSpread( ucmd, angles )
                    FakeAngle.p = math.NormalizeAngle( FakeAngle.p )
                    FakeAngle.y = math.NormalizeAngle( FakeAngle.y )
                    ucmd:SetViewAngles( FakeAngle )
            end
    end
     
    function CalcView( ply, origin, angles, FOV )
            local ply = LocalPlayer()
            local w = ply:GetActiveWeapon()
           
            local wep = ply:GetActiveWeapon()
            if wep.Primary then wep.Primary.Recoil = 0 end
            if wep.Secondary then wep.Secondary.Recoil = 0 end
            local view = GAMEMODE:CalcView( ply, origin, angles, zoomFOV ) || {}
            view.angles = angles
            view.angles.r = 0
            view.fov = zoomFOV
            return view
    end
     
    hook.Add( "CalcView", "I hate making hook names", CalcView )
    hook.Add( "CreateMove", "YouHaveParkinsons", Parkinsons )
    end
    RapidFireOffButton = vgui.Create('DButton')
    RapidFireOffButton:SetSize(140, 16)
    RapidFireOffButton:SetPos(15, 240)
    RapidFireOffButton:SetText('Rapid Fire Off')
    RapidFireOffButton:SetVisible('true')
    RapidFireOffButton:SetParent('TopFrame')
    RapidFireOffButton.DoClick = function() 
    RunConsoleCommand("-muudeaspeedshoot")
    end
    RapidFireButton = vgui.Create('DButton')
    RapidFireButton:SetSize(160, 25)
    RapidFireButton:SetPos(5, 210)
    RapidFireButton:SetText('Rapid Fire')
    RapidFireButton:SetParent('TopFrame')
    RapidFireButton.DoClick = function()
            local Shoot = false
            hook.Add("Think", "SpeedShoot", function()
                    if Shoot == false then
                            RunConsoleCommand("+attack")
                            Shoot = true
                    elseif Shoot == true then
                            RunConsoleCommand("-attack")
                            Shoot = false
                    end
            end)
    end
    concommand.Add("+muudeaspeedshoot", SpeedShoot)
    
    function RemoveSpeedShoot()
            hook.Remove("Think", "SpeedShoot")
            RunConsoleCommand("-attack")
    end
    concommand.Add("-muudeaspeedshoot", RemoveSpeedShoot)
    SpeedhackButton = vgui.Create('DButton')
    SpeedhackButton:SetSize(160, 25)
    SpeedhackButton:SetPos(5, 150)
    SpeedhackButton:SetText('Speedhack')
    SpeedhackButton:SetVisible('true')
    SpeedhackButton:SetParent('TopFrame')
    SpeedhackButton.DoClick = function()
    require("cvar3")
    CreateClientConVar("muudea_setspeed", 2)
    
    concommand.Add("muudeaspeed+", function()
    	RunConsoleCommand("muudea_setspeed", ""..GetConVarNumber("muudea_setspeed") + 0.5)
    	timer.Simple(0.25, function()
    	 	chat.AddText("Speed is: "..GetConVarNumber("muudea_setspeed").."x normal")
    	 end) 
    end)
    concommand.Add("muudeaspeed-", function()
    	RunConsoleCommand("muudea_setspeed", ""..GetConVarNumber("muudea_setspeed") - 0.5)
    	timer.Simple(0.25, function()
    	 	chat.AddText("SpeedHack Speed is Now: "..GetConVarNumber("muudea_setspeed").."x normal")
    	 end) 
    end)
    
    
    concommand.Add("+muudeaspeed", function()
    	GetConVar("sv_cheats"):SetValue(1)
    	GetConVar("host_timescale"):SetValue(GetConVarNumber("muudea_setspeed"))
    end)
    
    concommand.Add("-muudeaspeed", function()
    	GetConVar("host_timescale"):SetValue(1)
    end)
    end
    BypasserButton = vgui.Create('DButton')
    BypasserButton:SetSize(160, 25)
    BypasserButton:SetPos(5, 120)
    BypasserButton:SetText('Bypasser')
    BypasserButton:SetVisible('true')
    BypasserButton:SetParent('TopFrame')
    BypasserButton.DoClick = function()
    require("cvar3")
    GetConVar("sv_allowcslua"):SetFlags(0)
    GetConVar("sv_cheats"):SetFlags(0)
    GetConVar("sv_allowcslua"):SetValue(1)
    GetConVar("sv_cheats"):SetValue(1)
    end
    NoclipButton = vgui.Create('DButton')
    NoclipButton:SetSize(160, 25)
    NoclipButton:SetPos(5, 60)
    NoclipButton:SetText('Client Noclip')
    NoclipButton:SetVisible('true')
    NoclipButton:SetParent('TopFrame')
    NoclipButton.DoClick = function() 
    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
           
            // Add and reduce the old velocity.
            local time = FrameTime()
            SW.ViewOrigin = SW.ViewOrigin + ( SW.Velocity * time )
            SW.Velocity = SW.Velocity * 0.95
           
            // Rotate the view when the mouse is moved.
            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 )
           
            // What direction we're going to move in.
            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
           
            // Speed.
            add = add:GetNormal() * time * 500
            if ( cmd:KeyDown( IN_SPEED ) ) then add = add * 2 end
           
            SW.Velocity = SW.Velocity + add
           
            // This stops us looking around crazily while spiritwalking.
            if ( SW.LockView == true ) then
                    SW.LockView = cmd:GetViewAngles()
            end
            if ( SW.LockView ) then
                    cmd:SetViewAngles( SW.LockView )
            end
           
            // This stops us moving while spiritwalking.
            cmd:SetForwardMove( 0 )
            cmd:SetSideMove( 0 )
            cmd:SetUpMove( 0 )
    end
    hook.Add( "CreateMove", "SpiritWalk", SW.CreateMove )
     
            SW.Enabled = !SW.Enabled
            SW.LockView = SW.Enabled
            SW.SetView = true
           
            local status = { [ true ] = "ON", [ false ] = "OFF" }
            print( "Muudea NoClip Enabled!" )
    		end
    concommand.Add( "sw_pos", function() print( SW.ViewOrigin ) end )
    MorbusButton = vgui.Create('DButton')
    MorbusButton:SetSize(160, 25)
    MorbusButton:SetPos(5, 30)
    MorbusButton:SetText('Morbus Alien Finder')
    MorbusButton:SetVisible('true')
    MorbusButton:SetParent('TopFrame')
    MorbusButton.DoClick = function()
    	for k, v in pairs(player.GetAll()) do
    		for k2, v2 in pairs(v:GetWeapons()) do
    			if string.find(v2:GetPrintName(), "Alien") then
    				print(v:Name().." is an Alien Brood!")
    			end
    		end
    	end
    end
    end
    concommand.Add("openmuudeahack", muudeahack )
    chat.AddText(Color( 255, 50, 63 ), "Muudea Hack Loaded! - muudea@live.ca")
    chat.PlaySound()
    pastebin please, mpgh fucks up code because of their shitty anti-advertisement system or whatever

    ---------- Post added at 02:29 PM ---------- Previous post was at 02:29 PM ----------

    Quote Originally Posted by MineMineKiller View Post
    Also how did you get so good at lua? Did you learn it in school?

    Here's my shitty hack.

    Code:
    local TopFrame
    local AimbotButton
    local NoSpreadButton
    local RapidFireOffButton
    local RapidFireButton
    local SpeedhackButton
    local BypasserButton
    local NoclipButton
    local MorbusButton
    
    local X = -50
    local Y = -100
     
    local KeyPos =  {      
            {X+5, Y+100, 25, 25, -2.2, 3.45, 1.3, -0},
            {X+37.5, Y+100, 25, 25, -0.6, 1.85, 1.3, -0},
            {X+70, Y+100, 25, 25, 1.0, 0.25, 1.3, -0},
     
            {X+5, Y+132.5, 25, 25, -2.2, 3.45, 2.9, -1.6},
            {X+37.5, Y+132.5, 25, 25, -0.6, 1.85, 2.9, -1.6},
            {X+70, Y+132.5, 25, 25, 1.0, 0.25, 2.9, -1.6},
     
            {X+5, Y+165, 25, 25, -2.2, 3.45, 4.55, -3.3},
            {X+37.5, Y+165, 25, 25, -0.6, 1.85, 4.55, -3.3},
            {X+70, Y+165, 25, 25, 1.0, 0.25, 4.55, -3.3},
     
            {X+5, Y+67.5, 50, 25, -2.2, 4.7, -0.3, 1.6},
            {X+60, Y+67.5, 35, 25, 0.3, 1.65, -0.3, 1.6}
    }
     
    local function FindDisplayText(ent)
            if ent.GetDisplayText then
                    return ent:GetDisplayText()
            else
                    return ent.Entity:GetNetworkedInt("keypad_num")
            end
    end
     
    local function FindStatus(ent)
            if ent.GetStatus then
                    return ent:GetStatus()
            elseif ent.Entity:GetNetworkedBool("keypad_access") and ent.Entity:GetNetworkedBool("keypad_showaccess") then
                    return 1
            elseif not ent.Entity:GetNetworkedBool("keypad_access") and ent.Entity:GetNetworkedBool("keypad_showaccess") then
                    return 2
            else
                    return 0
            end
    end
     
    hook.Add("Think", "Somethingoranotherthatissomething", function()
            for k,v in pairs(player.GetAll()) do
                    local kp = v:GetEyeTrace().Entity
                    if IsValid(kp) and (string.find(kp:GetClass(), "keypad") and not(string.find(v:GetClass(), "cracker") or string.find(v:GetClass(), "checker"))) and v:EyePos():Distance(kp:GetPos()) <= 70 then
                            kp.tempCode = kp.tempCode or ""
                            kp.tempText = kp.tempText or ""
                            kp.tempStatus = kp.tempStatus or 0
                           
                            if (FindDisplayText(kp) != kp.tempText) or (FindStatus(kp) != kp.tempStatus) then
                                    kp.tempText = FindDisplayText(kp)
                                    kp.tempStatus = FindStatus(kp)
                                   
                                    local tr = util.TraceLine({
                                            start = v:EyePos(),
                                            endpos = v:GetAimVector() * 32 + v:EyePos(),
                                            filter = v
                                    })
                                   
                                    local pos = kp:WorldToLocal(tr.HitPos)
                                   
                                    for i,p in pairs(KeyPos) do
                                            local x = (pos.y - p[5]) / (p[5] + p[6])
                                            local y = 1 - (pos.z + p[7]) / (p[7] + p[8])
                                           
                                            if (x >= 0 and y >= 0 and x <= 1 and y <= 1) then
                                                    if i == 11 then
                                                            if kp.tempStatus == 1 then
                                                                    kp.code = kp.tempCode
                                                                    kp.tempCode = ""
                                                            elseif kp.tempStatus == 2 then
                                                                    kp.tempCode = ""
                                                            end
                                                    elseif i == 10 then
                                                            kp.tempCode = ""
                                                    elseif i > 0 then
                                                            kp.tempCode = kp.tempCode..i
                                                    end
                                            end
                                    end
                            end
                    end
            end
    end)
     
    hook.Add( "HUDPaint", "somethingoranotherthatissomethingelse", function()
            local e = LocalPlayer():GetEyeTrace().Entity
            if IsValid(e) and string.find(e:GetClass(), "keypad") then
                    local text = e.code or "Not Found"
                    draw.WordBox( 8, ScrW() / 2, ScrH() / 2, text, "Default", Color(50,50,75,100), Color(255,255,255,255) )
            end
           
            for k,v in pairs(ents.GetAll()) do
                    if IsValid(v) then
                            if string.find(v:GetClass(), "keypad") and not(string.find(v:GetClass(), "cracker") or string.find(v:GetClass(), "checker")) then
                                    if v != e then
                                            local pos = v:GetPos():ToScreen()
                                            if IsValid(v) and v.code then
                                                    draw****undedBox( 4, pos.x-5, pos.y-5, 20, 20, Color( 0, 255, 0, 150 ) )
                                            else
                                                    draw****undedBox( 4, pos.x-5, pos.y-5, 20, 20, Color( 255, 0, 0, 150 ) )
                                            end
                                    end
                            end
                    end
            end
    end)
    
    function muudeahack()
    TopFrame = vgui.Create('DFrame')
    TopFrame:SetSize(160, 254)
    TopFrame:SetPos(5, 5)
    TopFrame:SetTitle('Muudea Hack v1.0')
    TopFrame:SetDeleteOnClose(false)
    TopFrame:MakePopup()
    AimbotButton = vgui.Create('DButton')
    AimbotButton:SetSize(160, 25)
    AimbotButton:SetPos(5, 90)
    AimbotButton:SetText('Aimbot')
    AimbotButton:SetVisible('true')
    AimbotButton:SetParent('TopFrame')
    AimbotButton.DoClick = function()
    hook.Add( "Think", "ThinkAboutIt", function()
    	if input.IsKeyDown(KEY_T) then
    		local closest = nil
    		
    		local hitpos = LocalPlayer():GetEyeTrace()
    		
    		for k, v in pairs( ents.FindInSphere(hitpos.HitPos,500) ) do
    			if v:IsPlayer() and v != LocalPlayer() then
    				if v:Alive() then
    					closest = v
    				end
    			end
    		end
    		
    		if closest and closest:IsPlayer() and closest:Alive() then
    			local head = closest:LookupBone("ValveBiped.Bip01_Head1")
    			local headpos, headang = closest:GetBonePosition(head)
    			
    			LocalPlayer():SetEyeAngles( (headpos-LocalPlayer():GetShootPos()):Angle() )
    			end
    		end
    	end)
    end
    NoSpreadButton = vgui.Create('DButton')
    NoSpreadButton:SetSize(160, 25)
    NoSpreadButton:SetPos(5, 180)
    NoSpreadButton:SetText('No Spread')
    NoSpreadButton:SetVisible('true')
    NoSpreadButton:SetParent('TopFrame')
    NoSpreadButton.DoClick = function()
    require( "nospread" )
     
    local NormalCones                       = {
            [ "weapon_cs_base" ]    = true,
            [ "weapon_zs_base" ]    = true,
    }
     
    local HL2Cones                          = {
            [ "weapon_pistol" ]     = Vector( 0.0100, 0.0100, 0.0100 ),
            [ "weapon_smg1" ]               = Vector( 0.04362, 0.04362, 0.04362 ),
            [ "weapon_ar2" ]                = Vector( 0.02618, 0.02618, 0.02618 ),
            [ "weapon_shotgun" ]    = Vector( 0.08716, 0.08716, 0.08716 ),
    }
     
    function GetCone( wep )
            if !IsValid( wep ) then return 0 end
           
            if HL2Cones[ wep:GetClass() ] then return HL2Cones[ wep:GetClass() ] end
            if NormalCones[ wep.Base ] then return wep.Cone or wep.Primary.Cone or 0 end
           
            local Cone = wep.Cone
           
            if !Cone then
                    Cone = wep.Primary and wep.Primary.Cone or 0
            end
           
            return Cone
    end
     
    function PredictSpread( cmd, ang )
    local w = LocalPlayer():GetActiveWeapon()
    local vecCone, valCone = Vector( 0, 0, 0 )
            if ( w && w:IsValid() && ( type( w.Initialize ) == "function" ) ) then
                    valCone = GetCone( w )                    
                    if ( type( valCone ) == "number" ) then
                            vecCone = Vector( -valCone, -valCone, -valCone )                      
                    elseif ( type( valCone ) == "Vector" ) then
                            vecCone = valCone * -1    
                    elseif bit.band( cmd:GetButtons(), IN_SPEED ) or bit.band( cmd:GetButtons(), IN_JUMP ) then
                            vecCone = valCone + (cone * 2 )                        
                    end
            else
                    if ( w:IsValid() ) then
                            local class = w:GetClass()
                            if ( HL2Cones[ class ] ) then
                                    vecCone = HL2Cones[ class ]
                            end
                    end
            end
    return DS_manipulateShot( DS_md5PseudoRandom( DS_getUCMDCommandNumber( cmd ) ), ang:Forward(), vecCone ):Angle()
    end
     
    local angles = Angle( 0, 0, 0 )
     
    function GetAngles()
            if ( !ValidEntity( LocalPlayer() ) ) then return end
            angles = LocalPlayer():EyeAngles()
    end
     
    function Parkinsons( ucmd )
            angles.p = math.NormalizeAngle( angles.p )
            angles.y = math.NormalizeAngle( angles.y )
           
            local correct = 1
            angles.y = math.NormalizeAngle( angles.y + ( ucmd:GetMouseX() * -0.022 * correct ) )
            angles.p = math.Clamp( angles.p + ( ucmd:GetMouseY() * 0.022 * correct ), -89, 90 )
            ucmd:SetViewAngles( angles )
           
            if ( ucmd:GetButtons() && IN_ATTACK > 0 ) then
                    local FakeAngle = PredictSpread( ucmd, angles )
                    FakeAngle.p = math.NormalizeAngle( FakeAngle.p )
                    FakeAngle.y = math.NormalizeAngle( FakeAngle.y )
                    ucmd:SetViewAngles( FakeAngle )
            end
    end
     
    function CalcView( ply, origin, angles, FOV )
            local ply = LocalPlayer()
            local w = ply:GetActiveWeapon()
           
            local wep = ply:GetActiveWeapon()
            if wep.Primary then wep.Primary.Recoil = 0 end
            if wep.Secondary then wep.Secondary.Recoil = 0 end
            local view = GAMEMODE:CalcView( ply, origin, angles, zoomFOV ) || {}
            view.angles = angles
            view.angles.r = 0
            view.fov = zoomFOV
            return view
    end
     
    hook.Add( "CalcView", "I hate making hook names", CalcView )
    hook.Add( "CreateMove", "YouHaveParkinsons", Parkinsons )
    end
    RapidFireOffButton = vgui.Create('DButton')
    RapidFireOffButton:SetSize(140, 16)
    RapidFireOffButton:SetPos(15, 240)
    RapidFireOffButton:SetText('Rapid Fire Off')
    RapidFireOffButton:SetVisible('true')
    RapidFireOffButton:SetParent('TopFrame')
    RapidFireOffButton.DoClick = function() 
    RunConsoleCommand("-muudeaspeedshoot")
    end
    RapidFireButton = vgui.Create('DButton')
    RapidFireButton:SetSize(160, 25)
    RapidFireButton:SetPos(5, 210)
    RapidFireButton:SetText('Rapid Fire')
    RapidFireButton:SetParent('TopFrame')
    RapidFireButton.DoClick = function()
            local Shoot = false
            hook.Add("Think", "SpeedShoot", function()
                    if Shoot == false then
                            RunConsoleCommand("+attack")
                            Shoot = true
                    elseif Shoot == true then
                            RunConsoleCommand("-attack")
                            Shoot = false
                    end
            end)
    end
    concommand.Add("+muudeaspeedshoot", SpeedShoot)
    
    function RemoveSpeedShoot()
            hook.Remove("Think", "SpeedShoot")
            RunConsoleCommand("-attack")
    end
    concommand.Add("-muudeaspeedshoot", RemoveSpeedShoot)
    SpeedhackButton = vgui.Create('DButton')
    SpeedhackButton:SetSize(160, 25)
    SpeedhackButton:SetPos(5, 150)
    SpeedhackButton:SetText('Speedhack')
    SpeedhackButton:SetVisible('true')
    SpeedhackButton:SetParent('TopFrame')
    SpeedhackButton.DoClick = function()
    require("cvar3")
    CreateClientConVar("muudea_setspeed", 2)
    
    concommand.Add("muudeaspeed+", function()
    	RunConsoleCommand("muudea_setspeed", ""..GetConVarNumber("muudea_setspeed") + 0.5)
    	timer.Simple(0.25, function()
    	 	chat.AddText("Speed is: "..GetConVarNumber("muudea_setspeed").."x normal")
    	 end) 
    end)
    concommand.Add("muudeaspeed-", function()
    	RunConsoleCommand("muudea_setspeed", ""..GetConVarNumber("muudea_setspeed") - 0.5)
    	timer.Simple(0.25, function()
    	 	chat.AddText("SpeedHack Speed is Now: "..GetConVarNumber("muudea_setspeed").."x normal")
    	 end) 
    end)
    
    
    concommand.Add("+muudeaspeed", function()
    	GetConVar("sv_cheats"):SetValue(1)
    	GetConVar("host_timescale"):SetValue(GetConVarNumber("muudea_setspeed"))
    end)
    
    concommand.Add("-muudeaspeed", function()
    	GetConVar("host_timescale"):SetValue(1)
    end)
    end
    BypasserButton = vgui.Create('DButton')
    BypasserButton:SetSize(160, 25)
    BypasserButton:SetPos(5, 120)
    BypasserButton:SetText('Bypasser')
    BypasserButton:SetVisible('true')
    BypasserButton:SetParent('TopFrame')
    BypasserButton.DoClick = function()
    require("cvar3")
    GetConVar("sv_allowcslua"):SetFlags(0)
    GetConVar("sv_cheats"):SetFlags(0)
    GetConVar("sv_allowcslua"):SetValue(1)
    GetConVar("sv_cheats"):SetValue(1)
    end
    NoclipButton = vgui.Create('DButton')
    NoclipButton:SetSize(160, 25)
    NoclipButton:SetPos(5, 60)
    NoclipButton:SetText('Client Noclip')
    NoclipButton:SetVisible('true')
    NoclipButton:SetParent('TopFrame')
    NoclipButton.DoClick = function() 
    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
           
            // Add and reduce the old velocity.
            local time = FrameTime()
            SW.ViewOrigin = SW.ViewOrigin + ( SW.Velocity * time )
            SW.Velocity = SW.Velocity * 0.95
           
            // Rotate the view when the mouse is moved.
            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 )
           
            // What direction we're going to move in.
            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
           
            // Speed.
            add = add:GetNormal() * time * 500
            if ( cmd:KeyDown( IN_SPEED ) ) then add = add * 2 end
           
            SW.Velocity = SW.Velocity + add
           
            // This stops us looking around crazily while spiritwalking.
            if ( SW.LockView == true ) then
                    SW.LockView = cmd:GetViewAngles()
            end
            if ( SW.LockView ) then
                    cmd:SetViewAngles( SW.LockView )
            end
           
            // This stops us moving while spiritwalking.
            cmd:SetForwardMove( 0 )
            cmd:SetSideMove( 0 )
            cmd:SetUpMove( 0 )
    end
    hook.Add( "CreateMove", "SpiritWalk", SW.CreateMove )
     
            SW.Enabled = !SW.Enabled
            SW.LockView = SW.Enabled
            SW.SetView = true
           
            local status = { [ true ] = "ON", [ false ] = "OFF" }
            print( "Muudea NoClip Enabled!" )
    		end
    concommand.Add( "sw_pos", function() print( SW.ViewOrigin ) end )
    MorbusButton = vgui.Create('DButton')
    MorbusButton:SetSize(160, 25)
    MorbusButton:SetPos(5, 30)
    MorbusButton:SetText('Morbus Alien Finder')
    MorbusButton:SetVisible('true')
    MorbusButton:SetParent('TopFrame')
    MorbusButton.DoClick = function()
    	for k, v in pairs(player.GetAll()) do
    		for k2, v2 in pairs(v:GetWeapons()) do
    			if string.find(v2:GetPrintName(), "Alien") then
    				print(v:Name().." is an Alien Brood!")
    			end
    		end
    	end
    end
    end
    concommand.Add("openmuudeahack", muudeahack )
    chat.AddText(Color( 255, 50, 63 ), "Muudea Hack Loaded! - muudea@live.ca")
    chat.PlaySound()


    ---------- Post added at 02:29 PM ---------- Previous post was at 02:28 PM ----------

    Test the shit yourself the frame wont fucking work as I want it too. I'm srsly like dun right now.
    lol, no you don't learn shit like LUA in school
    i'm not even THAT good at it, but I taught myself mostly by looking through other scripts and understanding how they work

  7. #6
    MineMineKiller's Avatar
    Join Date
    May 2013
    Gender
    male
    Posts
    60
    Reputation
    10
    Thanks
    24
    My Mood
    Tired
    Nigga you da fuckin god of lua coding.

    [Lua] Fuck - Pastebin.com

  8. #7
    snixzz8's Avatar
    Join Date
    Jun 2013
    Gender
    male
    Posts
    98
    Reputation
    10
    Thanks
    76
    not really

    i'm also livestreaming because i have nothing better to do
    https://new.livestream.com/accounts/...events/2227873

  9. #8
    MineMineKiller's Avatar
    Join Date
    May 2013
    Gender
    male
    Posts
    60
    Reputation
    10
    Thanks
    24
    My Mood
    Tired
    Alright I'll join when the stream is up.

  10. #9
    snixzz8's Avatar
    Join Date
    Jun 2013
    Gender
    male
    Posts
    98
    Reputation
    10
    Thanks
    76

  11. #10
    JDawg147's Avatar
    Join Date
    Feb 2012
    Gender
    male
    Posts
    237
    Reputation
    10
    Thanks
    183
    gmcl_spreadthebutter_win32.dll implemented into AHack's aimbot? :3

  12. #11
    MineMineKiller's Avatar
    Join Date
    May 2013
    Gender
    male
    Posts
    60
    Reputation
    10
    Thanks
    24
    My Mood
    Tired
    Tanksalot M8!

    ---------- Post added at 02:53 PM ---------- Previous post was at 02:53 PM ----------

    Also how did you do it? Just for learning purposes.

  13. #12
    snixzz8's Avatar
    Join Date
    Jun 2013
    Gender
    male
    Posts
    98
    Reputation
    10
    Thanks
    76
    Quote Originally Posted by MineMineKiller View Post
    Tanksalot M8!

    ---------- Post added at 02:53 PM ---------- Previous post was at 02:53 PM ----------

    Also how did you do it? Just for learning purposes.
    You had it as SetParent( "panel" )
    it shouldn't be a string

    SetParent( panel )

    ---------- Post added at 02:57 PM ---------- Previous post was at 02:55 PM ----------

    Quote Originally Posted by JDawg147 View Post
    gmcl_spreadthebutter_win32.dll implemented into AHack's aimbot? :3

    edit: it already has it.

  14. #13
    MineMineKiller's Avatar
    Join Date
    May 2013
    Gender
    male
    Posts
    60
    Reputation
    10
    Thanks
    24
    My Mood
    Tired
    Fuck, how did I not see that.

  15. #14
    LordOfGears2's Avatar
    Join Date
    Jun 2013
    Gender
    male
    Location
    /home/lord/
    Posts
    278
    Reputation
    32
    Thanks
    55
    My Mood
    Inspired
    Quote Originally Posted by snixzz8 View Post
    ---------- Post added at 02:57 PM ---------- Previous post was at 02:55 PM ----------

    [/COLOR]


    edit: it already has it.
    He removed it because some people complained about lag with it

  16. #15
    snixzz8's Avatar
    Join Date
    Jun 2013
    Gender
    male
    Posts
    98
    Reputation
    10
    Thanks
    76
    Quote Originally Posted by LordOfGears2 View Post
    He removed it because some people complained about lag with it
    [Lua] ahack with nospreadens - Pastebin.com

  17. The Following User Says Thank You to snixzz8 For This Useful Post:

    JDawg147 (07-03-2013)

Page 1 of 7 123 ... LastLast

Similar Threads

  1. [Info] Making DN CN Accounts For People [Free]
    By xBoredom in forum Dragon Nest Discussions
    Replies: 21
    Last Post: 02-10-2013, 01:57 PM
  2. Making accs for people who have ip restrictions
    By thenewprome in forum CrossFire Discussions
    Replies: 4
    Last Post: 08-13-2011, 02:17 PM
  3. how to make script for KOS to change name ingame??
    By nicolas0008 in forum C++/C Programming
    Replies: 3
    Last Post: 04-02-2010, 09:07 AM
  4. Replies: 3
    Last Post: 07-18-2009, 12:45 AM
  5. Hey i want to start making sigs for people!!!
    By zebramanz in forum Help & Requests
    Replies: 7
    Last Post: 03-31-2009, 05:46 PM