#include "robot.h"
#include <bits/stdc++.h>
using namespace std;
#define rep(i,a,n) for (int i=a;i<n;i++)
#define per(i,a,n) for (int i=n-1;i>=a;i--)
#define pb push_back
#define eb emplace_back
#define mp make_pair
#define all(x) (x).begin(),(x).end()
#define fi first
#define se second
#define SZ(x) ((int)(x).size())
typedef vector<int> VI;
typedef basic_string<int> BI;
typedef long long ll;
typedef pair<int,int> PII;
typedef double db;
mt19937 mrand(random_device{}()); 
const ll mod=1000000007;
int rnd(int x) { return mrand() % x;}
ll powmod(ll a,ll b) {ll res=1;a%=mod; assert(b>=0); for(;b;b>>=1){if(b&1)res=res*a%mod;a=a*a%mod;}return res;}
ll gcd(ll a,ll b) { return b?gcd(b,a%b):a;}
// head

char d1[]="NESW";
char d2[]=" WSEN";
void program_pulibot()
{
    // 0 unvisited
    VI dir{-2,-1,0,1,2,3,4,5,6,7};
    for (int L:dir) for (int D:dir)
        for (int R:dir) for (int U:dir) for (int S:dir) {
            VI st{S,L,D,R,U};
            auto isfa=[&](int s1,int s2) {
                if (s1<=1||s2<=1) return false;
                return ((s1+1)/3==(s2+1)/3)&&(s1+1)%3==s2%3;
            };
            if (L==1||D==1||R==1||U==1) {
                bool fd=0;
                rep(i,1,5) if (isfa(st[i],st[0])) {
                    set_instruction(st,1,d2[i]);
                    fd=1;
                    break;
                }
                if (!fd&&L==-2&&U==-2) set_instruction(st,1,'T');
                continue;
            }
            if (D==-2&&R==-2) {
                bool fd=0;
                rep(i,1,5) if (st[i]>=2) {
                    set_instruction(st,1,d2[i]);
                    fd=1;
                    break;
                }
                continue;
            }
            if (S==0) {
                bool fd=0;
                rep(i,1,5) if (st[i]>=2) {
                    int ps=(st[i]-2)/3;
                    int dis=(st[i]-2+1)%3;
                    set_instruction(st,(ps^1)*3+dis+2,d2[i]);
                    fd=1;
                    break;
                }
                if (!fd) {
                    if (L==-2&&U==-2) set_instruction(st,2,'H');
                }
            } else {
                if (S<=1) continue;
                bool fd=0;
                rep(i,1,5) if (isfa(st[0],st[i])||st[i]==0) {
                    set_instruction(st,st[0],d2[i]);
                    fd=1;
                    break;
                }
                if (!fd) {
                    rep(i,1,5) if (isfa(st[i],st[0])) {
                        set_instruction(st,st[0]<=4?(st[0]+3):(st[0]-3),d2[i]);
                        fd=1;
                        break;
                    }
                    if (!fd&&L==-2&&U==-2) {
                        set_instruction(st,st[0]<=4?(st[0]+3):(st[0]-3),'H');
                    }
                }
            }
        }
}