[Мышь, клавиатура] Простейший макрос

MsgBox(0,"Time Difference",TimerDiff(TimerInit()))

$begin = TimerInit()
sleep(3000)
$dif = TimerDiff($begin)
MsgBox(0,"Time Difference",$dif)

Возвращает значение абстрактного времени в миллисекундах.

Нажмите, чтобы раскрыть...

#include <Misc.au3>

While 1
    If _IsPressed('04') Then
		MouseMove(472, 307)
		Send('9')
		Sleep(5)
		Send('w')
		Sleep(5)
        Send('{SHIFTDOWN}')
		While _IsPressed('04')
			Send('`')
			Sleep(5)
			MouseClick('left')
			Sleep(5)
			send('s')
            Sleep(5)
        WEnd
        Send('{SHIFTUP}')
        Sleep(5)
    EndIf
WEnd

Как присобачить в скрипте чтоб таймер начал отсчет после отпускания СКМ, потом бибипнул и больше ничего не делал, пока я снова не нажму/отпущу СКМ?

Нажмите, чтобы раскрыть...

#include <Misc.au3>
Global $i=0,$p=0,$a
While 1
    If _IsPressed('04') Then
        MouseMove(472, 307)
        Send('9')
        Sleep(5)
        Send('w')
        Sleep(5)
        Send('{SHIFTDOWN}')
        While _IsPressed('04')
			$i += 1
            Send('`')
            Sleep(5)
            MouseClick('left')
            Sleep(5)
            send('s')
            Sleep(5)
			If $i=1600 Then Beep()
        WEnd
        Send('{SHIFTUP}')
        Sleep(5)
		$p=1
	Else
		If $p=1 Then
			While Not _IsPressed('04') And $a<400
				Sleep(100)
				$a+=1
            Wend
			If Not _IsPressed('04') Then Beep()
			$p=1
        EndIf
    EndIf
WEnd

Belfigor сказал(а):

Код:

$i += 1
....
...
If $i=1600 Then Beep()

Это не таймер, это счетчик. Почему он помещен в таком внутрь цикла я не в курсе, спроси у того кто этот код писал, мб у него есть логическое объяснение. Исходя из текущего кода он тут стоит только лишь для того чтобы известить хозяина о том что цикл прокрутился уже 1600 раз. Если нужная кнопка будет отжата раньше ты не услышишь писка. Если писк ты уже один раз услышал в этой части скрипта то больше ты никогда не услышишь писк до момента физического перезапуска скрипта. Так же если ты не отожмешь кнопку мыши скрипт никогда не покинет эту область кода.

1) После старта скрипта если нажата нужная кнопка происходит ряд манипуляций, далее ряд манипуляций в ограниченном цикле которые имеет конкретное условие выхода которое неизбежно наступает в случае отжатия заданной кнопки и в конце которого $p = 1.

2) После этого цикл начинается заново, если он видит что нужная кнопка не зажата то он запускает вложенную во вторую часть первого If проверку $p = 1. Если он видит что $p = 1 то он запускает вложенный в эту проверку цикл который имеет свой счетчик и четко обозначенное условие выхода при счетчике >= 400 или зажатой заданной кнопке. По окончанию этого цикла если скрипт видит что заданная кнопка не зажата он пищит. В любом случае в конце он приравнивает $p = 1 (Вопрос зачем ведь условием попадания в эту часть скрипта как раз и было $p = 1 и за время нахождения в этой части скрипта $p не изменилось и по окончании все еще = 1. После всех манипуляций цикл начинается сначала.

3) Если будет зажата заданная кнопка скрипт перейдет к части 1), но в этом случае если в прошлый раз он дошел до $i = 1600 он уже ничего не будет ожидать. Для него $i оттикало еще в первый раз и теперь оно для него по дефолту >1600, скрипт не будет больше сигнализировать о чем то в этой части скрипта.

4) $a для скрипта уже >400 и нажмешь ты кнопку или нет скрипт не будет ждать и продолжит выполнение.
Можно еще писать и писать но думаю хватит, это итак никто читать не будет.

Вот коротко и ясно, вердикт: Приведенный выше скрипт не дееспособен и нуждается в доработке.

Нажмите, чтобы раскрыть...

Спасибо, прочитал, понял почти все из сказанного. Хотя у меня пока не получится привести в боеспособность скрипт Виктора.

Нажмите, чтобы раскрыть...