#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{ vector> grid; 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; 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> 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; } string min_path(int si,int sj,int gi,int gj){ string ret; priority_queue,vector>,greater>> pq; pq.push({0,gi,gj}); vector> dist(input.n,vector(input.n,1e9)); vector>> per(input.n,vector>(input.n)); dist[gi][gj]=0; while(!pq.empty()){ int d,ni,nj; tie(d,ni,nj)=pq.top(); pq.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(d+grid[ti][tj]>>> &dist_juwel){ string root=first_root; vector> visit_juwel; int ni=si,nj=sj; while(true){ vector> visited=play(root).visited; bool first_flag=true,end_flag=false; while(true){ vector> dist=bfs(ni,nj); pair> p={(int)1e9,{0,0}}; rep(i,input.n){ rep(j,input.n){ if(dist[i][j]==-1) continue; if(!visited[i][j]&&input.s[i][j]=='J') chmin(p,{dist[i][j],{i,j}}); } } if(p.first==1e9) break; int ti,tj; tie(ti,tj)=p.second; string new_root=root; new_root+=min_path(ni,nj,ti,tj); string new_new_root=new_root+min_path(ti,tj,gi,gj); if(play(new_new_root).hp<=min_hp){ if(first_flag) end_flag=true; break; } visit_juwel.emplace_back(ti,tj); result res=play(new_root); ni=ti; nj=tj; root=new_root; visited=res.visited; first_flag=false; } if(end_flag) break; int n=visit_juwel.size(); if(n==0) break; while(true){ bool reversed=false; rep(i,n-1){ for(int j=i+2;j>>> 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); } } grid.resize(input.n); rep(ni,input.n){ grid[ni].resize(input.n,100); rep(nj,input.n){ if(input.s[ni][nj]=='J') grid[ni][nj]-=50; for(int i=ni;0<=i;i--){ if(input.s[i][nj]=='#') break; if(input.s[i][nj]=='E'){ grid[ni][nj]+=input.d*(1/(double)input.grid_enemy[i][nj]); } } for(int i=ni;i ans={(int)-1e9,""}; string 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); chmax(ans,{play(root).score,root}); string x=min_path(input.ki,input.kj,input.gi,input.gj); root=""; root=solve_root(root,input.si,input.sj,input.ki,input.kj,input.h-play_free(input.ki,input.kj,x).hp,dist_juwel); root+=x; chmax(ans,{play(root).score,root}); for(int i=100;i<=input.h-100;i+=100){ auto now=chrono::system_clock::now(); if(2600<=chrono::duration_cast(now-start).count()) break; root=solve_root(root,input.si,input.sj,input.ki,input.kj,i,dist_juwel); root=solve_root(root,input.ki,input.kj,input.gi,input.gj,0,dist_juwel); chmax(ans,{play(root).score,root}); } for(auto &i:ans.second){ cout << "M " << i << '\n'; } } } solver; int main(){ ios::sync_with_stdio(false); cin.tie(nullptr); input.input_cin(); solver.solve(); }