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

[45525329]

помогите я включаю нажал на комнату с паролем но у меня ничего не происходит что делать?

[warl0ck]

Цитата: Сообщение от ASDsadasSdqwasd Плеее нах реально этот скрипт нужен что он делаит??

угадай по названию

[ZloeMoloko5246]

вылетает какая то ошибка опции скрин выложи плиз

[valdes132011]

Цитата: Сообщение от warl0ck #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

куда это вписывать?

[Владислаb]

Цитата: Сообщение от warl0ck $Label3 = GUICtrlCreateLabel("By warl0ck", 24, 120, 91, 27)

Учиш других делать твоиже скрипты Круть)
А по теме: норм всё пашет + лови)

[RUBILNIK]

скрипт у меня не работает,запускаю,появляется окошко скрипта,как у тебя на скрине.Жму ф5 и не чего

[warl0ck]

Цитата: Сообщение от Владислаb а по теме: норм всё пашет + лови)

не пашет, причем давно
пс что за идиот некропостит

[RUBILNIK]

Цитата: Сообщение от warl0ck не пашет, причем давно пс что за идиот некропостит

обидно что не работает,а вот тот парень который написал

Цитата: Сообщение от Владислаb А по теме: норм всё пашет + лови)

парень за флуд банан дают.
warl0ck а есть ли возможность восоздать твой скрипт?

[(DiGGeR)]

всё робит

[RUBILNIK]

Цитата: Сообщение от (DiGGeR) всё робит

тебе создатель скрипта сказал же что скрипт не работает
Зы нарушения 14 п,орфаграфия

[MR_MAGU]

Цитата: Сообщение от warl0ck создаем файл с расширением "au3"

А как??? его создать??