Недавние сообщения

Страницы: 1 [2] 3 4 ... 10
11
Стол заказов / Re: Нажатие клавиш при изменении цвета пикселя
« Последний ответ от hedji Отправлен Сегодня в 09:22:06 »
Зачем искать белый цвет, если потом кнопки нажимаются в зависимости от конкретного цвета?

Код: AutoIt [Выделить]
Opt("PixelCoordMode", 2) ;устанавливаем способ отсчета координат
$hWnd = WinGetHandle("Окно игры") ;указываем заголовок окна игры вместо "Окно игры"

If @error Then
    MsgBox(0, "", "Окно игры не найдено, скрипт будет завершен") ;если окно игры не найдено, выходим из скрипта
    Exit
EndIf

While 1

$color = Hex(PixelGetColor(0, 20, $hWnd), 6) ;проверяем цвет в указанной точке

Switch $color
    Case "000d1a"
        Send("0") ;в зависимости от цвета нажимаем нужную кнопку
    Case "00284d"
        Send("1")
    Case "003566"
        Send("2")
    Case "004280"
        Send("3")
    Case "004f99"
        Send("4")
    Case "005cb3"
        Send("5")
    Case "0069cc"
        Send("6")
    Case "0077e6"
        Send("7")
    Case "0084ff"
        Send("8")
    Case "1a90ff"
        Send("9")
    Case Else
EndSwitch

WEnd
 

12
я не увидел разницы в использовании онлайн справок  ни той ни другой.

13
Стол заказов / Нажатие клавиш при изменении цвета пикселя
« Последний ответ от S3EK Отправлен Сегодня в 01:30:04 »
Здравствуйте. Некоторое время назад товарищ прислал скрипт и сказал, что все легко, разберешься за пару минут.
Дело в том, что я далеко не программист.

Суть скрипта заключается в нажатии клавиши в зависимости от цвета пикселя.
Изменение цвета пикселя было сделано отдельно, а сам клик я совсем не имею представления как реализовать.

(нажмите для показа/скрытия)

Если цвет пикселя не является "000000" то прожимается клавиша - такова планировалась логика.
Подскажите пожалуйста. Что нужно сделать чтобы это заработало?
14
Дни рождения / С днём рождения Nervill!
« Последний ответ от Представитель Сообщества Отправлен Сегодня в 01:00:50 »
От имени всего Русского сообщества AutoIt поздравляем Вас Nervill с днём рождения!



Цитировать
Пусть все мечты исполнятся,
Пусть все желанья сбудутся,
Пусть радости запомнятся,
А горести забудутся.

Здоровье будет крепкое,
В делах всегда согласие,
Любовь навеки верная —
Без ссор и разногласия.

Зарплата только вовремя,
Стабильная, высокая.
Работа будет лёгкая
И не совсем далёкая.

Пусть жизнь Вам дарит самые
Прекрасные мгновения.
Желаем только радости
И счастья, с днем рождения!
15
Как же все-таки удобно составлена Русская онлайн справка, все по полочкам, по разделам - для начала изучения AutoIt самое то, но как не крути она все же устарела.
Перейдя на актуальную Англоязычную справку можно потеряться, особенно в списках функций. Складывается такое впечатление, что в разделах все просто навалено кучей, как хотите так и отфильтровывайте. Однако это не так, есть скрытые ссылки, которые могут помочь пользователю упорядочить информацию.
В общем, подумал я и решил повторить структуру Офлайн Английской справки (в которой все более упорядочено) в закладках для Chrome, что из этого получилось и насколько это удобно решать вам.

Импорт закладок в Chrome:
  • Скачиваете Этот архив, извлекаете .html файл;
  • Открываете в Chrome подобном браузере "Диспетчер закладок", в его настройка выбираете "Импорт закладок", указываете извлеченный шагом ранее .html файл и вуаля.



