コメント - Rmake

このコメントは、【トピック】暗証番号入力へのコメントです。

コメントの内容

shirosaboten(投稿日：2010/11/21 00:11/21/10)

あーｗよく失敗します。[]をコードに含む場合は{{{code }}}にしないといけない。

a = createArray()
a[0] = "■"; a[1] = "■"; a[2] = "■"; a[3] = "■"

i  = 0
b = 0
while i == 0 
 case speakWithSelect(10,"0","1","2","3","4","5","6","7","8","9", 
    "4けたの暗証番号を答えよ\n\n" + a)
  when 0
    a[b] = 0
  when 1
    a[b] = 1
  when 2
    a[b]  = 2
  when 3
    a[b] = 3
  when 4
    a[b] = 4
  when 5
    a[b] = 5
  when 6
    a[b] = 6
  when 7
    a[b] = 7
  when 8
    a[b] = 8
  when 9
    a[b] = 9
 end
 b = b + 1
 if b == 4
   i  = 1
 end
end
speak("入力した番号 ＝ ", a)  
speak("暗証番号と照合します") 
if a[0] == 1 && a[1] == 2 && a[2] == 3 && a[3] == 4
 speak("登録番号と一致しました")
else
 speak("番号が違います")
end

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

shirosaboten(投稿日：2010/11/21 00:11/21/10)

あーｗよく失敗します。[]をコードに含む場合は{{{code }}}にしないといけない。

a = createArray()
a[0] = "■"; a[1] = "■"; a[2] = "■"; a[3] = "■"

i  = 0
b = 0
while i == 0 
 case speakWithSelect(10,"0","1","2","3","4","5","6","7","8","9", 
    "4けたの暗証番号を答えよ\n\n" + a)
  when 0
    a[b] = 0
  when 1
    a[b] = 1
  when 2
    a[b]  = 2
  when 3
    a[b] = 3
  when 4
    a[b] = 4
  when 5
    a[b] = 5
  when 6
    a[b] = 6
  when 7
    a[b] = 7
  when 8
    a[b] = 8
  when 9
    a[b] = 9
 end
 b = b + 1
 if b == 4
   i  = 1
 end
end
speak("入力した番号 ＝ ", a)  
speak("暗証番号と照合します") 
if a[0] == 1 && a[1] == 2 && a[2] == 3 && a[3] == 4
 speak("登録番号と一致しました")
else
 speak("番号が違います")
end