★ APPLICATIONS ★ CREATION MUSICAL ★ ORGANO ELECTRONICO ★ |
| Organo Electronico | Applications Creation Musical |
Con este programa convertirás tu AMSTRAD en un órgano electrónico. Podrás interpretar melodías directamente desde el teclado con o sin acompañamiento. Hay cinco acompañamientos distintos, que podrás seleccionar pulsando las teclas con los números correspondientes (1, 2, 3, 4, 5 ó f1, f2, f3, f4, f5). La velocidad del acompañamiento (tempo) se puede seleccionar también con los cursores. Asimismo, la velocidad de autorrepetición de las teclas está alterada. Para poder escribir al salir del programa, f0 tiene definida la velocidad normal, con lo que pulsando esta tecla más ENTER todo volverá a la normalidad. DESCRIPCION DEL PROGRAMA Inicialización: (20-120). Se define la velocidad de autorrepetición del teclado. Se introducen los valores de los periodos de las notas en una matriz. Se pregunta si se quiere acompañamiento o no y se salta a la rutina correspondiente, pasando antes por la subrutina de pantalla. Rutina de acompañamiento: (450-490). Se establecen los valores iniciales del acompañamiento. Se pone en marcha la subrutina de lectura del teclado por interruptores y melodía, y se salta al acompañamiento que corresponda según los datos suministrados por dicha rutina: la variable g contiene el número de acompañamiento, (*) y t la duración. Inicialmente, su valor es de 30. Este valor se toma como base en una escala de 0 a 60, escala que se obtiene restando a 60 el valor t. De estar forma, con el valor de 60, el tempo alcanza su valor más rápido, y viceversa para el 0. Lectura del teclado: (130-420). Esta rutina es llamada mediante interrupciones por la rutina de acompañamiento. Se divide en la de lectura del teclado en sí y la de melodía. La primera consiste en una lista de sentencias if que comprueban las teclas del órgano una por una y le asigna a la variable S un valor que se corresponde con el valor del periodo de la nota en la matriz p (). Nótese que todas las sentencias if se podían haber sustituido por una sola sentencia del tipo: s= 1*(¡$«= "A") + Z* (i$ = "W") + ...Sin embargo, estas sentencias son más rápidas de teclear mediante el AUTO y el COPY, ya que lo único que varía de una sentencia a otra es la letra de la tecla y el valor S.La sentencia "¡f" correspondiente a la lectura del número del acompañamiento se asegura de que i$ es una de las teclas del 1-5, antes de cambiar el valor a g (que era la variable que indicaba el número del acompañamiento). Esto se hace con objeto de que con sólo pulsar una de las cinco teclas, el acompañamiento cambie (de otra forma, al ir tocando la melodía, para cambiar de acompañamiento tendríamos que mantener la tecla de acompañamiento correspondiente pulsada hasta que terminase la comprobación de todas las teclas, sino g quedaría con el último valor chequeado). La sentencia 360 evita que al intentar averiguar el código ascll de la cadena"" (vacío) cuando no se esté pulsando ninguna tecla, en la 370, el ordenador nos de mensaje de error. Como se ve, el método seguido para que no suenen las notas cuando no se estén pulsando las teclas es el de poner el volumen a 0. Así, la nota se seguirá tocando pero no podremos oiría. La otra subrutina, SONIDO (410-420), lo único que hace es tocar la nota con los datos de periodo (s) y volumen (v). Se le da una duración muy pequeña para que las notas no se almacenen en la cola de sonido, retardando así la respuesta al teclado. (500-1380).— Aquí están las cinco subrutinas de los cinco acompañamientos distintos. Tienen ritmo de valls y están pensados para acompañar a una melodía que esté en DOM (ya que ésta tonalidad, al no tener semitonos, es la más fácil de interpretar). Combinando adecuadamente en cada subrutina de acompañamiento las diferentes notas que las componen, se podrán construir ritmos diferentes aumentando así el número de acompañamientos (por ejemplo: como se observará, cada rutina de acompañamiento se compone de una sound, un bucle de pausa, y dos pares de SOUND con su correspondiente bucle de espera. Si se elimina uno de estos pares con su bucle, se obtendrá un ritmo de marcha). Asimismo, con unos mínimos conocimientos de música se podría variar la tonalidad del acompañamiento cambiando únicamente las notas (periodos) de las sentencias sound. De esta forma, utilizando teclas numéricas que no se usan y la fila de debajo del teclado de la melodía (de la z a la }, podéis ampliar el número de acompañamientos hasta 23. Sin acompañamiento: (5000-5020). Activa las interrupciones y se queda en un bucle sin fin. Pantalla: Define una pantalla para representar un teclado de piano con las letras del teclado. Así, la letra A corresponde a la nota SOL, la tecla W a SOL1, etc. Obsérvese que en la fila a - ] están las notas naturales, y en la W [ las sostenidas o bemoles. Los que tengáis un ordenador AMSTRAD 6128 con teclado en castellano, tenéis que cambiar los ":" de éste listado por la tecla correspondiente.
|
