Set WshShell = WScript.CreateObject("WScript.Shell")
Set objShell = CreateObject("Shell.Application")
' Задаем начальные значения координат
x = 100
y = 100
While True
' Ждем нажатия клавиши F1
Do While WshShell.AppActivate("Your Application Title") <> True
WScript.Sleep 100
Loop
' Эмулируем клик левой кнопки мыши по сохраненным координатам
objShell.Namespace(0).MoveSelection x, y
' Ждем 10 секунд перед следующим кликом
WScript.Sleep 10000
Loop
если работает с ошибками, надо его проверить и подправить немного
а это тайские шрифты https://wordpress.org/plugins/webfonts2psoft-for-t...
судя по тому, что все такое старое в Тае нет интернета :-)))))
Плагин WPML поддерживает тайский и есть готовые конфиги https://wpml.org/documentation/getting-started-gui...