コメント

このコメントは、【トピック】片方が表示されません・・・へのコメントです。

コメントの内容

User icon mini 退会したユーザー(投稿日:2012/04/08 19:04/08/12)
書き換えてみてもダメでした。
開始スクリプト↓
setVariable("水分量", 1)
setVariable("栄養分", 0)
textID = createText(589, 0, 213, 46)
textID = createText(589, 51, 213, 46)
setText(getVariable("水分量"), "水分量:",getVariable("水分量"))
setText(getVariable("栄養分"), "栄養分:",getVariable("栄養分"))

シーン内↓
case speakWithSelect(3,"水やり","液体肥料","何もしない", 
    "どうする?\n※どれか1つを選ぶと1日が終わります。")
  when 0
setVariable("水分量",getVariable("水分量") + 1)
setText(textID, "水分量:",getVariable("水分量"))
    a = getVariable("水分量")  
d = 6 
if((a >= d)) 
 showCenterImage(119392)
speak("水分が多すぎてしおれてしまいました・・・") 
goBadEnding()
else   
speak("植物に水をやりました。") 
end
  when 1
    setVariable("栄養分",getVariable("栄養分") + 1)
setText(textID, "栄養分:",getVariable("栄養分"))
    a = getVariable("栄養分")  
d = 5 
c = getVariable("水分量")
if((a >= d))  ||  ((c == d))
speak("植物が成長しました!")
else   
speak("植物にうすめた液体肥料をやりました。") 
end
  when 2
    
end
setVariable("水分量",getVariable("水分量") - 1)
    a = getVariable("水分量")  
b = 0 
if((a == b))
showCenterImage(119392)
speak("水分が無くなって枯れてしまいました・・・") 
goBadEnding()
else   
speak("次の日") 
end
changeChapter("花 育成メニュー")

コメントの内容(一番最初の投稿)

User icon mini 退会したユーザー(投稿日:2012/04/08 19:04/08/12)
書き換えてみてもダメでした。
開始スクリプト↓
setVariable("水分量", 1)
setVariable("栄養分", 0)
textID = createText(589, 0, 213, 46)
textID = createText(589, 51, 213, 46)
setText(getVariable("水分量"), "水分量:",getVariable("水分量"))
setText(getVariable("栄養分"), "栄養分:",getVariable("栄養分"))

シーン内↓
case speakWithSelect(3,"水やり","液体肥料","何もしない", 
    "どうする?\n※どれか1つを選ぶと1日が終わります。")
  when 0
setVariable("水分量",getVariable("水分量") + 1)
setText(textID, "水分量:",getVariable("水分量"))
    a = getVariable("水分量")  
d = 6 
if((a >= d)) 
 showCenterImage(119392)
speak("水分が多すぎてしおれてしまいました・・・") 
goBadEnding()
else   
speak("植物に水をやりました。") 
end
  when 1
    setVariable("栄養分",getVariable("栄養分") + 1)
setText(textID, "栄養分:",getVariable("栄養分"))
    a = getVariable("栄養分")  
d = 5 
c = getVariable("水分量")
if((a >= d))  ||  ((c == d))
speak("植物が成長しました!")
else   
speak("植物にうすめた液体肥料をやりました。") 
end
  when 2
    
end
setVariable("水分量",getVariable("水分量") - 1)
    a = getVariable("水分量")  
b = 0 
if((a == b))
showCenterImage(119392)
speak("水分が無くなって枯れてしまいました・・・") 
goBadEnding()
else   
speak("次の日") 
end
changeChapter("花 育成メニュー")