Dim LocalMousePosition As Point PublicDeclareFunction GetPixel Lib "gdi32.dll" (ByVal hdc AsInteger, ByVal x AsInteger, ByVal y AsInteger) AsInteger PublicDeclareFunction GetWindowDC Lib "user32.dll" (ByVal hwnd AsInteger) AsInteger PublicDeclareFunction GetDesktopWindow Lib "user32.dll" () AsInteger Dim winDc = GetWindowDC(GetDesktopWindow) Dim color = GetPixel(winDc, LocalMo..