30,31行目のDIMを[3]でなく[6]にしてみてください( ´ u ` ) 配列が3つ分しか用意されていないのにRND(6)を使っているので配列の存在しない部分を指定しちゃってるんだと思いますー。