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

[Hito]

Ребят, условия такие. Мне надо заюзать определенную кнопку и вычислить, через какое время, после этого, в определенных координатах появится определенный цвет. Вот пример:

Code: (clickermann) [Select]

KEYPRESS(#A)
// Тут команду, которая начала бы отсчет миллисекунд
WAITMS(300)
$check = 0
WHILE($check = 0)
   GETSCREEN
   IF_PIXEL_IN(0,0, $_xmax,$_ymax, 255)
      $check = 1
      // Тут команду, которая закончила бы отсчет миллисекунд и вывела бы результат в лог.
      WAITMS(100)
   ELSE
      WAITMS(50)
   END_IF
END_CYC
HALT
Как это намутить?

[ksa-nsk]

а комп в состоянии за милисекунды сохранять весь экран и искать внем ваши точки?

[Hito]

а комп в состоянии за милисекунды сохранять весь экран и искать внем ваши точки?

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

[quant13]

а просто взять переменную и увеличивать ее уже не модно?
INC ($var)
PRINT($var)

[Луций]

 через

Code: (clickermann) [Select]

for($i=0, $i < 0)
getscreen ну ты понел
WAITMS(1)
if ваше событие
 print($i)
 $i=0
end if
end_cyc

[Hito]

через

Code: (clickermann) [Select]

for($i=0, $i < 0)  // Я вот эту строку вообще не понимаю...
getscreen ну ты понел  // Нихрена я не понял
WAITMS(1)  // Что тут делает одна миллисекунда?
if ваше событие
 print($i)
 $i=0
end if
end_cyc

Эт че такое...?

[Hito]

Пока я придумал только такой вариант...

Code: (clickermann) [Select]

KEYPRESS(#A)
PRINT($_ms)  // Старт
WAITMS(300)
$check = 0
WHILE($check = 0)
   GETSCREEN
   IF_PIXEL_IN(0,0, $_xmax,$_ymax, 255)
      $check = 1
      PRINT($_ms)  // А потом из этих миллисекунд вычесть на калькуляторе первые...
      WAITMS(100)
   ELSE
      WAITMS(50)
   END_IF
END_CYC
HALT

[Atas]

Вот как-то так, в общих чертах.

Code: (clickermann) [Select]

KEYPRESS(#A)

$time_1 = $_ms // Запоминаем время нажатия клавиши #A

WHILE($time_2 = 0)
   GETSCREEN
   IF_PIXEL_IN(0,0, $_xmax,$_ymax, 255)
      $time_2 = $_ms // Запоминаем время появления пикселя
   END_IF
END_CYC

$time_3 = $time_2 - $time_1 // Вычисляем время затраченное на ожидание

LOGWRITE (STRCONCAT("Пиксель появился через - ", $time_3, " ms")) // Выводим результат в лог

HALT

[Oraven]

Чуть поменьше строк, и нафига STRCONCAT в LOGWRITE?

Code: (clickermann) [Select]

KEYPRESS(#A)
$ms = $_ms
WHILE(1)
   GETSCREEN
   IF_PIXEL_IN(0,0, $_xmax,$_ymax, 255)
      LOGWRITE ("Найдено через: ", $_ms-$ms, " мс")
      HALT
   END_IF
END_CYC

[Hito]

Вот как-то так, в общих чертах.

Code: (clickermann) [Select]

KEYPRESS(#A)

$time_1 = $_ms // Запоминаем время нажатия клавиши #A

WHILE($time_2 = 0)
   GETSCREEN
   IF_PIXEL_IN(0,0, $_xmax,$_ymax, 255)
      $time_2 = $_ms // Запоминаем время появления пикселя
   END_IF
END_CYC

$time_3 = $time_2 - $time_1 // Вычисляем время затраченное на ожидание

LOGWRITE (STRCONCAT("Пиксель появился через - ", $time_3, " ms")) // Выводим результат в лог

HALT

Благодарю

[Hito]

Чуть поменьше строк, и нафига STRCONCAT в LOGWRITE?

Code: (clickermann) [Select]

KEYPRESS(#A)
$ms = $_ms
WHILE(1)
   GETSCREEN
   IF_PIXEL_IN(0,0, $_xmax,$_ymax, 255)
      LOGWRITE ("Найдено через: ", $_ms-$ms, " мс")
      HALT
   END_IF
END_CYC

Благодарю

[Hito]

а комп в состоянии за милисекунды сохранять весь экран и искать внем ваши точки?

Code: (clickermann) [Select]

$ms = $_ms
GETSCREEN
IF_PIXEL_IN(506,757, 506,757, 201276,14410719) // Лук, молния
   LOGWRITE ("Найдено через: ", $_ms-$ms, " мс")
END_IF


А ты говоришь...)

[quant13]

2 Oraven

WHILE(1)

А что это за условие такое?

[Oraven]

2 Oraven

WHILE(1)

А что это за условие такое?

Это бесконечный цикл. Условие всегда будет верным.