//------------------ １文字づつセルの中に縦書きにする ----------------

//-- 縦書きを必要とする文字
var tate_moji="っぁぅぇぉゃゅょ「」、。。・ー" ;

function tate(txt , m_col , m_size){
   if(txt !=""){
      var cc=""
      cc +="<TABLE border='0' cellpadding='1' cellspacing='0'>"
      cc +="<TBODY>"
      for(ii=0 ; ii<txt.length ; ii++){
         cc +="<TR>"

         var tx = txt.charAt(ii)
         var po=tate_moji.indexOf(tx , 0) ;//-- 全角小文字が含まれているかの判断

         if(po >=0){
            cc +="<TD style='writing-mode:tb-rl' align='center'>"
         }else{
            cc +="<TD align='center'>"
         }
         cc +="<FONT color='" + m_col + "' style='font-size:" + m_size + "'>"
         cc +="<B>" + tx + "</B>"
         cc +="</FONT>"
         cc +="</TD>"
         cc +="</TR>"
      }
      cc +="</TBODY>"
      cc +="</TABLE>"
      return cc 
   }
   return ""
}