All pastes #829566 Raw Edit

clickable function

public text v1 · immutable
#829566 ·published 2007-12-23 07:53 UTC
rendered paste body
Func clickable($x, $y)
	$color = PixelGetColor($x, $y)
	$r = BitShift($color, 16)
	$g = BitAND(BitShift($color, 8), 255)
	$b = BitAND($color, 255)
	If 255 - $r > 10 or 255 - $g > 10 or 255 - $b > 10 Then Return True
	Return False
EndFunc