win W_Kib;
int Size_Key_Char_Kib = -1;
int eCol_Kib, eX_Kib, eY_Kib;
getdisplay(eCol_Kib, eX_Kib, eY_Kib);
KIB_1: pause(3000);
Key(0, W_Kib, 0, 38, "mail@mail.com - Почта", "Клик", 0);
Key(0, W_Kib, 0, 38, "mail@mail.com - Почта", "Клик", 0);
Key(0, W_Kib, 0, 38, "mail@mail.com - Почта", "Клик", 0);
Key(0, W_Kib, 0, 38, "mail@mail.com - Почта", "Клик", 0);
Key(0, W_Kib, 0, 38, "mail@mail.com - Почта", "Клик", 0);
goto KIB_1;
function Key(int ew, win w, int p1, int c, string text, string k, int p2)
{
pause(p1);
if (ew==0)
{
if (k=="Клик"
{key(c); goto hy;}
if (k=="Нажать"
{keydown(c); goto hy;}
if (k=="Отпустить"
{keyup(c); goto hy;}
if (k=="Ввод текста"
{key(text, 0, 1, getwindow()); goto hy;}
}
if (ew==1)
{
if (k=="Клик"
{if ((c>191 && c<256) || c==168 || c==184) sendlanguage("00000419", formatiw(gethwnd())); sendmessage(WM_CHAR, c, 1, w); goto hy;}
if (k=="Нажать"
{sendkeydown(c, w); goto hy;}
if (k=="Отпустить"
{sendkeyup(c, w); goto hy;}
if (k=="Ввод текста"
{
if (Size_Key_Char_Kib==-1)
{
Size_Key_Char_Kib=100;
new char Key_CHAR[Size_Key_Char_Kib+1];
}
int size_key=size(text);
if (Size_Key_Char_Kib<size_key)
{
delete Key_CHAR;
Size_Key_Char_Kib=size_key;
new char Key_CHAR[Size_Key_Char_Kib+1];
}
strcpy(#Key_CHAR[0], text);
for (int n=0; n<size_key; n++)
{
if ((Key_CHAR[n]>191 && Key_CHAR[n]<256) || Key_CHAR[n]==168 || Key_CHAR[n]==184) sendlanguage("00000419", formatiw(gethwnd()));
sendmessage(WM_CHAR, Key_CHAR[n], 1, w);
sleep(20);
}
}
}
hy: pause (p2);
}