*OnTranslateの特徴 [#nd7e8864]
-実はMAKOTOトランスレート処理の後に呼び出される。
--SHIORI→MAKOTO→SHIORI(OnTranslate)
**葉梨をOnTranslateでSAORI呼び出ししていろいろ調節する。 [#e9b2a6ab]
-音量とかキー調節とかできます。
 @OnTranslate
 (
 	(
 		if
 		,(is_digit,(葉梨ボリューム))
 		,nop
 		,set
 	)
 	,葉梨ボリューム
 	,10
 )(
 	(
 		if
 		,(is_digit,(葉梨キー))
 		,nop
 		,set
 	)
 	,葉梨キー
 	,0
 )(
 	(
 		if
 		,(変数「葉梨を使用する」の存在)
 		,hanasi
 		,nop
 	)
 	(
 		replace
 		(
 			replace
 			(if,(葉梨ボリューム)==0,@n)(R0)
 			\0
 			(
 				if
 				,(葉梨ボリューム)!=0&&(葉梨ボリューム)!=10
 				,\0@0+[(zen2han,(calc,(葉梨ボリューム)-10))]
 				,\0
 			)
 		)
 		@|
 		(
 			if
 			,(葉梨キー)==0
 			,@|
 			,@|@<[(zen2han,(葉梨キー))]
 		)
 	)
 )


*メモ書き [#i925b6e7]
前から里々でさくらのグロンギ語を再現してみたかった。~
OnTranslateの意味を知った良い機会なのでメモっとく。~
Excite翻訳とかと連動して英語翻訳とかできたらおもしろそう

-トランスレートのスイッチとか
 *OnKeyPress
 >(R0)が押された 
 *eが押された
 $トランスレートモード【タブ】(if,(変数「トランスレートモード」の存在)==1,(if, (トランスレートモード)==0,1,0),1)
 :トランスレート(if,(トランスレートモード)==0,OFF,ON),
-言語のスイッチとか
 *0が押された
 $言語【タブ】0
 :日本語です。
 *1が押された
 $言語【タブ】1
 :猫語です。
 *2が押された
 $言語【タブ】2
 :犬語です。
-スイッチに応じて指定の言語に変換とか
 *OnTranslate
 $トランスレートモード【タブ】(if,(変数「トランスレートモード」の存在)==1,(トランスレートモード),0)
 $voice【タブ】(R0)
 ((if,(トランスレートモード)==1,call,nop),(iflist,(言語),==0,日本語,==1,猫語,==2,犬語))
 (voice)
-言語変換辞書とか
 *日本語
 #呼び出されても何もしない
 *猫語
 $引数区切り追加【タブ】(sprintf,%c,2)
 $voice【タブ】(replace (sprintf,%c,2)(voice) (sprintf,%c,2)。 (sprintf,%c,2)にゃ。)
 *犬語
 $voice【タブ】(replace (sprintf,%c,2)(voice) (sprintf,%c,2)。 (sprintf,%c,2)わん。)


-使えそうなものその1~
だ〜れ〜が〜ナイチチかーッ!→が〜げ〜が〜ナイチチがーッ!~
だ~れ~が~ナイチチかーッ!→が~げ~が~ナイチチがーッ!~
こんにちは、>>1の父です。→ごんぎぎが、>>1ご父げぐ。~
お葉書読むのですよー。→ご葉書読ぐごげぐごー。~
 *がぎぐげ語
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)あ(sprintf,%c,2)が)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)い(sprintf,%c,2)ぎ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)う(sprintf,%c,2)ぐ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)え(sprintf,%c,2)げ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)お(sprintf,%c,2)ご)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)か(sprintf,%c,2)が)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)き(sprintf,%c,2)ぎ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)く(sprintf,%c,2)ぐ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)け(sprintf,%c,2)げ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)こ(sprintf,%c,2)ご)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)さ(sprintf,%c,2)が)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)し(sprintf,%c,2)ぎ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)す(sprintf,%c,2)ぐ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)せ(sprintf,%c,2)げ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)そ(sprintf,%c,2)ご)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)た(sprintf,%c,2)が)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ち(sprintf,%c,2)ぎ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)つ(sprintf,%c,2)ぐ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)て(sprintf,%c,2)げ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)と(sprintf,%c,2)ご)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)な(sprintf,%c,2)が)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)に(sprintf,%c,2)ぎ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ぬ(sprintf,%c,2)ぐ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ね(sprintf,%c,2)げ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)の(sprintf,%c,2)ご)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)は(sprintf,%c,2)が)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ひ(sprintf,%c,2)ぎ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ふ(sprintf,%c,2)ぐ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)へ(sprintf,%c,2)げ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ほ(sprintf,%c,2)ご)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ま(sprintf,%c,2)が)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)み(sprintf,%c,2)ぎ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)む(sprintf,%c,2)ぐ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)め(sprintf,%c,2)げ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)も(sprintf,%c,2)ご)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)や(sprintf,%c,2)が)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ゆ(sprintf,%c,2)ぐ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)よ(sprintf,%c,2)ご)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ら(sprintf,%c,2)が)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)り(sprintf,%c,2)ぎ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)る(sprintf,%c,2)ぐ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)れ(sprintf,%c,2)げ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ろ(sprintf,%c,2)ご)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)わ(sprintf,%c,2)が)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)を(sprintf,%c,2)ご)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ざ(sprintf,%c,2)が)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)じ(sprintf,%c,2)ぎ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ず(sprintf,%c,2)ぐ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ぜ(sprintf,%c,2)げ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ぞ(sprintf,%c,2)ご)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)だ(sprintf,%c,2)が)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ぢ(sprintf,%c,2)ぎ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)づ(sprintf,%c,2)ぐ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)で(sprintf,%c,2)げ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ど(sprintf,%c,2)ご)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ば(sprintf,%c,2)が)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)び(sprintf,%c,2)ぎ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ぶ(sprintf,%c,2)ぐ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)べ(sprintf,%c,2)げ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ぼ(sprintf,%c,2)ご)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ぱ(sprintf,%c,2)が)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ぴ(sprintf,%c,2)ぎ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ぷ(sprintf,%c,2)ぐ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ぺ(sprintf,%c,2)げ)
 $voice【タブ】(replace(sprintf,%c,2)(voice)(sprintf,%c,2)ぽ(sprintf,%c,2)ご)
こんなけ長いと結構凍るようなので独自でSAORI用意した方がいいかも。

トップ   編集 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS