Prueba 4: Encriptación nivel básico

[eXcalibur]

#include
#include

void main()
{

char *codif,*decodif; //con punteros no tengo problema de tamaño
int i;
clrscr();
printf("Introduce la palabra a decodificar\n");
gets(codif);

for(i=0;codif[i]!='\0';i++){ //mientras no llegue a caracter nulo

if( ((int*)codif[i]>=47) && ((int*)codif[i]<=72))
decodif[i]=codif[i] + 50;

else{
printf("Compi! el caracter que has entrado no cumple las normas\n");
getch();
exit(); //si la palabra decodificada no es de a..z exit
}

}

printf("La frase decodificada es: \n");
puts(decodif); //pinta la frase
getch();
}

[eXcalibur]

Private Sub Command1_Click()

cadena_bruto = Text1.Text
letras = Len(cadena_bruto)

For i = 1 To letras
c_bruto = Left$(cadena_bruto, 1)
c_cod = Chr$(Asc(c_bruto) - 50)
cad_cod = cad_cod & c_cod
cadena_bruto = Right$(cadena_bruto, Len(cadena_bruto) - 1)
Next i
Label1.Caption = cad_cod
End Sub


Private Sub Command2_Click()
cadena_bruto = Text1.Text
letras = Len(cadena_bruto)

For i = 1 To letras
c_bruto = Left$(cadena_bruto, 1)
c_cod = Chr$(Asc(c_bruto) + 50)
cad_cod = cad_cod & c_cod
cadena_bruto = Right$(cadena_bruto, Len(cadena_bruto) - 1)
Next i

[adalejo]

codificar --> andres1

error

[Giskard]

eso es porque el caracter '1' se sale del rango de codificacion (supongo).

[eXcalibur]

Si

[Omicron]

Asi lo saque yo:
Usando el mismo codifcador de comprobacion en la pagina.
Primero necesitaba saber q asigna a cada letra.
asi q puse el abecedario completo

a b c d e f g h i j k l m n o p q r s t u v w x y z

Despues comprobe con el boton de codificar esto me dio de resultado:
/ 0 1 2 3 4 5 6 7 8 9 0 ; < + > ? @ A B C D E F G H

Por lo q si tomamos el codigo : 475=8c2/AG5/G
el resultado sera : FIGOJUDASYGAY

[CrAcKzMe]

ejem....yo me acabo de poner ahora, pero ice lo mismo xD. Se nota q te jodio lo del figo para poner figo judas y gay xDDDDDD

[eXcalibur]

Si, juas