loop=true#この変数がtrue(真)の間ループする
while loop do
 case speakWithSelect(3,"剣","盾","買わない","どれを買うかい？")
  when 0
   case speakWithSelect(2,"はい","いいえ","剣を買うのかい？")
    when 0
     speak("剣を買う処理")
     loop=false#ループを抜ける
    when 1
     #はじめに戻る
   end
  when 1
   case speakWithSelect(2,"はい","いいえ","盾を買うのかい？")
    when 0
     speak("盾を買う処理")
     loop=false#ループを抜ける
    when 1
     #はじめに戻る
   end
  when 2
   speak("買わない処理")
   loop=false#ループを抜ける
 end
end