Este sitio utiliza cookies propias y de terceros. Si continúa navegando consideramos que acepta el uso de cookies. OK Más Información.

Función Lenght + efecto - by xassiz

  • 1 Respuestas
  • 2269 Vistas

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado ProcessKill

  • *
  • Underc0der
  • Mensajes: 154
  • Actividad:
    0%
  • Reputación 0
  • Arriba los hackers de Argentina!
    • Ver Perfil
    • Email
« en: Febrero 24, 2010, 05:15:34 pm »


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]
@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]
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 ;)

Desconectado Abnormality

  • *
  • Underc0der
  • Mensajes: 392
  • Actividad:
    0%
  • Reputación 0
  • %SystemRoot%
    • Ver Perfil
    • Email
« Respuesta #1 en: Mayo 09, 2010, 03:01:03 am »
Muy buen code, no te olvides de agregarle el: color 0a para que quede bien lindo XD

PD: Por mas bien que este hecho sigo sin encontrarle alguna utilidad mas que para hacer bromas. Otra funcion seria para contar caracteres pero para eso esta el microsoft word que tambien tiene el contador de palabras :S
« Última modificación: Mayo 09, 2010, 03:03:51 am por Teh Old Pker »

 

¿Te gustó el post? COMPARTILO!



Funcion, Saber las lineas de un Archivo

Iniciado por ANTRAX

Respuestas: 1
Vistas: 2175
Último mensaje Julio 18, 2011, 09:46:22 pm
por JaAViEr
Funcion, obtener Puerta de enlace

Iniciado por ANTRAX

Respuestas: 0
Vistas: 2406
Último mensaje Julio 18, 2011, 09:40:38 pm
por ANTRAX
[Herramienta] Funcion Password

Iniciado por @ed33x

Respuestas: 0
Vistas: 1945
Último mensaje Enero 22, 2011, 09:48:14 pm
por @ed33x
Funcion Sleep

Iniciado por ANTRAX

Respuestas: 0
Vistas: 1953
Último mensaje Julio 18, 2011, 09:30:55 pm
por ANTRAX
Funcion GetIP

Iniciado por ANTRAX

Respuestas: 0
Vistas: 2028
Último mensaje Julio 18, 2011, 09:41:54 pm
por ANTRAX