"ÊØÚؤ›‘ÛÝߘÎËÒÇÚӜՒÉ×ךÃÖ•ÞÓÞ×וáÕØÑÌ”ØÒÜ"

CLS
SCREEN 12
COLOR 15
LOCATE 1, 20: PRINT "PROGRAMA CREADO POR: -=CICKLOW CIS WOLW=-"
COLOR 9
LOCATE 5, 20: PRINT "descifrando INFORMACION!!"
SLEEP 4
N$ = "123456" 'CODIGO UNO PARA descifrar
C$ = "123456" 'CODIGO DOS PARA descifrar
CR$ = ""
A = 0: B = 0: C = 0: M$ = ""
CR$ = "ÊØÚؤ›‘ÛÝߘÎËÒÇÚӜՒÉ×ךÃÖ•ÞÓÞ×וáÕØÑÌ”ØÒÜ" 'INFORMACION cifrada
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 descifrada CON EXITO"
COLOR 10
LOCATE 15, 13: