#開始スクリプトなどで設定
setVariable("項目",createArray()) # ５項目ある図鑑をすべて？？？にする
i = 0
while i < 5
 getVariable("項目")[i] = "？？？"
 i  = i + 1
end

setVariable("説明文",createArray()) #説明文を考える
getVariable("説明文")[0] = "HPを回復する"
getVariable("説明文")[1] = "状態異常：毒を回復"
getVariable("説明文")[2] = "状態異常：マヒを回復"
getVariable("説明文")[3] = "あああああ"
getVariable("説明文")[4] = "いいいいい"

#　アイテム取得時
giveItem(111) #項目０番目HPを回復するアイテムだとする
speak("薬草を手に入れた")
getVariable("項目")[0] = "薬草"


giveItem(112) #項目1番目毒を回復するアイテムだとする
speak("毒消し草を手に入れた")
getVariable("項目")[1] = "毒消し草"

#図鑑を参照したとき（本棚にイベントをはっつけるなど）
i = 0 
while i < 1
 case speakWithSelect(6, getVariable("項目")[0], getVariable("項目")[1],
getVariable("項目")[2], getVariable("項目")[3],
 getVariable("項目")[4],  "やめる",#都合により無駄に改行してます
    "参照したい項目を選んでね")
  when 0
    n = 0
  when 1
    n = 1
  when 2
    n = 2
  when 3
    n = 3
  when 4
    n = 4
  when 5
    speak("図鑑を閉じた")
    i = 1
 end
 if i == 0
  if getVariable("項目")[n] == "？？？" 
      speak("まだ参照できません")
  else
      speak(getVariable("説明文")[n])
  end
 end
end

#開始スクリプトなどで設定
setVariable("項目",createArray()) # ５項目ある図鑑をすべて？？？にする
i = 0
while i < 5
 getVariable("項目")[i] = "？？？"
 i  = i + 1
end

setVariable("説明文",createArray()) #説明文を考える
getVariable("説明文")[0] = "HPを回復する"
getVariable("説明文")[1] = "状態異常：毒を回復"
getVariable("説明文")[2] = "状態異常：マヒを回復"
getVariable("説明文")[3] = "あああああ"
getVariable("説明文")[4] = "いいいいい"

#　アイテム取得時
giveItem(111) #項目０番目HPを回復するアイテムだとする
speak("薬草を手に入れた")
getVariable("項目")[0] = "薬草"


giveItem(112) #項目1番目毒を回復するアイテムだとする
speak("毒消し草を手に入れた")
getVariable("項目")[1] = "毒消し草"

#図鑑を参照したとき（本棚にイベントをはっつけるなど）
i = 0 
while i < 1
 case speakWithSelect(6, getVariable("項目")[0], getVariable("項目")[1],
getVariable("項目")[2], getVariable("項目")[3],
 getVariable("項目")[4],  "やめる",#都合により無駄に改行してます
    "参照したい項目を選んでね")
  when 0
    n = 0
  when 1
    n = 1
  when 2
    n = 2
  when 3
    n = 3
  when 4
    n = 4
  when 5
    speak("図鑑を閉じた")
    i = 1
 end
 if i == 0
  if getVariable("項目")[n] == "？？？" 
      speak("まだ参照できません")
  else
      speak(getVariable("説明文")[n])
  end
 end
end