[Скрипт] [autoIT] брут комнат

[warl0ck]

[Ссылки могут видеть только зарегистрированные пользователи. ]

суть скрипта: перебирать пароли к комнате.
1 заходим на офф сайт аутоита [Ссылки могут видеть только зарегистрированные пользователи. ]
2 качаем\устанавливаем
3 создаем файл с расширением "au3"
4 пишем такое:

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
;создаем кнопки.форму итп

$Form1 = GUICreate("BrutЁ", 117, 150, -1, -1);название окна брута
GUISetBkColor(0x000000)
$Input1 = GUICtrlCreateInput("0000", 0, 47, 113, 21);(1)начинать брутить от
$Input2 = GUICtrlCreateInput("9999", 0, 72, 113, 21);(2)до
$Input3 = GUICtrlCreateInput("200", 0, 96, 113, 21);(3)задежка
$Label1 = GUICtrlCreateLabel("Point Blank", 0, 0, 97, 27)
GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
GUICtrlSetColor(-1, 0xFFFFFF)
$Label2 = GUICtrlCreateLabel("Room Brute", 16, 19, 97, 27)
GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
GUICtrlSetColor(-1, 0xFFFFFF)
$Label3 = GUICtrlCreateLabel("By warl0ck", 24, 120, 91, 27)
GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT")
GUICtrlSetColor(-1, 0xFFFFFF)
GUISetState(@SW_SHOW)
Global $start = 0, $i ;переменные
;-------гор клавиши
HotKeySet("{f5}", "start") ;старт
HotKeySet("{f6}", "stop") ;стоп
;-------- "тело" скрипта

While 1
;------------настройка крестика(Х-закрытие программы)
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
;---------------------------------------------------
    If $start = 1 Then ;если ф5 зажата тогда-
        If WinActive('Point Blank') Then ;если окно игры октрыто тогда -
            AutoItSetOption('SendKeyDownDelay', GUICtrlRead($Input3)) ;задержка
            If GUICtrlRead($Input1) < GUICtrlRead($Input2) Then ;если значение в (1) меньше чем во (2)м тогда
                Send(GUICtrlRead($Input1)) ;пишем число
                Send("{ENTER}") ;жмем ентер
                Sleep(GUICtrlRead($Input3)) ;задержка
                GUICtrlSetData($Input1, StringFormat("%04d", Number(GUICtrlRead($Input1)) + 1)) ;добавляем к 1му числу +1
            EndIf
        EndIf
    EndIf
WEnd

Func start() ; функция включения
    $start = 1
EndFunc   ;==>start

Func stop() ; функция выключения
    $start = 0
EndFunc   ;==>stop

включать ф5
отключать ф6
за макросы не банят

[вадим данилов]

а как его использовать??7 ну сначала кликнуть на комнату с паролем потом запустить макрос или как то по другому???

[warl0ck]

Цитата: Сообщение от вадим данилов а как его использовать??7 ну сначала кликнуть на комнату с паролем потом запустить макрос или как то по другому???

да, нажать на окно с выбором пароля, включить макрос и нажать ф5

[warl0ck]

Цитата: Сообщение от Mapcc Скажи, пожалуйста, а ты точно уверен, что за маросы не банят!!!

точно, инфа 100%
даже где то на 4Г форуме писали что за макросы не банят

[Mexikanec]

