Серый форум — AHK: Счетчик изображений в GUI

Re: AHK: Счетчик изображений в GUI

2017-10-29T13:54:00Z

О спасибо.
А не подскажите, функцию BlockInput можно использовать для блокировки отдельных клавишь в таком виде:

BlockInput {A}, {D}

или эта функция блокирует сразу все клавиши?

Просто решил еще маленький скрипт написать для блокировки нажатия определенных клавиш пока на экране монитора находится определенная картинка

А все, нашел вашу же тему на форуме с подобным скриптом.

Re: AHK: Счетчик изображений в GUI

2017-10-28T22:06:02Z

Чтобы не нагружало вставьте в цикл sleep 50.

Re: AHK: Счетчик изображений в GUI

2017-10-28T19:13:56Z

1 Это я такое кривое присвоение сделал и ведь работает и выводит правильное значение)
2 Хз, но работает)
3 Да тут я неправильно понял значение функции. Удалил ее из скрипта, хотя что так что так работает)

Еще раз спасибо огромное, проблема решена, решил остановиться на варианте поиск по хоткею, тк непрерывный поиск на 20 % нагружает ЦП.

Re: AHK: Счетчик изображений в GUI

2017-10-28T11:44:25Z

Зачем 2 раза код ищет картинку?
Почему функция находится в середине?
Зачем нужен GuiControlGet?
Почему не ищет не знаю.
Чтобы не мелькало можно попробовать добавить опцию BackgroundTrans к мелькающему контролу.

Re: AHK: Счетчик изображений в GUI

2017-10-28T09:18:49Z

Спасибо большое за ваше терпение, разобрался c gui, все работает, в gui окно результат выводится.

#SingleInstance ignore
Gui, +ToolWindow +AlwaysOnTop
Gui, Font, S10 CDefault, Verdana
Gui, Font, S12 CDefault, Verdana
Gui, Font, S10 CDefault, Verdana
Gui, Font, S12 CDefault, Verdana
Gui, Font, S10 CDefault, Verdana
Gui, Font, S9 CDefault, Verdana
Gui, Font, S9 CDefault, Verdana
Gui, Font, S12 CDefault, Verdana

Gui, Add, Text, x6 y7 w50 h20 , Units
Gui, Add, Text, vCounter x60 y7 w30 h17 , 0
Gui, Show, x380 y257 h38 w95, Checker v1.0E 

mylabel:

  GuiControlGet, Counter
 Counter := SeveralSearch(0, 0, 1920, 1080, "Image_0.bmp")   
GuiControl,, Counter, %Counter%    


SetBatchLines -1
SeveralSearch(0, 0, 1920, 1080, "Image_0.bmp") 

SeveralSearch(ix1, iy1, w, h, file)  {
	x1 := ix1, y1 := iy1, x2 := ix1 + w - 1, y2 := iy1 + h - 1
	prY := y2, ErrorCount := 0, Coords := []
	Loop
	{
		ImageSearch, mX, mY, x1, y1, x2, y2, %file%
		If (ErrorLevel && ++ErrorCount > 1)
			Break
		If (mY = "" || mY > prY)
			x1 := ix1, y1 += 1, prY := y2
		Else
			x1 := mX + 1, ErrorCount := 0, y1 := mY, prY := mY, Coords.Push([mX, mY])
	}
	Return coords.MaxIndex()
}

goto mylabel




F1:: Reload
F2:: ExitApp

Осталась не решенной только проблема поиска картинок, почему то не хочет искать картинки разрешением больше 8x8 пикселей, не знаете с чем это связано?
PS При использовании вывода результата без хоткея, в режиме постоянного вывода, результат очень быстро моргает, можно ли убрать этот эффект, чтобы цифры сменялись плавно без эффекта моргания.

Re: AHK: Счетчик изображений в GUI

2017-10-27T20:18:04Z

ААА понял.))

#SingleInstance ignore
Gui, +ToolWindow +AlwaysOnTop
Gui, Font, S10 CDefault, Verdana
Gui, Font, S12 CDefault, Verdana
Gui, Font, S10 CDefault, Verdana
Gui, Font, S12 CDefault, Verdana
Gui, Font, S10 CDefault, Verdana
Gui, Font, S9 CDefault, Verdana
Gui, Font, S9 CDefault, Verdana
Gui, Font, S12 CDefault, Verdana

Gui, Add, Text, x6 y7 w50 h20 , SCSC
Gui, Add, Text, vCounter x60 y7 w30 h17 , 0
Gui, Show, x380 y257 h38 w95, Checker v1.0E 


Space::
    

SetBatchLines -1
msgbox % SeveralSearch(0, 0, 1920, 1080, "Image_0.bmp")

SeveralSearch(ix1, iy1, w, h, file)  {
	x1 := ix1, y1 := iy1, x2 := ix1 + w - 1, y2 := iy1 + h - 1
	prY := y2, ErrorCount := 0, Coords := []
	Loop
	{
		ImageSearch, mX, mY, x1, y1, x2, y2, %file%
		If (ErrorLevel && ++ErrorCount > 1)
			Break
		If (mY = "" || mY > prY)
			x1 := ix1, y1 += 1, prY := y2
		Else
			x1 := mX + 1, ErrorCount := 0, y1 := mY, prY := mY, Coords.Push([mX, mY])
	}
	Return coords.MaxIndex()
}


Return



F1:: Reload
F2:: ExitApp

Спасибо большое, все заработало, только вот количество совпадений выводится отдельным окошком msgbox, а как здесь

