Volver menú revistas Fanzine
Número 1 - JULIO 1992
Página anterior


CURSO DE CODIGO MAQUINA AVANZADO PARA EL AMIGA
  Curso escrito y dirigido por:
                        SPANISH ARCHER / DARKNESS
  CAPITULO I:Una pequeña introducción.                     © S.A.1992

Habla Warlord: Hace unos días le propuse a este buen amigo, que hiciera un curso avanzado para el 68000. La idea le gustó, así que planificó la estructura que tendría este cursillo: Comandos del copper, utilización del blitter... Sin embargo, por razones de tiempo me ví obligado a pedirle que lo hiciera en tan sólo un par de horas (tenía que coger el tren y llevarme conmigo el artículo). Así que me reuní con él en su casa, y decidimos hacer de este capítulo una pequeña introducción, sobre lo que es la programación con el Amiga. Para ello tomamos una rutina que lo que hacía era simplemente inicializar la pantalla, aunque posteriormente, improvisando consiguió, sin muchos cambios, hacer que se viera "agüilla" en la pantalla. Esta rutina es la que aquí se comenta.

Pedimos perdón por los conceptos que no ha podido explicar, pero que ha prometido lo hará en posteriores números, iniciando así el cursillo de una forma más lógica y estructurada.

Para seguir este curso es indispensable haberse leido un libro sobre los comandos del 68000 (se recomienda el de Anaya),así como de disponer de otro de programación más avanzada como puede ser el AMIGA HARDWARE REFERENCE MANUAL disponible ya en Español (NORSOFT).

Seguramente habrá cosas que no entendáis, pero como ya os dije, esto es solo una pequeña introducción, y explicarlo todo lo que se utiliza aquí es difícil, pero no preocuparos que seguro que más adelante os enteraréis de todo y este programa os parecerá muy fácil.

Por último, queremos agradecerle su indispensable colaboración para con nuestra, (y vuestra) revista. ¡GRACIAS!


CAPITULO I: Una pequeña rutina (INTRODUCCION)

Bueno, vamos a empezar por lo basico de todo demo-adicto: COMO INICIALIZAR UNA PANTALLA (suena facil pero ...).

Como dije antes para este cursillo hacen falta ciertis conocimientos previos acerca del 68000 y algo del amiga, por ello no voy a explicar todo con absoluto detalle, sino que voy a ir a lo mas importante.

A lo nuestro:

En primer lugar hay que reservar la memoria para la pantalla, esto depende de que pantalla quieras inicializar. La formula para ello es:

(ANCHO/8)*ALTO*no de BIT PLANOS.

En nuestro caso vamos a inicializar una pantalla de 4 Bit-planos (16 colores) en baja resolucion sin entrelazar, con unas dimensiones de 320*256 (PAL), por lo tanto el nº. de bytes a inicializar seran

(320/8)*256*4=45960.

¿Como se le dice al sistema que quieres memoria?. Fácil, el sistema provee una serie de rutinas contenidas en las famosas librerias que sirven para el control de la memoria. En nuestro caso las rutinas necesarias estan en la libreria principal la EXEC.LIBRARY.

Para acceder a una rutina de libreria hay que:

- Abrir la libreria (Expcepto la EXEC.LIBRARY que siempre esta abierta).
- Poner la base de la libreria (obtenida al abrirla) en A6
- Conocer el offset (salto indirecto) de la rutina deseada.
- Conocer e inicializar los parametros de la rutina.
- saltar a la subrutina con JSR-OFFSET(a6).

En este caso la base de la EXEC esta siempre apuntada en la direccion 4. Por lo tanto seria:

                 move.l 4,a6           ponemos la base de EXEC en A6
                 move.l #45960,d0      en d0 la cantidad de bytes a reservar
                 move.l #$10002,d1     (*)tipo de memoria
                 jsr    -$c6(a6)        salto a allocmem (offset=$c6)
                 move.l d0,bp0          d0 retorna la direccion de la memoria.

(*) tipos de memoria:
#$10002=Chip memory (accesibles por los coprocesadores)
#$10004=Fast Memory (no accesibles por los copro. pero de mas rapido acceso para el 68000)

Una vez que hemos reservado memoria para la pantalla hay que decirle al copper (coprocesador de refresco de pantalla, el cual lo veremos mucho más a fondo en otro articulo debido a su importancia) donde estan los Bit-planos.

