Mensajes

[Título:]

Título: Función Lenght + efecto
Temática: Strings
Autor: xassiz
Descripción: Muestra la longitud de una cadena introducida, y la muestra en vertical.
Funcionamiento: Pide una string, y llama a la etiqueta lenght para medirla con un contador. Luego crea una variable para cada caracter y los muestre verticalmente.

Código [Seleccionar] Expandir


@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



Salida:

Código [Seleccionar] Expandir


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



Si hay dudas, preguntad

A ver, no quiero hacer un cambio de mayusculas a minusculas!! Para eso se haría mas facil asi..

Código [Seleccionar] Expandir


@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



Quiero diferenciar los caracteres en mayuscula de minuscula!!

O también valdría el code del archivo, pero poniendo la string entre comillas.

[leed antes de responder!!]

Eso lo sabía hacer hace 5 años.. leed antes de responder!!


Si lees detenidamente el post, te enterarás.  Vuelvo a explicar:

Código [Seleccionar] Expandir


set "variable=M.texto.m"


Y quiero que la variable quede así:

Código [Seleccionar] Expandir


set "variable=1.texto.2"


Es decir, set no distingue entre mayúsculas y minúsculas.

Pero yo quiero distinguir, ese es el problema.

La unica solucion, es medir la longitud de la variable, y luego meter cada caracter en una variable.

Luego al tener los caracteres separados podré compararlos con un if.

[True]

Y si se omite? sería como True o como False?

Y para que serviría poner el True?

Yo sé con batch..

[cmd..]

Código [Seleccionar] Expandir

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

Eso serviría no? Vale cualquier cosa que pongas en la cmd

Gracias xD

Es que cuando leyera lo de cmd.. en el code no me parecia que fuera eso u.u

PD: no abría que poner ,true al final?

[EDITO: creo que al final tendré que meter cada letra en una variable u.u]

No es eso lo que busco xDD

Ok, mi problema es que no leo  

Me refiero a hacer una conversion de caracteres dependiendo de si es mayuscula o minuscula:

Código [Seleccionar] Expandir


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

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



EDITO: creo que al final tendré que meter cada letra en una variable u.u

A ver, volví a revisar varias veces el tutorial y solo encuentro esto:

Código [Seleccionar] Expandir


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


Pero el proceso que quiero cerrar ya estaría abierto, o en todo caso comprobar si esta abierto y si lo está cerrarlo.