msgbox % SeveralSearch(0, 0, 1920, 1080, "Image_0.bmp")

вместо msgbox сделать вывод в gui ?
И правильно ли я понимаю что в режиме реального времени(так чтобы счетчик сам пересчитывал кол-во совпадений в gui) вывод не сделать, только по хоткею?
PS Наткнулся на еще одну проблему, почему то не находит совпадения если искомая картинка больше 8х8 пикселей.

Re: AHK: Счетчик изображений в GUI

2017-10-27T19:45:02Z

Я вам дал функцию, которое возвращает количество найденных совпадений.
Вы это значение можете присуждать переменной и вставлять в гуи.

Re: AHK: Счетчик изображений в GUI

2017-10-27T19:40:05Z

То есть тот скрипт что вы мне дали ранее не подходит сюда?

Re: AHK: Счетчик изображений в GUI

2017-10-27T19:37:45Z

Помочь, это одно.
А скрипт за вас писать мне не хочется.
Вам надо понять, что такое функция, как ее вызвать и что она возвращает.
Это есть в справке.
Работа с гуи тоже там описана.

Re: AHK: Счетчик изображений в GUI

2017-10-27T19:08:32Z

#SingleInstance ignore
Gui, Font, S10 CDefault, Verdana
Gui, Font, S12 CDefault, Verdana
Gui, Font, S10 CDefault, Verdana
Gui, Font, S12 CDefault, Verdana
Gui, Font, S10 CDefault, Verdana
Gui, Font, S9 CDefault, Verdana
Gui, Font, S9 CDefault, Verdana
Gui, Font, S12 CDefault, Verdana

Gui, Add, Text, x6 y7 w50 h20 , SCSC
Gui, Add, Text, vx1 x60 y7 w30 h17 , 0
Gui, Show, x380 y257 h38 w95, SCE 

 


Start:

SetBatchLines -1
SeveralSearch(ix1, iy1, w, h, file)  {
	x1 := ix1, y1 := iy1, x2 := ix1 + w - 1, y2 := iy1 + h - 1
	prY := y2, ErrorCount := 0, Coords := []
	Loop
	{
		ImageSearch, mX, mY, x1, y1, x2, y2, %A_WorkingDir%\Image_0.bmp
		If (ErrorLevel && ++ErrorCount > 1)
			Break
		If (mY = "" || mY > prY)
			x1 := ix1, y1 += 1, prY := y2
		Else
			x1 := mX + 1, ErrorCount := 0, y1 := mY, prY := mY, Coords.Push([mX, mY])
	}
	Return coords.MaxIndex()
}

Return

GuiClose:
ExitApp

Поставил в конце, но все равно не ищет.
Где моя следующая ошибка?
Я ведь правильно понимаю что найденное значение совпадений записывается в переменной x1?
Я тут ее добавил,

Gui, Add, Text, vx1 x60 y7 w30 h17 , 0

но это не помогло.
PS Спасибо что не плюнули и решили помочь разобраться.

Re: AHK: Счетчик изображений в GUI

2017-10-27T18:42:58Z

У вас скрипт загружается, но до счетчика не доходит из-за return и ExitApp.

Re: AHK: Счетчик изображений в GUI

2017-10-27T18:20:00Z

MsgBox, 0, qw, qwerty, 10

Но причем тут это ведь мне в gui надо такой счетчик сделать и чтобы значение постоянно менялось в зависимости от того сколько в данный момент искомых копий картинки находится на экране?

Re: AHK: Счетчик изображений в GUI

2017-10-27T18:05:13Z

IIoToII пишет:

Про какой 10 скрипт идет речь

Скрипт из 10 поста.

Re: AHK: Счетчик изображений в GUI

2017-10-27T17:55:42Z

Про какой 10 скрипт идет речь и что за SeveralSearch? Так и не нашел описания этой функции.

Если про msgbox, то так тоже не работает.

#SingleInstance ignore
Gui, Font, S10 CDefault, Verdana
Gui, Font, S12 CDefault, Verdana
Gui, Font, S10 CDefault, Verdana
Gui, Font, S12 CDefault, Verdana
Gui, Font, S10 CDefault, Verdana
Gui, Font, S9 CDefault, Verdana
Gui, Font, S9 CDefault, Verdana
Gui, Font, S12 CDefault, Verdana

Gui, Add, Text, x6 y7 w50 h20 , SCSC
Gui, Add, Text, vx1 x60 y9 w30 h17 , 0
Gui, Show, x380 y257 h38 w95, SC 

Return

GuiClose:
ExitApp  


Start:

SetBatchLines -1
SeveralSearch(ix1, iy1, w, h, file)  {
	x1 := ix1, y1 := iy1, x2 := ix1 + w - 1, y2 := iy1 + h - 1
	prY := y2, ErrorCount := 0, Coords := []
	Loop
	{
		ImageSearch, mX, mY, x1, y1, x2, y2, %A_WorkingDir%\Image_0.bmp
		If (ErrorLevel && ++ErrorCount > 1)
			Break
		If (mY = "" || mY > prY)
			x1 := ix1, y1 += 1, prY := y2
		Else
			x1 := mX + 1, ErrorCount := 0, y1 := mY, prY := mY, Coords.Push([mX, mY])
	}
	Return coords.MaxIndex()
}


Return

Re: AHK: Счетчик изображений в GUI

2017-10-27T17:39:03Z

Ну и что по-вашему нужно закомментировать в 10 скрипте чтоб сообщение появилось?