Author Topic: если цвет пикселя не меняется  (Read 2888 times)

0 Members and 1 Guest are viewing this topic.

Winlogon

  • Зашел в гости
  • *
  • Posts: 13
    • View Profile
если цвет пикселя не меняется
« on: June 21, 2015, 02:33:51 PM »
Здравствуйте, подскажите как написать скрипт
Если в точке 100x100 в течение 5 минут цвет пикселя не меняется выполнить действие если цвет поменялся то таймер сбрасывается

Winlogon

  • Зашел в гости
  • *
  • Posts: 13
    • View Profile
Re: если цвет пикселя не меняется
« Reply #1 on: June 21, 2015, 04:47:09 PM »
Во сообразил сам
Code: [Select]
up:
GETSCREEN
$b = PXL(100,100)
$j = 0
skip:
MOVE(100,100)
GETSCREEN
$a = PXL(100,100)
IF($a = $b)
  $j = $j + 1
ELSE
  $j = 0
  goto(up)
END_IF
LOGWRITE("Ïåðåìåííàÿ: j = ", $j)
IF($j = 5)
SOUND("sign.wav")
goto(up)
END_IF
WAIT(4)
goto(skip)


Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: если цвет пикселя не меняется
« Reply #2 on: June 21, 2015, 04:57:30 PM »
Code: (clickermann) [Select]
$x = 100 // точка слежения X
$y = 100 // Y
$t = 300 // ожидание в секундах
GETSCREEN
$color = PXL($x,$y)
$time = $_time_t + $t
WHILE($time > $_time_t)   
   IF(PXL($x,$y) = $color)
      WAITMS(100)
      GETSCREEN
   ELSE
      $color = PXL($x,$y)
      $time = $_time_t + $t
      WAITMS(100)
   END_IF   
END_CYC

// далее действия
« Last Edit: June 21, 2015, 05:55:23 PM by Oraven »