#include <iostream>
#include <stdio.h>
#include <algorithm>
#include <queue>
#include <string.h>
#include <math.h>
using namespace std;
int n,m,k,d;
int map[110][110];
struct castle
{int x,y,v,t;int fx;
}pao[110];bool vis[110][110][1100];
struct node
{int x,y,step;
};
int dir[5][2]={ 1,0, -1,0, 0,1, 0,-1, 0, 0};
void bfs()
{memset(vis,0,sizeof(vis));struct node u,v;u.x=0; u.y=0; u.step=0;vis[0][0][0]=1;queue<node> que ;que.push(u);while(!que.empty()){u=que.front() ; que.pop();if(u.x==n&&u.y==m){if(u.step<=d) printf("%d\n",u.step);else printf("Bad luck!\n");return;}for(int i=0;i<5;++i){int xx=u.x+dir[i][0],yy=u.y+dir[i][1];if(xx<0||yy<0||xx>n||yy>m) continue;if(vis[xx][yy][u.step+1]==1||map[xx][yy]!=-1) continue ;bool flag=1;for(int j=xx+1;j<=n;++j){if(map[j][yy]!=-1){int id = map[j][yy];int much = j-xx;int time= u.step+1-(much/pao[id].v);if(pao[id].fx!=1||much%pao[id].v) break;if(time<0) break;if(time%pao[id].t==0) {   flag =0; break;}}}if(flag==0) continue;for(int j=xx-1;j>=0;--j){if(map[j][yy]!=-1){int id = map[j][yy];int much = xx-j;int time= u.step+1-(much/pao[id].v);if(pao[id].fx!=3||much%pao[id].v) break;if(time<0) break;if(time%pao[id].t==0) {   flag =0; break;}}}if(flag==0) continue;for(int j=yy+1;j<=m;++j){if(map[xx][j]!=-1){int id = map[xx][j];int much = j-yy;int time= u.step+1-(much/pao[id].v);if(pao[id].fx!=4||much%pao[id].v) break;if(time<0) break;if(time%pao[id].t==0) {   flag =0; break;}}}if(flag==0) continue;for(int j=yy-1;j>=0;--j){if(map[xx][j]!=-1){int id = map[xx][j];int much = yy-j;int time= u.step+1-(much/pao[id].v);if(pao[id].fx!=2||much%pao[id].v) break;if(time<0) break;if(time%pao[id].t==0) {   flag =0; break;}}}if(flag==0) continue;v.x=xx; v.y=yy; v.step=u.step+1; vis[xx][yy][u.step+1]=1;que.push(v);}}printf("Bad luck!\n");return ;
}
int main()
{while(scanf("%d%d%d%d",&n,&m,&k,&d)!=EOF){char s[5];int t,v,x,y,temp;memset(map,-1,sizeof(map));for(int i=1;i<=k;++i){scanf("%s",s);scanf("%d%d%d%d",&t,&v,&x,&y);if(s[0]=='N') temp = 1;else if(s[0]=='E') temp = 2;else if(s[0]=='S') temp = 3;else  temp = 4;pao[i].fx=temp;   pao[i].x=x; pao[i].y=y; pao[i].t=t; pao[i].v=v;map[x][y]=i;}bfs();}return 0;
}