Кибор » Кибор - Интегрированная среда разработки ботов » Вопросы и решение проблем » Отправка сочетаний клавиш в окно

Страниц (3): « 1 [2] 3 »
 

11. Nightshade2 - 16 Декабря, 2016 - 02:15:58 - перейти к сообщению
Спасибо за помощь ::cool24.gif::
Для информации...
Вот такой код отсылает большую букву Я(или Z) в фоновое окно. ::biggrin24.gif::
А значит в фоновые окна можно слать текст учитывая регистр и раскладку.
Было бы неплохо добавить в Кибор по аналогии с key("asd",0,1,w);
CODE:

char state[256];
for (int n=0; n<256; n++)state[n]=0;
state[16]=128;

external(INT, "SetKeyboardState", "SetKeyboardState", "User32.dll");
attach(w,1);
postmessage(WM_KEYDOWN, 16, 0, w);
SetKeyboardState(address(#state[0]));
postmessage(WM_KEYDOWN, 90, 1, w);
sleep(100);
postmessage(WM_KEYUP, 90, 3221225472, w);
postmessage(WM_KEYUP, 16, 3221225472, w);
attach(w,0);

И в таком варианте в других программах не нажимается SHIFT.
12. Kibor - 16 Декабря, 2016 - 02:29:02 - перейти к сообщению
Хм. Спасибо. Будет возможно расширить функционал.
13. Dantes3000 - 16 Декабря, 2016 - 03:30:46 - перейти к сообщению
В варспир вон не хочет отправлять текст. Вот и появилась возможность исправить это.
14. Nightshade2 - 16 Декабря, 2016 - 03:51:05 - перейти к сообщению
Не факт, что это поможет. У меня в игре в неактивном окне можно нажимать мышь, писать текст в текстовые поля. А вот нажать клавишу "открыть окно пати" или любую другую клавишу действий НЕЛЬЗЯ. А в активном окне напрочь отказывается воспринимать wm_keydown. Зато сообщения wm_syskeydown игра съедает с радостью. В чем фишка мне непонятно.
15. Nightshade2 - 16 Декабря, 2016 - 06:07:11 - перейти к сообщению
функция отправки англ текста в нужном РеГиСтРе
CODE:

function sendtext2(string str1, win w)
{

int len=size(str1);
char arr[1023];
strcpy(#arr[0], str1);
int i=0;
int i2=0;
int n=0;
char state[256];
external(INT, "SetKeyboardState", "SetKeyboardState", "User32.dll");
external(INT, "GetKeyboardState", "GetKeyboardState", "User32.dll");
for(i=0;i<len;i++)
{
i2=formatci(arr[i]);
//messagebox(format(i2));
//БОЛЬШАЯ
if (i2>=65)
{
if (i2<=90)
{
sendlanguage("00000409", w);
sleep(100);
attach(w,1);
for (n=0; n<256; n++)state[n]=0;
GetKeyboardState(address(#state[0]);
state[16]=128;
postmessage(WM_KEYDOWN, 16, 1, w);
SetKeyboardState(address(#state[0]);
postmessage(WM_KEYDOWN, i2, 1, w);
sleep(100);
postmessage(WM_KEYUP, i2, 3221225472, w);
postmessage(WM_KEYUP, 16, 3221225472, w);
state[16]=0;
SetKeyboardState(address(#state[0]);
attach(w,0);
}
}
//маленькая
if (i2>=97)
{
if(i2<=122)
{i2=i2-32;
sendlanguage("00000409", w);
sleep(100);
postmessage(WM_KEYDOWN, i2, 1, w);
sleep(100);
postmessage(WM_KEYUP, i2, 3221225472, w);
}
}
//ÁÎËÜØÀß ÐÓÑ
//if (i2>=192)
//{
//if (i2<=223)
//{
//sendlanguage("00000419", w);
//sleep(100);
//external(INT, "MapVirtualKey", "MapVirtualKeyA", "User32.dll");
//i2=i2-127;
//i2=MapVirtualKey(address(#i2),0);
//attach(w,1);
//for (n=0; n<256; n++)state[n]=0;
//GetKeyboardState(address(#state[0]);
//state[16]=128;
//postmessage(WM_KEYDOWN, 16, 1, w);
//SetKeyboardState(address(#state[0]);
//postmessage(WM_KEYDOWN, i2, 1, w);
//sleep(100);
//postmessage(WM_KEYUP, i2, 3221225472, w);
//postmessage(WM_KEYUP, 16, 3221225472, w);
//state[16]=0;
//SetKeyboardState(address(#state[0]);
//attach(w,0);
//}
//}

}
}

Русскую раскладку пока не победил Огорчение
Кстати && нифига не работает в условиях. Продолжаем писать каскады if
16. Kibor - 16 Декабря, 2016 - 06:18:03 - перейти к сообщению
Код потом посмотрю. интересно..
 Nightshade2 пишет:
Кстати && нифига не работает в условиях. Продолжаем писать каскады if

С 13 года чудесно работает все что душе угодно..

CODE:
if (5>2 && 3<25)
{
messagebox ("5>2 && 3<25");
}

if (5<2 && 3<25)
{
messagebox ("5<2 && 3<25");
}

if (5>2 && 3>25)
{
messagebox ("5>2 && 3>25");
}

if (5>2 || 3>25)
{
messagebox ("5>2 || 3>25");
}

if ((2>1 && 20>10) || (10<=10 && 100>5))
{
messagebox ("(2>1 && 20>10) || (10<=10 && 100>5)");
}
17. Nightshade2 - 16 Декабря, 2016 - 06:21:23 - перейти к сообщению
Я писал
if (i2>=97) && (i2<=122)
{i2=i2-32;}
И не попадал в условие. Еще 1 скобки нужны? ((i2>=97) && (i2<=122))
18. Kibor - 16 Декабря, 2016 - 07:07:04 - перейти к сообщению
Нарушение правил синтаксиса C
Читайте справку.(для просмотра ссылки Вам необходимо авторизоваться)
 Nightshade2 пишет:
if (i2>=97) && (i2<=122)

 Nightshade2 пишет:
Еще 1 скобки нужны? ((i2>=97) && (i2<=122))

Не еще одни, а НЕ надо брать каждое условие в скобки. Это не несет в себе никакого смысла. Скобки в Кибор несут функциональную нагрузку как в С. Нагрузка приоритета как в математике.
Это ошибка синтаксиса.
if (i2>=97) && (i2<=122)
это
if (i2>=97 && i2<=122)
а внутренние скобки означают БЛОК условия как в примере
if ((2>1 && 20>10) || (10<=10 && 100>5))

Проследите логику по скобкам. Логика как в математике..
19. Nightshade2 - 16 Декабря, 2016 - 13:42:20 - перейти к сообщению
Добил рус символы. Всякие знаки препинания пока мне не нужны. Код громоздкий и возможно можно переписать проще, но рабочий Подмигивание
Код (Отобразить)
20. Kibor - 16 Января, 2017 - 10:09:46 - перейти к сообщению
Отправление зажатий и отпусканий клавиш клавиатуры в не активные окна sendkeydown и sendkeyup

Powered by ExBB FM 1.0 Final