里々でアイテム合成を行う辞書群

dic_alchemy0_system.txt

＃アイテム合成_基本辞書
＃これらのテキストファイルはPublic Domainで公開します。ご自由にお使いください。

＃◆仕様
＃・小さいバルーンだと表示が溢れる
＃・自動ウェイトの設定によっては、ウェイトが大量に入ることがある
＃＃特に「自動挿入ウェイトタイプ」が「一般」の時
＃・アイテム管理は通し番号で行っている

＃◆被る可能性のある名前
＃「アイテム合成_」で始まる文、単語群、変数
＃「Onアイテム合成_」で始まる文
＃「アイテム_」で始まる単語群
＃「リスト_」で始まる文、単語群、変数
＃「Onリスト_」で始まる文
＃変数「バルーン最大行数」
＃変数「バルーン最大文字数」



＊アイテム合成_変数全削除
＄_tmp【タブ】（for、1、（アイテム_最大番号）、1、（set、アイテム_所持数_（C0）、））
＄_tmp【タブ】（for、1、（アイテム_最大番号）、1、（set、アイテム_事典登録_（C0）、））
＄アイテム合成_素材_1【タブ】
＄アイテム合成_素材_2【タブ】
＄アイテム合成_選択中【タブ】
：アイテム合成の諸々の変数を全て削除しました。
＃アイテム合成系の変数を全て消す



＊アイテム合成_メニュー
＞アイテム合成_変数初期化【タブ】（変数「アイテム_所持数_1」の存在）==0
：（アイテム合成_話頭）アイテム合成メニュー
\![*]\__q[アイテム合成_合成_準備]アイテムを合成する\__q
\![*]\__q[アイテム合成_所持数]アイテムの所持数を確認する\__q
\![*]\__q[アイテム合成_事典]アイテム事典を確認する\__q
\![*]\__q[アイテム合成_変数初期化]変数を初期化する\__q
\![*]\__q[script:\e]何もしない\__q



＠アイテム合成_話頭
\0\c\b[2]\*\_q



＊アイテム合成_変数初期化
＄_tmp【タブ】（nop、（リスト変数削除））
＄_tmp【タブ】（for、1、（アイテム_最大番号）、1、（set、アイテム_所持数_（C0）、0））
＄_tmp【タブ】（for、1、（アイテム_最大番号）、1、（set、アイテム_事典登録_（C0）、0））
＄アイテム_所持数_1【タブ】（アイテム_所持数最大）
＄アイテム_所持数_2【タブ】（アイテム_所持数最大）
＄アイテム_所持数_3【タブ】（アイテム_所持数最大）
＄アイテム_事典登録_1【タブ】1
＄アイテム_事典登録_2【タブ】1
＄アイテム_事典登録_3【タブ】1
＄アイテム合成_素材_1【タブ】
＄アイテム合成_素材_2【タブ】
＄アイテム合成_選択中【タブ】
：アイテム合成の諸々の変数を初期化しました。\x
＞アイテム合成_メニュー



＊アイテム合成_合成_準備
＄アイテム合成_素材_1【タブ】
＄アイテム合成_素材_2【タブ】
＄アイテム合成_選択中【タブ】
＞Onアイテム合成_合成_選択



＊Onアイテム合成_合成_選択
＄_tmp【タブ】（when、（Rの数）>=2、（set、アイテム合成_素材_（R0）、（R1）））
：（アイテム合成_話頭）アイテム合成の素材を選択してください...
\![*]\__q[Onアイテム合成_合成_選択肢,1]素材1: （when、（変数「アイテム合成_素材_1」の存在）==0、未選択、（アイテム_名前_（アイテム合成_素材_1）））\__q
\![*]\__q[Onアイテム合成_合成_選択肢,2]素材2: （when、（変数「アイテム合成_素材_2」の存在）==0、未選択、（アイテム_名前_（アイテム合成_素材_2）））\__q
（when、（変数「アイテム合成_素材_1」の存在）（変数「アイテム合成_素材_2」の存在）==11、
\![*]\__q[アイテム合成_合成_決定]合成開始　\__q、
\![*]\f[strike,1]合成開始\f[strike,0]
）
\![*]\__q[アイテム合成_メニュー]戻る　　　\__q



