Автокликер Clickermann :: Форум

Основной раздел => Общие вопросы => Topic started by: defer on January 23, 2016, 08:34:55 AM

Title: Помогите. Взлом виртуального сейфа.
Post by: defer on January 23, 2016, 08:34:55 AM

Задача.
Клик на середину экрана, ввод 4х значного числа (от 0001 до 1000, игра поддерживает ввод чисел с клавиатуры), повторить до успеха :)

Title: Re: Помогите. Взлом виртуального сейфа.
Post by: Oraven on January 23, 2016, 09:22:56 AM

Code: (clickermann) [Select]

DEFINE($gen, 1) // начальное число
SWITCH(STRLEN($gen)) // здесь мы добавляем нули
CASE(0)
   $gen2 = STRCONCAT ("0000", $gen)
CASE(1)
   $gen2 = STRCONCAT ("000", $gen)
CASE(2)
   $gen2 = STRCONCAT ("00", $gen)
CASE(3)
   $gen2 = STRCONCAT ("0", $gen)
DEFAULT
   $gen2 = $gen
END_SWITCH
INC($gen,1) // увеличиваем число на 1
$num = $gen2 // в переменную $num выводится сгенерированное число с нулями

LCLICK(INT($_xmax/2),INT($_ymax/2)) // клик в центр экрана
WAITMS(50)
KEYSTRING($num) // печатаем число
WAITMS(50)


IF($num = 1000) // предельное число
   HALT
END_IF

Title: Re: Помогите. Взлом виртуального сейфа.
Post by: defer on January 23, 2016, 02:09:16 PM

А как его в игре запустить? А то он начинает перебирать числа в скрипте, добавляя строки(

Title: Re: Помогите. Взлом виртуального сейфа.
Post by: Doda on January 23, 2016, 02:12:00 PM

так не запускай  в редакторе! сохрани,  зайди в игру, жми контрол+А. и на игре щелкни, чтобы вы пустоту не печатать

Title: Re: Помогите. Взлом виртуального сейфа.
Post by: defer on January 23, 2016, 02:46:07 PM

Спасибо, Не у меня получается запустить скрипт находясь в игре. Alt там задействован.  Подскажите пожалуйста, вот мне удобнее вместо клика по центру экрана, нажить клавишу "использовать" сейф, клавиша 'E'... Как это задействовать в программе.

Title: Re: Помогите. Взлом виртуального сейфа.
Post by: Oraven on January 23, 2016, 02:58:27 PM

Горячие клавиши управления настраиваются в настройках. Переназначь запуск и остановку на что тебе удобнее.

Code: (clickermann) [Select]

DEFINE($gen, 1) // начальное число
SWITCH(STRLEN($gen))
CASE(0)
   $gen2 = STRCONCAT ("0000", $gen)
CASE(1)
   $gen2 = STRCONCAT ("000", $gen)
CASE(2)
   $gen2 = STRCONCAT ("00", $gen)
CASE(3)
   $gen2 = STRCONCAT ("0", $gen)
DEFAULT
   $gen2 = $gen
END_SWITCH
INC($gen,1)
$num = $gen2

KEYPRESS(#E) // нажимаем E
WAITMS(50)
KEYSTRING($num) // печатаем число
WAITMS(50)

IF($num = 1000) // предельное число
   HALT
END_IF