Cualquiera con un buen código fuente y combinaciones de teclas de Yi Language Padlock puede descifrarlo fácilmente.
.Ventana de ensamblaje Ensamblaje 1
. Entrada de contraseña de variable de configuración del programa, tipo de texto
La variable de ensamblaje ha establecido la contraseña, tipo de texto
primera ejecución de la variable de ensamblaje, tipo lógico
.
Tecla de bloqueo (97, 1, 0, 0)
Establecer contraseña = con clave de registro de texto ("SYSTEMSET", "SET", "PMM", "SET", " PMM", "CONFIGURAR"). "PMM", "")
Si ocultar la ventana = obtener la clave de registro numérica ("SYSTEMSET", "SET", "DESK", 1)
. if (setpassword = "")
Primera ejecución = True
Siempre primera ejecución = False
Botón de desbloqueo. Desactivado = Verdadero
Botón Salir. deshabilitado = false
Establece el botón. Disabled = False
Establece el botón. Get focus()
Cuadro de mensaje ("¡Este programa aún no se ha configurado, presione el botón de configuración para inicializar este programa!", #Icono de mensaje, "Mensaje:")
. De lo contrario
p>. Si es verdadero (si ocultar la ventana = 1)
Posición = 3
Si es verdadero Fin
Establezca la posición del mouse ()
.Subroutine_Password_Box_Contents_Changed
Ingrese contraseña = Contraseña Box.Contents
.Se hizo clic en la subrutina _Desbloquear botón_
.Si (contraseña ingresada = establecer contraseña)
Botón Salir. Prohibido = Falso
Botón Establecer. Desactivado = false
Siempre visible = false
Bloquear teclas (97, 0, 0, 0)
Desbloquear restricciones del mouse (0)
Botón Salir. Obtener enfoque()
. En caso contrario
Casilla de contraseña. Obtener foco ()
.if final
.
Subrutina _Establecer botón_ presionado
Cargar (Establecer ventana, _Iniciar ventana, Verdadero)
Subrutina _Salir botón_Clic
Fin ()
. Subrutina para establecer la posición del mouse
.Variable local RECT, área rectangular
RECT.Left = _Iniciar ventana.Left
RECT.Top = _Iniciar ventana.Top 30
.Top 30
RECT.Right = _Iniciar ventana.Izquierda 135
RECT.Bottom = _Iniciar ventana.Top 128
Restringido Ratón (RECT)
.Versión 2
.Ensamblaje de ventana de ensamblaje 2
.Configuración del programa contraseña variable 1, tipo de texto
. Contraseña de variable ensambladora 2, tipo de texto
Si la variable del programa se está ejecutando, entero, 0 significa no, 1 significa sí
. Variable de configuración del programa Contraseña a configurar, tipo de texto
. Subrutina _Setup_Window_Create_Complete
Contraseña establecida = Obtener clave de registro de texto ("SYSTEMSET", "SET", "PMM", ""). "")
Si ejecutar al inicio = Obtener la clave de registro numérica ("SYSTEMSET", "SET", "BEGIN", 0)
Cuadro de edición de contraseña 1. Contenido = Configuración de contraseña
Cuadro de edición de contraseña 2. Contenido = Configuración de contraseña
. if (si ocultar ventana = 1)
Cuadro de selección de escritorio. marcado = Verdadero
. De lo contrario
casilla de verificación de Escritorio. Marcar = Falso
. Si finaliza
. if (ejecutar activado o desactivado = 1)
Casilla de verificación Ejecutar. marcado = Verdadero
. De lo contrario
Casilla de verificación Ejecutar. Marcar = Falso
. si final
. Cuadro de edición de Subrutina_Contraseña 1_El contenido ha cambiado
Contraseña 1 = Cuadro de edición de contraseña 1.contenido
Cuadro de edición de Subrutina_Contraseña 2_El contenido ha cambiado
Contraseña 2 = Cuadro de edición de contraseña 2. .content
Haga clic en la subrutina _Cuadro de selección de escritorio_
. if (si ocultar ventana = 0)
Cuadro de selección de escritorio. Marcado = Verdadero
Si se debe ocultar la ventana = 1
. De lo contrario
casilla de verificación de Escritorio. Marcado = Falso
Si se debe ocultar la ventana = 0
. si final
. Se hace clic en la casilla de verificación Subroutine_Run
. if (ejecutar activado o desactivado = 0)
Casilla de verificación Ejecutar. Marcado = Verdadero
Ya sea para iniciar y ejecutar = 1
. De lo contrario
Casilla de verificación Ejecutar. Marcado = Falso
Si se debe ejecutar con energía = 0
. si final
. Haga clic en la subrutina _botón Guardar_
.
if (contraseña1 = contraseña2)
Escribir clave de registro ("SYSTEMSET", "SET", "PMM", contraseña1)
Escribir clave de registro ("SYSTEMSET", "SET", "DESK", si se debe ocultar la ventana)
Escribir claves de registro ("SYSTEMSET", "SET", "BEGIN", si se debe ejecutar al inicio)
. if (ejecutar al inicio = 1)
escriba la clave de registro (4, "SOFTWARE\Microsoft\Windows\CurrentVersion\Run\systemkey", busque el directorio de ejecución () "\ " tome el nombre del archivo de ejecución ())
De lo contrario
Elimine la entrada de registro (4, "SOFTWARE\Microsoft\Windows\CurrentVersion\Run\systemkey")
.Si está completo
destruir()
. De lo contrario
Cuadro de mensaje ("¡Confirmar contraseña no coincide!", #Icono de advertencia, "¡Contraseña incorrecta!")
Cuadro de edición de contraseña 2. Obtener foco ()
.Si finalizó
.Subroutine_Cancel_Button_Clicked
Destruir ()
.Versión 2
.Tipo de datos área rectangular
.Miembro Izquierdo, entero
.Miembro Superior, entero
.Miembro Derecha, entero
.Miembro Abajo, entero
p>
.