＊Onアイテム合成_合成_選択肢
＄アイテム合成_選択中【タブ】（R0）
＄リスト_ヘッダー【タブ】アイテム合成の素材（アイテム合成_選択中）を選択中...
＄リスト_フッター【タブ】\![*]\__q[Onアイテム合成_合成_選択]戻る　　　\__q
＄リスト_項目関数名【タブ】アイテム合成_合成_選択肢_項目
＄リスト_項目採用条件【タブ】アイテム合成_合成_選択肢_採用条件
＞Onリスト_準備



＠アイテム合成_合成_選択肢_採用条件
（アイテム_合成許可_（A0））==1&&（アイテム_所持数_（A0））>0



＠アイテム合成_合成_選択肢_項目
\![*]\__q[Onアイテム合成_合成_選択,（アイテム合成_選択中）,（A0）]φ
\_?（sprintf、%-（アイテム_名前_最大文字数）s、（アイテム_名前_（A0）））\_?\__q φ
\_?（sprintf、% （length、（アイテム_所持数最大））d、（アイテム_所持数_（A0）））\_?



＊アイテム合成_合成_決定
＄アイテム合成_合成レア判定【タブ】（calc、（アイテム_レア合成確率）>=（乱数1～100））
＄アイテム合成_合成結果【タブ】（when、（アイテム合成_合成レア判定）==0、（アイテム_配合_（アイテム合成_素材_1）_（アイテム合成_素材_2））、（アイテム_配合レア_（アイテム合成_素材_1）_（アイテム合成_素材_2）））
＄_tmp【タブ】（call、アイテム合成_所持数加減、（アイテム合成_素材_1）、-1）
＄_tmp【タブ】（call、アイテム合成_所持数加減、（アイテム合成_素材_2）、-1）
＄_tmp【タブ】（call、アイテム合成_所持数加減、（アイテム合成_合成結果）、1）
：\b[2]\*（アイテム_名前_（アイテム合成_素材_1））と（アイテム_名前_（アイテム合成_素材_2））を合成します......
（when、（アイテム合成_合成レア判定）==1、レア合成が発生！、合成完了！）
（アイテム_名前_（アイテム合成_合成結果））を1個入手しました。\_q
\![*]\__q[アイテム合成_合成_準備]続けて合成する\__q
\![*]\__q[アイテム合成_メニュー]メニューに戻る\__q
＄アイテム合成_合成レア判定【タブ】
＄アイテム合成_合成結果【タブ】
＄アイテム合成_素材_1【タブ】
＄アイテム合成_素材_2【タブ】
＄アイテム合成_選択中【タブ】



＠アイテム合成_所持数加減
（set、アイテム_所持数_（A0）、（calc、（アイテム_所持数_（A0））+（A1）））φ
（when、（アイテム_所持数_（A0））>（アイテム_所持数最大）、（set、（アイテム_所持数_（A0））、（アイテム_所持数最大）））φ
（when、（アイテム_所持数_（A0））<（アイテム_所持数最小）、（set、（アイテム_所持数_（A0））、（アイテム_所持数最小）））φ
（set、アイテム_事典登録_（A0）、1）
＃a0: アイテムID
＃a1: 加減数　増やすなら符号なし、減らすならマイナスを付ける



＊アイテム合成_所持数
＄リスト_ヘッダー【タブ】アイテムの所持数を確認中...
＄リスト_フッター【タブ】\![*]\__q[アイテム合成_メニュー]戻る　　　\__q
＄リスト_項目関数名【タブ】アイテム合成_所持数_項目
＄リスト_項目採用条件【タブ】アイテム合成_所持数_採用条件
＞Onリスト_準備



＠アイテム合成_所持数_採用条件
（アイテム_事典登録_（A0））==1



＠アイテム合成_所持数_項目
\_?φ
（sprintf、%-（アイテム_名前_最大文字数）s、（アイテム_名前_（A0））） φ
（sprintf、% （length、（アイテム_所持数最大））d、（アイテム_所持数_（A0）））φ
\_?



＊アイテム合成_事典
＄リスト_ヘッダー【タブ】アイテム事典を確認中...
＄リスト_フッター【タブ】\![*]\__q[アイテム合成_メニュー]戻る　　　\__q
＄リスト_項目関数名【タブ】アイテム合成_事典_項目
＄リスト_項目採用条件【タブ】アイテム合成_事典_採用条件
＞Onリスト_準備



＠アイテム合成_事典_採用条件
1
＃全てを採用する



