Я сгенерировал чистый звук (440 Гц) с Praat и попытался изменить его высоту до 277.1826309768721 Гц (Средняя C), а затем до 220 Гц, используя скрипт.Тем не менее сценарий дает сбой либо в «Удалить точку (ы) основного тона» (говорит Command "Remove point(s)" not available for current selection), либо в «Опубликовать повторный синтез» (Command "Publish resynthesis" not available for current selection), в зависимости от того, что произойдет первым в сценарии.
Вот две версиисценария, который пытается опубликовать повторный синтез:
Create Sound as pure tone: "tone", 1, 0, 0.4, 44100, 440, 0.2, 0.01, 0.01
To Manipulation: 0.01, 75, 600
Create PitchTier: "empty", 0, 1
View & Edit
Add point... 0 277.1826309768721
selectObject: "Manipulation tone"
plusObject: "PitchTier empty"
Replace pitch tier
selectObject: "Manipulation tone"
View & Edit
Publish resynthesis
, а другой не пытается опубликовать повторный синтез (так как он не работает), но вместо этого пытается изменить местоположение точки основного тонаи терпит неудачу при этом:
Create Sound as pure tone: "tone", 1, 0, 0.4, 44100, 440, 0.2, 0.01, 0.01
To Manipulation: 0.01, 75, 600
Create PitchTier: "empty", 0, 1
View & Edit
Add point... 0 277.1826309768721
selectObject: "Manipulation tone"
plusObject: "PitchTier empty"
Replace pitch tier
selectObject: "Manipulation tone"
View & Edit
Remove point(s)
Add point at: 0, 220
selectObject: "PitchTier empty"
selectObject: "Manipulation tone"
plusObject: "PitchTier empty"
Replace pitch tier
selectObject: "Manipulation tone"
View & Edit
Моя конечная цель - написать сценарий, который принимает объект манипуляции, генерирует монотонизированные версии звука со всеми клавишными частотами фортепиано от малого C (130,8127826502993 Гц) доB5 (987.7666025122483 Гц) и сохраняет их в папку.Это невозможно сделать, если удаление точек основного тона или публикация повторных синтезов не разрешены в сценариях.
И да, я попытался сделать это, отредактировав сам объект манипуляции, но, поскольку он не работал, я переключился на подходсоздания уровня Pitch.
Кстати, я также пробовал что-то вроде этого:
s$ = selected$("Sound")
m$ = selected$("Manipulation")
selectObject: s$
endtime = Get end time
selectObjcet: m$
Remove points between... 0 endtime
, чтобы начать, но это привело к ошибке No object named "tone", хотя явыбрал звук и манипуляцию с именем tone.