Серый форум — AHK:Нажатие кнопок в окне

Re: AHK:Нажатие кнопок в окне

null@example.com (hifana12) — Sun, 24 Mar 2013 16:39:58 +0000

serzh82saratov пишет:

И разобратся тебе лень, и сформулировать...

Уже разобрался

Re: AHK:Нажатие кнопок в окне

null@example.com (serzh82saratov) — Sun, 24 Mar 2013 00:04:57 +0000

И разобратся тебе лень, и сформулировать...

Re: AHK:Нажатие кнопок в окне

null@example.com (hifana12) — Sat, 23 Mar 2013 18:16:53 +0000

Помогите добавить в начало цикла 10 прокруток вниз и потом 5 прокруток вверх

Вот сам код:

F1:: 
    Tick := 60
    Loop 
    {   
        StartLoop := A_TickCount
        Loop
        { 
            sleep, 80   
            PixelSearch x, y, 600, 81, 600, 96, 0xFF0000, 5, Fast
            if ( ErrorLevel > 0 )
            {
                PixelSearch x, y, 3, 25, 1675, 1048, 0xFF0000, 5, Fast
                if ( ErrorLevel > 0 )
                {
                    ;если ErrorLevel > 0
                    Send, {F2}
                    sleep, 1000
                    Continue
                } 
                Send, {F3}
                sleep, 5
                Click %x% %y%  
            }
        }    Until ( A_TickCount - StartLoop ) / 1000 >= Tick
        А тут 10 прокруток  вниз и 10 прокруток вверх 
        Send @storage
        sleep 400
        Send {Enter}
        sleep 400
        Click down, left, 56, 219
        sleep, 20
        Click up right, left, 424, 205
        sleep 20
        Send {Enter}
        sleep, 100
        Click down, left, 56, 219
        sleep, 20
        Click up right, left, 424, 205
        sleep 20
        Send {Enter}
        sleep, 100
        Click down, left, 56, 219
        sleep, 20
        Click up right, left, 424, 205
        sleep 20
        Send {Enter}
        Click down, left, 56, 219
        sleep, 20
        Click up right, left, 424, 205
        sleep 20
        Send {Enter}
        sleep, 100
        Click down, left, 56, 219
        sleep, 20
        Click up right, left, 424, 205
        sleep 20
        Send {Enter}
        sleep, 100
        Click down, left, 56, 219
        sleep, 20
        Click up right, left, 424, 205
        sleep 20
        Send {Enter}
        sleep 100
        MouseClick, left, 512, 377  

    }

F8::Pause

Re: AHK:Нажатие кнопок в окне

null@example.com (serzh82saratov) — Sun, 17 Mar 2013 18:04:29 +0000

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



F1:: 
    Loop  { 
        StartLoop := A_TickCount , Tick := 3    ; (Tick - секунды) В течении скольки секунд повторно запукать "PR_1"
        While, ( A_TickCount - StartLoop ) / 1000 < Tick
            Gosub, PR_1
        Loop 10    ; 10 - Сколько раз повторно запукать "PR_2"
            Gosub, PR_2
        Gosub, PR_3    ; 1 раз запустить "PR_3"
    }
    Return

PR_1: 
    ToolTip % " Подпрограмма: PR_1 `n`n Вызов №  " A_Index  "`n`n Осталось секунд  " Round( Tick-( A_TickCount - StartLoop ) / 1000, 1)
    sleep, 100
    Return    
    
PR_2: 
    ToolTip % " Подпрограмма: PR_2 `n`n Вызов №  " A_Index
    sleep, 200
    Return

PR_3: 
    ToolTip % " Подпрограмма: PR_3 `n`n Эта подпрограмма`nвыполняется только один раз`n и в конце общего цикла"
    sleep, 2000
    Return

Esc::
    ExitApp

Re: AHK:Нажатие кнопок в окне

null@example.com (hifana12) — Sun, 17 Mar 2013 16:46:59 +0000

Напишу если что.

Re: AHK:Нажатие кнопок в окне

null@example.com (serzh82saratov) — Sun, 17 Mar 2013 16:28:12 +0000

Спасибо огромное!
Аську можно?

Добавил комментариев если что-то не понятно.
Аськи нет, напишите на почту через профиль форума.

Re: AHK:Нажатие кнопок в окне

null@example.com (hifana12) — Sun, 17 Mar 2013 16:23:59 +0000

serzh82saratov пишет:



