if getFlag("sebu")
speak("植えていた植物が枯れてしまいました。")
setVariable("sebu", false)
end
if getFlag("t")
speak("トマトはもう植えてあります。")
end
tq = getTime() / 1000
tq = floor(tq)
if tq<60
tq=60-tq
speak("残り時間"tq"秒")

elsif
speak("収穫できます。")
speak("収穫中・・・")
waitTime(5000)
speak("収穫完了！\n体力-５\nトマトを２０個手に入れた")

if getFlag("p")
speak("ピーマンはもう植えてあります。")
end
pq = getTime() / 1000
pq = floor(pq)
if pq<180
speak("まだピーマンは成長中")
speak("残り時間"180-pq"秒")
elsif
speak("収穫できます。")
speak("収穫中・・・")
waitTime(5000)
speak("収穫完了！\n体力-５\nピーマンを２０個手に入れた")
#とりあえずここまで。
case speakWithSelect(9,"トマト　１分","ピーマン　３分","じゃがいも　１０分","キャベツ　１０分","にんじん　１０分","レタス　１０分","きゅうり　１０分","小麦　５分","豆　１分", 
    "何を植えますか？")
  when 0
 speak("トマトを植えました。")
setVariable("t", true)
tq=setBaseTime()

  when 1
 speak("ピーマンを植えました。")
setVariable("p", true)
pq=setBaseTime()

  when 2
     speak("じゃがいもを植えました。")
setVariable("j", true)
jq=setBaseTime()

  when 3
  speak("キャベツを植えました。")
setVariable("k", true)
kq=setBaseTime()
   
  when 4
     speak("にんじんを植えました。")
setVariable("n", true)
nq=setBaseTime()

  when 5
     speak("レタスを植えました。")
setVariable("r", true)
rq=setBaseTime()

  when 6
 speak("きゅうりを植えました。")
setVariable("ka", true)
kaq=setBaseTime()
   
  when 7
     speak("小麦を植えました。")
setVariable("kom", true)
komq=setBaseTime()
  when 8
 speak("豆を植えました。")
setVariable("m", true)
mq=setBaseTime()
end