Renamed Atari drivers.

As a preparation for the introduction of the 'atarixl' target it is necessary that all drivers have a base name... - no longer than 7 characters - with a common prefix
2013-05-28 21:20:37 +02:00
parent bb37f2e9c8
commit 2e8a65bda4
19 changed files with 23 additions and 23 deletions
--- a/libsrc/atari/tgi/atr11.s
+++ b/libsrc/atari/tgi/atr11.s
@@ -0,0 +1,71 @@
+;
+; Graphics driver for the 80x192x16h (CIO mode 11, ANTIC mode F, GTIA mode $C0) on the Atari.
+;
+; Fatih Aygun (2009)
+;
+
+        .include        "atari.inc"
+        .include        "zeropage.inc"
+
+        .include        "tgi-kernel.inc"
+        .include        "tgi-error.inc"
+
+        .macpack        generic
+
+; ******************************************************************************
+
+        ; ----------------------------------------------------------------------
+        ;
+        ; Constants and tables
+        ;
+        ; ----------------------------------------------------------------------
+
+; Graphics mode
+        grmode = 11
+; X resolution
+        x_res = 80
+; Y resolution
+        y_res = 192
+; Number of colors
+        colors = 16
+; Pixels per byte
+        ppb = 2
+; Screen memory size in bytes
+        scrsize = x_res * y_res / ppb
+; Pixel aspect ratio
+        aspect = $0330                          ; based on 4/3 display
+; Free memory needed
+        mem_needed = 7147
+; Number of screen pages
+        pages = 1
+
+.rodata
+        mask_table:                             ; Mask table to set pixels
+                .byte   %11110000, %00001111
+        masks:                                  ; Color masks
+                .byte   $00, $11, $22, $33, $44, $55, $66, $77, $88, $99, $aa, $bb, $cc, $dd, $ee, $ff
+        bar_table:                              ; Mask table for BAR
+                .byte   %11111111, %00001111, %00000000
+        default_palette:
+                .byte   $00, $10, $20, $30, $40, $50, $60, $70, $80, $90, $A0, $B0, $C0, $D0, $E0, $F0
+
+.code
+
+; ******************************************************************************
+
+.proc SETPALETTE
+
+        ; ----------------------------------------------------------------------
+        ;
+        ; SETPALETTE: Set the palette (in ptr1)
+        ;
+        ; ----------------------------------------------------------------------
+
+.code
+        ; No palettes
+        lda     #TGI_ERR_INV_FUNC
+        sta     error
+        rts
+.endproc
+
+.include "atari_tgi_common.inc"