Серый форум — AHK: Воспроизведение макроса многократно

Re: AHK: Воспроизведение макроса многократно

null@example.com (Gabe_#33) — Thu, 05 Apr 2012 16:19:30 +0000

Огромное Спасибо=)

Re: AHK: Воспроизведение макроса многократно

null@example.com (creature.ws) — Thu, 05 Apr 2012 08:33:07 +0000

SetScrollLockState , AlwaysOff
SetNumLockState , AlwaysOn
#SingleInstance force
#Persistent
#NoEnv

SetTimer, KeepRunning ; 250 мс подразумевается
SetTimer, Start, -1   ; однократно и «прямо сейчас»
return                ; вот здесь то и конец единственной и неповторимой «секции автовыполнения»

KeepRunning:
    WinGet, szProcessName, ProcessName, A
    if szProcessName = blabla.exe
        Suspend, off
    else
        Suspend, on
    return

Start:
    Loop
    {
        Sleep 30
        ADRESTEXNIKI()
        If adr_TEX = 0x0
            Continue
        ADRESCAMERI()
        IF adr_CAM = 0x1
        {
            Send {F9 down}
            Sleep,30
            Send {F9 up}
        }
    }
    return

$Numpad4::
    SetKeyDelay,15,30,Play
    SendPlay %clipboard%
    return

Re: AHK: Воспроизведение макроса многократно

null@example.com (Gabe_#33) — Thu, 05 Apr 2012 01:39:43 +0000

Тело скипта - две секции "авто-выполнения-(АВ)" и далее по нажатию какой либо клавиши.
Почему первая секция (АВ) выпоняется нормально а вторая не работает?

SetScrollLockState , AlwaysOff 
SetNumLockState , AlwaysOn
#SingleInstance force
#Persistent
#NoEnv

SetTimer, KeepRunning 
Return

KeepRunning:
 
WinGet, szProcessName, ProcessName, A 
if szProcessName = blabla.exe 
{ 
Suspend, off 
} 
else 
{ 
Suspend, on 
} 
Return

Start:
Loop
{
    ADRESTEXNIKI()
    If adr_TEX = 0x0
    {
        Goto Start
    }
    ADRESCAMERI()
    IF adr_CAM = 0x1
    {
        Send {F9 down}
        Sleep,30
        Send {F9 up}
    }
    Sleep 20
}
Return



$Numpad4::
SetKeyDelay,15,30,Play
SendPlay %clipboard%
Return

Re: AHK: Воспроизведение макроса многократно

null@example.com (Gabe_#33) — Wed, 04 Apr 2012 22:43:40 +0000

Спасибо.

Re: AHK: Воспроизведение макроса многократно

null@example.com (creature.ws) — Wed, 04 Apr 2012 20:47:21 +0000

Loop
{
    ADRESTEXNIKI()
    If adr_TEX = 0x0
        break
    ADRESCAMERI()
    IF adr_CAM = 0x1
    {
        Send {F9 down}
        Sleep,30
        Send {F9 up}
    }
    Sleep 20
}

Re: AHK: Воспроизведение макроса многократно

null@example.com (Gabe_#33) — Wed, 04 Apr 2012 20:14:16 +0000

Будте любезны,помогите сделать чтобы сей скрипт "авто-выполнялся",без участия какой либо клавиши.

~*$W::
Loop
    {
GetKeyState, WState, W, P 
if WState = U 
break
ADRESTEXNIKI()
If adr_TEX := 0x0
break
ADRESCAMERI()
IF adr_CAM = 0x1
{
Send {F9 down}
Sleep,30
Send {F9 up}
}
    }

Тобишь с момента его включения,он начал без прерывно проверять переменную - "adr_TEX".И если она ровна нулю,начать заново, если не ровна нулю,то продолжить далее...

Re: AHK: Воспроизведение макроса многократно

null@example.com (Алексей Марч.) — Sun, 01 Apr 2012 15:16:13 +0000

спасибо большое

Re: AHK: Воспроизведение макроса многократно

null@example.com (Indomito) — Sun, 01 Apr 2012 13:40:22 +0000

Алексей Марч. пишет:

и есть ли програмы такае же как AHK токо многопоточные?

есть, например запусти три таймера и вычисляй что то.
Вот пример - GamePad.ahk правда она не доделана ещё до конца.

Re: AHK: Воспроизведение макроса многократно

null@example.com (Grey) — Sun, 01 Apr 2012 11:48:01 +0000

Понятно, спасибо.

Re: AHK: Воспроизведение макроса многократно

null@example.com (YMP) — Sun, 01 Apr 2012 11:17:46 +0000

Нет, это сокращение от Physical.

Re: AHK: Воспроизведение макроса многократно

null@example.com (Grey) — Sun, 01 Apr 2012 10:14:50 +0000

В данном коде использовал встроенную функцию GetKeyState, есть и одноимённая комманда. "P" параметр (сокращение от pressed, "T" - toggle (IMHO)).

Re: AHK: Воспроизведение макроса многократно

null@example.com (Алексей Марч.) — Sun, 01 Apr 2012 09:30:59 +0000

Grey пишет:

Sleep, !GetKeyState("NumpadIns", "P") ? -1:425

скажи пожалуйста, что в коде значит "P") ?
есть ли програмы такае же как AHK только многопоточные?

Re: AHK: Воспроизведение макроса многократно

null@example.com (Grey) — Sun, 01 Apr 2012 06:05:21 +0000

Алексей Марч. пишет:

...мгновенно...

Это однопоточная программа, по этому всё зависит на каком этапе выполнения в цикле происходит отжим клавиши:

#NoEnv
SendMode, Input

NumpadIns::
   While, GetKeyState("NumpadIns", "P")
   {
      Send, {NumpadEnd Down}
      Sleep, !GetKeyState("NumpadIns", "P") ? -1:425
      Send, {NumpadEnd Up}
      Sleep, !GetKeyState("NumpadIns", "P") ? -1:15
   }
   Return

Re: AHK: Воспроизведение макроса многократно

null@example.com (Алексей Марч.) — Sat, 31 Mar 2012 22:30:09 +0000

;код проверки и если нужно выполнить - ExitApp

незнаю как это написать ,
если можеш покажи пример пожалуйста
(типа когда кнопку отпустил, как вписать)

Re: AHK: Воспроизведение макроса многократно

null@example.com (Indomito) — Sat, 31 Mar 2012 15:07:10 +0000

Алексей Марч. пишет:

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

использовать While-loop

While [условие выполнения цикла]
 {
;Ваш скрипт
}
return

Для прерывания в любой точке запустите таймер SetTimer и используйте ExitApp

SetTimer, myLabel, 10
return
myLabel:
;код проверки и если нужно выполнить - ExitApp
return

Думаю всё верно, если я правильно понял вопрос. Просто прервать цикл в любой точке проблематично, хотя можно, но с извращениями... на мой взгляд.

P.S. И обязательно поправьте пост, т.е. то о чем сказал creature.ws