Список проголосовавших за комментарий "Балаболка и озвучивание субтитров Youtube <br/> <br/> В новой версии 2021 года мне понравилась функция выбора места <br/> для записи временных файлов на RAM-диск в память, <br/> ведь бывает создаётся ошибочный временный файл на гигабайты пустой <br/> и кто расположение временных не контролирует, те могут переполнить диск<br/> <br/> Однако скачав портабль версию, неясно где сейчас настраивается <br/> выбор контекстного меню для сохранения аудио сразу и может быть <br/> востребовано контекстное меню сохранения 5 или 10 равных частей mp3<br/> <br/> Думаю, всё больше будет востребовано озвучивание субтитров Youtube, <br/> экономящее гигабайты, когда на экране говорящие головы, <br/> и чем больше народа узнает данную функцию, тем лучше <br/> <br/> Протяжённые фразы вызывают сбои даже новой версии Балаболки, <br/> хотя текст был отформатирован пробелами вместо переносов строк <br/> и возможно точки ставятся в конце абзацев даже если отключено <br/> <br/> Озвучивая субтитры и стихи проблема: в конце строки " — ^p" <br/> читается как «минус» и наверняка реально исправлять <br/> <br/> Лично я применяю форматирование расшифровки аудио без запятых: <br/> 1. Переносы строк "^p" заменяются на пробел <br/> 2. " и " заменяются на ". и "<br/> 3. " но " заменяются на ". но "<br/> 4. " а " заменяются на ". а "<br/> 5. " " заменяются на " " 3-жды <br/> <br/> Результат: озвучиваются самые проблемные тексты <br/> какие застревают сейчас на любом форматировании <br/> <br/> Возможно повышать приоритет cоздав 1-строчный realtime.bat<br/> @ start "" /realtime «C:\Program Files (x86)\Balabolka\balabolka.exe» %1<br/> <br/> и вместо неуправляемого «Открыть с помощью» использую «Отправить»<br/> сначала найдя каталог ярлыков программ <br/> %AppData%\Microsoft\Windows\SendTo<br/> <br/> Результат: программа включает быстрейший приоритет <br/> и возможны другие приоритеты <br/> <br/> <br/> <p>Макрос Word удаляет лишнее<br/> <br/> Sub Balabolka()<br/> '<br/> Dim N(27), y(27) As Variant<br/> <br/> N(1) = "[музыка]": y(1) = " "<br/> N(2) = "[аплодисменты]": y(2) = " "<br/> N(3) = "[смех]": y(3) = ""<br/> N(4) = "[ __ ]": y(4) = " "<br/> N(5) = ChrW(13): y(5) = " " 'ChrW(13) '"^p"<br/> N(6) = " кто ": y(6) = ". кто "<br/> N(7) = " где ": y(7) = ". где "<br/> N(8) = " когда ": y(8) = ". когда "<br/> N(9) = «само»: y(9) = " само "<br/> N(10) = " как. ": y(10) = " как "<br/> N(11) = " так. ": y(11) = " так "<br/> N(12) = " и ": y(12) = ". и "<br/> N(13) = " но ": y(13) = ". но "<br/> N(14) = " а ": y(14) = ". а "<br/> N(15) = ",": y(15) = " "<br/> N(16) = " .": y(16) = ". "<br/> N(17) = "_": y(17) = " "<br/> N(18) = "/": y(18) = " "<br/> N(19) = ";": y(19) = ". "<br/> N(20) = "*": y(20) = " "<br/> N(21) = "…": y(21) = ". "<br/> N(22) = "—": y(22) = " "<br/> N(23) = "… ": y(23) = ". "<br/> N(24) = "… ": y(24) = ". "<br/> N(25) = " ": y(25) = " "<br/> N(26) = " ": y(26) = " "<br/> N(27) = «Created on https: <a href="/r.php?u=http%3A%2F%2Fwww.dvdvideosoft.com&s=2907978545">www.dvdvideosoft.com</a> free-youtube-subtitles-download»: y(27) = ""<br/> <br/> Selection.HomeKey Unit:=wdStory<br/> ActiveWindow.View.Type = wdNormalView<br/> ActiveWindow.ActivePane.View.Zoom.PageFit = wdPageFitBestFit<br/> <br/> For i = 1 To 27<br/> Selection.Find.ClearFormatting<br/> Selection.Find.Replacement.ClearFormatting<br/> With Selection.Find<br/> .Text = N(i)<br/> .Replacement.Text = y(i)<br/> .Forward = True<br/> .Wrap = wdFindContinue<br/> .Format = False<br/> .MatchCase = False<br/> .MatchWholeWord = False<br/> .MatchWildcards = False<br/> .MatchSoundsLike = False<br/> .MatchAllWordForms = False<br/> End With<br/> Selection.Find.Execute Replace:=wdReplaceAll<br/> Next i<br/> <br/> Selection.EndKey Unit:=wdStory<br/> ActiveWindow.View.Type = wdPageView<br/> ActiveWindow.ActivePane.View.Zoom.PageFit = wdPageFitBestFit<br/> End Sub</p>"