fork(2) download
  1. S,W,N,E=0,1,2,3;a,b,d=input();v=[b,a]
  2. for c in map(ord,raw_input()):d+=c%4-1;v[d&1]+=c%2*((d&2)-1)
  3. print'%d,%d,%s'%(v[1],v[0],'SWNE'[d&3])
Success #stdin #stdout 0.01s 7856KB
stdin
1,2,N
MRMLM
stdout
2,4,N