Добавлена тема оформления "Clickermann" для кода с подсветкой синтаксиса. Выбирается из выпадающего списка "Код" (рядом с "цвет", "размер" и "шрифт") в режиме редактирования поста. Либо просто BB-тегом "code=clickermann"
0 Members and 1 Guest are viewing this topic.
up:GETSCREEN$b = PXL(100,100)$j = 0skip:MOVE(100,100)GETSCREEN$a = PXL(100,100)IF($a = $b) $j = $j + 1ELSE $j = 0 goto(up)END_IFLOGWRITE("Ïåðåìåííàÿ: j = ", $j)IF($j = 5)SOUND("sign.wav") goto(up)END_IFWAIT(4)goto(skip)
$x = 100 // точка слежения X$y = 100 // Y$t = 300 // ожидание в секундахGETSCREEN$color = PXL($x,$y)$time = $_time_t + $tWHILE($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// далее действия