Para ello hay que crear una lista copper. Una lista copper son una serie de instrucciones que contienen una cadena de comandos que solo entiende el copper y que permiten hacer muchas cosas al tener acceso a los registros del sistema. Esta vez vamos a hacer una lista copper hiper-básica ya que sólo va a refrescar los registros de los bit-planes. Para ello tenemos que meter la direccion de cada uno de los cuatro bit-planos en los registros del sistema para este proposito. Estos registros son de 16 bits.Por lo tanto hay dos registros para cada bit-planes. Estos son BPLxPTH y PBLxPTL (donde x es el no. de bit-plane ). Van del $0e0 y 0e2 para el bit-plano 0 al $0f4 y $0f6 para el bit-plano 5.(mirar aspecto de la lista copper al final del listado para tener una cierta referencia)

Como el copper tiene que acceder al su lista en la chip-mem hay reservar espacio para la lista-copper en chip-mem tal como hicimos antes:

                  move.l #listacopper,d1
                  move.l #listacopperfin,d0
                  sub.l  d1,d0                                
                  move.l d0,copperlong      halla la longitud en bytes de la
                  move.l #$10002,d1         lista copper
                  jsr    -$c6(a6)           allocmem con la cantidad de memo-
                  move.l d0,copperl         ria de la lista cooper

Una vez creada la lista copper hay que meterle las direcciones de los bit-planos en la lista copper para que los refresque. Asi:

                  move.l  bp0,d0
                  add.l   #10240,d0
                  move.l  d0,bp1
                  add.l   #10240,d0
                  move.l  d0,bp2
                  add.l   #10240,d0
                  move.l  d0,bp3
                  move.l  bp0,d0
                  move.w  d0,cbp05
                  swap    d0
                  move.w  d0,cbp0
                  move.l  bp1,d0
                  move.w  d0,cbp15
                  swap    d0
                  move.w  d0,cbp1
                  move.l  bp2,d0
                  move.w  d0,cbp25
                  swap    d0
                  move.w  d0,cbp2
                  move.l  bp3,d0
                  move.w  d0,cbp35
                  swap    d0
                  move.w  d0,cbp3

Ahora vamos a abrir la libreria GRAPHIC.LIBRARY para obtener posteriomente la direccion de la lista copper actual para no perder la pantalla del DOS.

                  movea.l  4,a6
                  lea      grafname,a1
                  clr.l    d0
                  jsr      -$198(a6)
                  move.l   d0,grafbase
           *************** copper y pantalla ***********************

Ahora, paso la nuestra lista-copper (que no sabemos si esta en chip o en fast mem) a la chip mem que reservamos anteriormente. Con un simple bucle basta:

                  movea.l   copperl,a0
                  lea       listacop,a1
                  move.l    copperlong,d2
      copb        move.b    (a1)+,(a0)+
                  subi      #1,d2
                  bne       copb

Ahora vamos a acceder directamente a ciertos registros del sistema, para ello hay que sumar $dff000 al numero de registro para obtener su direccion efectiva. P. Ej: Si queremos acceder al registro del color 0 ($180) con el 68000 seria $180+$dff000=$dff180. Asi primeramente desconectamos los canales DMA (otro dia sera la susodicha explicacion) con el registro DMACONW ($096)

                  move.w    #$01a0,$dff096

(ver apendices del (*) AMIGA HARDWARE MANUAL para los contenidos de cada bit de los registros).

Ahora le damos la direccion de la lista copper al registro oportuno, para que el copper sepa donde obtener la lista.

                  move.l   copperl,$dff080                                
                  clr.w    $dff088                  Activa el copper!!
                  move.w   #$3081,$dff08e  |
                  move.w   #$30c1,$dff090   \ tamño de la ventana (ver (*)AHM)
                  move.w   #$0038,$dff092   /
                  move.w   #$00d0,$dff094  |