F1:: 
    Tick := 600  ; Tick это секунды 
    Loop 
    {   
        StartLoop := A_TickCount
        Loop 
        { 
            sleep, 100     ; Интервал этого цикла
            PixelSearch x, y, 1508, 81, 1508, 96, 0xFF0000, 5, Fast
            if ( ErrorLevel > 0 )
            {
                PixelSearch x, y, 3, 25, 1675, 1048, 0xFF0000, 5, Fast
                if ( ErrorLevel > 0 )
                {
                    ;если ErrorLevel > 0
                    Send, {F2}
                    sleep, 1000
                    Continue
                } 
                Send, {F4}
                sleep, 50
                Click %x% %y%  
            }
        }    Until ( A_TickCount - StartLoop ) / 1000 >= Tick
        
        Send @storage
        sleep 300
        Send {Enter}
        sleep 400
        Click down, left, 336, 219
        Click up right, left, 137, 166
        sleep 50
        Send 80
        sleep 10
        Send {Enter}
        sleep 100
        MouseClick, left, 520, 418  
    }

Отредактировано serzh82saratov (Сегодня 20:10:58)
Исправил свои ошибки в отступах. И вам советую соблюдать

Спасибо огромное!
Аську можно?

Re: AHK:Нажатие кнопок в окне

null@example.com (serzh82saratov) — Sun, 17 Mar 2013 16:02:17 +0000



F1:: 
    Tick := 600  ; Интервал перехода к 2 подпрограмме (600 - секунды)
    Loop      ; Общий цикл
    {   
        StartLoop := A_TickCount
        Loop      ; Цикл выполнения 1 подпрограммы
        { 
            sleep, 100     ; Интервал выполнения 1 подпрограммы
            PixelSearch x, y, 1508, 81, 1508, 96, 0xFF0000, 5, Fast
            if ( ErrorLevel > 0 )
            {
                PixelSearch x, y, 3, 25, 1675, 1048, 0xFF0000, 5, Fast
                if ( ErrorLevel > 0 )
                {
                    ;если ErrorLevel > 0
                    Send, {F2}
                    sleep, 1000
                    Continue     ; Не выполняя дальше начинаем цикл выполнения 1 подпрограммы снова
                } 
                Send, {F4}
                sleep, 50
                Click %x% %y%     ; Далее начинаем цикл выполнения 1 подпрограммы снова
            }
        }    Until ( A_TickCount - StartLoop ) / 1000 >= Tick     ; Если прошло более 600 - секунд с запуска цикла, прерываем его и выполняем дальше
        
        Send @storage
        sleep 300
        Send {Enter}
        sleep 400
        Click down, left, 336, 219
        Click up right, left, 137, 166
        sleep 50
        Send 80
        sleep 10
        Send {Enter}
        sleep 100
        MouseClick, left, 520, 418       ; Далее начинаем общий цикл снова
    }

Отредактировано serzh82saratov (Сегодня 20:10:58)
Исправил свои ошибки в отступах. И вам советую соблюдать

Re: AHK:Нажатие кнопок в окне

null@example.com (hifana12) — Sun, 17 Mar 2013 15:48:38 +0000

serzh82saratov пишет:

http://forum.script-coding.com/viewtopi … 887#p69887

Как в моём случае следует начинать цикл?

Re: AHK:Нажатие кнопок в окне

null@example.com (serzh82saratov) — Sun, 17 Mar 2013 15:40:37 +0000

http://forum.script-coding.com/viewtopi … 887#p69887

Re: AHK:Нажатие кнопок в окне

null@example.com (hifana12) — Sun, 17 Mar 2013 15:21:42 +0000

Хотя бы пример как начать.

Re: AHK:Нажатие кнопок в окне

null@example.com (serzh82saratov) — Sun, 17 Mar 2013 14:49:38 +0000

Наверно записать всё в цикл:

Loop  {  

   •••••••••

}

AHK:Нажатие кнопок в окне

null@example.com (hifana12) — Sun, 17 Mar 2013 14:29:10 +0000

Сталкнулся вот с такой проблемой.

Вот сам код:

F1::

SetTimer, ImageCheck, 100
return
ImageCheck:
{
PixelSearch x, y, 1508, 81, 1508, 96, 0xFF0000, 5, Fast
    if ( ErrorLevel > 0 )
{
PixelSearch x, y, 3, 25, 1675, 1048, 0xFF0000, 5, Fast
    if ( ErrorLevel > 0 )
        {
        ;если ErrorLevel > 0
        Send, {F2}
sleep, 1000
        return
        }
Send, {F4}
sleep, 50
Click %x% %y%
sleep, 100
return
}
F3::Pause

Надо чтобы после этого скрипта через 10 мин.

Выполнялся этот:

Send @storage
sleep 300
Send {Enter}
sleep 400
Click down, left, 336, 219
Click up right, left, 137, 166
sleep 50
Send 80
sleep 10
Send {Enter}
sleep 100
MouseClick, left, 520, 418

и так постоянно.

Как мне их объеденить?