/*
這道題中B點需要操作兩步，所以遇到B點后不能+2后直接壓進隊列，需要在原地停一下，不能擴展到其他點，相當于他只能擴展到自身，所以就把自身壓進隊列里map[x][y]='E'是因為破壞磚墻一次就夠了，不然下次，還是'B'，不斷壓進隊列，不斷在原地停留
平常一般是考慮“入隊列” 的點，這次要考慮“出隊列” 的點是否滿足條件！
*/
#include "iostream"
#include "queue"
using namespace std;
char map[301][301];
bool visit[301][301];
int dir[4][2]={{1,0},{-1,0},{0,1},{0,-1}};
int m,n,sx,sy;
struct node
{
 int x,y,time;
};
int bfs()
{
 int i;
 node you,start,next;
 queue<node>q;
 you.x=sx;
 you.y=sy;
 you.time=0;
 q.push(you);
 visit[sx][sy]=1;
 while(!q.empty())
 {
  start=q.front();
  q.pop();
  if(map[start.x][start.y]=='B')  //這一步需要停一停
  {
   start.time++;
   map[start.x][start.y]='E';
   q.push(start);
  }
  else
  {
   for(i=0;i<4;i++)
   {
    next.x=start.x+dir[i][0];     //搜索下一個點
    next.y=start.y+dir[i][1];
    if(next.x<0 || next.y<0 || next.x>=m || next.y>=n || map[next.x][next.y]=='R' || map[next.x][next.y]=='S' || visit[next.x][next.y])        //判斷下一個點是否合法
     continue;
    next.time=start.time+1;
    if(map[next.x][next.y]=='T')    //到達目的地
     return next.time;
    visit[next.x][next.y]=1;   //標記已經(jīng)走過的點
    q.push(next);
   }
  }
 }
 return -1;
}
int main(void)
{
 int i,j;
 while(scanf("%d %d",&m,&n)==2)
 {
  if(m==0 && n==0)
   break;
  memset(visit,0,sizeof(visit));     //初始化每個節(jié)點的狀態(tài)
  for(i=0;i<m;i++)
  {
   getchar();
   for(j=0;j<n;j++)
   {
    scanf("%c",&map[i][j]);
    if(map[i][j]=='Y')      //記錄起始點
    {
     sx=i;
     sy=j;
    }
   }
  }
  printf("%d\n",bfs());
 }
 system("pause");
 return 0;
}

struct node
{
 int x,y;
 int step;
};
priority_queue<node>q;       //優(yōu)先隊列中元素的比較規(guī)則默認是按元素的值從大到小排序；
bool operator<(const node &a,const node &b) //括號里面是const 而且還必須是引用
{
 return a.step>b.step;          //從小到大排序。重載小于號。因為默認是從大到小
}

struct node
{
 int x,y;
 int time;  //定義一個優(yōu)先隊列
 friend bool operator<(node a, node b)
 {     //從小到大排序采用“>”號；如果要從大到小排序，則采用“<”號
  return a.time> b.time;       //從小到大排序
 }
}; 
priority_queue<node>q;       //優(yōu)先隊列中元素的比較規(guī)則默認是按元素的值從大到小排序；

/*
優(yōu)先隊列的實現(xiàn)就不用局限每次操作一步了，但每次都取最小操作次數(shù)的步來走
*/
#include "iostream"
#include "queue"
using namespace std;
char map[301][301];
bool visit[301][301];
int dir[4][2]={{1,0},{-1,0},{0,1},{0,-1}};
int m,n,sx,sy;
struct node
{
 int x,y,time;  //定義一個優(yōu)先隊列
 friend bool operator<(node a, node b)
 {
  return a.time> b.time;       //從小到大排序
 }
};
int bfs()
{
 int i;
 node you,start,next;
 priority_queue<node>q;
 you.x=sx;
 you.y=sy;
 you.time=0;
 q.push(you);
 visit[sx][sy]=1;
 while(!q.empty())
 {
  start=q.top();  //取隊頭指針與普通隊列不同（Q.front）
  q.pop();
  for(i=0;i<4;i++)
  {
   next.x=start.x+dir[i][0];     //搜索下一個點
   next.y=start.y+dir[i][1];
   if(next.x<0 || next.y<0 || next.x>=m || next.y>=n || map[next.x][next.y]=='R' || map[next.x][next.y]=='S' || visit[next.x][next.y])        //判斷下一個點是否合法
    continue;
   if(map[next.x][next.y]=='B')  //注意此處不要馬虎
    next.time=start.time+2;
   else
    next.time=start.time+1;
   if(map[next.x][next.y]=='T')    //到達目的地
    return next.time;
   visit[next.x][next.y]=1;        //標記已經(jīng)走過的點
   q.push(next);
  }
 }
 return -1;
}
int main(void)
{
 int i,j;
 while(scanf("%d %d",&m,&n)==2)
 {
  if(m==0 && n==0)
   break;
  memset(visit,0,sizeof(visit));     //初始化每個節(jié)點的狀態(tài)
  for(i=0;i<m;i++)
  {
   getchar();
   for(j=0;j<n;j++)
   {
    scanf("%c",&map[i][j]);
    if(map[i][j]=='Y')      //記錄起始點
    {
     sx=i;
     sy=j;
    }
   }
  }
  printf("%d\n",bfs());
 }
 system("pause");
 return 0;
}

#include<string.h>
#include<iostream>
#include<queue>
using namespace std;
int co,ro,mi,step[305][305];
char map[305][305],visited[305][305];
int dir[4][2]={{0,1},{0,-1},{1,0},{-1,0}};
typedef struct node
{
 int x;
 int y;
 int time;
}node;
bool judge(int x,int y)
{
 if(x<0||y<0||x>=co||y>=ro)
 {
  return false;
 }
 if(map[x][y]=='S'||map[x][y]=='R')
 {
  return false;
 }
 return true;
}
void  bfs(int a,int b)
{
 int i,x,y,ti;
 node in,out;
 queue<node>que;
 in.x=a;
 in.y=b;
 step[a][b]=0;
 que.push(in);
 while(!que.empty())
 {
  out=que.front();
  que.pop();
  visited[out.x][out.y]=0;  
  for(i=0;i<4;i++)
  {
   x=out.x+dir[i][0];
   y=out.y+dir[i][1];
   if(!judge(x,y))
    continue;
   ti=step[out.x][out.y]+1;
   if(map[x][y]=='B')
    ti++;
   if(step[x][y]<=ti)
    continue;
   step[x][y]=ti;
   if(visited[x][y])
    continue;
   visited[x][y]=1;
   in.x=x;
   in.y=y;
   que.push(in);
  }
 }
}
int main()
{
 int i,j,a,b,c,d;
 while(scanf("%d %d",&co,&ro),co+ro)
 {
  getchar();
  for(i=0;i<co;i++)
   gets(map[i]);
  for(i=0;i<co;i++)
   for(j=0;j<ro;j++)
   {
    if(map[i][j]=='Y')
    {
     a=i;
     b=j;
    }
    if(map[i][j]=='T')
    {
     c=i;
     d=j;
    }
    step[i][j]=999999;      
   }
   memset(visited,0,sizeof(visited));
   visited[a][b]=1;
   bfs(a,b);
   if(step[c][d]!=999999)
    printf("%d\n",step[c][d]);
   else
    printf("-1\n");
 }
 return 0;
}