16
Общие вопросы по AutoIt / Re: [Ошибки] Error parsing function call
« Последний ответ от kapiton Отправлен Вчера в 16:00:41 »
Ха, а СЛОНА я и не заметил  :stars:
Пора в отпуск. Спасибо большое
17
Общие вопросы по AutoIt / Re: [Ошибки] Error parsing function call
« Последний ответ от hedji Отправлен Вчера в 15:50:13 »
Скобки в конце строк:
Код: AutoIt [Выделить]
FileCopy(@WindowsDir & "\ScreenSaverRZD\screensaver4.scr", $InstPath32 & "\screensaver_rzd.scr", 1

FileCopy(@WindowsDir & "\ScreenSaverRZD\screensaver4.scr", $InstPath64 & "\screensaver_rzd.scr", 1
 


Ctrl+F5 проверка синтаксиса в редакторе.
18
Общие вопросы по AutoIt / [Ошибки] Error parsing function call
« Последний ответ от kapiton Отправлен Вчера в 15:35:24 »
Доброго времени суток!
Весь мозг уже сломал, вот код:

Код: AutoIt [Выделить]
Opt("TrayIconHide", 1)
Opt("TrayAutoPause", 0)

$InstPath32 = @WindowsDir & "\System32"
$InstPath64 = @WindowsDir & "\Sysnative"

If FileExists(@WindowsDir & "\ScreenSaverRZD\") = False Then
    DirCreate(@WindowsDir & "\ScreenSaverRZD")
EndIf

FileInstall("screensaver1.scr", @WindowsDir & "\ScreenSaverRZD\", 1)
FileInstall("screensaver2.scr", @WindowsDir & "\ScreenSaverRZD\", 1)
FileInstall("screensaver3.scr", @WindowsDir & "\ScreenSaverRZD\", 1)
FileInstall("screensaver4.scr", @WindowsDir & "\ScreenSaverRZD\", 1)
FileInstall("screensaver5.scr", @WindowsDir & "\ScreenSaverRZD\", 1)
FileInstall("screensaver6.scr", @WindowsDir & "\ScreenSaverRZD\", 1)

$month = @MON

Select
    Case $month = "01" OR $month = "02"
        FileCopy(@WindowsDir & "\ScreenSaverRZD\screensaver1.scr", $InstPath32 & "\screensaver_rzd.scr", 1)
    Case $month = "03" OR $month = "04"
        FileCopy(@WindowsDir & "\ScreenSaverRZD\screensaver2.scr", $InstPath32 & "\screensaver_rzd.scr", 1)
    Case $month = "05" OR $month = "06"
        FileCopy(@WindowsDir & "\ScreenSaverRZD\screensaver3.scr", $InstPath32 & "\screensaver_rzd.scr", 1)
    Case $month = "07" OR $month = "08"
        FileCopy(@WindowsDir & "\ScreenSaverRZD\screensaver4.scr", $InstPath32 & "\screensaver_rzd.scr", 1
    Case $month = "09" OR $month = "10"
        FileCopy(@WindowsDir & "\ScreenSaverRZD\screensaver5.scr", $InstPath32 & "\screensaver_rzd.scr", 1)
    Case $month = "11" OR $month = "12"
        FileCopy(@WindowsDir & "\ScreenSaverRZD\screensaver6.scr", $InstPath32 & "\screensaver_rzd.scr", 1)
 EndSelect

If @OSArch <> "X86" Then
    Select
        Case $month = "01" OR $month = "02"
            FileCopy(@WindowsDir & "\ScreenSaverRZD\screensaver1.scr", $InstPath64 & "\screensaver_rzd.scr", 1)
        Case $month = "03" OR $month = "04"
            FileCopy(@WindowsDir & "\ScreenSaverRZD\screensaver2.scr", $InstPath64 & "\screensaver_rzd.scr", 1)
        Case $month = "05" OR $month = "06"
            FileCopy(@WindowsDir & "\ScreenSaverRZD\screensaver3.scr", $InstPath64 & "\screensaver_rzd.scr", 1)
        Case $month = "07" OR $month = "08"
            FileCopy(@WindowsDir & "\ScreenSaverRZD\screensaver4.scr", $InstPath64 & "\screensaver_rzd.scr", 1
        Case $month = "09" OR $month = "10"
            FileCopy(@WindowsDir & "\ScreenSaverRZD\screensaver5.scr", $InstPath64 & "\screensaver_rzd.scr", 1)
        Case $month = "11" OR $month = "12"
            FileCopy(@WindowsDir & "\ScreenSaverRZD\screensaver6.scr", $InstPath64 & "\screensaver_rzd.scr", 1)
    EndSelect
EndIf

Exit


При запуске скомпилированного скрипта выдается вот такое окно с сообщением:
Error parsing function call (картинка во вложении)

Что тут не так?
19
Общие вопросы по AutoIt / Re: Цикл при зажатой клавиши
« Последний ответ от Alofa Отправлен Вчера в 00:17:34 »
А еще есть "Похожие темы" внизу этой страницы. :whistle:
20
Общие вопросы по AutoIt / Re: Цикл при зажатой клавиши
« Последний ответ от alex33 Отправлен Июль 15, 2018, 21:14:16 »
Цитировать
Весь день убил на то чтобы сделать или найти скрипты с зажатием клавиш.
Ну так есть же одна функция, под названием _IsPressed
Страницы: 1 [2] 3 4 ... 10