コメント

このコメントは、【トピック】ストレートのスクリプトへのコメントです。

コメントの内容

mini とりか(投稿日：2013/01/30 00:01/30/13) 
Q=0
W=0
X=0
b=1

while b < 7
 a=0
 W=0
 while a < 5
  if getVariable("ダイス")[a]==b
   W=1     
  end
  a=a+1
 end
 if W==1
  Q=Q+1
  X=Q
 else
  if X < Q
   X=Q
  end
  Q=0
 end
 b=b+1
end

if X==5
 speak("ストレートが揃っている！！！！！")
end
if X==4
 speak("セミストレート！！！！")
end
if X==3
 speak("三連続！！！")
else
 speak("ストレートはそろっていない")
end


ストレート検出に致命的なバグがあったので修正しました
これで最終版になると思います

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

mini とりか(投稿日：2013/01/30 00:01/30/13) 
Q=0
W=0
X=0
b=1

while b < 7
 a=0
 W=0
 while a < 5
  if getVariable("ダイス")[a]==b
   W=1     
  end
  a=a+1
 end
 if W==1
  Q=Q+1
  X=Q
 else
  if X < Q
   X=Q
  end
  Q=0
 end
 b=b+1
end

if X==5
 speak("ストレートが揃っている！！！！！")
end
if X==4
 speak("セミストレート！！！！")
end
if X==3
 speak("三連続！！！")
else
 speak("ストレートはそろっていない")
end


ストレート検出に致命的なバグがあったので修正しました
これで最終版になると思います