Programación de Sistemas Expertos con Visual Prolog 7.4

Visual Prolog 7.4
Julio Luis Tenorio Cabrera

Visual Prolog 7.4

NOTAS PRELIMINARES


El presente texto, pretende proporcionar al lector una visión práctica de la programación en el lenguaje
declarativo Visual Prolog 7.4, mediante el desarrollo de una aplicación experta básica y dar así un
panorama del paradigma de programación lógica.



Se esperaría que por parte del lectorsiga profundizando la investigación de la programación en este
lenguaje y así también contribuir a enriquecer y fortalecer el uso de este lenguaje en el desarrollo de
aplicaciones expertas reales.
Julio Luis Tenorio Cabrera

Luis Tenorio

Página 1

Visual Prolog 7.4

DESARROLLO DE LA APLICACIÓN EXPERTA “NEUROLÓGICO”


Ingresar al Visual Prolog y seleccionar la opción Project y luegola opción New con lo cual aparecerá una
interfaz en la que se escribirá el nombre del proyecto, en este caso: NEUROLOGICO.



Luego Visual Prolog ejecutará automáticamente el proceso de compilación y linkeado con lo que se genera
la aplicación por defecto. Luego para ejecutar la aplicación se seleccióna la opción Execute y como
resultado se tiene la interfaz de la aplicación.



Eneste punto es importante indicar que dentro de la carpeta TaskWindow se encuentran un conjunto de
archivos y una carpeta Toolbars que luego se trabajarán, siendo por ahora de interés el archivo
TaskWindow.win mediante el cual, con el botón derecho del mouse y la opción Attributes, podemos
modificar los atributos de la ventana raíz, es decir, TaskWindow, por ejemplo el nuevo título de la ventanaserá “SISTEMA EXPERTO EN NEUROLOGÍA” y se activa la opción Maximized y luego seleccionar
el botón Ok. Si se ejecuta nuevamente la aplicación se verán los cambios.



Es de interés ahora el archivo TaskMenu.mnu, mediante el cual se puede modificar las opciones que por
defecto implementa Visual Prolog. Entonces se eliminará todas las opciones menos File y dentro de esta
opción se eliminarátodas las subopciones menos New y Exit.



Las opciones no eliminadas se renombrarán de la siguiente manera: File = Consulta, New = Nueva, Exit =
Salir. La opción Nueva deben de habilitarse ya que por defecto está deshabilitada.



En este punto se debe ejecutar nuevamente la aplicación mediante la opción Build y luego Build con lo
que se observa la advertencia que no es usado elpredicado onHelpAbout. Esto significa que hay un
código asociado a las opciones eliminadas que está demás en el archivo TaskWindow.pro, de donde
debemos eliminar a dicho código. Para ir al archivo TaskWindow.pro, se hace doble click en el mensaje
de advertencia.

Luis Tenorio

Página 2

Visual Prolog 7.4



El código a eliminar es el siguiente:
predicates
onHelpAbout :window::menuItemListener.
clauses
onHelpAbout(TaskWin, _MenuTag):_AboutDialog = aboutDialog::display(TaskWin).



Luego en el mismo archivo, se debe modificar en el siguiente código, el valor true por false, para así
eliminar la opción Window la que no se elimina en modo diseño. El código a modificar es:
constants
mdiProperty : boolean = true.



También en el mismo archivo se recomienda modificar laaparición de la ventana de mensajes cuando se
ejecuta la aplicación experta. Para lograr esto se debe modificar el siguiente código:
predicates
onShow : window::showListener.
clauses
onShow(_, _CreationData):_MessageForm = messageForm::display(This).

de la siguiente manera:
predicates
onShow : window::showListener.
clauses
onShow(_, _CreationData).
%_MessageForm =messageForm::display(This).



A estas alturas al ejecutar la aplicación debería aparecer la siguiente interfaz:

Luis Tenorio

Página 3

Visual Prolog 7.4



El paso siguiente es enviar al usuario un mensaje que explique la finalidad de la aplicación, pero este
mensaje debe aparecer automáticamente luego que se muestra la interfaz del punto anterior. Para esto
haciendo click con el botón...