while 1
$xy=MouseGetPos()
sleep(100)
;ToolTip ( "X坐标:" & $xy[0] & @CR & "Y坐标:" & $xy[1], $xy[0]+random(10,40),$xy[1]+random(1,5) )
$var = PixelGetColor( $xy[0] , $xy[1] )
;tooltip ("X坐标: " & $xy[0] & @CR & "Y坐标:" & $xy[1] & @CR & "该点的十进制颜色值是:", $var& @CR & "该点的十六进制颜色值是:", Hex($var, 6))
ToolTip ( "X坐标:" & $xy[0] & @CR & "Y坐标:" & $xy[1] & @CR & "该点的十进制颜色值是:"& $var & @CR & "该点的十六进制颜色值是:"& Hex($var, 6) ,$xy[0] + 10 , $xy[1] + 10 )
HotKeySet ( "^!d", "ext")
wend
func ext()
ToolTip("你选择了退出哦",$xy[0]+50)
sleep(3000)
exit
endfunc |