vanamoinen
Сообщений: 7
Оценки: 0
Присоединился: 2012-01-19 12:25:12.060000
|
[1.26] One-time tiehack with Sourcecode
В общем этот хак базируется на том что в бэтлнете у каждого аккаунта есть свой "уровень доверия". Каждый может сделать одну ничью во фри фор ол только если вы остались один на один с последним врагом, а остальных вынесли.Как работает?
В соло у каждого аккаунта есть "уровень доверия". Каждый раз когда происходит десинк идет ничья и -1 к уровню доверия.
В зависимости от вашего уровня доверия и от уровня вашего оппонета - если у вас больше вы выиграли, если такой же ничья, если меньше вы проиграли.
Первый раз у вас будет ничья или победа 100%. а дальше думайте сами
Этот хак изменят смещение указателя и через одну секунду возвращает всё как было. Это вызывает рассинхронизацию и игра заканчивается вничью.
Работает только один раз на акаунт. КАК СДЕЛАТЬ ЧТОБЫ ОН РАБОТАЛ ВСЕ ВРЕМЯ???ПОМОГИТЕ!!
Основной код в VB 6.0:
Код:
Private Sub cmdtiehack_Click()
Dim hwnd
hwnd = FindWindow(vbNullString, "Warcraft III")
If hwnd = 0 Then
MsgBox "Warcraft III is not open"
Else
Dim Retval As Long
Retval = ShellExecute(Me.hwnd, "open", "Hacks\5.exe", _ 0, 0, SW_HIDE)
Delay 1
Retval = ShellExecute(Me.hwnd, "open", "Hacks\6.exe", _ 0, 0, SW_HIDE)
End If
End Sub
5.exe в C++
Код:
//Originally made by buyaoa
//Changed by Chaotic
#include <windows.h>
int main()
{
//Find wc3 windows
HWND hwar3=::FindWindow(NULL,"Warcraft III");
HANDLE hcurrent=GetCurrentProcess();
HANDLE hToken;
BOOL bret=OpenProcessToken(hcurrent,40,&hToken);
LUID luid;
bret=LookupPrivilegeValue(NULL,"SeDebugPrivilege",&luid);
TOKEN_PRIVILEGES NewState,PreviousState;
DWORD ReturnLength;
NewState.PrivilegeCount =1;
NewState.Privileges[0].Luid =luid;
NewState.Privileges[0].Attributes=2;
bret=AdjustTokenPrivileges(hToken,FALSE,&NewState,28,&PreviousState,&ReturnLength);
DWORD PID, TID;
TID = ::GetWindowThreadProcessId (hwar3, &PID);
//Open wc3 process
HANDLE hopen=OpenProcess( PROCESS_ALL_ACCESS|PROCESS_TERMINATE|PROCESS_VM_OP ERATION|PROCESS_VM_READ|
PROCESS_VM_WRITE,FALSE,PID);
DWORD data=0x8B;;
bret=WriteProcessMemory(hopen,(LPVOID)0x6F47317B,&data,1,0);
data=0x40;
bret=WriteProcessMemory(hopen,(LPVOID)0x6F47317C,&data,1,0);
data=0x74;
bret=WriteProcessMemory(hopen,(LPVOID)0x6F47317D,&data,1,0);
//Close handle
bret=CloseHandle(hopen);
return 0;
}
6.exe (такой же как и 5.exe исключая часть что ниже)
Код:
DWORD data=0x8B;;
bret=WriteProcessMemory(hopen,(LPVOID)0x6F47317B,&data,1,0);
data=0x40;
bret=WriteProcessMemory(hopen,(LPVOID)0x6F47317C,&data,1,0);
data=0x78;
bret=WriteProcessMemory(hopen,(LPVOID)0x6F47317D,&data,1,0);
Благодарности-
Chaotic for his maphack tutorial
Tracky for explaining this tutorial
Я хз забанят вас за это или нет. Используйте на свой страх и риск *face2*
|
Помогите насчет хака к warcarft 3 v battle.nete - 
