Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Topics - zay4ik

Pages: [1]
1
Здравствуйте. На днях я сделал небольшой скрипт, позволяющий "пробивать" "города безумцев"(места, где можно взять ресурс) из папки с адресами. Скрины и описание под спойлером. [spoiler]
Это сами закладки, куда требуется кликать
Это интерфейс вкладки "карта", где и будет все происходить.
[/spoiler]Итак, требуется написать скрипт, который будет распознавать расстояние (3 столбец), в зависимости от него будет производиться атака.
Вот мой код, который будет проходить все
Code: (clickermann) [Select]
// New Script
// Author: Anonymous
// Version: 1.0 (12.01.2014)

#name "New Script"

// begin your script here
define ($kol,3)
define ($y,274) //214 для начала, 274 для 4 пункта(зависит от масштаба окна). В моем случае шаг составляет 20 пикселей
sub(ataka)
LCLICK(97,603) // карта
wait(1)



LCLICK(519,138) // закладки
wait(1)
LCLICK(625,165) // правая сторона
wait(1)

LCLICK(835,$y) // выбор пункта
wait(1)
LCLICK(460,326) // по городку в центре
wait(1)
LCLICK(221,410) // Нападение
wait(1)
LCLICK(442,436) //Далее
wait(1)

for ($nunit, $nunit < 5)
LCLICK(244,222)
wait(1)
end_cyc


LCLICK(335,143) // 2104859
wait(1)
keystring("2000",1)
wait(1)
LCLICK(456,430) // Далее
wait(1)
end_sub

sub(otchet)
wait(1)
LCLICK(874,597) // почта
wait(1)
LCLICK(58,391) // отчеты
wait(1)
LCLICK(352,127) // непрочитанные
wait(1)
LCLICK(538,129) // удалить
wait(1)
LCLICK(413,392) // да
wait(120) //я решил добавить задержку сюда
end_sub

for($i,$i<3) //количество gosub зависит от числа ваших командиров
gosub(ataka)
inc($y,20)
gosub(ataka)
inc($y,20)
gosub(ataka)
inc($y,20)
gosub(otchet)
end_cyc

gosub(ataka)
inc($y,20)
gosub(ataka)
inc($y,20)



// Это для первой страницы с 3 первыми пропущенными строками + переход на вторую страницу
for($j, $j<3)//еще на 3 страницы
$y=214
for($i,$i<4) //количество gosub зависит от числа ваших командиров
gosub(ataka)
inc($y,20)
gosub(ataka)
inc($y,20)
gosub(ataka)
inc($y,20)
gosub(otchet)
end_cyc

gosub(ataka)
inc($y,20)
gosub(ataka)
inc($y,20)
LCLICK(780,518) // переход
end_cyc

sub(ataka2)
LCLICK(97,603) // карта
wait(1)



LCLICK(519,138) // закладки
wait(1)
LCLICK(625,165) // правая сторона
wait(1)
for ($kol,$kol<$str)
LCLICK(780,517) // 1710618
wait(1)
end_cyc

LCLICK(835,$y) // выбор пункта
wait(1)
LCLICK(460,326) // по городку в центре
wait(1)
LCLICK(221,410) // Нападение
wait(1)
LCLICK(442,436) //Далее
wait(1)

for ($nunit, $nunit < 5)
LCLICK(244,222)
wait(1)
end_cyc


LCLICK(335,143) // 2104859
wait(1)
keystring("2000",1)
wait(1)
LCLICK(456,430) // Далее
wait(1)
end_sub


halt // for single run
P.S. Привязка делается при помощи клавиш.
P.P.S. Простите за индусятину, но я не знаю как сократить, при полном понимании программы=)

Pages: [1]