Цитата: Сообщение от warl0ck [Ссылки могут видеть только зарегистрированные пользователи. ] суть скрипта: перебирать пароли к комнате. 1 заходим на офф сайт аутоита [Ссылки могут видеть только зарегистрированные пользователи. ] 2 качаем\устанавливаем 3 создаем файл с расширением "au3" 4 пишем такое: #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> ;создаем кнопки.форму итп $Form1 = GUICreate("BrutЁ", 117, 150, -1, -1);название окна брута GUISetBkColor(0x000000) $Input1 = GUICtrlCreateInput("0000", 0, 47, 113, 21);(1)начинать брутить от $Input2 = GUICtrlCreateInput("9999", 0, 72, 113, 21);(2)до $Input3 = GUICtrlCreateInput("200", 0, 96, 113, 21);(3)задежка $Label1 = GUICtrlCreateLabel("Point Blank", 0, 0, 97, 27) GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT") GUICtrlSetColor(-1, 0xFFFFFF) $Label2 = GUICtrlCreateLabel("Room Brute", 16, 19, 97, 27) GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT") GUICtrlSetColor(-1, 0xFFFFFF) $Label3 = GUICtrlCreateLabel("By warl0ck", 24, 120, 91, 27) GUICtrlSetFont(-1, 14, 400, 0, "Old English Text MT") GUICtrlSetColor(-1, 0xFFFFFF) GUISetState(@SW_SHOW) Global $start = 0, $i ;переменные ;-------гор клавиши HotKeySet("{f5}", "start") ;старт HotKeySet("{f6}", "stop") ;стоп ;-------- "тело" скрипта While 1 ;------------настройка крестика(Х-закрытие программы) $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch ;--------------------------------------------------- If $start = 1 Then ;если ф5 зажата тогда- If WinActive('Point Blank') Then ;если окно игры октрыто тогда - AutoItSetOption('SendKeyDownDelay', GUICtrlRead($Input3)) ;задержка If GUICtrlRead($Input1) < GUICtrlRead($Input2) Then ;если значение в (1) меньше чем во (2)м тогда Send(GUICtrlRead($Input1)) ;пишем число Send("{ENTER}") ;жмем ентер Sleep(GUICtrlRead($Input3)) ;задержка GUICtrlSetData($Input1, StringFormat("%04d", Number(GUICtrlRead($Input1)) + 1)) ;добавляем к 1му числу +1 EndIf EndIf EndIf WEnd Func start() ; функция включения $start = 1 EndFunc ;==>start Func stop() ; функция выключения $start = 0 EndFunc ;==>stop включать ф5 отключать ф6 за макросы не банят

если во время брута предлагают зайти в комнату макрос соглашается... дальше вылет... как это исправить.....?

[yuracik]

Цитата: Сообщение от Mexikanec если во время брута предлагают зайти в комнату макрос соглашается... дальше вылет... как это исправить.....?

в найстройках игры заходить в роздел контакты и там будет типо "Приграсить" там внизу выбираешь ингор и всё!

[stalker295]

как понять что он работает просто я нажимаю ф5 в оконном режиме и нечиго непроисходит у меня 7 32х

[warl0ck]

Цитата: Сообщение от stalker295 как понять что он работает просто я нажимаю ф5 в оконном режиме и нечиго непроисходит у меня 7 32х

а что по твоему должно происходить?(просто интересно)

[-=TY89=-]

Цитата: Сообщение от Mexikanec а как его увеличить....? и какая от этого польза кроме как комнаты ламать...?

Увеличить- через СЕ (галочка "енабле спид хак" когда выбрал процесс)
Польза- быстрее респаунишься, быстрее бегаешь, стреляешь, быстрее перезаряжаешься, умираешь тоже быстрее, ну в общем как спидов нажрался=)
Ну вот вроде эта темка

[Vasia 111]

Цитата: Сообщение от warl0ck а что по твоему должно происходить?(просто интересно)

Вскрытие запароленной комнаты наверное, не?

И какие тут траблы могут только возникнуть... Юзать - это ж вам не бота писать!

[Artem199595]

Почему я не могу поставить галочку на enable speedhack, то есть когда пытаюсь поставить галочку мне ошибку выдаёт.

[=DeMuR=]

Цитата: Сообщение от Artem199595 Почему я не могу поставить галочку на enable speedhack, то есть когда пытаюсь поставить галочку мне ошибку выдаёт.

Какую ошибку опиши, а лучше скрин вложи... так непонятно

[DwBH]

Speed hack только на СЕ работает, на аналогах не работает(не доделано)

[jaguar999]

медленно чёт перебирает уснуть можно

[Mazau1]

Во первых я не доганяю смысл заходить к тем кто _уединяется)_ а во вторых {произошла проблема в сети зайдите позже} <--эт у меня у кого по другому.