Ahora vamos a decir el tipo de pantalla que vamos inicializar. Para este objetivo tenemos el registro BPLCON0 ($100), cuyos bits describo ahora:

                     BIT no.   NOMBRE                FUNCION
                     -----------------------------------------------
                       15      HIRES        ACTIVA LA ALTA RESOLUCION
                       14      BPU2         }
                       13      BPU1         } NO. DE BIT-PLANES
                       12      BPU0         }
                       11      HOMOD        ACTIVA MODO HAM
                       10      DBLPF        ACTIVA DUAL-PLAYFIELD
                                             (otro dia sera...)
                        9      COLOR        ACTIVA EL COLOR
                        8      GAUD         AUDIO PARA EL GENLOCK
                        7      ----         }
                        6      ----         }  NO USADOS
                        5      ----         }
                        4      ----         }
                        3      LPEN         PARA EL LAPIZ OPTICO
                        2      LACE         ACTIVA EL ENTRELAZADO
                        1      ERSY         PARA SINCRONIZAR CON FUENTE
                                               EXTERNA (GENLOCK...)
                        0      ----         NO USADO

Por lo tanto en nuestro ejemplo sera (no hi-res, %100 para el no de bit-planos, no HAM, no DUAL, color activo, sin entrelazar, etc...)

                     move.w                #%0100001000000000,$dff100 
                     clr.w   $dff102 |
                     clr.w   $dff104  \modulos de las pantallas
                     clr.w   $dff108  /(ver AHM)
                     clr.w   $dff10a |
                     move.w  #$87c0,$dff096     Activa canales DMA!!
                     move.w  #$000,$dff180     pone negro el color de fondo

y listo... ya tenemos una hermosa pantalla en negro con la que podemos hacer futuras maravillas.

                   ****************programa principal**************** 

Bueno, ahora vienen las chorradas de ultima hora para la utilizacion de la pantalla. Ahi va la mia:

                move.w    #$f00,$dff182
                move.w    #$0f0,$dff184   colores
                move.w    #$00f,$dff186
     bucle      move.w    #20480,d0
                move.l    bp0,a0
                move.l    4,a1
     aguilla    move.w    $dff006,d1   toma el valor de la pos del electron
                add.w     (a1)+,d1             (pseudoaleatoria)
                add.w     d1,(a0)+     pone en pantalla la parida.
                subi.w    #1,d0
                bne     aguilla
                btst.b    #6,$bfe001   comprueba el estado del boton izquierdo
                beq     salida         del ratón
                bra     bucle
                  ************** salida del programa ***************

Una vez que queremos salir de nuestro programa hemos de decirle al sistema que hemos dejado libre la memoria anteriomente ocupada por los bp y la lista-copper. Para ello estan las rutina freemem de la alloc.lib. Ademas tenemos que cerrar las librerias abiertas y inicializar la pantalla del DOS.

Ahi va:

   salida      move.l   grafbase,a4   tomo la base de graphics.library en a4
move.w #$0580,$dff096 Quito canales DMA

La base de la lista copper del DOS esta en la 38 después de la base de la graphics.l Asi, le digo al copper donde anda la lista copper del dos:

               move.l     38(a4),$dff080     
               clr.w     $dff088          Copper activo!
               move.w     #$83a0,$dff096  DMA activos!
               movea.l    4,a6            en a6, la base de EXEC.lib
               move.l     copperl,a1      a1=direccion de list.copper
               move.l     copperlong,d0   longitud del bloque a liberar
               jsr        -$d2(a6)        Freemem     (offset $d2)
               move.l     bp0,a1          a1=direccion de los bit-planos
               move.l     #45960,d0       longitud a liberar
               jsr        -$d2(a6)        Freemem de nuevo
               move.l     grafbase,a1     
               jsr        -$19e(a6)       Close library (offset= $19e)
               clr.l     d0
               rts                        retorna al DOS
                    ****** listas copper ************
    listacopper
    listacop               dc.w   $e0
    cbp0                   ds.w   1
                           dc.w   $e2
    cbp05                  ds.w   1
                           dc.w   $e4
    cbp1                   ds.w   1
                           dc.w   $e6
    cbp15                  ds.w   1
                           dc.w   $e8
    cbp2                   ds.w   1
                           dc.w   $ea
    cbp25                  ds.w   1
                           dc.w   $ec
    cbp3                   ds.w   1
                           dc.w   $ee
    cbp35                  ds.w   1
                           dc.w   $ffff,$fffe          
    listacopperfin     
                 ****** variables globales*************
      bp0                  ds.l   1
      bp1                  ds.l   1
      bp2                  ds.l   1
      bp3                  ds.l   1
      grafbase             ds.l   1
      copperl              ds.l   1
      copperlong           ds.l   1
      grafname             dc.b   'graphics.library',0
      end

Aquí termina esta primera lección.Espero que os haya sido de utilidad. En el próximo número..... MAS.


Página anterior