Создание сиполняемого файла с гуи интерфейсом. Чит для игры, необходимая информация готова

Aezakmi9432 · 1 Апр 2023

_MemoryWrite(0x243B0C9C,$open,2,"dword")
$prozessID = ProcessExists("hl2.exe")

Вот адресс и процесс и полурабочего скрипта. Нужно создать exe(по возможности исходник, чтоб я понял свои ошибки) файл с 2 кнопками ON и OFF. Предназанчение чита валл хак для игры counter strike source

SealAlbinos · 2 Апр 2023

Создать exe сможешь через "C:\Program Files (x86)\AutoIt3\Aut2Exe\Aut2exe.exe"

библиотека NomadMemory.au3, если вдруг ее нету

Код:

#include <GUIConstantsEx.au3>
#Include <NomadMemory.au3>

$Form1 = GUICreate("", 140, 100, 988, 291)
$Label1 = GUICtrlCreateLabel("Wallhack", 16, 8, 113, 17)
$on = GUICtrlCreateButton("On", 8, 32, 123, 25)
$off = GUICtrlCreateButton("Off", 8, 64, 123, 25)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        case $on
            If ProcessExists("hl2.exe") Then
                $pid = ProcessExists("hl2.exe")
                $open = _memoryopen($pid)
                _MemoryWrite(0x243B0C9C,$open,"2","dword")
            Else
                MsgBox(0, "", "Игра не запущена")
            EndIf
        case $off
            If ProcessExists("hl2.exe") Then
                $pid = ProcessExists("hl2.exe")
                $open = _memoryopen($pid)
                ;_MemoryWrite(0x243B0C9C,$open,"0","dword") ;я не знаю базовое значение чтоб отключить функцию
            Else
                MsgBox(0, "", "Игра не запущена")
            EndIf
    EndSwitch
WEnd

Aezakmi9432 · 2 Апр 2023

SealAlbinos сказал(а):

Код:

#include <GUIConstantsEx.au3>
#Include <NomadMemory.au3>

$Form1 = GUICreate("", 140, 100, 988, 291)
$Label1 = GUICtrlCreateLabel("Wallhack", 16, 8, 113, 17)
$on = GUICtrlCreateButton("On", 8, 32, 123, 25)
$off = GUICtrlCreateButton("Off", 8, 64, 123, 25)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        case $on
            If ProcessExists("hl2.exe") Then
                $pid = ProcessExists("hl2.exe")
                $open = _memoryopen($pid)
                _MemoryWrite(0x243B0C9C,$open,"2","dword")
            Else
                MsgBox(0, "", "Игра не запущена")
            EndIf
        case $off
            If ProcessExists("hl2.exe") Then
                $pid = ProcessExists("hl2.exe")
                $open = _memoryopen($pid)
                ;_MemoryWrite(0x243B0C9C,$open,"0","dword") ;я не знаю базовое значение чтоб отключить функцию
            Else
                MsgBox(0, "", "Игра не запущена")
            EndIf
    EndSwitch
WEnd

ОГРОМНОЕ СПАСИБО +rep

Сообщение автоматически объединено: 2 Апр 2023

SealAlbinos сказал(а):

Создать exe сможешь через "C:\Program Files (x86)\AutoIt3\Aut2Exe\Aut2exe.exe"

библиотека NomadMemory.au3, если вдруг ее нету

Код:

#include <GUIConstantsEx.au3>
#Include <NomadMemory.au3>

$Form1 = GUICreate("", 140, 100, 988, 291)
$Label1 = GUICtrlCreateLabel("Wallhack", 16, 8, 113, 17)
$on = GUICtrlCreateButton("On", 8, 32, 123, 25)
$off = GUICtrlCreateButton("Off", 8, 64, 123, 25)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        case $on
            If ProcessExists("hl2.exe") Then
                $pid = ProcessExists("hl2.exe")
                $open = _memoryopen($pid)
                _MemoryWrite(0x243B0C9C,$open,"2","dword")
            Else
                MsgBox(0, "", "Игра не запущена")
            EndIf
        case $off
            If ProcessExists("hl2.exe") Then
                $pid = ProcessExists("hl2.exe")
                $open = _memoryopen($pid)
                ;_MemoryWrite(0x243B0C9C,$open,"0","dword") ;я не знаю базовое значение чтоб отключить функцию
            Else
                MsgBox(0, "", "Игра не запущена")
            EndIf
    EndSwitch
