OnTranslateの特徴†
- 実はMAKOTOトランスレート処理の後に呼び出される。
葉梨をOnTranslateでSAORI呼び出ししていろいろ調節する。†
- 音量とかキー調節とかできます。
＠OnTranslate
（
（
if
,（is_digit,（葉梨ボリューム））
,nop
,set
）
,葉梨ボリューム
,10
）（
（
if
,（is_digit,（葉梨キー））
,nop
,set
）
,葉梨キー
,0
）（
（
if
,（変数「葉梨を使用する」の存在）
,hanasi
,nop
）
（
replace
（
replace
（if,（葉梨ボリューム）==0,@n）（Ｒ０）
\0
（
if
,（葉梨ボリューム）!=0&&（葉梨ボリューム）!=10
,\0@0+[（zen2han,（calc,（葉梨ボリューム）-10））]
,\0
）
）
@|
（
if
,（葉梨キー）==0
,@|
,@|@<[（zen2han,（葉梨キー））]
）
）
）
メモ書き†
前から里々でさくらのグロンギ語を再現してみたかった。
OnTranslateの意味を知った良い機会なのでメモっとく。
Excite翻訳とかと連動して英語翻訳とかできたらおもしろそう
- トランスレートのスイッチとか
＊OnKeyPress
＞（Ｒ０）が押された
＊eが押された
＄トランスレートモード【タブ】（if,（変数「トランスレートモード」の存在）==1,（if, （トランスレートモード）==0,1,0）,1）
：トランスレート（if,（トランスレートモード）==0,OFF,ON）,
- 言語のスイッチとか
＊0が押された
＄言語【タブ】0
：日本語です。
＊1が押された
＄言語【タブ】1
：猫語です。
＊2が押された
＄言語【タブ】2
：犬語です。
- スイッチに応じて指定の言語に変換とか
＊OnTranslate
＄トランスレートモード【タブ】（if,（変数「トランスレートモード」の存在）==1,（トランスレートモード）,0）
＄voice【タブ】（Ｒ０）
（（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ご父げぐ。
お葉書読むのですよー。→ご葉書読ぐごげぐごー。
＊がぎぐげ語
＄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用意した方がいいかも。
|
![[PukiWiki]](image/pukiwiki.png "[PukiWiki]")