＠アイテム合成_事典_項目
（when、（アイテム_事典登録_（A0））==1、φ
\![*]\__q[Onアイテム合成_事典_解説表示,（A0）]\_?φ
（sprintf、%-（アイテム_名前_最大文字数）s、（アイテム_名前_（A0）））φ
\_?\__q、φ
\![*]\f[color,disable]\_?（アイテム_名前_未登録）\_?\f[color,default]φ
）



＊Onアイテム合成_事典_解説表示
＄スクリプトの一番頭【タブ】\C
\1\c\_q【（アイテム_名前_（R0））】
（アイテム_解説_（R0））

dic_alchemy1_pagination.txt

＃アイテム合成_リスト生成辞書



＊リスト_変数削除
＄リスト_フッター【タブ】
＄リスト_ヘッダー【タブ】
＄リスト_採用項目ID【タブ】
＄リスト_採用項目数【タブ】
＄リスト_最大頁数【タブ】
＄リスト_現在頁数【タブ】
＄リスト_見出し終了数【タブ】
＄リスト_見出し開始数【タブ】
＄リスト_頁毎最大数【タブ】
＄リスト_頁毎終了数【タブ】
＄リスト_頁毎開始数【タブ】
＄リスト_項目採用条件【タブ】
＄リスト_項目関数名【タブ】
＃ゴースト終了時などに以下の様にすると不要な変数が残りません
＃＄_tmp【タブ】（nop、（リスト変数削除））
＃変数が残っていても不具合は起きないです



＊Onリスト_準備
：\0\b[2]\_q \_w[1]\_q
＄バルーン最大行数【タブ】（get_property、currentghost.balloon.scope(0).lines.initial）
＄バルーン最大文字数【タブ】（calc、（get_property、currentghost.balloon.scope(0).validwidth.initial）/（get_property、currentghost.balloon.scope(0).char_width））
＄バルーン最大行数【タブ】（when、（変数「バルーン最大行数」の存在）==0、25、（バルーン最大行数））
＄バルーン最大文字数【タブ】（when、（変数「バルーン最大文字数」の存在）==0、52、（バルーン最大文字数））
＄リスト_現在頁数【タブ】1
＄リスト_頁毎最大数【タブ】（calc、（バルーン最大行数）-4）
＄リスト_採用項目数【タブ】0
＄リスト_採用項目ID【タブ】（for、1、（アイテム_最大番号）、1、（when、（call、（リスト_項目採用条件）、（C0））==1、（set、リスト_採用項目数、（calc、（リスト_採用項目数）+1））（C0），））
＄リスト_最大頁数【タブ】（calc、（リスト_採用項目数）/（リスト_頁毎最大数）+（when、（calc、（リスト_採用項目数）%（リスト_頁毎最大数））>0、1、0））
＞Onリスト_一覧



＊Onリスト_一覧
＄リスト_頁毎終了数【タブ】（calc、（リスト_現在頁数）*（リスト_頁毎最大数））
＄リスト_頁毎開始数【タブ】（calc、（リスト_頁毎終了数）-（リスト_頁毎最大数））
＄リスト_頁毎終了数【タブ】（when、（リスト_頁毎終了数）>=（リスト_採用項目数）、（calc、（リスト_採用項目数）-1）、（リスト_頁毎終了数））
：（アイテム合成_話頭）（when、（変数「リスト_ヘッダー」の存在）==1、（リスト_ヘッダー））
（for、（リスト_頁毎開始数）、（リスト_頁毎終了数）、1、（call、（リスト_項目関数名）、（call，リスト_取り出し，（C0），（リスト_採用項目ID）））\n）φ
（when、（リスト_最大頁数）>1、（リスト_見出し）\n）φ
（when、（変数「リスト_フッター」の存在）==1、（リスト_フッター））



＊Onリスト_頁移動
＄リスト_現在頁数【タブ】（R0）
＞Onリスト_一覧



