Click2ID/Clip2ID_cColor!=.ahk at master · adabo/Click2ID · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
CoordMode, ToolTip, Screen
Loop,
{
  ;Gui, Destroy
  MouseGetPos,xx,yy, UniqueID, ClassNN
  MouseGetPos,,,, CHWnd, 2
  WinGetTitle, WTitle, AHK_Id %UniqueID%
  PixelGetColor, cColor, %xx%, %yy%, Slow|RGB
  Gui, 4:-SysMenu -Caption
  Gui, 4:Show, w40 h40
  Gui, 4:Color, %cColor%
  ToolTip, % "UniqueID is: " . UniqueID . "`nClassnn is: " . ClassNN . "`nControl's HWnd is: " . CHWnd . "`nWindow's title is: " . WTitle . "`nPixel's color is:" . cColor . "`n`n(Click Right Mouse button anywhere.)", % A_ScreenWidth/2, A_ScreenHeight/2+30,
  If GetKeyState("RButton", "P")
  {
    Break
  }
  IfInString, WTitle, UniqueID
  {
    Loop
    {
      MouseGetPos,xx,yy, UniqueID, ClassNN
      WinGetTitle, WTitle, AHK_Id %UniqueID%
      IfNotInString, WTitle, UniqueID
  ;Gui, 4:-SysMenu -Caption
  ;Gui, 4:Color, %cColor%
  ;Gui, 4:Show, w30
      {
        Break
      }
      Sleep, 1
    }
  }
  MouseGetPos,xx,yy, UniqueID, ClassNN
  PixelGetColor, cColor2, %xx%, %yy%, Slow|RGB
  ;Gui, 4:-SysMenu -Caption
  ;Gui, 4:Show, w30 h30
  ;Gui, 4:Color, %cColor%
  If (cColor == cColor2)
  {
    ;Msgbox, :)
    Loop
    {
  MouseGetPos,xx,yy, UniqueID, ClassNN
  PixelGetColor, cColor2, %xx%, %yy%, Slow|RGB
  ;Gui, 4:-SysMenu -Caption
  ;Gui, 4:Color, %cColor%
  ;Gui, 4:Show, w30 h30
      If (cColor != cColor2)
      {
        Break
      }
      Sleep, 1
    }
  }
  Sleep, 1
}