Cómo crear una pantalla en SWI-Prolog con Lenguaje Prolog a Partir de la Consola.
Hola, ya te he traido las formas d ehacer una Ventana en SWI-Prolog con Lenguaje Prolog, pero no te he mostrado como hacerla a partir de la pantalla, en pocas palabras te enseñare como hacerlo, no es diferente a como ya lo hemos hecho.
Vamos a empezar abriendo el programa de SWI-Prolog.

Esta vez solo vamos a utilizar la consola.
Al igual que cuando creamos una ventana del editor utilizaremos las mismas instrucciones y atributos.
Empezaremos por un New para crear un nuevo objeto, abrimos un paréntesis ( y dentro el nombre de nuestro objeto Ventana en este caso: ponemos una coma , procedemos a iniciar la instrucción picture que va a dibujar nuestra ventana: abrimos paréntesis ( abrimos comilla simple ' y dentro el nombre de la ventana en mi caso Hola Mundo cerramos comilla ' cerramos paréntesis ) cerramos paréntesis ) y ponemos una coma , para continuar abajo.
Nuestra primera linea es
new(Ventana, picture ('Hola mundo')),
En la segunda linea iniciamos con la instrucción send para manipular objetos: abrimos parentesís ( dentro de ello el nombre del objeto en mi caso Ventana seguido de una coma , luego la instrucción display para imprimir en la pantalla: seguimos con una coma , despues la instrucción text para crear texto: abrimos paréntesis (: abrimos comilla simple ' y dentro el mensaje que se va a imprimir en mi caso Hola Mundo: cerramos comilla simple ' cerramos paréntesis ): ponemos una coma , a continuación la instrucción point para ubicar el texto en una determinado lugar: abrimos paréntesis ( coordenadas X en mi caso 20 ponemos una coma , coordena en Y en mi caso 20 : procedemos a cerrar paréntesis ) : volvemos a cerrar parentesis ) y finalizamos la linea con una coma , .
Nuestra segunda línea de código es:
send(Ventana, display, text('Hola Mundo'), point(20,20)),
Por último, en la última línea la instrucción send para manipular el objeto: abrimos parentesis ( , ponemos el nombre del objeto Ventana a continuación una coma , escribimos la instrucción open : cerramos paréntesis ) y por último el punto . para que la instrucción pueda ser ejecutada.
La última instrucción es:
send(Ventana, open).
Vamos a proceder a oprimir la tecla Enter, y nuestra ventana se visualizará como la siguiente.
Aquí hay otro ejemplo cambiando el nombre de la ventana creada.
Código que se utilizó en la primera ventana.
new(Ventana, picture('Hola mundo')),
send(Ventana, display, text('Hola Mundo'), point(20,20)),
send(Ventana, open).
Código que se utilizó en la segunda ventana.
new(Ventana, picture('Ventana desde consola')),
send(Ventana, display, text('Hola Mundo'), point(20,20)),
send(Ventana, open).
No hay archivo que descargar, así que si te gusto el contenido puedes seguir viendo mis otras publicaciones.
Este ejercicio es sacado del libro XPCE/Prolog Course Notes de Jan Wielemaker .
Comentarios
Publicar un comentario