Tabla de contenido
WINDOW, lo primero que ponemos es el número del canal al que vamos a asignarla; recuerde
que podemos elegir cualquiera entre el 0 y el 7. Ahora bien, si tenemos en cuenta que todos los
textos que enviamos a la pantalla sin especificar número de canal circulan por el #0, no vamos a
dar este número a nuestra ventana. Elegimos, pues, el número 1. Los cuatro números que
vienen a continuación especifican el tamaño de la ventana. Su significado no podía ser más
sencillo: columna del borde izquierdo, columna del derecho, primera fila y última fila, por este
orden. En nuestro caso, después de especificar el canal #1, hemos dicho al ordenador que la
ventana empieza en la columna número 13 y termina en la número 30, en horizontal, y que
empieza en la fila 10 y termina en la 14, en vertical.
Para dirigir los textos del menú al canal #1 debemos editar las líneas 40 a 80:
40
PRINT
#1,"1. Introd. datos"
50
PRINT
#1,"2. Listado"
60
PRINT
#1,"3. Busqueda"
70
PRINT
#1,"4. Grabar datos"
80
PRINT
#1,"5. Cargar datos"
Añadamos también
85
LOCATE
7,20
para situar el texto de la línea 90.
Para borrar la pantalla cada vez que el programa retorne al menú, modifiquemos la línea 110:
110
GOTO
34
Además, para borrar la pantalla cada vez que se selecciona una opción del menú añadimos:
95
CLS
Finalmente, incluiremos las tres líneas siguientes para hacer que el retorno al menú sea
controlado por el usuario:
103
LOCATE
9,20
105
PRINT"Pulse una tecla para volver al menu"
107
IF
INKEY$=""
La línea 103 especifica dónde se debe escribir el mensaje de la línea 105. La línea 107 examina el
teclado para averiguar si se ha pulsado alguna tecla. Si no se ha pulsado ninguna, INKEYS genera
la cadena vacía y entonces se repite la ejecución de la línea hasta que efectivamente se pulse
alguna. Ésta es la forma habitual de programar la espera 'hasta que el usuario se decida', pues
BASIC no pasa a la línea siguiente mientras no se pulse una tecla.
Bueno, ya hemos terminado. O quizá no, porque podríamos incluir la posibilidad de modificar o
borrar nombres y números de teléfono, de ordenarlos alfabéticamente, de listarlos por la
impresora, etc. Todas estas mejoras son posibles; podríamos seguir mejorando y depurando el
programa indefinidamente, pero en algún momento tenemos que poner el punto y aparte, y éste
es tan bueno como cualquier otro. Le dejamos, pues, con este programa de 'guía de teléfonos',
confiando en haberle abierto las puertas del arte de programar. Adecente el programa con la
orden
RENUM
THEN
107
Manual de Amstrad CPC 6128 (revisión 2008) - Página 106
Tabla de contenido
