Форум программистов, компьютерный форум, киберфорум
AutoIt
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.91/33: Рейтинг темы: голосов - 33, средняя оценка - 4.91
0 / 0 / 0
Регистрация: 22.07.2012
Сообщений: 4

Эмуляция нажатия клавиш при попадании в центр экрана определенного цвета.

02.09.2012, 11:06. Показов 6474. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Добрый день. Такая проблема, хочу написать программу, чтобы при попадании в центр экрана определенного цвета, автоматический нажимались клавиши :
1.Правая кнопка мыши
Задержка 20 мсек
2.Левая кнопка мыши
Задержка 20 мсек
3.Цифра "3" (верхняя цифр. клавиатура)
Задержка 20 мсек
4.Цифра "1" (верхняя цифр. клавиатура)
Уже запутался в этих клавишах, не подскажете как написать (доработать) код?

Вот сам код


Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
#Region   #AutoIt3Wrapper_Version=Beta
 #AutoIt3Wrapper_Icon=icon.ico  
#AutoIt3Wrapper_Outfile=zzz.exe  
#AutoIt3Wrapper_Compression=4  
#AutoIt3Wrapper_Compile_Both=y  
#AutoIt3Wrapper_UseX64=y  
#AutoIt3Wrapper_Res_Comment=papkamod  
#AutoIt3Wrapper_Res_Description=papkamod  
#AutoIt3Wrapper_Res_Fileversion=1.0.0.0  
#AutoIt3Wrapper_Res_Language=1049  
#AutoIt3Wrapper_Res_requestedExecutionLevel=highestAvailable  
#EndRegion   
#Include <Resources.au3>  
#Include <HotKey.au3>  
If WinExists(@ScriptName) Then Exit  
AutoItWinSetTitle(@ScriptName)    
 
 
Opt("MouseCoordMode", 0)  
Opt("TrayIconHide", 1)  
Opt("PixelCoordMode", 2)  
Opt("MouseClickDelay", 1)   
Opt("MouseClickDownDelay", 100)     
 
Global $Cscript = 1   
Global $PAUSARASBROSA = 10   
Global Const $VK_OEM_PLUS = 0xBB   
Global Const $VK_OEM_MINUS = 0xBD     
 
MsgBox(48, "Hello",10)    
 
_HotKeyAssign($VK_HOME, 'TogglePause')   
_HotKeyAssign($VK_END, 'Terminate')     
 
_HotKeyAssign($VK_OEM_PLUS, 'Zna4eniePLUS')   
_HotKeyAssign($VK_OEM_MINUS, 'Zna4enieMINUS')      
While 1    
While $Cscript = 1    
; координаты поиска и цвета  
$left='492'  
$top='429'  
$right='533'  
$bottom='434'  
$color='15878679';Цвет пиксела      
 
$pos = PixelSearch ( $left, $top, $right, $bottom, $color)   
If Not @error Then ; если цвет найден выполняем условие      
 
;        Вот здесь нужно чтобы выполнилось нажатие клавиш   
 
EndIf  
If $Cscript <> 1 Then   
ToolTip("ПАУЗА", 0, 0)  
Beep(500,100)   
ToolTip("")   
EndIf  
WEnd    
 
While $Cscript = 0    
sleep(1000)  
If $Cscript <> 0 Then   
ToolTip("ЗАПУСК", 0, 0)  
Beep(500,100)  
ToolTip("")  
EndIf  
WEnd  
WEnd      
 
Func Zna4eniePLUS()   
$PAUSARASBROSA = $PAUSARASBROSA + "5"  
ToolTip("Задержка - "&$PAUSARASBROSA, 0, 0)   
sleep(300)   
ToolTip("")     
 
EndFunc    Func Zna4enieMINUS()   
$PAUSARASBROSA = $PAUSARASBROSA - "5"  
ToolTip(" + "&$PAUSARASBROSA, 0, 0)   
sleep(300)   
ToolTip("")   
EndFunc        
 
Func TogglePause()  
$Cscript = NOT $Cscript  
EndFunc     
 
Func Terminate()  
ToolTip("Autoshot -  ВЫКЛЮЧЕНИЕ", 0, 0)   
Beep(500,500)       
Exit 0  
EndFunc
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
02.09.2012, 11:06
Ответы с готовыми решениями:

Рандомное движение курсора мыши вне формы при попадании на пиксель определенного цвета
Здравствуйте, можно ли реализовать рандомное движение мыши вне формы и нажатие мыши, при наведении на определенный цвет?

Перехватчик клавиш + эмуляция нажатия клавиш
Здравствуйте! Срочно нужна помощь! Моя программа работает в фоновом режиме. Мне нужно: 1) чтобы где бы я не находился в среде,...

Эмуляция нажатия клавиш
Всем привет! Помогите написать простенькую программу. Что должна делать? Вводим число в Edit (в секндах) должно использоваться через...

2
 Аватар для Isn
225 / 46 / 4
Регистрация: 27.11.2011
Сообщений: 99
25.12.2012, 13:36
не по теме:
судя по написанному выше скрипт для ПБ
на Autoite в ПБ работать не будет
0
Модератор
Эксперт JS
 Аватар для Eva Rosalene
5241 / 2115 / 416
Регистрация: 06.01.2013
Сообщений: 4,846
13.04.2013, 22:56
Цитата Сообщение от Isn Посмотреть сообщение
судя по написанному выше скрипт для ПБ
А помоему, для КС на AWP. Сам когда-то похожее делал, только не на AutoIT
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
13.04.2013, 22:56
Помогаю со студенческими работами здесь

Эмуляция нажатия клавиш.
Программа заключается в том, чтоб был постоянно повторяющийся цикл(по моему так) раз в пол минуты(не пренципиально можно и минуту но не...

Эмуляция нажатия клавиш
Здравствуйте форумчане ! Dim WshShell Set WshShell = CreateObject(&quot;WScript.Shell&quot;) WshShell.AppActivate (&quot;Блокнот&quot;) , true ...

Эмуляция нажатия клавиш
Люди, задам может быть тупой вопрос, но возможно ли программно в jquery или js эмулировать нажатия клавиш клавиатуры или мыши?

Эмуляция нажатия клавиш
здрасте.мне нужно проэмулировать нажатие кнопок мыши и нажатий клавиш в неактивном окне(конкретно в браузере). слышал что можно окно...

Эмуляция нажатия клавиш
Хочу написать программу, что бы она сама выполняла определенные действия клавиатуры за меня. как это возможно сделать?8-)


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
Мысли в слух
kumehtar 18.11.2025
Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .
Создание Single Page Application на фреймах
krapotkin 16.11.2025
Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .
Фото: Daniel Greenwood
kumehtar 13.11.2025
Расскажи мне о Мире, бродяга
kumehtar 12.11.2025
— Расскажи мне о Мире, бродяга, Ты же видел моря и метели. Как сменялись короны и стяги, Как эпохи стрелою летели. - Этот мир — это крылья и горы, Снег и пламя, любовь и тревоги, И бескрайние. . .
PowerShell Snippets
iNNOKENTIY21 11.11.2025
Модуль PowerShell 5. 1+ : Snippets. psm1 У меня модуль расположен в пользовательской папке модулей, по умолчанию: \Documents\WindowsPowerShell\Modules\Snippets\ А в самом низу файла-профиля. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru