Problem:
ザ・スクエアーズ

この度、有名なテーマパークに、巨大迷路ザ・スクエアーズが新しく完成しました。 消防署の指導により避難訓練をしなければなりませんが、巨大迷路なだけに訓練にかかる時間を予測することができません。そこで、あなたは以下の仕様をもとに避難訓練シミュレータを開発することになりました。

巨大迷路は図 1 に示すように、横 W 、縦 H の W × H 個のマス目で表わされます。各マス目は、通路(白いマス目)、壁(茶色いマス目) 、非常口(緑のマス目)のいずれかです。図中の○は人を表し、その中の英小文字(E、W、S、N)はその人が向いている方角(東西南北)を表しています。図は上方向が北になるように描かれています。

図1

巨大迷路内にいる人は最初、東西南北のいずれかの方向を向いて立っています。各人は 1 秒単位で同時に次に示す手順で移動を試みます。

現在向いている方向の、右、前、左、後のマス目を順番に調べ、最初に見つけた、空いている通路または非常口の方向に向きを変えます。そのようなマス目が無い場合は向きを変えません。

目の前のマス目が空いていて、他の人の目の前のマス目になっていない場合は移動します。同じマス目を目の前のマスとする人が複数いる場合は、そのマス目の、東、北、西、南のマス目にいる人の順で選択された 1 人が移動します。

移動後に非常口に到着した人は、無事避難し迷路内から消えます。

与えられた巨大迷路と人の位置情報を入力とし、全ての人が避難し終える時間を出力するプログラムを作成してください。 脱出に 180 秒より長い時間を要する場合は NA と出力して下さい。 迷路と人の位置情報は、 H 行 W 列の文字によって与えられます。各文字の意味は以下のとおりです。

# : 壁

. : 床

X : 非常口

E : 東を向いている人

N : 北を向いている人

W : 西を向いている人

S : 南を向いている人

なお、迷路と外部との境界は壁 # または非常口 X のいずれかです。また、巨大迷路の中には、人が必ず１人以上います。

Input

複数のデータセットの並びが入力として与えられます。 入力の終わりはゼロふたつの行で示されます。
各データセットは以下の形式で与えられます。

W H
str1
str2
:
strH

1 行目に迷路の横方向の大きさ W、縦方向の大きさ H (1 ≤ W, H ≤ 30) が与えられます。続く H 行に迷路の i 行目を表す文字列 stri (長さ W) が与えられます。

データセットの数は 50 を超えません。

Output

入力データセットごとに、全ての人が避難し終える時間を１行に出力します。

Sample Input

10 3
##########
#E.......X
##########
4 4
####
#N.#
#..X
####
5 5
#####
#N..#
###.X
#S..#
#####
6 6
######
#..#X#
#.EE.#
####N#
#....#
######
8 8
##X#####
#....E.#
#####.##
#.#...##
#.W.#..#
#.#.N#.X
#X##.#.#
########
0 0

Output for the Sample Input

8
NA
9
16
10

Solution in JAVA (judge verdict: Wrong Answer)

import java.io.BufferedReader;
import java.io.IOException;
import java.io.InputStreamReader;
import java.util.ArrayDeque;

public class Main {

	static final int[][] dirpe = {{1, 0}, {0, 1}, {-1, 0}, {0, -1}};
	static final int[][] dirpn = {{0, 1}, {-1, 0}, {0, -1}, {1, 0}};
	static final int[][] dirpw = {{-1, 0}, {0, -1}, {1, 0}, {0, 1}};
	static final int[][] dirps = {{0, -1}, {1, 0}, {0, 1}, {-1, 0}};

	static final char[] dirce = {'S', 'E', 'N', 'W'};
	static final char[] dircn = {'E', 'N', 'W', 'S'};
	static final char[] dircw = {'N', 'W', 'S', 'E'};
	static final char[] dircs = {'W', 'S', 'E', 'N'};

	public static void main(String[] args) throws IOException {
		BufferedReader br = new BufferedReader(new InputStreamReader(System.in));
		String line = "";

		while (!(line = br.readLine()).equals("0 0")) {
			int w = Integer.parseInt(line.substring(0, line.indexOf(' ')));
			int h = Integer.parseInt(line.substring(line.indexOf(' ') + 1));
			char[][] mazec = new char[h][w];
			int[][] mazei = new int[h][w];

			ArrayDeque<Seeker> queue = new ArrayDeque<Seeker>();

			for (int i = 0; i < h; i++) {
				line = br.readLine();
				for (int j = 0; j < w; j++) {
					mazec[i][j] = line.charAt(j);
					if ("SENW".indexOf(mazec[i][j]) != -1) {
						queue.add(new Seeker(mazec[i][j], new int[]{i, j}));
					}
					if(mazec[i][j]==' '){
						System.err.println("space");
					}
				}
			}

			int elapse = 0;
			while (queue.size() > 0 && elapse < 180) {

				for (Seeker s : queue) {
					int[][] dirp = null;
					char[] dirc = null;
					switch (s.dir) {
						case 'E':
							dirp = dirpe;
							dirc = dirce;
							break;
						case 'N':
							dirp = dirpn;
							dirc = dircn;
							break;
						case 'W':
							dirp = dirpw;
							dirc = dircw;
							break;
						case 'S':
							dirp = dirps;
							dirc = dircs;
							break;
					}
					for (int i = 0; i < 4; i++) {
						int next_y = s.curr[0] + dirp[i][0];
						int next_x = s.curr[1] + dirp[i][1];
						char next_c = mazec[next_y][next_x];
						if (next_c == '.') {
							//方向転換 & 移動先座標設定
							s.dir = dirc[i];
							s.next[0] = next_y;
							s.next[1] = next_x;
							//優先度上書き
							if (mazei[next_y][next_x] < s.prio()) {
								mazei[next_y][next_x] = s.prio();
							}
							break;
						} else if (next_c == 'X') {
							s.runaway = true;
							break;
						}
					}
				}
				//移動(脱出)
				int i = queue.size();
				for (int j = 0; j < i; j++) {
					Seeker s = queue.poll();
					if (s.runaway) {
						mazec[s.curr[0]][s.curr[1]] = '.';
					} else {
						queue.offer(s);
					}
				}
				//移動
				for (Seeker s : queue) {
					if (mazei[s.next[0]][s.next[1]] == s.prio()) {
						mazec[s.curr[0]][s.curr[1]] = '.';
						mazec[s.next[0]][s.next[1]] = s.dir;
						mazei[s.next[0]][s.next[1]] = 0;
						s.curr[0] = s.next[0];
						s.curr[1] = s.next[1];
					}
				}
				elapse++;
			}
			//結果出力
			if (queue.isEmpty()) {
				System.out.println(elapse);
			} else {
				System.out.println("NA");
			}
		}
	}
}

class Seeker {

	static final int priow = 4;
	static final int prios = 3;
	static final int prioe = 2;
	static final int prion = 1;

	char dir;
	int[] curr;
	int[] next;
	boolean runaway;

	Seeker(char dir, int[] curr) {
		this.dir = dir;
		this.curr = curr;
		this.next = new int[2];
	}

	int prio() {
		switch (this.dir) {
			case 'W':
				return priow;
			case 'S':
				return prios;
			case 'E':
				return prioe;
			case 'N':
				return prion;
			default:
				return 0;
		}
	}

}