El lenguaje simple inyecta automáticamente el código fuente DLL
.Biblioteca eAPI de soporte
.Biblioteca de especificaciones de soporte
.Biblioteca de clases de soporte iext
.Ensamblaje Ensamblaje de Windows 1
. Mango del método de entrada de la variable ensamblada, número entero
. Subrutina __Start_Window_Create_Complete
Transparencia de la variable local, número entero
. , entero
. Determinar el inicio (si el proceso existe ("DNF.exe")
_Launch Window. Mover (obtener ancho de pantalla () - (_StartupWindow. ancho + 7), obtener alto de pantalla () - _Launch Window.Height - 37, , )
Primero repite la variable (1, 200, 3, Transparencia)
Establece la transparencia de la ventana (obtén el identificador de la ventana (), Transparencia)
_Launch Window.Visual = True
Retraso (2)
.Fin del bucle variable()
Retraso (5000)
. Bucle variable primero (1, 100, 1, posición de la barra de progreso)
ProgressBar1.Position = ProgressBarPosition
Si es verdadero (progressbar1.position = 20)
.Etiqueta transparente 1.title = "Butterfly está iniciando..."
Retraso (1000)
Etiqueta transparente 1.Title = "Dielianhua se está actualizando..." . "
Inject()
.Si es verdadero final
.Si es verdadero (ProgressBar1.Position = ProgressBar1.MaximumPosition)
TransparentLabel1 . Título = "Iniciar llamada saliente..."
.
Método de entrada activar()
.Si es verdadero Fin
.Si true (ProgressBar1.Position = ProgressBar1.MaximumPosition)
TransparentLabel1.Title = "Activación exitosa..."
Retraso (ProgressBar1.Position = ProgressBar1.MaximumPosition)
p >Retraso (2000)
Transparencia = 200
Efecto de aparición gradual (tomar el identificador de ventana (), falso, 5000)
Retraso (500). )
_Iniciar ventana.Visible = false
.Finalizar si es verdadero
Retraso (50)
.Fin de bucle variable ()
.Predeterminado
Detener reproducción ()
Cuadro de mensaje ("Vaya a la selección de canales para activar esta asistencia", 0, )
Destruir()
Finaliza el juicio
.
La subrutina inyecta archivos dll y escribe los archivos requeridos por el método de entrada
Escribe archivos (tome un directorio específico (10) + "\Sougoo.ime", #Shurufa)
identificador del método de entrada = método de entrada. Instalación (obtener el directorio específico (10) + "\Sougoo.ime", "método de entrada HUHU")
Salida de depuración (identificador del método de entrada)
Escribir en un archivo (obtener el directorio específico (10) + "\DNF Star.dll", #Huhu Hang)
. if (identificador del método de entrada ≠ 0)
Método de entrada. Configure la inyección (tome el directorio específico (10) + "\Sougoo.ime", tome el directorio específico (10) + "\DNF Star.dll")
De lo contrario
. Marca transparente 1.title = "Falló la inyección del método de entrada...".
_Ventana de inicio. Destruir ()
.si final
. Activación del método de entrada de subrutina
Variable local bool, tipo lógico
bool = si el proceso existe ("DNF.exe")
. (bool)
Método de entrada. Activar (obtener identificador 2 ("DNF.exe", ), identificador del método de entrada)
Super retraso (1000,)
Reloj1. Terminar si es verdadero
. Evento Subroutine_clock1_cycle
Determinar el inicio (si el proceso existe ("DNF.exe"))
Predeterminado
__Start window_will_be_destroyed ()
<. p>.Juicio finalizado.Subrutina __Startup_Window_will_be_destroyed
Retraso (500)
Terminar proceso ("TXPlatform.exe")
Terminar proceso ("TenSafe.exe")
Eliminar archivo (directorio especificado (10) + "\DNF Star.dll")
Eliminar archivo (directorio especificado (10) )+" \Sougoo.ime")
Método de entrada. .Desinstalar(InputMethodHandle)
Retraso(1000)
Destruir()
.Versión 2
.Imagen Shurufa p>
.Foto Shurufa
.