WEnd

Еще такой вопрос, как сделать привязку включения и выключения к кнопкам на клавиатуре?

Oki · 2 Апр 2023

Aezakmi9432 сказал(а):
как сделать привязку включения и выключения к кнопкам на клавиатуре?

Код:

HotKeySet()

SealAlbinos · 2 Апр 2023

перемещение стрелками на клавиаутере
скрыть меню на кнопку insert

Код:

#RequireAdmin
#include <NomadMemory.au3>
#include <Apple.au3>
#include <WinApi.au3>
#include <String.au3>
#include <GUIConstantsEx.au3>

ToolTip("Ожидание процесса игры", 0, 0)

While 1
    If ProcessExists("hl2.exe") > 0 Then ExitLoop
WEnd

ToolTip("", 0, 0)

$Pid = ProcessExists("hl2.exe")
$Open = _MemoryOpen($Pid)
OnAutoItExitRegister("_Exit")
AdlibRegister("_Wait", 500)
_Apple_Startup(1, 0x00FFFF, 0x00FF00, 0xFF0000)
$GUI = _Apple_Draw_Gui(150, 854, 1, "", 0x800080, 230)
_Apple_Create_Text("----------------", 150)
GUICtrlSetBkColor(-1, 0xFF0000)
_Apple_Create_Function("WallHack", 110)
_Apple_Create_Text("----------------", 150)
GUICtrlSetBkColor(-1, 0xFF0000)
_Apple_State_Gui(1, $GUI)
_Apple_Topmost_Check("")
_Apple_Enable_Up_Down()
_hotkey_assign(45, "_GUI")
$Gui_ = 1

While 1
    sleep(2000)
WEnd

Func _0($action)
    If $action = 1 Then
        _MemoryWrite(0x243B0C9C,$open,"2","dword")
    ElseIf $action = 0 Then
        _MemoryWrite(0x243B0C9C,$open,"0","dword")
    EndIf
 EndFunc

Func _gui()
    If $Gui_ = 1 Then
        _Apple_State_Gui(0, $Gui)
        $Gui_ = 0
    Else
        _Apple_State_Gui(1, $Gui)
        $Gui_ = 1
    EndIf
EndFunc

Func _Wait()
    If ProcessExists("hl2.exe") = 0 Then
        _MemoryClose($Open)
        Exit
    EndIf
EndFunc

Func _Exit()
    _MemoryClose($Open)
    Exit
EndFunc

Aezakmi9432 · 2 Апр 2023

SealAlbinos сказал(а):

перемещение стрелками на клавиаутера
скрыть меню на кнопку insert

Код:

#RequireAdmin
#include <NomadMemory.au3>
#include <Apple.au3>
#include <WinApi.au3>
#include <String.au3>
#include <GUIConstantsEx.au3>

ToolTip("Ожидание процесса игры", 0, 0)

While 1
    If ProcessExists("hl2.exe") > 0 Then ExitLoop
WEnd

ToolTip("", 0, 0)

$Pid = ProcessExists("hl2.exe")
$Open = _MemoryOpen($Pid)
OnAutoItExitRegister("_Exit")
AdlibRegister("_Wait", 500)
_Apple_Startup(1, 0x00FFFF, 0x00FF00, 0xFF0000)
$GUI = _Apple_Draw_Gui(150, 854, 1, "", 0x800080, 230)
_Apple_Create_Text("----------------", 150)
GUICtrlSetBkColor(-1, 0xFF0000)
_Apple_Create_Function("WallHack", 110)
_Apple_Create_Text("----------------", 150)
GUICtrlSetBkColor(-1, 0xFF0000)
_Apple_State_Gui(1, $GUI)
_Apple_Topmost_Check("")
_Apple_Enable_Up_Down()
_hotkey_assign(45, "_GUI")
$Gui_ = 1

While 1
    sleep(2000)
WEnd

Func _0($action)
    If $action = 1 Then
        _MemoryWrite(0x243B0C9C,$open,"2","dword")
    ElseIf $action = 0 Then
        _MemoryWrite(0x243B0C9C,$open,"0","dword")
    EndIf
 EndFunc

Func _gui()
    If $Gui_ = 1 Then
        _Apple_State_Gui(0, $Gui)
        $Gui_ = 0
    Else
        _Apple_State_Gui(1, $Gui)
        $Gui_ = 1
    EndIf
EndFunc

Func _Wait()
    If ProcessExists("hl2.exe") = 0 Then
        _MemoryClose($Open)
        Exit
    EndIf
EndFunc

Func _Exit()
    _MemoryClose($Open)
    Exit
EndFunc

Не хочет

Сообщение автоматически объединено: 2 Апр 2023

SealAlbinos сказал(а):

перемещение стрелками на клавиаутера
скрыть меню на кнопку insert

Код:

#RequireAdmin
#include <NomadMemory.au3>
#include <Apple.au3>
#include <WinApi.au3>
#include <String.au3>
#include <GUIConstantsEx.au3>

ToolTip("Ожидание процесса игры", 0, 0)

While 1
    If ProcessExists("hl2.exe") > 0 Then ExitLoop
WEnd

ToolTip("", 0, 0)

$Pid = ProcessExists("hl2.exe")
$Open = _MemoryOpen($Pid)
OnAutoItExitRegister("_Exit")
AdlibRegister("_Wait", 500)
_Apple_Startup(1, 0x00FFFF, 0x00FF00, 0xFF0000)
$GUI = _Apple_Draw_Gui(150, 854, 1, "", 0x800080, 230)
_Apple_Create_Text("----------------", 150)
GUICtrlSetBkColor(-1, 0xFF0000)
_Apple_Create_Function("WallHack", 110)
_Apple_Create_Text("----------------", 150)
GUICtrlSetBkColor(-1, 0xFF0000)
_Apple_State_Gui(1, $GUI)
_Apple_Topmost_Check("")
_Apple_Enable_Up_Down()
_hotkey_assign(45, "_GUI")
$Gui_ = 1

While 1
    sleep(2000)
WEnd

Func _0($action)
    If $action = 1 Then
        _MemoryWrite(0x243B0C9C,$open,"2","dword")
    ElseIf $action = 0 Then
        _MemoryWrite(0x243B0C9C,$open,"0","dword")
    EndIf
 EndFunc

Func _gui()
    If $Gui_ = 1 Then
        _Apple_State_Gui(0, $Gui)
        $Gui_ = 0
    Else
        _Apple_State_Gui(1, $Gui)
        $Gui_ = 1
    EndIf
EndFunc

Func _Wait()
    If ProcessExists("hl2.exe") = 0 Then
        _MemoryClose($Open)
        Exit
    EndIf
EndFunc

Func _Exit()
    _MemoryClose($Open)
    Exit
EndFunc

Спасибо большое за помощь. Можно не решать проблему, необходимый функционал уже есть.

Автор темы	Похожие темы	Форум	Ответы	Дата
D	Создание бота для автоматихированного сбора ресурсов	Разработка ботов	3	18 Янв 2024
W	Создание ярлыка	Общие вопросы по AutoIt	0	20 Сен 2023
	Создание отчета конфигурации ПК	Стол заказов	5	25 Май 2023
T	Создание пиксельного аимбота ( доводки )	Покупка/продажа, поиск услуг	4	7 Мар 2023
A	Создание приложений для Андроид	Общение	9	15 Дек 2022

Поиск

Поиск

Создание сиполняемого файла с гуи интерфейсом. Чит для игры, необходимая информация готова

Aezakmi9432

Новичок

Вложения

SealAlbinos

Продвинутый

Вложения

Aezakmi9432

Новичок

Oki

Продвинутый

SealAlbinos

Продвинутый

Вложения

Aezakmi9432

Новичок

Вложения