#include using namespace std; #define rep(i,n) for (int i=0;i<(int)(n);i++) #define all(v) v.begin(),v.end() using ll=long long; using pll=pair; using tll=tuple; const ll INF=(1ll<<60); template void chmin(T &a,T b){ if(a>b){ a=b; } } template void chmax(T &a,T b){ if(a pi={0,1,0,-1},pj={1,0,-1,0}; string dir="RDLU"; struct enemy{ int i,j,d; }; struct input{ int n,d,h; vector s; int m; vector e; vector> grid_enemy; int si,sj,ki,kj,gi,gj; void input_cin(){ cin >> n >> d >> h; s.resize(n); rep(i,n) cin >> s[i]; cin >> m; e.resize(m); grid_enemy.resize(n); rep(i,n) grid_enemy[i].resize(n,0); rep(i,m){ cin >> e[i].i >> e[i].j >> e[i].d; grid_enemy[e[i].i][e[i].j]=e[i].d; } rep(i,n){ rep(j,n){ if(s[i][j]=='S'){ si=i; sj=j; } if(s[i][j]=='K'){ ki=i; kj=j; } if(s[i][j]=='G'){ gi=i; gj=j; } } } } } input; struct solver{ struct result{ int score,hp; vector> visited; }; bool outside(int i,int j){ if(i<0||input.n<=i||j<0||input.n<=j) return true; else return false; } int char_idx(char c){ if(c=='R') return 0; else if(c=='D') return 1; else if(c=='L') return 2; else return 3; } int dist_root(vector> &v,vector>>> &dist_juwel){ int n=v.size(); int ret=0; rep(i,n-1){ int d=dist_juwel[v[i].first][v[i].second][v[i+1].first][v[i+1].second]; if(d==-1) return 1e9; ret+=d; } return ret; } result play(string s){ int nt=s.size(); int ni=input.si,nj=input.sj; vector> visited(input.n,vector(input.n)); result ret={0,input.h,visited}; ret.visited[ni][nj]=true; vector now_s=input.s; rep(t,nt){ ni+=pi[char_idx(s[t])]; nj+=pj[char_idx(s[t])]; if(outside(ni,nj)){ ret.score=-1e9; ret.hp=-1e9; return ret; } if(!ret.visited[ni][nj]&&now_s[ni][nj]=='J') ret.score+=10; ret.visited[ni][nj]=true; ret.hp--; for(int i=ni;0<=i;i--){ if(now_s[i][nj]=='#'||now_s[i][nj]=='B') break; if(now_s[i][nj]=='E'){ if((t+1)%input.grid_enemy[i][nj]==0) ret.hp-=input.d; break; } } for(int i=ni;i> visited(input.n,vector(input.n)); result ret={0,input.h,visited}; ret.visited[ni][nj]=true; rep(t,nt){ ni+=pi[char_idx(s[t])]; nj+=pj[char_idx(s[t])]; if(outside(ni,nj)){ ret.score=-1e9; ret.hp=-1e9; return ret; } if(!ret.visited[ni][nj]&&input.s[ni][nj]=='J') ret.score+=10; ret.visited[ni][nj]=true; ret.hp--; for(int i=ni;0<=i;i--){ if(input.s[i][nj]=='#') break; if(input.s[i][nj]=='E'){ if((t+1)%input.grid_enemy[i][nj]==0) ret.hp-=input.d; break; } } for(int i=ni;i> bfs(int si,int sj){ queue> q; q.push({si,sj}); vector> dist(input.n,vector(input.n,-1)); dist[si][sj]=0; while(!q.empty()){ int ni,nj; tie(ni,nj)=q.front(); q.pop(); rep(k,4){ int ti=ni+pi[k],tj=nj+pj[k]; if(outside(ti,tj)) continue; if(input.s[ti][tj]=='#'||input.s[ti][tj]=='E') continue; if(dist[ti][tj]==-1){ dist[ti][tj]=dist[ni][nj]+1; q.push({ti,tj}); } } } return dist; } vector> min_path_dist; string min_path(int si,int sj,int gi,int gj){ string ret; queue> q; q.push({gi,gj}); if(gi==input.ki&&gj==input.kj){ min_path_dist.resize(input.n); rep(i,input.n) min_path_dist[i].resize(input.n,-1); } min_path_dist[gi][gj]=0; while(!q.empty()){ int ni,nj; tie(ni,nj)=q.front(); q.pop(); rep(k,4){ int ti=ni+pi[k],tj=nj+pj[k]; if(outside(ti,tj)) continue; if(input.s[ti][tj]=='#'||input.s[ti][tj]=='E') continue; if(min_path_dist[ti][tj]==-1){ min_path_dist[ti][tj]=min_path_dist[ni][nj]+1; q.push({ti,tj}); } } } if(min_path_dist[si][sj]==-1){ rep(i,input.n){ rep(j,input.n){ min_path_dist[i][j]=-1; } } return ""; } int ni=si,nj=sj; while(ni!=gi||nj!=gj){ int x=0; rep(k,4){ int ti=ni+pi[k],tj=nj+pj[k]; if(outside(ti,tj)) continue; if(min_path_dist[ti][tj]==min_path_dist[ni][nj]-1){ x=k; if(input.s[ti][tj]=='J') break; } } int ti=ni+pi[x],tj=nj+pj[x]; ni=ti; nj=tj; ret.push_back(dir[x]); } rep(i,input.n){ rep(j,input.n){ min_path_dist[i][j]=-1; } } return ret; } string min_path_v(int si,int sj,int gi,int gj,vector> &v){ if((int)v.size()==0){ return min_path(si,sj,gi,gj); } string ret; ret+=min_path(si,sj,v.front().first,v.front().second); rep(i,(int)v.size()-1){ ret+=min_path(v[i].first,v[i].second,v[i+1].first,v[i+1].second); } ret+=min_path(v.back().first,v.back().second,gi,gj); return ret; } string solve_root(string first_root,int si,int sj,int gi,int gj,int min_hp,vector>>> &dist_juwel){ vector> juwel_v; vector> visited=play(first_root).visited; rep(i,input.n){ rep(j,input.n){ if(!visited[i][j]&&input.s[i][j]=='J'){ juwel_v.emplace_back(i,j); } } } vector> pre_visit; vector> pre_juwel_v=juwel_v; int pre_score=0; while(true){ vector> new_visit=pre_visit; vector> new_juwel_v=pre_juwel_v; int r=mt()%10; if(r<=3){ int x=0; if((int)new_visit.size()!=0) x=mt()%(int)new_visit.size(); if((int)new_juwel_v.size()==0) continue; int y=mt()%(int)new_juwel_v.size(); new_visit.insert(new_visit.begin()+x,new_juwel_v[y]); juwel_v.erase(new_juwel_v.begin()+y); }else if(r<=6){ if((int)new_visit.size()==0||(int)new_juwel_v.size()==0) continue; int x=mt()%(int)new_visit.size(); int y=mt()%(int)new_juwel_v.size(); swap(new_visit[x],new_juwel_v[y]); }else if(r<=8){ /*if((int)new_visit.size()==0) continue; int a=mt()%(int)new_visit.size(); int b=mt()%(int)new_visit.size(); if(a==b) continue; if(b(now-start).count(); double temp=1000+(0.1-1000)*(double)msec/2800; double prob=exp((new_score-pre_score)/temp); if(2800<=msec) break; if(mt19937::max()>>> dist_juwel(input.n,vector>>(input.n,vector>(input.n,vector(input.n,-1)))); rep(i,input.n){ rep(j,input.n){ if(input.s[i][j]=='J') dist_juwel[i][j]=bfs(i,j); } } string root; root=min_path(input.si,input.sj,input.ki,input.kj); root=solve_root(root,input.ki,input.kj,input.gi,input.gj,0,dist_juwel); for(auto &i:root){ cout << "M " << i << '\n'; } } } solver; int main(){ ios::sync_with_stdio(false); cin.tie(nullptr); input.input_cin(); solver.solve(); }