Помогите. Взлом виртуального сейфа.

[defer]

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

[Oraven]

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

[defer]

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

[Doda]

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

[defer]

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

[Oraven]

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

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