b=createArray()
b=getVariable("本の名前")
n=getArrayLength(b)
b[n]="読まない"

speak("イスに座って本を読めます。")
i=speakWithSelectArray(b, "どの本を読みますか")
if b[i]=="???"
  speak("この本は持っていません。")
elsif b[i]=="読まない"
  speak("今は読まなくていいや。")
else
  id=getVariable("本のID")[i]
  a = getItemIndexWithId(id)
  if a == -1
    speak("この本は読み終わっています。")
   else
    speak("「なんかの本」")
    speak("面白そう。")
    removeItemWithIndex(a)
    setFlag("読書", true)
  end
end