int size_key_char_KIB=-1;

key_(16, 2, "", 0, 0, 0);
key_(17, 2, "", 0, 0, 0);
key_(18, 2, "", 0, 0, 0);
key_(66, 2, "", 0, 0, 100);
key_(16, 3, "", 0, 0, 0);
key_(17, 3, "", 0, 0, 0);
key_(18, 3, "", 0, 0, 0);
key_(66, 3, "", 0, 0, 100);
key_(16, 2, "", 0, 0, 0);
key_(17, 2, "", 0, 0, 0);
key_(18, 2, "", 0, 0, 0);
key_(78, 2, "", 0, 0, 100);
key_(16, 3, "", 0, 0, 0);
key_(17, 3, "", 0, 0, 0);
key_(18, 3, "", 0, 0, 0);
key_(78, 3, "", 0, 0, 0);



function key_(int k, int m, string text, int pc, int p1, int p2)
{
pause(p1);
if (m==-1)
{
if (size_key_char_KIB==-1)
{
size_key_char_KIB=100;
new char key_char_KIB[size_key_char_KIB+1];
}
int size_key=size(text);
if (size_key_char_KIB<size_key)
{
delete key_char_KIB;
size_key_char_KIB=size_key;
new char key_char_KIB[size_key_char_KIB+1];
}
strcpy(#key_char_KIB[0], text);
for (int n=0; n<size_key; n++){key(key_char_KIB[n]); sleep(pc);}
}
else
{
if (m==1) key(k);
if (m==2) keydown(k);
if (m==3) keyup(k);
}
pause(p2);
}