# include "robot.h"
# include <bits/stdc++.h>
using namespace std;
constexpr int A[]={0,2,3,4,5},B[]={6,7,8},fa[]={0,0,1,2,3,4},rev[]={0,3,4,1,2};
constexpr char ch[]="HWSEN";
bool isA(int x){return x>=A[1] && x<=A[4];}
bool isB(int x){return x>=B[0] && x<=B[2];}
void program_pulibot()
{
	vector<int> S(5);
	for(S[0]=0;S[0]<=8;S[0]++)
	for(S[1]=-2;S[1]<=8;S[1]++)
	for(S[2]=-2;S[2]<=8;S[2]++)
	for(S[3]=-2;S[3]<=8;S[3]++)
	for(S[4]=-2;S[4]<=8;S[4]++)
		if(S[0]==0)
		{
			if(S[1]==-2 && S[4]==-2) set_instruction(S,A[1],ch[0]);
			else
			{
				bool ok=0;
				for(int i=1;i<=4 && !ok;i++)
					if(isB(S[i])) set_instruction(S,S[2]==-2 && S[3]==-2?1:A[i],ch[i]),ok=1;
			}
		}
		else if(S[0]==1)
		{
			bool ok=0;
			for(int i=1;i<=4 && !ok;i++)
				if(isA(S[i]) && fa[S[i]]==rev[i])
					set_instruction(S,1,ch[i]),ok=1;
			if(!ok)
			{
				int k=1;
				for(int i=1;i<=4 && !ok;i++)
					if(isB(S[i])) k=i;
				if(S[1]==-2 && S[4]==-2) set_instruction(S,1,'T');
				else set_instruction(S,1,ch[k]);
			}
		}
		else if(isA(S[0]))
		{
			int k=fa[S[0]];
			if(S[k]==1 || isA(S[k]))
			{
				bool ok=0;
				for(int i=1;i<=4 && !ok;i++)
					if(isA(S[i]) && fa[S[i]]==rev[i])
						set_instruction(S,S[0],ch[i]),ok=1;
				if(!ok) set_instruction(S,0,ch[k]);
			}
			else
			{
				bool ok=0;
				for(int i=0;i<3 && !ok;i++)
				{
					int j=(i+k&3)+1;
					if(S[j]==0 || (isA(S[j]) && fa[S[j]]==rev[j]))
						set_instruction(S,B[i],ch[j]),ok=1;
				}
				if(!ok) set_instruction(S,S[0],ch[k]);
			}
		}
		else if(isB(S[0]))
		{
			int k=1;
			bool f1=0,ok=0;
			for(int i=1;i<=4;i++)
				if(isB(S[i])) k=i;
			for(int i=1;i<=4;i++) f1|=(S[i]==1);
			if(f1)
			{
				for(int i=1;i<=4 && !ok;i++)
					if(isA(S[i]) && fa[S[i]]==rev[i])
						set_instruction(S,1,ch[i]),ok=1;
				if(!ok)
				{
					if(S[1]==-2 && S[4]==-2) set_instruction(S,1,'T');
					else set_instruction(S,1,ch[k]);
				}
			}
			else
			{
				for(int i=S[0]-B[0]+1;i<3 && !ok;i++)
				{
					int j=(i+k&3)+1;
					if(S[j]==0 || (isA(S[j]) && fa[S[j]]==rev[j]))
						set_instruction(S,B[i],ch[j]),ok=1;
				}
				if(!ok)
				{
					if(S[1]==-2 && S[4]==-2) set_instruction(S,A[1],ch[0]);
					else set_instruction(S,A[k],ch[k]);
				}
			}
		}
}