From: mokomoji@naver.com   
      
   2017년 8월 24일 목요일 오후 8시 10분 31초 UTC+9, ada.   
   .@poczta.onet.pl 님의 말:   
   > W dniu środa, 23 sierpnia 2017 14:32:47 UTC+2 użytkownik John Gray   
   napisał:   
   > > For "underlining" purposes I want to transform a single word, replacing   
   each letter by an equals sign or perhaps a hyphen.   
   > >    
   >    
   > @echo off   
   >    
   > set INPUT=Text to underline   
   >    
   >    
   > set XX=%INPUT%   
   > :loop   
   > SET XX=%XX:~1%   
   > SET UND=%UND%-   
   >    
   > IF NOT "%XX%"=="" GOTO loop   
   >    
   > echo %INPUT%   
   > echo %UND%   
      
   good..   
      
   @echo off    
   setlocal   
   set "z_original=original=Single Word sdfasdf23423423423424242dsfasdas3424234"   
   set "z_o2=%z_original%"   
   :l   
   set "z_o2=%z_o2:~1%"   
   set "z_u2=%z_u2%-"   
   if "%z_o2%" neq "" goto :l   
      
   echo %z_original%   
   echo %z_u2%   
   endlocal   
      
   pause   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)