tengo el siguiente codigo que tiene q desencriptar una cadena, pero para mostrar el resultado, hace falta una variable mas, y no se cual es
CLS
SCREEN 12
COLOR 15
LOCATE 1, 20: PRINT "PROGRAMA CREADO POR: -=CICKLOW CIS WOLW=-"
COLOR 9
LOCATE 5, 20: PRINT "DESENCRIPTANDO INFORMACION!!"
SLEEP 4
N$ = "PRUEVA" 'CODIGO UNO PARA DESENCRIPTAR
C$ = "Cicklow" 'CODIGO DOS PARA DESENCRIPTAR
CR$ = ""
A = 0: B = 0: C = 0: M$ = ""
CR$ = "û0-!üßö÷(# )ù Ü1 %6ö$.(4êü!ì8 @ù-ä: 2(ûé)3"'INFORMACION ENCRIPTADA
DO WHILE A < LEN(CR$)
A = A + 1
B = B + 1: IF B > LEN(N$) THEN B = 1
C = C + 1: IF C > LEN(C$) THEN C = 1
D = ASC(MID$(CR$, A, 1)) - (ASC(MID$(N$, B, 1)) + ASC(MID$(C$, C, 1)))
Loop3:
IF D < 1 THEN D = D + 255: GOTO Loop3
M$ = M$ + CHR$(D)
LOOP
COLOR 5
LOCATE 12, 20: PRINT "INFORMACION DESENCRIPTADA CON EXITO"
COLOR 10
LOCATE 15, 13:
