win W_Kib=window ("Игра" -1));
string Text_S;
string Text_P;
string Text_Str[100];
int K_Str;
int K_S;
int X_S[2000];
int Y_S[2000];
int X_Str[100];
int Y_Str[100];
int sX_S[2000];
int sY_S[2000];
double Cor_S[2000];
int Type_S[2000];
int Col_T0[1] = {0};
int Kol_F0[1] = {255};
int Screen[3000][3000];
int eCol_Kib, eX_Kib, eY_Kib;
getdisplay(eCol_Kib, eX_Kib, eY_Kib);

load_base();
Fun();

function Fun()
{
ReadText(2, #Screen[0][0], #W_Kib, W_Kib.leftclient, W_Kib.topclient, 0, "Путь", #Text_S, #K_S, #X_S[0], #Y_S[0], #sX_S[0], #sY_S[0], #Cor_S[0], #Type_S[0], #K_Str, #Text_Str[0], #X_Str[0], #Y_Str[0], 0, 0, 1, 0, 40, 1, -1, -1, -1, 0, #Col_T0[0], 0, 0, #Kol_F0[0], 0, 0, 99, 886, 528, 957, 551, -1, 0);
ReadText(2, #Screen[0][0], #W_Kib, W_Kib.leftclient, W_Kib.topclient, 0, "Путь", #Text_P, #K_S, #X_S[0], #Y_S[0], #sX_S[0], #sY_S[0], #Cor_S[0], #Type_S[0], #K_Str, #Text_Str[0], #X_Str[0], #Y_Str[0], 0, 0, 1, 0, 40, 1, -1, -1, -1, 0, #Col_T0[0], 0, 0, #Kol_F0[0], 0, 0, 99, 994, 528, 1051, 551, -1, 0);
textout(1, 500,500, Text_S+" "+Text_P, 1);
if(formatsn(Text_P)>=265);
{
goto KIB_13;
}
if(formatsn(Text_P)<=255);
{
goto KIB_12;
}
if(formatsn(Text_S)>=5415);
{
goto KIB_11;
}
if(formatsn(Text_S)<=5400);
{
goto KIB_10;
}
KIB_13: while(formatsn(Text_P)>255)
{
Key(1, W_Kib, 0, 68, "m", "Нажать", 100);
}
Key(1, W_Kib, 0, 68, "m", "Отпустить", 0);
KIB_12: while(formatsn(Text_P)<265)
{
Key(1, W_Kib, 0, 65, "m", "Нажать", 100);
}
Key(1, W_Kib, 0, 65, "m", "Отпустить", 0);
KIB_11: while(formatsn(Text_S)>5400)
{
Key(1, W_Kib, 0, 87, "m", "Нажать", 100);
}
Key(1, W_Kib, 0, 87, "m", "Отпустить", 0);
KIB_10: while(formatsn(Text_S)<5415)
{
Key(1, W_Kib, 0, 83, "m", "Нажать", 100);
}
Key(1, W_Kib, 0, 83, "m", "Отпустить", 0);
}

Fun();

function Fun()
{
loop()
{
ReadText(2, #Screen[0][0], #W_Kib, W_Kib.leftclient, W_Kib.topclient, 0, "Путь", #Text_S, #K_S, #X_S[0], #Y_S[0], #sX_S[0], #sY_S[0], #Cor_S[0], #Type_S[0], #K_Str, #Text_Str[0], #X_Str[0], #Y_Str[0], 0, 0, 1, 0, 40, 1, -1, -1, -1, 0, #Col_T0[0], 0, 0, #Kol_F0[0], 0, 0, 99, 886, 528, 957, 551, -1, 0);
ReadText(2, #Screen[0][0], #W_Kib, W_Kib.leftclient, W_Kib.topclient, 0, "Путь", #Text_P, #K_S, #X_S[0], #Y_S[0], #sX_S[0], #sY_S[0], #Cor_S[0], #Type_S[0], #K_Str, #Text_Str[0], #X_Str[0], #Y_Str[0], 0, 0, 1, 0, 40, 1, -1, -1, -1, 0, #Col_T0[0], 0, 0, #Kol_F0[0], 0, 0, 99, 994, 528, 1051, 551, -1, 0);
textout(1, 500,500, Text_S+" "+Text_P, 1);
sleep(100);
if(formatsn(Text_P)>255);
{
Key(1, W_Kib, 0, 68, "m", "Нажать", 100);
Key(1, W_Kib, 0, 68, "m", "Отпустить", 0);
}
if(formatsn(Text_P)<265);
{
Key(1, W_Kib, 0, 65, "m", "Нажать", 100);
Key(1, W_Kib, 0, 65, "m", "Отпустить", 0);
}
if(formatsn(Text_S)>5400);
{
Key(1, W_Kib, 0, 87, "m", "Нажать", 100);
Key(1, W_Kib, 0, 87, "m", "Отпустить", 0);
}
if(formatsn(Text_S)<5415);
{
Key(1, W_Kib, 0, 83, "m", "Нажать", 100);
Key(1, W_Kib, 0, 83, "m", "Отпустить", 0);
}
}

y_str[n]=ey1+symbolypos(regexstart(n))+ScrY

INTS [9010258] = S