#include<bits/stdc++.h>
using namespace std;
const int N=1e5+10;
int n,nQ;
char s[N];

struct edge{
	int to,nxt;
}e[N<<1];

int hd[N],nE=0;

void addedge(int u,int v){
	e[++nE]=(edge){v,hd[u]};
	hd[u]=nE;
}

int sum[2][N];
int p[N][25],d[N];

void dfs(int u,int fa){
	sum[0][u]=sum[0][fa]+(s[u]=='H');
	sum[1][u]=sum[1][fa]+(s[u]=='G');
	d[u]=d[fa]+1;
	p[u][0]=fa;
	for(int i=1;i<=20;i++)p[u][i]=p[p[u][i-1]][i-1];
	for(int i=hd[u];i;i=e[i].nxt){
		int v=e[i].to;
		if(v==fa)continue;
		dfs(v,u);
	}
}

int lca(int u,int v){
	if(d[u]<d[v])swap(u,v);
	int delta=d[u]-d[v];
	for(int i=20;i>=0;i--)
		if((delta>>i)&1)u=p[u][i];
	if(u==v)return u;
	for(int i=20;i>=0;i--)
		if(p[u][i]!=p[v][i])u=p[u][i],v=p[v][i];
	return p[u][0];
}

bool check(int u,int v,int t){
	int w=lca(u,v);
	return (sum[t][u]+sum[t][v]-2*sum[t][p[w][0]])>0;
}

vector<int> ans;

int main(){
	
	scanf("%d %d",&n,&nQ);
	
	scanf("%s",s+1);
	
	for(int i=1,u,v;i<n;i++){
		scanf("%d %d",&u,&v);
		addedge(u,v);
		addedge(v,u);
	}
	
	dfs(1,0);
	
	int u,v;char t;
	while(nQ--){
		scanf("%d %d %c",&u,&v,&t);
		if(check(u,v,(t=='H'?0:1)))ans.push_back(1);
		else ans.push_back(0);
	}
	
	for(int i=0;i<(int)ans.size();i++)printf("%d",ans[i]);
	
	return 0;
}