Автокликер Clickermann :: Форум

Основной раздел => Общие вопросы => Topic started by: Space on March 16, 2019, 11:43:02 PM

Title: Трудности в программировании.
Post by: Space on March 16, 2019, 11:43:02 PM
Здравствуйте всем! Заинтересовался Clickermann как отличным инструментом, но т.к. опыта пока нет и программным языком владею как "в темном лесу", читал - читал но в голове пока "каша", появились проблемы в реализации задумки.
Пока непонятно какие операторы и т.д. должны стоять и как они должны взаимодействовать не мешая друг другу. В мануале кликерманна маловато разжеванных для наглядности примеров. 
Алгоритм я составил, но как использовать и какие выбрать операторы и как правильно связать - тут затык)
Нужно искать два цвета
заданная область (1314,155, 1314,297)
кн. "YES" координаты (1275,734)
кн. "NO" координаты (1365,734)
искать цвет "A"(32768)
искать цвет "B"(16711680)
(http://priscree.ru/img/7ac0d605be4e9f.jpg)
Спасибо тем, кто откликнется.
Title: Re: Трудности в программировании.
Post by: Oraven on March 17, 2019, 09:19:34 AM
Code: (clickermann) [Select]
GETSCREEN
$A = PXLCOUNT(1314,155, 1314,297, 32768)
$B = PXLCOUNT(1314,155, 1314,297, 16711680)

IF(($A > 0)&($B = 0))
   LCLICK(1275,734) // YES
   WAITMS(100)
   SOUND("Cricket.wav")
   WAIT(1)
   TFWRITE("Text.txt", STRCONCAT("YES - ", $_time_h,":",$_time_m,":",$_time_s," - ",$_date_y,".",$_date_m,".",$_date_d))
END_IF

IF(($B > 0)&($A = 0))
   LCLICK(1365,734) // NO
   WAITMS(100)
   SOUND("Duck.wav")
   WAIT(1)
   TFWRITE("Text.txt", STRCONCAT("NO - ", $_time_h,":",$_time_m,":",$_time_s," - ",$_date_y,".",$_date_m,".",$_date_d))
END_IF

WAITMS(500)
Title: Re: Трудности в программировании.
Post by: Space on March 17, 2019, 10:40:39 AM
Оо!
Большое СПАСИБО!!!
Я уже начал городить целую неработающую этажерку, а тут все так коротко и просто или все гениальное просто! :) Теперь попробую разобраться как все работает по отдельности и вместе, подписывая для себя комментарии. Это как первый детекторный приемник - сам долго собираешь и не работает, в итоге бросаешь это занятие. А при помощи опытного человека все настраивается и усиливается интерес к электроники.
Title: Re: Трудности в программировании.
Post by: Space on March 17, 2019, 07:42:07 PM
Работает отлично, согласно алгоритму!!! При появившемся цвете жмет кнопку, воспроизводит звук и делает конспект. Еще раз СПАСИБО!
Но в алгоритме я не сделал подробного пояснения (сам виноват).
Сейчас, при появившемся цвете, (а цвет может задержаться на долго) он делает многократное включение блока Y, равно как и блока N, а нужно однократное включение. Например появился цвет А - однократно нажал кн."YES" только один раз проиграл звук и один раз записал текст.
Появился цвет А - 1 раз включил блок Y, появился цвет В - 1 раз включил блок N, снова появился цвет А и снова 1 раз включил блок Y и т.д.
Пробовал увеличить временную задержку в блоках но это приводит к нестабильной работе.
Title: Re: Трудности в программировании.
Post by: Oraven on March 17, 2019, 09:48:29 PM
Теперь срабатывать будет однократно при обнаружении цвета. Сброс происходит при исчезновении цвета.

Code: (clickermann) [Select]
GETSCREEN
$A = PXLCOUNT(1314,155, 1314,297, 32768)
$B = PXLCOUNT(1314,155, 1314,297, 16711680)

IF(($A = 0)&($Check_A = 1))
   $Check_A = 0
END_IF
IF(($B = 0)&($Check_B = 1))
   $Check_B = 0
END_IF

IF(($A > 0)&($B = 0)&($Check_A = 0))
   LCLICK(1275,734) // YES
   WAITMS(100)
   SOUND("Cricket.wav")
   WAIT(1)
   TFWRITE("Text.txt", STRCONCAT("YES - ", $_time_h,":",$_time_m,":",$_time_s," - ",$_date_y,".",$_date_m,".",$_date_d))
   $Check_A = 1
END_IF

IF(($B > 0)&($A = 0)&($Check_B = 0))
   LCLICK(1365,734) // NO
   WAITMS(100)
   SOUND("Duck.wav")
   WAIT(1)
   TFWRITE("Text.txt", STRCONCAT("NO - ", $_time_h,":",$_time_m,":",$_time_s," - ",$_date_y,".",$_date_m,".",$_date_d))
   $Check_B = 1
END_IF

WAITMS(500)
Title: Re: Трудности в программировании.
Post by: Space on March 17, 2019, 10:54:25 PM
БЛАГОДАРЮ!!!