dando vuelta el texto ingresado xD

Iniciado por Darioxhcx, 25 Julio 2008, 23:21 PM

0 Miembros y 2 Visitantes están viendo este tema.

Darioxhcx

bueno si escribis "HOLA" te devuelve "ALOH"
una palabra  frase hasta 16 caracteres te deja usar
@echo off
color 0a
title coding By Darioxhcx
set /p var=escribi tu palabra__
echo %var:~16,1%%var:~15,1%%var:~14,1%%var:~13,1%%var:~12,1%%var:~11,1%%var:~10,1%%var:~9,1%%var:~8,1%%var:~7,1%%var:~6,1%%var:~5,1%%var:~4,1%%var:~3,1%%var:~2,1%%var:~1,1%%var:~0,1%
pause


saludos xD

carlitos.dll



@echo off

set String=hola mundo

echo %String%

call :reverse %String%
if not "%reverse%"=="" (echo %reverse%)

pause
goto :eof

:reverse
rem Written by Rob van der Woude
rem http://www.robvanderwoude.com
rem setlocal
set reverse=
set input=%*
if "%input%"=="" (goto :eof)
:loop
if not defined input goto end
set firstchar=%input:~0,1%
set input=%input:~1%
set reverse=%firstchar%%reverse%
goto loop
:end
rem endlocal
goto :eof


Crazy.sx

Jaja, muy buenos codigos, nunca se me ocurrió hacerlo :P. Bien se la podria aplicar en otra cosa tambien  :xD :xD
Destruir K. LOL

sirdarckcat

alguien queria hacer eso hace poco no me acuerdo para que (algo de sacar la ruta de un proceso..)

Saludos!!

Novlucker

#4
Como aporte, dejo la misma función, pero en *.vbs  ;)

Código (vb) [Seleccionar]
Texto = "foro.elhacker.net"
e = len(Texto)
For i = 1 to e
voltear = mid(Texto,e,1) & voltear
Next
Msgbox voltear


Saludos
Contribuye con la limpieza del foro, reporta los "casos perdidos" a un MOD XD

"Hay dos cosas infinitas: el Universo y la estupidez  humana. Y de la primera no estoy muy seguro."
Albert Einstein

sirdarckcat

Ahora regresando el valor volteado en la misma variable..

Primero en JS:
Código (javascript) [Seleccionar]
var texto="foro.elhacker.net";
text=texto.split('').reverse().join('');

y en C

char texto[]="foro.elhacker.net";
int i,l=strlen(texto)-1;
for(i=0;i<l;i++,l--){
texto[i]=texto[i]^texto[l];
texto[l]=texto[i]^texto[l];
texto[i]=texto[i]^texto[l];
}
//texto tiene ahora el texto volteado

Novlucker

Debo decir que este método no lo conocía hasta hace un rato....

Código (vb) [Seleccionar]
msgbox strReverse("foro.elhacker.net")

*.vbs tiene una función especifica para eso  :xD, pero no se me ocurrió hasta ver el code js de sirdarckcat

Saludos  :P
Contribuye con la limpieza del foro, reporta los "casos perdidos" a un MOD XD

"Hay dos cosas infinitas: el Universo y la estupidez  humana. Y de la primera no estoy muy seguro."
Albert Einstein

$hyDow

#7
En au3:
Usa #Include pero da igual jeje:

#Include <String.au3>
$string="Cadena a devolver"
$Text=_StringReverse($string)
MsgBox (0,"Inverso:",$Text)

Novlucker

#8
Bueno, en au3, sin el include...  :P

Código (vb) [Seleccionar]

$string="Cadena a devolver"
For $i = 1 To StringLen($string)
$text = StringMid($string, $i, 1) & $text
Next
MsgBox (0,"Inverso:",$text)


Esto es igual a lo que hace el include  :rolleyes:

Saludos
Contribuye con la limpieza del foro, reporta los "casos perdidos" a un MOD XD

"Hay dos cosas infinitas: el Universo y la estupidez  humana. Y de la primera no estoy muy seguro."
Albert Einstein