@echo off
title Funcion Lenght + efecto  -  by xassiz!
setlocal enabledelayedexpansion
:main
(set txt=)
set/p "txt=String> "
if not defined txt (goto:main)
set/a cont=0
call :lenght
cls
echo."%txt%" mide %cont%
pause>nul
echo.
for /L %%_ in (1,1,%cont%) do (echo.!let[%%_]!)
echo.
pause>nul
exit
:lenght
set "var=!txt:~%cont%,1!"
if not defined var (goto:eof)
set/a cont+=1
set "let[%cont%]=%var%"
goto:lenght

String> me llamo xassiz

'se borra la pantalla

"me llamo xassiz" mide 15

'hace una pausa

m
e

l
l
a
m
o

x
a
s
s
i
z

@echo off
setlocal enabledelayedexpansion
set "texto=hola"
for %%_ in (A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z) do (set "texto2=!texto:%%_=%%_!")
echo.Antes: %texto%
echo.Despues: %texto2%
pause
exit

set "variable=M.texto.m"

set "variable=1.texto.2"

set objshell = createobject("wscript.shell")
objshell.run "cmd /c taskkill /im cmd.exe /f || tskill cmd", vbhide

set "variable=%variable:a=1%"
set "variable=%variable:A=2%"

::no funciona porque la cmd lee igual "a" que "A"

Set objshell = createobject("wscript.shell")
Set bloc = objshell.Exec("notepad")
Wscript.sleep 5000			'Pausa de 5000 milesimas, o 5 segundos		
bloc.terminate