[Ссылки могут видеть только зарегистрированные пользователи. ]
суть скрипта: перебирать пароли к комнате. 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
за макросы не банят
Последний раз редактировалось warl0ck; 08.10.2010 в 21:51.
[Ссылки могут видеть только зарегистрированные пользователи. ]
суть скрипта: перебирать пароли к комнате. 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
за макросы не банят
если во время брута предлагают зайти в комнату макрос соглашается... дальше вылет... как это исправить.....?
а как его увеличить....? и какая от этого польза кроме как комнаты ламать...?
Увеличить- через СЕ (галочка "енабле спид хак" когда выбрал процесс)
Польза- быстрее респаунишься, быстрее бегаешь, стреляешь, быстрее перезаряжаешься, умираешь тоже быстрее, ну в общем как спидов нажрался=) Ну вот вроде эта темка
Последний раз редактировалось -=TY89=-; 10.10.2010 в 07:26.
Причина: наркотики