Re: AHK: Алгоритм работы с текстом

null@example.com (valentin_val) — Wed, 07 Oct 2020 14:31:27 +0000

serzh82saratov

Пребольшущий, тебе, благодар!!!
Возьму это себе на вооружение)

Re: AHK: Алгоритм работы с текстом

null@example.com (valentin_val) — Wed, 07 Oct 2020 12:21:32 +0000

serzh82saratov

Благодарю тебя. Попробую применить на практике)))

Re: AHK: Алгоритм работы с текстом

null@example.com (serzh82saratov) — Wed, 07 Oct 2020 10:32:02 +0000


Sort, Text, U ;сортирует прочитанное, удаляя дубликаты строк
If (Text == PrText)
	continue
PrText := Text
FileOpen("c:\bl3\target.txt", "w").Close() ;чистит файл перед заполнением новыми данными

AHK: Алгоритм работы с текстом

null@example.com (valentin_val) — Tue, 06 Oct 2020 22:12:44 +0000

Приветствую, уважаемые участники форума.

Зашёл в тупик.
Мне нужна помощь в реализации одного алгоритма.
Есть скрипт, который сканирует изображение (субтитры), распознает его в текстовый файл и передаёт в govorilka.

Проблема в том, что строка с субтитрами может быть распознана по 5 раз за цикл.

Алгоритм должен отправлять по одной строке текста в govorilka, удалять его от туда и после появления такой же строки, игнорировать её.
Может у кого уже есть реализация нечто похожего?
Буду рад ЛЮБОЙ идее.

Вот Мой, криворукий, код:

F1::
Loop,
	{
		ImageSearch, xp, yp, 407, 867, 724, 908, *3 target.bmp
		If ErrorLevel = 0
	{ ;распознаём. читаем.}
;MsgBox %FoundX%, %FoundY%
Clipboard = ; очистка Буфера обмена 
RunWait, C:\Program Files (x86)\MiniCap\MiniCap.exe -captureregion 410 877 1500 900 -dpi 600 -convert bwt1 -save "c:\bl3\text.bmp" -exit, ,hide ;делаем скриншот
RunWait, C:\install\Capture2Text_v4.6.2_64bit\Capture2Text\Capture2Text.exe -l Russian -i c:\bl3\text.bmp --clipboard, ,hide ; распознаем
SoundBeep, 500, 50 ;звуковое оповещение после окончания распознования и записи в буфер обмена

ClipWait, 2, 1 ; ожидает заполнение буфера от предыдущих команд
FileAppend, %Clipboard%, c:\bl3\term.txt
FileRead, Text, C:\bl3\term.txt ;читает файл перед сортировкой
Sort, Text, U ;сортирует прочитанное, удаляя дубликаты строк
FileOpen("c:\bl3\target.txt", "w").Close() ;чистит файл перед заполнением новыми данными
FileAppend, %Text%, C:\bl3\Target.txt ;


Run, C:\install\Говорилка\CP\Govorilka_cp.exe -Q -s70 -I -e "Microsoft irina Desktop - Russian" -F C:\bl3\target.txt , ,hide, 
sleep 1000

}
else

{
   continue
}

		
	}

F2:: Pause
F7:: run C:\install\Говорилка\CP\Govorilka_cp.exe -STOPALL

Серый форум — AHK: Алгоритм работы с текстом

Re: AHK: Алгоритм работы с текстом

Re: AHK: Алгоритм работы с текстом

Re: AHK: Алгоритм работы с текстом

AHK: Алгоритм работы с текстом