P?CURSO DE AMOSP8 Nota: Este curso lo he realizado guiándome con el que apareció en la revista inglesa CU AMIGA. Espero que este curso sirva de algo a la gente que empieza con el Amiga y no sabe programar. P?INTRODUCCIÓN AL AMOSP8 AMOS fue realizado para crear juegos, pero se puede utilizar para cualquier cosa. Está orientado hacia aquellas personas con pocos conocimientos de programación. AMOS está formado por dos lenguages, el AMOS BASIC y el AMAL (AMAL es el lenguaje de animación), aquí solo explicaré los comandos básicos de AMOS BASIC, para que los que empiecen con el Amiga, puedan realizar programas sencillos, espero que alguien se anime, y explique algo sobre el AMAL. P?EMPECEMOSP8 A partir de ahora, se empezarán a ver instrucciones de AMOS, estas instrucciones, para poder diferenciarlas, aparecerán en mayúscula, y con un color diferente. También aparecerán signos (=,<,>) que significan lo siguiente: = ......... igual que ... < ......... menor que ... > ......... mayor que ... <> ........ diferente que ... <= ........ menor o igual que ... >= ........ mayor o igual que ... En el caso de las variables, el signo = se utiliza para asignar un valor a una variable. P?VARIABLESP8 Las variables sirven para almacenar una información que se utilizará durante el programa, (p.e.: para guardar la máxima puntuación en un juego, o el nombre de un jugador en un simulador, etc), en las variables se puede almacenar caracteres, strings (cadenas de caracters), numeros enteros y reales... Las variables pueden tener más de una dimensión. La forma de poder asignar un valor a una variable es: Para asignar un string: nombre$="Xavi Tolentino" ^ Para asignar un valor entero: numero=128 Para asignar un valor real: nreal#=0.12847 ^ Lo que está marcado con ^ debe aparecer siempre al final. ejemplo: r$="FANZINE" P9PRINTP8 "La mejor revista es ";r$ aparecería lo siguiente: La mejor revista es FANZINE Ahora empezaremos ya en serio con el AMOS. P?BUCLESP8 Hay cuatro bucles diferentes, los voy a dividir en 2 grupos (con condición, sin condición). P?BUCLES SIN CONDICIÓNP8 P9FORP8 .... P9NEXTP8 Imaginemos que queremos escribir 10 veces "El Amiga es el mejor", si no existiesen los bucles, deberíamos poner 10 veces P9PRINTP8 "El amiga...", y esto cansa, pero gracias al bucle FOR, solo tenemos que escribir 3 lineas: P9FORP8 variable=1 P9TOP8 10 P9PRINTP8 "El Amiga es el mejor" P9NEXTP8 variable Analicemos lo que haría este pequeño programa. Primero se le dice al ordenador que tomará un valor de 1 a 10, en la segunda línea, se escribe por pantalla lo que haya entere "", y el P9NEXTP8, lo que hace es que variable tome el siguiente valor. Si quieres que la variable aumente de 2 en 2, deberías añadir al final de la primera linea, P9STEPP8 n, donde n debe ser el número que queremos que aumente. En nuestro caso, para que auemente de 2 en 2, pondríamos P9STEPP8 2. P9DOP8 .... P9LOOPP8 Este bucle és un bucle infinito, o sea, que se repite siempre, por ejemplo, si queremos hacer una demo y que cuando termine vuelva a empezar, se podría utilizar este tipo de bucle. Se utiliza así: P9DOP8 instrucciones..... P9LOOPP8 P?BUCLES CON CONDICIÓNP8 Este tipo de bucles, solamente se ejecutan si se cumple la condición que tienen asignada. Tenemos dos bucles con condición: P9WHILEP8 .... P9WENDP8 Los bucles P9WHILEP8, solo se ejecutan si la condición se cumple. En estos bucles, se evalua la condición, al principio, si la condición no se cumple, se salta el bucle y continua con lo que haya después del bucle. numero=0 P9WHILEP8 numero<10 P9PRINTP8 "HOLA" numero=numero+1 P9WENDP8 Primero inicializamos el valor de la variable 'numero' a 0, después, se pone la condición, en este caso, si el valor de 'numero' es menor de 10 se saca por pantalla HOLA, seguidamente, se añade 1 a la variable. Lo que hay dentro del bucle, se irá ejecutando hasta que 'numero' tome el valor 10. P9REPEATP8 .... P9UNTILP8 Lo que diferencia a los bucles P9REPEATP8 de los P9WHILEP8, es que en los P9WHILEP8, examina la condición antes de entrar en el bucle, y en los P9REPEAT, se evalua la condición después de haber entrado una vez. Por lo tanto, en los bucles P9WHILEP8, si no se cumple la condición, no se ejecuta, en cambio, en los P9REPEATP8, se ejecuta como mínimo una vez. P9REPEAT PRINTP9 " FANZINE " P9UNTIL MOUSEKEYP8 Este listado, escribirá la palabra ' FANZINE ', hasta que se pulse el botón del ratón. Lógicamente, la instrucción P9MOUSEKEYP8, examina si se pulsa el ratón. Ahora que hemos acabado la parte de los bucles, empezaremos a ver instrucciones. P9IFP8 ... P9THENP8 ... P9ELSEP8 Esta instrucción ejecuta las instrucciones que le siguen, si se cumple la condición que lleva. Se entenderá mejor con un ejemplo: a=false va=P9RNDP8(9)+1 P9REPEATP8 P9CLS PRINTP8 "Pon un nº del 1 al 10" P9INPUTP8 nu P9IFP8 nu=va P9THEN PRINTP8 "Bien": a=true P9IFP8 nu<>va P9THEN PRINTP8 "MAL" P9WAITKEY UNTILP8 a Examinemos el listado. Asignamos a la variable a el valor false (en este caso, vemos las variables booleanas, que solo toman el valor true o false), la instrucción P9RNDP8, coge un valor al azar, de 0 a 9 en este caso, y le suma 1 (para obtener un valor entre 1 y 10). Se entra en un bucle P9REPEATP8, que ya hemos visto como funciona. Lo primero que encontramos en el bucle es la instrucción P9CLSP8, ésta borra la pantalla, después viene el P9PRINTP8, que saca lo que tiene entre "" por pantalla. P9INPUTP8 sirve para leer un valor desde teclado, lo que escribas se queda en nu. Ya por fin vemos dos instrucciones P9IFP8, la primera compara nu con va, si son iguales, saca por pantalla Bien, y asigna el valor true a la variable a. El segundo P9IFP8 mira si son diferentes nu y va, si es así, escribe MAL y no sale del bucle. P9WAITKEYP8 espera la pulsación de una tecla. Y finalmente está el P9UNTILP8. Ahora os preguntaréis, ¿por qué no se pone P9UNTILP8 a=true?, pues la respuesta es muy fácil, al ser un valor booleano, solo puede tomar los valores true o false (verdadero o falso), y al poner P9UNTILP8 a, el ordenador entiende que a es verdadero (es lo mismo que decir hasta que sea cierto). Para parar la ejecución del bucle en caso de ser a=false, solo haría falta poner P9UNTILP8 NOT a. Pero el listado anterior, también se podría haber puesto así: a=false va=P9RNDP8(9)+1 P9REPEAT CLS PRINTP8 "Pon un nº del 1 al 10" P9INPUTP8 nu P9IFP8 nu=va P9THENP8 a=true P9ELSE PRINTP8 "MAL" <<<< a continuación del P9PRINTP8 P9WAITKEY UNTILP8 a P9PRINTP8 "Bien" P9WAITKEYP8 P9ELSEP8 solo se ejecuta si no se cumple la condición nu=va. P9PRINTP8 Esta instrucción ya la hemos visto antes, pero la voy a explicar por si hay alguien despistado. P9PRINTP8 saca por pantalla un valor, ya sea un string o un número. Hay dos formas de sacar un número, como caracter o como entero. Como caracter se haría así: P9PRINTP8 "1242875" Pero como entero... P9PRINTP8 12 y saldría por pantalla 12. Un programa para ver un ejemplo de lo que sirve sacar un entero con P9PRINTP8: P9DO CLSP8 0 P9PRINTP8 "Pon un valor" P9INPUTP8 num1 P9PRINTP8 "Pon otro valor" P9INPUTP8 num2 P9CLSP8 0 res=num1*num2 P9PRINTP8 num1;"*";num2;"=";res P9WAITKEY LOOPP8 Es un programa un poco chorra, pero nos sirve de ejemplo. P9CLSP8 0, borra la pantalla y la pone con el color correspondiente a la posición 0 de la paleta por defecto del AMOS o la que hayamos definido. La forma de definir una paleta la veremos más adelante. P9LOCATEP8 x,y Coloca el contenido de P9PRINTP8 en una zona de la pantalla, esta zona será la que definimos nosotros. P9LOCATEP8 10,10 : P9PRINTP8 "HOLA" Nos escribiría la palabra HOLA a partir de la posición 10,10. P9CENTREP8 Esta instrucción es para facilitar el centrado de un texto en pantalla. Si lo quisieras hacer con un P9LOCATEP8, tendrías que ir probando hasta que quedase centrado, pero con la instrucción P9CENTREP8 la cosa es más fácil: P9LOCATEP8 1,10:P9CENTREP8 "FANZINE" Primero especificamos con el P9LCOATEP8, la fila en donde queremos que aparezca la palabra FANZINE, después con P9CENTREP8 centramos la palabra. Bien, con las instrucciones que se han visto hasta ahora, deberíais intentar hacer un programa que os pregunte sumas al azar, si se acierta, una variable deberá aumentar en 1 el núemro de aciertos, pero si no se acierta, a la variable se le restará 1. En todo momento, deberá aparecer la puntuación en pantalla. Quizá este programa sea un poco estúpido, pero si no lo quereis intentar, no vale la pena que aprendáis a programar. Bueno, hasta el próximo número de B>P9FANZINEB0P8. Si tenéis algún problema con el programa de sumas, no dudéis en preguntármelo. Podéis escribir a: P? B; B0 B; XAVI TOLENTINO B0 B; Plaça Cirera Voltà, 5 B0 B; 08120 - LA LLAGOSTA B0 B; (BARCELONA) B0 B; B0P8