AHK Loop (25)

[NatalieRedFox_333]

Hi!
Закодила скрипт на AHK... Вопрос собственно такой - как повторяющийся код завернуть в (даже не знаю как это называется... наверно функция)
короче так

F2::
Send, {Control down}
MouseClick, left, 1425,380
Send, {Control up}
Sleep 200

==============================
Loop 25
{
Send, {Control down}{TAB}
Send, {Control up}
Sleep 1000
MouseClick, left, 580, 725
Send {Control up}{End}
Sleep 200
Send {Enter}
Sleep 200

)

вот эта часть будет меняться (координата)

Send, {Control down}

MouseClick, left, 1425,380

Send, {Control up}

Sleep 200

а это цикл

Loop 25

{

Send, {Control down}{TAB}

Send, {Control up}

Sleep 1000

MouseClick, left, 580, 725

Send {Control up}{End}

Sleep 200

Send {Enter}

Sleep 200

)[/CODE]

 

[NatalieRedFox_333]

Вопрос в чем... чтоб не писать портянку как сократить код? Меняется только координата второй строки - все остальное повторяется )))
Другими словами... цикл 25 раз надо повторить ))) не повторять же код 25 раз...

 

[splxgf]

Loop (обычный)

Повторяет последовательность команд указанное колличество раз.

ahk-wiki.ru

Хоть лупу, хоть Циклы- Autohotkey wiki

 

[NatalieRedFox_333]

Loop (обычный)

Повторяет последовательность команд указанное колличество раз.

ahk-wiki.ru

Хоть лупу, хоть Циклы- Autohotkey wiki

у меня координата второй строки все время меняется...)))
тут видимо надо как то цикл вызывать...я так думаю, но пока не нашла решение )))

Send, {Control down}
MouseClick, left, 1425,380 ; меняется координата
Send, {Control up}
Sleep 200

 

[splxgf]

Если все нужно повторять, то заверните все после F2:: в цикл while

F2::
z=1
while z <5
{
Send, {Control down}
MouseClick, left, 1425+z*10,380
Send, {Control up}
Sleep 200

==============================
Loop 25
{
Send, {Control down}{TAB}
Send, {Control up}
Sleep 1000
MouseClick, left, 580, 725
Send {Control up}{End}
Sleep 200
Send {Enter}
Sleep 200
}
z=z+1
}

 

[NatalieRedFox_333]

короче вот.. меняется только координата второй строки - остальной код повторяется...

F2::
Send, {Control down}
MouseClick, left, 1425,380
Send, {Control up}
Sleep 200

Send, {Control down}{TAB}
Send, {Control up}
Sleep 1000
MouseClick, left, 580, 725
Send {Control up}{End}
Sleep 200
Send {Enter}
Sleep 200

==================================

Send, {Control down}
MouseClick, left, 1425,400
Send, {Control up}
Sleep 200

Send, {Control down}{TAB}
Send, {Control up}
Sleep 1000
MouseClick, left, 580, 725
Send {Control up}{End}
Sleep 200
Send {Enter}
Sleep 200

================================

Send, {Control down}
MouseClick, left, 1425,420
Send, {Control up}
Sleep 200

Send, {Control down}{TAB}
Send, {Control up}
Sleep 1000
MouseClick, left, 580, 725
Send {Control up}{End}
Sleep 200
Send {Enter}
Sleep 200

и так надо сделать 25 раз )))

 

[NatalieRedFox_333]

в этой строке координата увеличивается каждый раз на 20

MouseClick, left, 1425,380

380, 400,420,440,460 итд

 

[NatalieRedFox_333]

вроде поняла как надо сделать...)))

 

[qsedftghk]

Какая-то эмуляция нажатий клавиш. А что вообще должен делать скрипт? Зачем столько кликов-то? Может там просто один раз кликнуть нужно при открытии какого-то окна?

 

[qsedftghk]

ЗЫ. есть такая древняя программулина.(ссылка первая попавшаяся, думаю. есть версия и новее) Иногда с помощью неё можно сделать в разы быстрее какие-то нажатия, без особого программирования.

 

[NatalieRedFox_333]

ЗЫ. есть такая древняя программулина.(ссылка первая попавшаяся, думаю. есть версия и новее) Иногда с помощью неё можно сделать в разы быстрее какие-то нажатия, без особого программирования.

это не совсем то что надо...))) я уже освоилась на AHK и он мне нравится...( а Gad почему то не недолюбливает)

 

[NatalieRedFox_333]

Какая-то эмуляция нажатий клавиш. А что вообще должен делать скрипт? Зачем столько кликов-то? Может там просто один раз кликнуть нужно при открытии какого-то окна?

он стучит вот по этим кнопкам...))) открывается страница и он ее редактирует...пока я пью Coffee...))) Lol

 

[NatalieRedFox_333]

ЗЫ. есть такая древняя программулина.(ссылка первая попавшаяся, думаю. есть версия и новее) Иногда с помощью неё можно сделать в разы быстрее какие-то нажатия, без особого программирования.

как тут поменять координату? чтоб не писать портянку...?
AHK должен по очереди пройти по всем кнопкам....))))

MouseClick, left, 1425,380
Sleep 200
MouseClick, left, 1425,420
Sleep 200
MouseClick, left, 1425,460
Sleep 200
MouseClick, left, 1425,500
Sleep 200
MouseClick, left, 1425,540
Sleep 200

 

[splxgf]

вроде поняла как надо сделать...)))

как тут поменять координату? чтоб не писать портянку...?

AHK не самый адекватный инструмент, AutoIt интересней будет. Да и про всякие Селениумы тоже упоминали, лучше бы видео по нормальным инструментам смотрели пока пьете кофе.

F2::
z=0
while z < 5
{
Send, {Control down}
MouseClick, left, 1425,380+z*20
Send, {Control up}
Sleep 200

==============================
Loop 25
{
Send, {Control down}{TAB}
Send, {Control up}
Sleep 1000
MouseClick, left, 580, 725
Send {Control up}{End}
Sleep 200
Send {Enter}
Sleep 200
}
z=z+1
}

 

[NatalieRedFox_333]

AHK не самый адекватный инструмент, AutoIt интересней будет. Да и про всякие Селениумы тоже упоминали, лучше бы видео по нормальным инструментам смотрели пока пьете кофе.

F2::
z=0
while z < 5
{
Send, {Control down}
MouseClick, left, 1425,380+z*20
Send, {Control up}
Sleep 200

==============================
Loop 25
{
Send, {Control down}{TAB}
Send, {Control up}
Sleep 1000
MouseClick, left, 580, 725
Send {Control up}{End}
Sleep 200
Send {Enter}
Sleep 200
}
z=z+1
}

Селениум не подходит для моих задач...уже смотрела ))))
AutoIt интересней будет - да согласна что интересней.... но пока нет возможности заняться им

 

[NatalieRedFox_333]

AHK не самый адекватный инструмент, AutoIt интересней будет. Да и про всякие Селениумы тоже упоминали, лучше бы видео по нормальным инструментам смотрели пока пьете кофе.

F2::
z=0
while z < 5
{
Send, {Control down}
MouseClick, left, 1425,380+z*20
Send, {Control up}
Sleep 200


}
z=z+1
}

что то тут не совсем правильно....открывает только один раз - делает только один цикл открывает и закрывает(^w)
дальше уже не работает )))
вот код

F2::
z=0
while z < 3
{
Send, {Control down}
MouseClick, left, 1425,385+z*65
Send, {Control up}
Sleep 500

Send, {Control down}{TAB}
Send, ^w
Sleep 1000

z=z+1
}
return

 

[NatalieRedFox_333]

Может есть другие варианты...? не хочет этот работать...)))

F2::
z=0
while z < 3
{
Send, {Control down}
MouseClick, left, 1425,385+z*65
Send, {Control up}
Sleep 500

Send, {Control down}{TAB}
Send, ^w
Sleep 1000

z=z+1
}
return

 

[NatalieRedFox_333]

не хочет этот работать...)))

 

[splxgf]

Да может хочет, но мне лень ставить и не на чем проверять, может ему нужно более классическое присваивание в паскаль-стиле.

F2::
z:=0
while (z < 3)
{
Send, {Control down}
MouseClick, left, 1425,% 385+z*65
Send, {Control up}
Sleep 500

Send, {Control down}{TAB}
Send, ^w
Sleep 1000

z:=z+1
}
return

 

[_MBK_]

может ему нужно более классическое присваивание в паскаль-стиле.

Нужно, но все равно не понятно почему в противном случае только один раз работает