#include <bits/stdc++.h>
using namespace std;
void set_instruction(vector<int>S,int Z,char A);
int op[10]={-2,-1,0,1,2,3,4,5,6},tp;
char ch;
inline void adds(int c,int i,int j,int k,int l,int col,char CH)
{
	set_instruction({c,op[i],op[j],op[k],op[l]},col,CH);
	return ;
}
inline char findc(int i,int j,int k,int l,int tp)
{
	char an;
	if(op[i]==tp)an='W';
	else if(op[j]==tp)an='S';
	else if(op[k]==tp)an='E';
	else if(op[l]==tp)an='N';
	else an='T';
	return an;
}
inline char findt(int i,int j,int k,int l,int tp)
{
	int an;
	if(op[i]==tp)an=3;
	else if(op[j]==tp)an=4;
	else if(op[k]==tp)an=5;
	else if(op[l]==tp)an=6;
	else an=0;
	return an;
}
void program_pulibot() 
{
	for(int i=0;i<=8;++i)
	{
		for(int j=0;j<=8;++j)
		{
			for(int k=0;k<=8;++k)
			{
				for(int l=0;l<=8;++l)
				{
					for(int c=0;c<=6;++c)
					{
						if(c==0)
						{
							if(op[i]==-2&&op[l]==-2)adds(c,i,j,k,l,1,'H');
							else
							{
								ch=findc(i,j,k,l,1);
								if(ch=='T')adds(c,i,j,k,l,findt(i,j,k,l,2),findc(i,j,k,l,2));
								else
								{
									tp=findt(i,j,k,l,1);
									adds(c,i,j,k,l,tp,ch);
								}
								
							}
						}
						else if(op[i]==1||op[j]==1||op[k]==1||op[l]==1||((c>=3)&&!(op[i]==2||op[j]==2||op[k]==2||op[l]==2))) 
						{
							if(c==1)
							{
								if((op[i]==-2&&op[l]==-2)&&(op[j]<=1&&op[k]<=1))adds(c,i,j,k,l,1,'T');
								else
								{
									if(op[k]==3)adds(c,i,j,k,l,1,'E');
									else
									{
										if(op[l]==4)adds(c,i,j,k,l,1,'N');
										else
										{
											if(op[i]==5)adds(c,i,j,k,l,1,'W');
											else
											{
												if(op[j]==6)adds(c,i,j,k,l,1,'S');
												else adds(c,i,j,k,l,1,findc(i,j,k,l,2));
											}
										}
									}
								}
							} 
							else if(c==2) 
							{
								ch=findc(i,j,k,l,0);
								if(ch=='T')adds(c,i,j,k,l,1,'H');
								else adds(c,i,j,k,l,2,ch);
							} 
							else 
							{
								if(op[k]==3)adds(c,i,j,k,l,c,'E');
								else
								{
									if(op[l]==4)adds(c,i,j,k,l,c,'N');
									else
									{
										if(op[i]==5)adds(c,i,j,k,l,c,'W');
										else
										{
											if(op[j]==6)adds(c,i,j,k,l,c,'S');
											else 
											{
												if(c==3)adds(c,i,j,k,l,0,'W');
												else if(c==4)adds(c,i,j,k,l,0,'S');
												else if(c==5)adds(c,i,j,k,l,0,'E');
												else adds(c,i,j,k,l,0,'N');
											}
										}
									}
								}
							}
						}
						else if(c==1)
						{
							ch=findc(i,j,k,l,0);
							if(ch=='T')
							{
								if(op[i]==-2&&op[l]==-2)adds(c,i,j,k,l,2,'H');
								else
								{
									ch=findc(i,j,k,l,2);
									adds(c,i,j,k,l,0,ch);
								}
							}
							else adds(c,i,j,k,l,c,ch);
						}
						else if(c==2)
						{
							if(op[k]==3)adds(c,i,j,k,l,c,'E');
							else
							{
								if(op[l]==4)adds(c,i,j,k,l,c,'N');
								else
								{
									if(op[i]==5)adds(c,i,j,k,l,c,'W');
									else
									{
										if(op[j]==6)adds(c,i,j,k,l,c,'S');
										else adds(c,i,j,k,l,1,'H');
									}
								}
							}
						}
						else 
						{
							if(op[j]==-2&&op[k]==-2)adds(c,i,j,k,l,1,findc(i,j,k,l,2));
							else adds(c,i,j,k,l,2,'H');
						}
					}
				}
			}
		}
	}
	return ;
}