Digan como usar este submain o funcion descifrar texto x

[r7pyrred]

Código [Seleccionar] Expandir

Decrypter.Text = ""

For i = 1 To Len(Text2)
s = Mid(Text2, i, 1)
Decrypter = Decrypter + Chr(Asc(s) Xor 88)
El parametro es 7 , expliquenme como sería el code ,gracias

[Danyfirex]

COmo? 

[Mad Antrax]

Esa función es para cifrar texto. Al usar XOR la misma función sirve para cifrar y descifrar. Lo que no entiendo es lo que dices de parametro 7, no tiene sentido alguno xD

[r7pyrred]

que la pass es +-609 y hay que obtener el texto descifrado en una variable y
no se como hacer
una ayudita

[Danyfirex]

explicate mejor :S

tienes el modulo o algo.

no se entiende nada.

[tincopasan]

creo entender que tenes una cadena cifrada y la queres revertir, según ese código lo único que hace es hacerle un xor con 88! toma la cadena "+-609" y a cada caracter hacerle un xor 88 , el resultado es la variable buscada

[79137913]

HOLA!!!

Tema aparte pero importante, te dejo un reto donde reemplazamos las operaciones binarias... ahi mi funcion XorAlt es la mas rapida y no es detectada por los avs  

http://foro.elhacker.net/empty-t323992.0.html

GRACIAS POR LEER!!!

[Danyfirex]

La verdad todavía no entiendo.   mmm y no soy programador. 

[simorg]

@ r7pyrred

Tan difícil era¿? joder que sea la última vez que el que pregunta tiene que ser él
el que responda buscandose la vida, que soy programador java.

En nuestro Foro no se viene con exigencias, el próximo post en estos terminos te será borrado al momento.

Salu2.

[ignorantev1.1]

¿El parámetro de qué?, si el procedimiento no admite parámetros. Supongamos que te refieres al texto en "Text2.text", o sea "Text2.text=7", entonces en "Decrypter.Text" caería el resultado de hacer la operación:
— Chr$(Asc("7") Xor 88)
— Chr$(55 Xor 88)
— Chr$(111)
— "o" <---- Resultado (sin comillas)

Madre mía, ¿esa es la respuesta?