HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2014
1005
TVナレーターの読む速さ5解決


TV

リンク

2014/10/5(Sun) 14:58:57|NO.65431

ナレーターの読む速さを調整できますか?
ソース

e1="error1・インターネットに接続されていません。" e2="error2・RSSではありませんでした。" title"Yahoo!天気・災害 - 南部(京都)の天気" screen 0,1600,200 yahoo="Yahoo!天気・災害 - 南部(京都)の天気" #include "mod_rss.as" newcom spv, "Sapi.SpVoice" if varuse(spv)=0 : dialog "SAPI not found." : end spv->"Speak" yahoo objmode 2 objsize 200,200 font "HG正楷書体-PRO",95 button"今日",*k pos 200,0 font "HG正楷書体-PRO",95 button"明日",*a pos 400,0 font "HG正楷書体-PRO",65 button"明後日",*aa pos 600,0 font "HG正楷書体-PRO",45 button"明々後日",*s pos 800,0 font "HG正楷書体-PRO",45 button"弥明後日",*y pos 1000,0 font "HG正楷書体-PRO",45 button"五明後日",*g pos 1200,0 font "HG正楷書体-PRO",65 button"六日後",*m pos 1400,0 font "HG正楷書体-PRO",45 button"一週間後",*i stop *k url="http://rss.weather.yahoo.co.jp/rss/days/6110.xml" rssload desc,link,url,10 if stat=1 {newcom spv, "Sapi.SpVoice" spv->"Speak" e1 stop} if stat=2 {newcom spv, "Sapi.SpVoice" spv->"Speak" e2 stop} objsize 640,24 foreach desc repeat 2 newcom spv, "Sapi.SpVoice" if varuse(spv)=0 : dialog "SAPI not found." : end spv->"Speak" ""+cnt+":"+desc(cnt), 1 loop loop stop *a url="http://rss.weather.yahoo.co.jp/rss/days/6110.xml" rssload desc,link,url,10 if stat=1 {newcom spv, "Sapi.SpVoice" spv->"Speak" e1 stop} if stat=2 {newcom spv, "Sapi.SpVoice" spv->"Speak" e2 stop} objsize 640,24 foreach desc repeat 3 newcom spv, "Sapi.SpVoice" if varuse(spv)=0 : dialog "SAPI not found." : end spv->"Speak" ""+cnt+":"+desc(cnt), 1 loop loop stop *aa url="http://rss.weather.yahoo.co.jp/rss/days/6110.xml" rssload desc,link,url,10 if stat=1 {newcom spv, "Sapi.SpVoice" spv->"Speak" e1 stop} if stat=2 {newcom spv, "Sapi.SpVoice" spv->"Speak" e2 stop} objsize 640,24 foreach desc repeat 4 newcom spv, "Sapi.SpVoice" if varuse(spv)=0 : dialog "SAPI not found." : end spv->"Speak" ""+cnt+":"+desc(cnt), 1 loop loop stop *s url="http://rss.weather.yahoo.co.jp/rss/days/6110.xml" rssload desc,link,url,10 if stat=1 {newcom spv, "Sapi.SpVoice" spv->"Speak" e1 stop} if stat=2 {newcom spv, "Sapi.SpVoice" spv->"Speak" e2 stop} objsize 640,24 foreach desc repeat 5 newcom spv, "Sapi.SpVoice" if varuse(spv)=0 : dialog "SAPI not found." : end spv->"Speak" ""+cnt+":"+desc(cnt), 1 loop loop stop *y url="http://rss.weather.yahoo.co.jp/rss/days/6110.xml" rssload desc,link,url,10 if stat=1 {newcom spv, "Sapi.SpVoice" spv->"Speak" e1 stop} if stat=2 {newcom spv, "Sapi.SpVoice" spv->"Speak" e2 stop} objsize 640,24 foreach desc repeat 6 newcom spv, "Sapi.SpVoice" if varuse(spv)=0 : dialog "SAPI not found." : end spv->"Speak" ""+cnt+":"+desc(cnt), 1 loop loop stop *g url="http://rss.weather.yahoo.co.jp/rss/days/6110.xml" rssload desc,link,url,10 if stat=1 {newcom spv, "Sapi.SpVoice" spv->"Speak" e1 stop} if stat=2 {newcom spv, "Sapi.SpVoice" spv->"Speak" e2 stop} objsize 640,24 foreach desc repeat 7 newcom spv, "Sapi.SpVoice" if varuse(spv)=0 : dialog "SAPI not found." : end spv->"Speak" ""+cnt+":"+desc(cnt), 1 loop loop stop *m url="http://rss.weather.yahoo.co.jp/rss/days/6110.xml" rssload desc,link,url,10 if stat=1 {newcom spv, "Sapi.SpVoice" spv->"Speak" e1 stop} if stat=2 {newcom spv, "Sapi.SpVoice" spv->"Speak" e2 stop} objsize 640,24 foreach desc repeat 8 newcom spv, "Sapi.SpVoice" if varuse(spv)=0 : dialog "SAPI not found." : end spv->"Speak" ""+cnt+":"+desc(cnt), 1 loop loop stop *i url="http://rss.weather.yahoo.co.jp/rss/days/6110.xml" rssload desc,link,url,10 if stat=1 {newcom spv, "Sapi.SpVoice" spv->"Speak" e1 stop} if stat=2 {newcom spv, "Sapi.SpVoice" spv->"Speak" e2 stop} objsize 640,24 foreach desc repeat 8 newcom spv, "Sapi.SpVoice" if varuse(spv)=0 : dialog "SAPI not found." : end spv->"Speak" ""+cnt+":"+desc(cnt), 1 loop loop stop



この記事に返信する


Him

リンク

2014/10/5(Sun) 16:52:27|NO.65432

spv("Rate") = 0;-10〜10




TV

リンク

2014/10/5(Sun) 17:08:26|NO.65434

ありがとうございました。




TV

リンク

2014/10/5(Sun) 17:28:16|NO.65435

Himさん、もう一回質問してもいいですか?
声の高さを変えるにはどうしたらいいですか?



なたで

リンク

2014/10/5(Sun) 23:15:10|NO.65440

細かくは指定できませんが、
pitch middle で変えられるみたいです。

https://sites.google.com/site/visualbasicwizard/tutorials/variable/dim/microsofttexttospeechapi


newcom spv, "Sapi.SpVoice" spv->"Speak" "<pitch middle=\""+ -10 +"\">Hot soup processor</pitch>" spv->"Speak" "<pitch middle=\""+ 0 +"\">Hot soup processor</pitch>" spv->"Speak" "<pitch middle=\""+ 10 +"\">Hot soup processor</pitch>" stop



TV

リンク

2014/10/6(Mon) 08:15:49|NO.65448

なたでさん、ありがとうございました。



ONION software Copyright 1997-2023(c) All rights reserved.