///////// 文 ゴーストテンプレート ///////// メニュー処理辞書 ///////// copyright (C) 2002-2003 umeici. //**** メインメニューの展開 ************************************************************* //---- メインメニュー展開 --------------------------------------------------------------- OpenMenu { "\0\s[0]" -- if LastTalk != "" { "\![*]\q[";--;MENUITEM("さっきの祈り聞きたい");--;",OnLastTalk]\n\n[half]" } -- "\![*]\q[";--;MENUITEM("祈りを聞く頻度");--;",ChoiceTalkInterval]\n/ \![*]\q[";--;MENUITEM("向きを変えて眺める");--;",ChoiceDirection]\n/ \![*]\q[";--;MENUITEM("浮遊状態");--;",ChoiceFloating]\n/ \![*]\q[";--;MENUITEM("なんでもない");--;",ChoiceCancel]\e" } //---- メニュー項目の後ろにスペースを補完する関数 MENUITEM { _menuitem = _argv[0] for _i = GETSTRBYTES(_menuitem) ; _i < 48 ; _i++ { _menuitem += " " } _menuitem } //**** メニュー項目選択 ***************************************************************** //---- OnChoiceSelectイベント ----------------------------------------------------------- //OnChoiceSelectイベント関数は、全て頭にChoiceとつける(私が分かるように) OnChoiceSelect { EVAL(reference0) } //---- OnChoiceSelectイベント(その2) ----------------------------------------------------------- //キャンセル ChoiceCancel { "\0\s[3]・・・\e" "\0\s[4]・・・\e" } //キャンセルその2 ChoiceCancel1 { "\0\s[0]わかりました。\e" "\0\s[0]はい。\e" } //---- トーク頻度 ------------------------------------------------------------------------- ChoiceTalkInterval { "\0\s[0]\q[";--;MENUITEM("うるさいくらい");--;",ChoiceTalkMax]\n/ \q[";--;MENUITEM("ふつう");--;",ChoiceTalkNormal]\n/ \q[";--;MENUITEM("のんびり");--;",ChoiceTalkPoor]\n/ \q[";--;MENUITEM("聞きたくない");--;",ChoiceTalkNone]\e" } ChoiceTalkMax { //---- うるさく話す(15秒間隔) aitalkinterval = 15 "\0\s[5]・・・\e" } ChoiceTalkNormal { //---- ふつうに話す(2分間隔) aitalkinterval = 120 "\0\s[0]・・・\e" } ChoiceTalkPoor { //---- のんびり話す(5分間隔) aitalkinterval = 300 "\0\s[6]・・・\e" } ChoiceTalkNone { //---- 話さない aitalkinterval = 0 "\0\s[4]・・・\e" } //---- 体の向き ------------------------------------------------------------------------- ChoiceDirection { "\0\s[0]\q[";--;MENUITEM("正面");--;",ChoiceDirection0]\n/ \q[";--;MENUITEM("向かって左向き");--;",ChoiceDirection1]\n/ \q[";--;MENUITEM("向かって右向き");--;",ChoiceDirection2]\n/ \q[";--;MENUITEM("後ろ姿");--;",ChoiceDirection3]\n/ \q[";--;MENUITEM("今のままでいい");--;",ChoiceCancel]\e" } ChoiceDirection0 { directionmode = 0 "\0\s[0]\e" } ChoiceDirection1 { directionmode = 1 "\0\s[0]\e" } ChoiceDirection2 { directionmode = 2 "\0\s[0]\e" } ChoiceDirection3 { directionmode = 3 "\0\s[0]\e" } //---- 浮いているか否か ------------------------------------------------------------------------- ChoiceFloating { "\0\s[0]\q[";--;MENUITEM("浮遊しない");--;",ChoiceFloating0]\n/ \q[";--;MENUITEM("浮遊する");--;",ChoiceFloating1]\n/ \q[";--;MENUITEM("今のままでいい");--;",ChoiceCancel]\e" } ChoiceFloating0 { floatingmode = 0 "\0\s[0]・・・?\e" } ChoiceFloating1 { floatingmode = 1 "\0\s[0]・・・?\e" } //---- 直前のトーク再現 ------------------------------------------------------------------------- OnLastTalk { "\0\s[6]もう一度・・・\w9\w9\w9\c/ %LastTalk" } //---- メニュー選択タイムアウト --------------------------------------------------------- OnChoiceTimeout { "\0\s[7]きちんと選んで下さい。\e" }