Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   AutoIt (http://forum.oszone.net/forumdisplay.php?f=103)
-   -   [решено] как правильно создать цикл? (http://forum.oszone.net/showthread.php?t=259808)

crindlok 02-05-2013 11:50 2143160

как правильно создать цикл?
 
Первый раз столкнулся с AutoIt, подскажите пожалуйста как последовательность действий заключить в цикл?

Нашел вот такой код на форуме:

Код:

While 1
    $iLoop = InputBox("Ввод", "Введите число повторении цикла:", "")
    If @error Then Exit

    If StringIsDigit($iLoop) Then ExitLoop
    MsgBox(48, "Ошибка!", "Позволено вводить только числа, повторите попытку...", 5)
WEnd

HotKeySet("!a", "_Loop_Proc")

While 1
    Sleep(100)
WEnd

Func _Loop_Proc()
    Sleep(500)
    HotKeySet("!a")

    For $i = 1 To $iLoop
        Sleep(10)
        Send(100000)
    Next

    Exit
EndFunc

Мне нужно что-то похожее, только вместо Send(100000) делать много движений мышкой, так как текста много наверно все эти движения надо объявить в функцию и вместо сенд написать название функции? как правильно сделать?

И еще мне нужно не начинать действие по нажатию альт+а, а сразу и завершить выполнение скрипта либо когда кончиться цикл либо если пользователь нажмет ctrl+c

Как это все осуществить?

Creat0R 02-05-2013 13:21 2143194

Цитата:

Цитата crindlok
так как текста много наверно все эти движения надо объявить в функцию и вместо сенд написать название функции? »

Всё верно.

Цитата:

Цитата crindlok
мне нужно не начинать действие по нажатию альт+а, а сразу и завершить выполнение скрипта либо когда кончиться цикл либо если пользователь нажмет ctrl+c »

Код:

While 1
    $iLoop = InputBox("Ввод", "Введите число повторении цикла:", "")
    If @error Then Exit

    If StringIsDigit($iLoop) Then ExitLoop
    MsgBox(48, "Ошибка!", "Позволено вводить только числа, повторите попытку...", 5)
WEnd

HotKeySet("^c", "_Exit_Proc")

For $i = 1 To $iLoop
    Sleep(10)
    _Some_Proc()
Next

Func _Some_Proc()
    ;...
EndFunc

Func _Exit_Proc()
    Exit
EndFunc


crindlok 02-05-2013 20:28 2143427

Огромное спасибо!


Время: 00:24.

Время: 00:24.
© OSzone.net 2001-