Red de conocimiento informático - Aprendizaje de código fuente - ¿Cómo cifrar caracteres y números en un lenguaje sencillo?

¿Cómo cifrar caracteres y números en un lenguaje sencillo?

.Versión 2. Biblioteca de soporte dp1

.Ensamblaje de ventana de ensamblaje 1

.Subroutine_Button1_is_clicked

' Esto está cifrado

Escribir entrada de configuración ( get rundir()+"\config.ini","data","data1",to text(datos cifrados(to byteset(editbox1.content)),"completa lo que quieras aquí. El contenido deseado, pero después del descifrado es igual que el contenido completado aquí", algoritmo #RC4)))

Escriba el elemento de configuración (tome el directorio de ejecución () + "\configuration.ini", "data", "data2", Convertir a texto (datos cifrados (convertir a conjunto de bytes (cuadro de edición 2. contenido)), "Complete lo que desee aquí, pero será el mismo que completó aquí después del descifrado", algoritmo #RC4)))

. Se hizo clic en la subrutina _Botón 2_

' Descifrado aquí

Cuadro de edición 1.content = a texto (descifrar datos (al conjunto de bytes (leer la entrada de configuración (tomar el directorio de ejecución) + "\ config.ini", "data", "Data 1", )), "Completa lo que quieras aquí, pero descifralo de la misma manera que lo completas aquí", algoritmo #RC4))

Editar cuadro 2.content = a texto (descifrar datos (al conjunto de bytes (leer la entrada de configuración (tomar el directorio de ejecución () + "\config.ini", "datos", "Datos 1", )), "Complete lo que desee) aquí, pero descifrelo de la misma manera que lo completa aquí", algoritmo #RC4))

.content = to text (descifrar datos (to byteset (leer la entrada de configuración (buscar directorio de ejecución)) + " \config.ini", "data", "data2", )), "Completa lo que quieras aquí, pero descifralo de la misma manera que lo completas aquí", algoritmo #RC4))

Editar cuadro 2.