case speakWithSelect(4,"図鑑","ストーリー","目的","説明", 
    "なにを読みますか？")
  when 0
    case speakWithSelect(2,"モンスター図鑑","レアモンスター図鑑", 
    "どれを見ますか？")
  when 0
    b=createArray() 
i=0 
while i<getVariable("max") 
 if getVariable("モンスター図鑑")[i][0] 
   pushArray(b,getVariable("モンスター図鑑")[i][1]) #図鑑に載っている品だけの選択肢配列 b をつくる 
 end 
i=i+1 
end 
pushArray(b,"図鑑を閉じる") #終わらせる選択肢も追加 
 
k=true 
while k 
 c=speakWithSelectArray(b,"参照したい項目を選んでね") 
 i=0 
 while i<getVariable("max") 
  if b[c]==getVariable("モンスター図鑑")[i][1] #選んだのと同じものを図鑑一覧から探して詳細を表示 
    speak("No.",i," : ",getVariable("モンスター図鑑")[i][1],"\n ",getVariable("モンスター図鑑")[i][2]) 
  elsif b[c]=="図鑑を閉じる" 
    k=false 
  end 
 i=i+1 
 end 
end #kループ終

  when 1
    
end

  when 1
    speak("～ストーリー～\n前置き\nこのストーリーはこのモンスターたちと出会う前からの話です。\n")
    speak("ある日、あなたは1匹のモンスターを拾いました。\nそのモンスターはひどく弱っていて今にも死にそうでした。\nなのであなたはご飯をあげてそのモンスターを助けました。\nそこであなたはある情報を耳にします。それは、コロシアムでモンスターの大会が行われるということでした。\nなのであなたはこの1匹のモンスターを野生のモンスターを戦わせて\n強くすることにしました。")
  when 2
    speak("～目的～\n前置き\nストーリーを読んでいれば分かっているかも")
    speak("このモンスターを野性のモンスターを戦わせて\n強くし、コロシアムで優勝することが目的です。\nコロシアムで優勝すれば賞品としてモンスターエッグが贈られます\nもちろん賞金も贈られます。")
  when 3
case speakWithSelect(2,"メニューの説明","パーティの説明", 
    "どれを読みますか？")
  when 0
    speak("～メニューの説明～\n前置き\nXキーかCキーを押すことででてくるメニューの説明をします")
    speak("このメニューはステータス、モンスター手帳、アイテム、パーティ整列、\nバックログ、セーブ、ロード、メニューを閉じるの7つで出来ています\nステータスでは、今モンスターが何レベかを見ることができます\nモンスター手帳ではお金、モンスターに出会った数、モンスターを捕まえた数、\nレアモンスターに出会った数、レアモンスターを捕まえた数が書いてあります\nアイテムでは、今もっているアイテムを見ることができ、\n使えるものはZキーを押して使うで使うことができます\nパーティ整列では、パーティメンバーの順番を入れ替えることが出来ます\nバックログでは過去の文章を読み直すことが出来ます。\nセーブは今の状態でセーブをします。\nロードは過去にセーブした場所にセーブしたときのデータで\nロードすることが出来ます\nメニューを閉じるでメニューを閉じます")
  when 1
    speak("～パーティの説明～\n前置き\nこのゲームの中で最も重要なパーティについて説明します")
    speak("下の黒いバーは今のパーティを示しています。\n書いてある画像と数字はその画像のパーティメンバーの体力と魔力です。\nパーティメンバーはメニューのパーティ整列から\n順番を変えることが出来ます。\nパーティーメンバーを外したり加えたり、逃がしたりするときは、モンスターに話しかけてください")
end

end

b=createArray() 
i=0 
while i<getVariable("max") 
 if getVariable("a")[i][0] 
   pushArray(b,getVariable("a")[i][1]) #図鑑に載っている品だけの選択肢配列 b をつくる 
 end 
i=i+1 
end 
pushArray(b,"図鑑を閉じる") #終わらせる選択肢も追加 
 
k=true 
while k 
 c=speakWithSelectArray(b,"参照したい項目を選んでね") 
 i=0 
 while i<getVariable("max") 
  if b[c]==getVariable("a")[i][1] #選んだのと同じものを図鑑一覧から探して詳細を表示 
    speak("No.",i," : ",getVariable("a")[i][1],"\n ",getVariable("a")[i][2]) 
  elsif b[c]=="図鑑を閉じる" 
    k=false 
  end 
 i=i+1 
 end 

{{{code
文字
}}}

文字

{{{code
}}}

[code
]

a[何番のアイテムか][何]

getVariable("a")[0][0]=true

getVariable("a")[0][1]="まじたい"
getVariable("a")[0][2]=
"おっさん顔の公式キャラ。\nHP 25\nEXP 2\nGold 5"
getVariable("a")[0][3]=9329
getVariable("a")[1][1]="まじたいイエロー"
getVariable("a")[1][2]=
"まじたいの色違い。黄色は似合わないと思う。\nHP 90\nEXP 12\nGold 23"

a="あ"

b=
"い"

getVariable("a")[26][1]="ガーゴイル"
getVariable("a")[26][2]=
""　#ここは引っかからない
getVariable("a")[26][3]=9708
getVariable("a")[27][1]="巨大イカ"
getVariable("a")[27][2]=
"ただただ大きいだけのイカ。だけど強い。\nHP 1200\nEXP 300\nGold 800"
getVariable("a")[27][3]=9707
getVariable("a")[28][1]="ホワイトドラゴン"#220
getVariable("a")[28][2]=
"" #この行がおかしいらしい
getVariable("a")[28][3]=9709

getVariable("a")[26][1]="ガーゴイル"
getVariable("a")[26][2]=
""　#ここは引っかからない
getVariable("a")[26][3]=9708
getVariable("a")[27][1]="巨大イカ"
getVariable("a")[27][2]=#a
"ただただ大きいだけのイカ。だけど強い。\nHP 1200\nEXP 300\nGold 800"#ここでエラーになる
getVariable("a")[27][3]=9707

# m...0=trueまたはfalse 持っているかどうか, 1=名前, 2=説明文, とします

# m...0=trueまたはfalse 持っているかどうか, 1=名前, 2=説明文, 3=ID,とします

getVariable("a")[0][1]="まじたい"
getVariable("a")[0][2]="おっさん顔の公式キャラ。\nHP 25\nEXP 2\nGold 5"
getVariable("a")[0][3]=9329

 if b[c]==getVariable("a")[i][1]
    setEventCharacter("event19", getVariable("a")[i][3])#キャラ変更を利用し表示する
    speak("No.",i+1," : ",getVariable("a")[i][1],"\n ",getVariable("a")[i][2])
    setEventCharacter("event19", default)#透明に戻す
  elsif b[c]=="図鑑を閉じる"
    k=false
  end