＠リスト_見出し【タブ】（バルーン最大文字数）>=40
（when、（リスト_現在頁数）>=3、\__q[Onリスト_頁移動,1] φ≪ \__q、\f[strike,1] φ≪ \f[strike,0]）φ
（when、（リスト_現在頁数）>=2、\__q[Onリスト_頁移動,（calc,（リスト_現在頁数）-1）] φ＜ \__q、\f[strike,1] φ＜ \f[strike,0]）φ
（whenlist、（nop、）、（リスト_最大頁数）<=5、（nop、）、（リスト_最大頁数）>5&&（リスト_現在頁数）>=4、..、  ）φ
（when、（リスト_最大頁数）>5、（set、リスト_見出し開始数、（calc、（リスト_現在頁数）-2））（set、リスト_見出し終了数、（calc、（リスト_現在頁数）+2））、（set、リスト_見出し開始数、1）（set、リスト_見出し終了数、（リスト_最大頁数）））φ
（when、（リスト_見出し開始数）<=0、（set、リスト_見出し開始数、1）（set、リスト_見出し終了数、5））φ
（when、（リスト_見出し終了数）>（リスト_最大頁数）、（set、リスト_見出し終了数、（リスト_最大頁数））（set、リスト_見出し開始数、（calc、（リスト_見出し終了数）-4）））φ
（for、（リスト_見出し開始数）、（リスト_見出し終了数）、1、（whenlist、（C0）、==（リスト_現在頁数）、\f[color,disable] （リスト_桁揃え） \f[color,default]、>（リスト_最大頁数）、、\__q[Onリスト_頁移動,（C0）] （リスト_桁揃え） \__q））φ
（whenlist、（nop、）、（リスト_最大頁数）<=5、（nop、）、（リスト_最大頁数）>5&&（リスト_見出し終了数）<（リスト_最大頁数）、..、  ）φ
（when、(（リスト_現在頁数）+1)<=（リスト_最大頁数）、\__q[Onリスト_頁移動,（calc,（リスト_現在頁数）+1）] φ＞ \__q、\f[strike,1] φ＞ \f[strike,0]）φ
（when、(（リスト_現在頁数）+2)<=（リスト_最大頁数）、\__q[Onリスト_頁移動,（リスト_最大頁数）] φ≫ \__q、\f[strike,1] φ≫ \f[strike,0]）



＠リスト_見出し【タブ】（バルーン最大文字数）>=22&&（バルーン最大文字数）<40
（when、（リスト_現在頁数）>=3、\__q[Onリスト_頁移動,1]φ≪\__q、\f[strike,1]φ≪\f[strike,0]）φ
（when、（リスト_現在頁数）>=2、\__q[Onリスト_頁移動,（calc,（リスト_現在頁数）-1）]φ＜\__q、\f[strike,1]φ＜\f[strike,0]）φ
（whenlist、（nop、）、（リスト_最大頁数）<=5、（nop、）、（リスト_最大頁数）>5&&（リスト_現在頁数）>=4、..、  ）φ
（when、（リスト_最大頁数）>5、（set、リスト_見出し開始数、（calc、（リスト_現在頁数）-2））（set、リスト_見出し終了数、（calc、（リスト_現在頁数）+2））、（set、リスト_見出し開始数、1）（set、リスト_見出し終了数、（リスト_最大頁数）））φ
（when、（リスト_見出し開始数）<=0、（set、リスト_見出し開始数、1）（set、リスト_見出し終了数、5））φ
（when、（リスト_見出し終了数）>（リスト_最大頁数）、（set、リスト_見出し終了数、（リスト_最大頁数））（set、リスト_見出し開始数、（calc、（リスト_見出し終了数）-4）））φ
（for、（リスト_見出し開始数）、（リスト_見出し終了数）、1、（whenlist、（C0）、==（リスト_現在頁数）、\f[color,disable]（リスト_桁揃え）\f[color,default]、>（リスト_最大頁数）、、\__q[Onリスト_頁移動,（C0）]（リスト_桁揃え）\__q））φ
（whenlist、（nop、）、（リスト_最大頁数）<=5、（nop、）、（リスト_最大頁数）>5&&（リスト_見出し終了数）<（リスト_最大頁数）、..、  ）φ
（when、(（リスト_現在頁数）+1)<=（リスト_最大頁数）、\__q[Onリスト_頁移動,（calc,（リスト_現在頁数）+1）]φ＞\__q、\f[strike,1]φ＞\f[strike,0]）φ
（when、(（リスト_現在頁数）+2)<=（リスト_最大頁数）、\__q[Onリスト_頁移動,（リスト_最大頁数）]φ≫\__q、\f[strike,1]φ≫\f[strike,0]）



＠リスト_見出し【タブ】（バルーン最大文字数）<22
（when、（リスト_現在頁数）>=3、\__q[Onリスト_頁移動,1]φ≪\__q、\f[strike,1]φ≪\f[strike,0]）φ
（when、（リスト_現在頁数）>=2、\__q[Onリスト_頁移動,（calc,（リスト_現在頁数）-1）]φ＜\__q、\f[strike,1]φ＜\f[strike,0]）φ
\f[color,disable]（リスト_桁揃え）\f[color,default]φ
（when、(（リスト_現在頁数）+1)<=（リスト_最大頁数）、\__q[Onリスト_頁移動,（calc,（リスト_現在頁数）+1）]φ＞\__q、\f[strike,1]φ＞\f[strike,0]）φ
（when、(（リスト_現在頁数）+2)<=（リスト_最大頁数）、\__q[Onリスト_頁移動,（リスト_最大頁数）]φ≫\__q、\f[strike,1]φ≫\f[strike,0]）



＠リスト_桁揃え
（han2zen、（sprintf、%0（length、（リスト_最大頁数））d、（C0）））



＠リスト_取り出し
（A（calc、（A0）+1））

dic_alchemy2_list.txt

＃アイテム合成_リスト辞書
＃このリストの項目に､、,，などの里々区切り字を含めないこと



＠アイテム_レア合成確率
50
＃0％～100％を％無しの数字で書く



＠アイテム_所持数最小
0



＠アイテム_所持数最大
99



＠アイテム_最大番号
15



＠アイテム_名前_最大文字数
20
＃半角で数えること　全角１文字は半角なら２文字



＠アイテム_名前_未登録
--未登録--
＠アイテム_名前_1
お米
＃アイテム名を書く
＠アイテム_名前_2
きれいな水
＠アイテム_名前_3
卵
＠アイテム_名前_4
お餅
＠アイテム_名前_5
ふっくら餅
＠アイテム_名前_6
白ご飯
＠アイテム_名前_7
銀シャリ
＠アイテム_名前_8
炒飯
＠アイテム_名前_9
あつあつ炒飯
＠アイテム_名前_10
かき氷
＠アイテム_名前_11
みぞれかき氷
＠アイテム_名前_12
茶碗蒸し
＠アイテム_名前_13
出汁の効いた茶碗蒸し
＠アイテム_名前_14
プリン
＠アイテム_名前_15
カラメルプリン



＠アイテム_解説_1
にゃまごめ……なまごめ！
＃アイテムの解説を書く
＠アイテム_解説_2
井戸から汲んだ冷たい水
＠アイテム_解説_3
朝どれの新鮮な卵
＠アイテム_解説_4
もっちもち
＠アイテム_解説_5
とてももっちもち
＠アイテム_解説_6
つやつや
＠アイテム_解説_7
とてもつやつや
＠アイテム_解説_8
胡椒が効いている
＠アイテム_解説_9
とても香ばしい
＠アイテム_解説_10
キーーンときた……！
＠アイテム_解説_11
やさしい甘さ
＠アイテム_解説_12
色々な具が隠れている
＠アイテム_解説_13
出汁の風味がよい
＠アイテム_解説_14
とろっとろ
＠アイテム_解説_15
ほろにがでとろっとろ



＠アイテム_合成許可_1
1
＃合成の素材にできるかを0か1で書く
＠アイテム_合成許可_2
1
＠アイテム_合成許可_3
1
＠アイテム_合成許可_4
0
＠アイテム_合成許可_5
0
＠アイテム_合成許可_6
0
＠アイテム_合成許可_7
0
＠アイテム_合成許可_8
0
＠アイテム_合成許可_9
0
＠アイテム_合成許可_10
0
＠アイテム_合成許可_11
0
＠アイテム_合成許可_12
0
＠アイテム_合成許可_13
0
＠アイテム_合成許可_14
0
＠アイテム_合成許可_15
0



＠アイテム_配合_1_1
4
＃合成結果アイテムの通し番号を書く
＠アイテム_配合_1_2
6
＠アイテム_配合_1_3
8
＠アイテム_配合_2_1
6
＠アイテム_配合_2_2
10
＠アイテム_配合_2_3
12
＠アイテム_配合_3_1
8
＠アイテム_配合_3_2
12
＠アイテム_配合_3_3
14



＠アイテム_配合レア_1_1
5
＃合成結果アイテムの通し番号を書く
＠アイテム_配合レア_1_2
7
＠アイテム_配合レア_1_3
9
＠アイテム_配合レア_2_1
7
＠アイテム_配合レア_2_2
11
＠アイテム_配合レア_2_3
13
＠アイテム_配合レア_3_1
9
＠アイテム_配合レア_3_2
13
＠アイテム_配合レア_3_3
15