Вот что удалось написать, работает клик по "Написать сообщение" и переход на следующую страницу.
Непонятно пока какой текст надо вставлять в письмо, это одна строка или несколько?
Это для мазиллы, в хроме нужно изменить цвет поиска выделения.
#name "Machinebook v1.0"
WAITMS(200)
SETKBLAYOUT(WNDFIND("- Machinebook v1", 0), 1049) //1033 En 1049 Ru
WAITMS(50)
LCLICK(1490,244) // клик по странице для фокуса
WAITMS(50)
SUB(paste)
// здесь будет код для вставки текста письма
END_SUB
start:
KEYDOWN (#CTRL) // Ctrl+F
WAITMS (60)
KEYDOWN (#F)
WAITMS (60)
KEYUP (#F)
KEYUP (#CTRL)
WAITMS(50)
KEYPRESS(#DELETE) // удаляем предыдущий поиск
WAITMS(50)
TOCLIP("Написать сообщение") // Вводим текст для поиска
WAITMS(50)
KEYDOWN (#CTRL)
WAITMS (50)
KEYDOWN (#V)
WAITMS (50)
KEYUP (#V)
KEYUP (#CTRL)
WAITMS(200)
WHILE($c < 11)
FOR($a=0,$a<$c)
LCLICK(195,1129) // клик по кнопке Следующее совпадение
WAITMS(50)
END_CYC
IF($c = 0)
INC($c,2)
ELSE
INC($c,1)
END_IF
WAITMS(200)
GETSCREEN
IF_PIXEL_IN(0,0, $_xmax,$_ymax, 7919672)
LCLICK($_return1+2, $_return2+2) // кликаем по найденному
WAITMS(600)
paste()
LCLICK(1037,172) // закрыть письмо
END_IF
WAITMS(500)
IF($c = 11)
KEYDOWN (#CTRL) // Ctrl+F
WAITMS (50)
KEYDOWN (#F)
WAITMS (50)
KEYUP (#F)
KEYUP (#CTRL)
WAITMS(50)
KEYPRESS(#DELETE) // удаляем предыдущий поиск
WAITMS(50)
TOCLIP(">>") // Вводим текст для поиска
WAITMS(50)
KEYDOWN (#CTRL)
WAITMS (50)
KEYDOWN (#V)
WAITMS (50)
KEYUP (#V)
KEYUP (#CTRL)
WAITMS(200)
GETSCREEN
IF_PIXEL_IN(0,0, $_xmax,$_ymax, 7919672)
LCLICK($_return1+2, $_return2+2) // кликаем по найденному
WAIT(10)
ELSE
HALT
END_IF
END_IF
END_CYC
$c = 0
GOTO(start)