Lenguaje fácil para ejecutar otro software

Escrito hace mucho tiempo. Requiere un botón y un cuadro de edición.

Versión 2. Admite la biblioteca eAPI. Subrutina _button1_clicked. Disco de variable local, tipo de texto, "0". Disco variable local I, disco entero = buscar lista de unidades (# constantes de interfaz. Unidades de disco duro). Contar bucle primero (tomar miembro de la matriz (disco), I) Búsqueda de archivos (disco [I], a texto (cuadro de edición 1. contenido)). Fin del ciclo de conteo (). Búsqueda de archivos de subrutina. Contenido de la variable local, texto del directorio "\". Manejar evento () nombre de archivo local = buscar archivo (directorio "*. *", 39. Determine la primera posición del bucle (nombre de archivo local ≠""). ( Nombre del archivo del directorio, falso,) return (). Si es verdadero, finalice el nombre del archivo local = busque el archivo (, ) determine el subdirectorio () = busque el archivo (directorio "*. *", 16). encabezado de bucle (subdirectorio ≠"") si es verdadero (subdirectorio ≠".") y subdirectorio ≠"...") . subdirectorio) .determinar el final del bucle()

.subroutine_Button1_Clicked .variable local disco, tipo de texto, "0" .variable local I, entero

Ni siquiera puedes copiarlo correctamente

.