bslathi19/cc65
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

Removed (pretty inconsistently used) tab chars from source code base.

Browse Source
This commit is contained in:
Oliver Schmidt
2013-05-09 13:56:54 +02:00
parent 44fd1082ae
commit 85885001b1
1773 changed files with 62864 additions and 62868 deletions
Download Patch File Download Diff File Expand all files Collapse all files

80
libsrc/atari/tgi/atari10.s
View File

@@ -4,50 +4,50 @@
; Fatih Aygun (2009)
;
.include "atari.inc"
.include "zeropage.inc"
.include "atari.inc"
.include "zeropage.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.macpack generic
.macpack generic
; ******************************************************************************
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; Graphics mode
grmode = 10
grmode = 10
; X resolution
x_res = 80
x_res = 80
; Y resolution
y_res = 192
y_res = 192
; Number of colors
colors = 9
colors = 9
; Pixels per byte
ppb = 2
ppb = 2
; Screen memory size in bytes
scrsize = x_res * y_res / ppb
scrsize = x_res * y_res / ppb
; Pixel aspect ratio
aspect = $0330 ; based on 4/3 display
aspect = $0330 ; based on 4/3 display
; Free memory needed
mem_needed = 7147
mem_needed = 7147
; Number of screen pages
pages = 1
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
bar_table: ; Mask table for BAR
.byte %11111111, %00001111, %00000000
default_palette:
.byte $00, $0E, $32, $96, $68, $C4, $74, $EE, $4A
mask_table: ; Mask table to set pixels
.byte %11110000, %00001111
masks: ; Color masks
.byte $00, $11, $22, $33, $44, $55, $66, $77, $88
bar_table: ; Mask table for BAR
.byte %11111111, %00001111, %00000000
default_palette:
.byte $00, $0E, $32, $96, $68, $C4, $74, $EE, $4A
.code
@@ -55,22 +55,22 @@
.proc SETPALETTE
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
.code
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
sta PCOLR0,y
dey
bpl loop
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
sta PCOLR0,y
dey
bpl loop
; Done, reset the error code
; Done, reset the error code
lda #TGI_ERR_OK
sta error
rts

66
libsrc/atari/tgi/atari11.s
View File

@@ -4,50 +4,50 @@
; Fatih Aygun (2009)
;
.include "atari.inc"
.include "zeropage.inc"
.include "atari.inc"
.include "zeropage.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.macpack generic
.macpack generic
; ******************************************************************************
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; Graphics mode
grmode = 11
grmode = 11
; X resolution
x_res = 80
x_res = 80
; Y resolution
y_res = 192
y_res = 192
; Number of colors
colors = 16
colors = 16
; Pixels per byte
ppb = 2
ppb = 2
; Screen memory size in bytes
scrsize = x_res * y_res / ppb
scrsize = x_res * y_res / ppb
; Pixel aspect ratio
aspect = $0330 ; based on 4/3 display
aspect = $0330 ; based on 4/3 display
; Free memory needed
mem_needed = 7147
mem_needed = 7147
; Number of screen pages
pages = 1
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
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
@@ -55,14 +55,14 @@
.proc SETPALETTE
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
.code
; No palettes
; No palettes
lda #TGI_ERR_INV_FUNC
sta error
rts

88
libsrc/atari/tgi/atari14.s
View File

@@ -4,50 +4,50 @@
; Fatih Aygun (2009)
;
.include "atari.inc"
.include "zeropage.inc"
.include "atari.inc"
.include "zeropage.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.macpack generic
.macpack generic
; ******************************************************************************
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; Graphics mode
grmode = 14
grmode = 14
; X resolution
x_res = 160
x_res = 160
; Y resolution
y_res = 192
y_res = 192
; Number of colors
colors = 2
colors = 2
; Pixels per byte
ppb = 8
ppb = 8
; Screen memory size in bytes
scrsize = x_res * y_res / ppb
scrsize = x_res * y_res / ppb
; Pixel aspect ratio
aspect = $0198 ; based on 4/3 display
aspect = $0198 ; based on 4/3 display
; Free memory needed
mem_needed = 3305
mem_needed = 3305
; Number of screen pages
pages = 1
pages = 1
.rodata
mask_table: ; Mask table to set pixels
.byte %10000000, %01000000, %00100000, %00010000, %00001000, %00000100, %00000010, %00000001
masks: ; Color masks
.byte %00000000, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %01111111, %00111111, %00011111, %00001111, %00000111, %00000011, %00000001, %00000000
default_palette:
.byte $00, $0E
mask_table: ; Mask table to set pixels
.byte %10000000, %01000000, %00100000, %00010000, %00001000, %00000100, %00000010, %00000001
masks: ; Color masks
.byte %00000000, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %01111111, %00111111, %00011111, %00001111, %00000111, %00000011, %00000001, %00000000
default_palette:
.byte $00, $0E
.code
@@ -55,27 +55,27 @@
.proc SETPALETTE
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
.code
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Get the color entries from the palette
lda palette
sta COLOR4
lda palette + 1
sta COLOR0
; Get the color entries from the palette
lda palette
sta COLOR4
lda palette + 1
sta COLOR0
; Done, reset the error code
; Done, reset the error code
lda #TGI_ERR_OK
sta error
rts

96
libsrc/atari/tgi/atari15.s
View File

@@ -4,50 +4,50 @@
; Fatih Aygun (2009)
;
.include "atari.inc"
.include "zeropage.inc"
.include "atari.inc"
.include "zeropage.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.macpack generic
.macpack generic
; ******************************************************************************
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; Graphics mode
grmode = 15
grmode = 15
; X resolution
x_res = 160
x_res = 160
; Y resolution
y_res = 192
y_res = 192
; Number of colors
colors = 4
colors = 4
; Pixels per byte
ppb = 4
ppb = 4
; Screen memory size in bytes
scrsize = x_res * y_res / ppb
scrsize = x_res * y_res / ppb
; Pixel aspect ratio
aspect = $0198 ; based on 4/3 display
aspect = $0198 ; based on 4/3 display
; Free memory needed
mem_needed = 7147
mem_needed = 7147
; Number of screen pages
pages = 1
pages = 1
.rodata
mask_table: ; Mask table to set pixels
.byte %11000000, %00110000, %00001100, %00000011
masks: ; Color masks
.byte %00000000, %01010101, %10101010, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %00111111, %00001111, %00000011, %00000000
default_palette:
.byte $00, $0E, $32, $96
mask_table: ; Mask table to set pixels
.byte %11000000, %00110000, %00001100, %00000011
masks: ; Color masks
.byte %00000000, %01010101, %10101010, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %00111111, %00001111, %00000011, %00000000
default_palette:
.byte $00, $0E, $32, $96
.code
@@ -55,31 +55,31 @@
.proc SETPALETTE
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
.code
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Get the color entries from the palette
lda palette
sta COLOR4
lda palette + 1
sta COLOR0
lda palette + 2
sta COLOR1
lda palette + 3
sta COLOR2
; Get the color entries from the palette
lda palette
sta COLOR4
lda palette + 1
sta COLOR0
lda palette + 2
sta COLOR1
lda palette + 3
sta COLOR2
; Done, reset the error code
; Done, reset the error code
lda #TGI_ERR_OK
sta error
rts

96
libsrc/atari/tgi/atari3.s
View File

@@ -4,50 +4,50 @@
; Fatih Aygun (2009)
;
.include "atari.inc"
.include "zeropage.inc"
.include "atari.inc"
.include "zeropage.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.macpack generic
.macpack generic
; ******************************************************************************
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; Graphics mode
grmode = 3
grmode = 3
; X resolution
x_res = 40
x_res = 40
; Y resolution
y_res = 24
y_res = 24
; Number of colors
colors = 4
colors = 4
; Pixels per byte
ppb = 4
ppb = 4
; Screen memory size in bytes
scrsize = x_res * y_res / ppb
scrsize = x_res * y_res / ppb
; Pixel aspect ratio
aspect = $00CC ; based on 4/3 display
aspect = $00CC ; based on 4/3 display
; Free memory needed
mem_needed = 1
mem_needed = 1
; Number of screen pages
pages = 1
pages = 1
.rodata
mask_table: ; Mask table to set pixels
.byte %11000000, %00110000, %00001100, %00000011
masks: ; Color masks
.byte %00000000, %01010101, %10101010, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %00111111, %00001111, %00000011, %00000000
default_palette:
.byte $00, $0E, $32, $96
mask_table: ; Mask table to set pixels
.byte %11000000, %00110000, %00001100, %00000011
masks: ; Color masks
.byte %00000000, %01010101, %10101010, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %00111111, %00001111, %00000011, %00000000
default_palette:
.byte $00, $0E, $32, $96
.code
@@ -55,31 +55,31 @@
.proc SETPALETTE
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
.code
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Get the color entries from the palette
lda palette
sta COLOR4
lda palette + 1
sta COLOR0
lda palette + 2
sta COLOR1
lda palette + 3
sta COLOR2
; Get the color entries from the palette
lda palette
sta COLOR4
lda palette + 1
sta COLOR0
lda palette + 2
sta COLOR1
lda palette + 3
sta COLOR2
; Done, reset the error code
; Done, reset the error code
lda #TGI_ERR_OK
sta error
rts

88
libsrc/atari/tgi/atari4.s
View File

@@ -4,50 +4,50 @@
; Fatih Aygun (2009)
;
.include "atari.inc"
.include "zeropage.inc"
.include "atari.inc"
.include "zeropage.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.macpack generic
.macpack generic
; ******************************************************************************
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; Graphics mode
grmode = 4
grmode = 4
; X resolution
x_res = 80
x_res = 80
; Y resolution
y_res = 48
y_res = 48
; Number of colors
colors = 2
colors = 2
; Pixels per byte
ppb = 8
ppb = 8
; Screen memory size in bytes
scrsize = x_res * y_res / ppb
scrsize = x_res * y_res / ppb
; Pixel aspect ratio
aspect = $00CC ; based on 4/3 display
aspect = $00CC ; based on 4/3 display
; Free memory needed
mem_needed = 1
mem_needed = 1
; Number of screen pages
pages = 1
pages = 1
.rodata
mask_table: ; Mask table to set pixels
.byte %10000000, %01000000, %00100000, %00010000, %00001000, %00000100, %00000010, %00000001
masks: ; Color masks
.byte %00000000, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %01111111, %00111111, %00011111, %00001111, %00000111, %00000011, %00000001, %00000000
default_palette:
.byte $00, $0E
mask_table: ; Mask table to set pixels
.byte %10000000, %01000000, %00100000, %00010000, %00001000, %00000100, %00000010, %00000001
masks: ; Color masks
.byte %00000000, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %01111111, %00111111, %00011111, %00001111, %00000111, %00000011, %00000001, %00000000
default_palette:
.byte $00, $0E
.code
@@ -55,27 +55,27 @@
.proc SETPALETTE
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
.code
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Get the color entries from the palette
lda palette
sta COLOR4
lda palette + 1
sta COLOR0
; Get the color entries from the palette
lda palette
sta COLOR4
lda palette + 1
sta COLOR0
; Done, reset the error code
; Done, reset the error code
lda #TGI_ERR_OK
sta error
rts

96
libsrc/atari/tgi/atari5.s
View File

@@ -4,50 +4,50 @@
; Fatih Aygun (2009)
;
.include "atari.inc"
.include "zeropage.inc"
.include "atari.inc"
.include "zeropage.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.macpack generic
.macpack generic
; ******************************************************************************
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; Graphics mode
grmode = 5
grmode = 5
; X resolution
x_res = 80
x_res = 80
; Y resolution
y_res = 48
y_res = 48
; Number of colors
colors = 4
colors = 4
; Pixels per byte
ppb = 4
ppb = 4
; Screen memory size in bytes
scrsize = x_res * y_res / ppb
scrsize = x_res * y_res / ppb
; Pixel aspect ratio
aspect = $00CC ; based on 4/3 display
aspect = $00CC ; based on 4/3 display
; Free memory needed
mem_needed = 185
mem_needed = 185
; Number of screen pages
pages = 1
pages = 1
.rodata
mask_table: ; Mask table to set pixels
.byte %11000000, %00110000, %00001100, %00000011
masks: ; Color masks
.byte %00000000, %01010101, %10101010, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %00111111, %00001111, %00000011, %00000000
default_palette:
.byte $00, $0E, $32, $96
mask_table: ; Mask table to set pixels
.byte %11000000, %00110000, %00001100, %00000011
masks: ; Color masks
.byte %00000000, %01010101, %10101010, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %00111111, %00001111, %00000011, %00000000
default_palette:
.byte $00, $0E, $32, $96
.code
@@ -55,31 +55,31 @@
.proc SETPALETTE
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
.code
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Get the color entries from the palette
lda palette
sta COLOR4
lda palette + 1
sta COLOR0
lda palette + 2
sta COLOR1
lda palette + 3
sta COLOR2
; Get the color entries from the palette
lda palette
sta COLOR4
lda palette + 1
sta COLOR0
lda palette + 2
sta COLOR1
lda palette + 3
sta COLOR2
; Done, reset the error code
; Done, reset the error code
lda #TGI_ERR_OK
sta error
rts

88
libsrc/atari/tgi/atari6.s
View File

@@ -4,50 +4,50 @@
; Fatih Aygun (2009)
;
.include "atari.inc"
.include "zeropage.inc"
.include "atari.inc"
.include "zeropage.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.macpack generic
.macpack generic
; ******************************************************************************
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; Graphics mode
grmode = 6
grmode = 6
; X resolution
x_res = 160
x_res = 160
; Y resolution
y_res = 96
y_res = 96
; Number of colors
colors = 2
colors = 2
; Pixels per byte
ppb = 8
ppb = 8
; Screen memory size in bytes
scrsize = x_res * y_res / ppb
scrsize = x_res * y_res / ppb
; Pixel aspect ratio
aspect = $00CC ; based on 4/3 display
aspect = $00CC ; based on 4/3 display
; Free memory needed
mem_needed = 1193
mem_needed = 1193
; Number of screen pages
pages = 1
pages = 1
.rodata
mask_table: ; Mask table to set pixels
.byte %10000000, %01000000, %00100000, %00010000, %00001000, %00000100, %00000010, %00000001
masks: ; Color masks
.byte %00000000, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %01111111, %00111111, %00011111, %00001111, %00000111, %00000011, %00000001, %00000000
default_palette:
.byte $00, $0E
mask_table: ; Mask table to set pixels
.byte %10000000, %01000000, %00100000, %00010000, %00001000, %00000100, %00000010, %00000001
masks: ; Color masks
.byte %00000000, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %01111111, %00111111, %00011111, %00001111, %00000111, %00000011, %00000001, %00000000
default_palette:
.byte $00, $0E
.code
@@ -55,27 +55,27 @@
.proc SETPALETTE
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
.code
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Get the color entries from the palette
lda palette
sta COLOR4
lda palette + 1
sta COLOR0
; Get the color entries from the palette
lda palette
sta COLOR4
lda palette + 1
sta COLOR0
; Done, reset the error code
; Done, reset the error code
lda #TGI_ERR_OK
sta error
rts

96
libsrc/atari/tgi/atari7.s
View File

@@ -4,50 +4,50 @@
; Fatih Aygun (2009)
;
.include "atari.inc"
.include "zeropage.inc"
.include "atari.inc"
.include "zeropage.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.macpack generic
.macpack generic
; ******************************************************************************
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; Graphics mode
grmode = 7
grmode = 7
; X resolution
x_res = 160
x_res = 160
; Y resolution
y_res = 96
y_res = 96
; Number of colors
colors = 4
colors = 4
; Pixels per byte
ppb = 4
ppb = 4
; Screen memory size in bytes
scrsize = x_res * y_res / ppb
scrsize = x_res * y_res / ppb
; Pixel aspect ratio
aspect = $00CC ; based on 4/3 display
aspect = $00CC ; based on 4/3 display
; Free memory needed
mem_needed = 3209
mem_needed = 3209
; Number of screen pages
pages = 1
pages = 1
.rodata
mask_table: ; Mask table to set pixels
.byte %11000000, %00110000, %00001100, %00000011
masks: ; Color masks
.byte %00000000, %01010101, %10101010, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %00111111, %00001111, %00000011, %00000000
default_palette:
.byte $00, $0E, $32, $96
mask_table: ; Mask table to set pixels
.byte %11000000, %00110000, %00001100, %00000011
masks: ; Color masks
.byte %00000000, %01010101, %10101010, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %00111111, %00001111, %00000011, %00000000
default_palette:
.byte $00, $0E, $32, $96
.code
@@ -55,31 +55,31 @@
.proc SETPALETTE
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
.code
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Get the color entries from the palette
lda palette
sta COLOR4
lda palette + 1
sta COLOR0
lda palette + 2
sta COLOR1
lda palette + 3
sta COLOR2
; Get the color entries from the palette
lda palette
sta COLOR4
lda palette + 1
sta COLOR0
lda palette + 2
sta COLOR1
lda palette + 3
sta COLOR2
; Done, reset the error code
; Done, reset the error code
lda #TGI_ERR_OK
sta error
rts

88
libsrc/atari/tgi/atari8.s
View File

@@ -4,77 +4,77 @@
; Fatih Aygun (2009)
;
.include "atari.inc"
.include "zeropage.inc"
.include "atari.inc"
.include "zeropage.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.macpack generic
.macpack generic
; ******************************************************************************
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; Graphics mode
grmode = 8
grmode = 8
; X resolution
x_res = 320
x_res = 320
; Y resolution
y_res = 192
y_res = 192
; Number of colors
colors = 2
colors = 2
; Pixels per byte
ppb = 8
ppb = 8
; Screen memory size in bytes
scrsize = x_res * y_res / ppb
scrsize = x_res * y_res / ppb
; Pixel aspect ratio
aspect = $00CC ; based on 4/3 display
aspect = $00CC ; based on 4/3 display
; Free memory needed
mem_needed = 7147
mem_needed = 7147
; Number of screen pages
pages = 1
pages = 1
.rodata
mask_table: ; Mask table to set pixels
.byte %10000000, %01000000, %00100000, %00010000, %00001000, %00000100, %00000010, %00000001
masks: ; Color masks
.byte %00000000, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %01111111, %00111111, %00011111, %00001111, %00000111, %00000011, %00000001, %00000000
default_palette:
.byte $00, $0E
mask_table: ; Mask table to set pixels
.byte %10000000, %01000000, %00100000, %00010000, %00001000, %00000100, %00000010, %00000001
masks: ; Color masks
.byte %00000000, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %01111111, %00111111, %00011111, %00001111, %00000111, %00000011, %00000001, %00000000
default_palette:
.byte $00, $0E
.code
; ******************************************************************************
.proc SETPALETTE
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
.code
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Get the color entries from the palette
lda palette
sta COLOR2
lda palette + 1
sta COLOR1
; Get the color entries from the palette
lda palette
sta COLOR2
lda palette + 1
sta COLOR1
; Done, reset the error code
; Done, reset the error code
lda #TGI_ERR_OK
sta error
rts

66
libsrc/atari/tgi/atari9.s
View File

@@ -4,50 +4,50 @@
; Fatih Aygun (2009)
;
.include "atari.inc"
.include "zeropage.inc"
.include "atari.inc"
.include "zeropage.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.macpack generic
.macpack generic
; ******************************************************************************
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; Graphics mode
grmode = 9
grmode = 9
; X resolution
x_res = 80
x_res = 80
; Y resolution
y_res = 192
y_res = 192
; Number of colors
colors = 16
colors = 16
; Pixels per byte
ppb = 2
ppb = 2
; Screen memory size in bytes
scrsize = x_res * y_res / ppb
scrsize = x_res * y_res / ppb
; Pixel aspect ratio
aspect = $0330 ; based on 4/3 display
aspect = $0330 ; based on 4/3 display
; Free memory needed
mem_needed = 7147
mem_needed = 7147
; Number of screen pages
pages = 1
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, $0F, $01, $02, $03, $04, $05, $06, $07, $08, $09, $0A, $0B, $0C, $0D, $0E
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, $0F, $01, $02, $03, $04, $05, $06, $07, $08, $09, $0A, $0B, $0C, $0D, $0E
.code
@@ -55,14 +55,14 @@
.proc SETPALETTE
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
.code
; No palettes
; No palettes
lda #TGI_ERR_INV_FUNC
sta error
rts

2142
libsrc/atari/tgi/atari_tgi_common.inc
View File

File diff suppressed because it is too large Load Diff

80
libsrc/atari/tgi/atr10p2.s
View File

@@ -4,50 +4,50 @@
; Fatih Aygun (2009)
;
.include "atari.inc"
.include "zeropage.inc"
.include "atari.inc"
.include "zeropage.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.macpack generic
.macpack generic
; ******************************************************************************
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; Graphics mode
grmode = 10
grmode = 10
; X resolution
x_res = 80
x_res = 80
; Y resolution
y_res = 192
y_res = 192
; Number of colors
colors = 9
colors = 9
; Pixels per byte
ppb = 2
ppb = 2
; Screen memory size in bytes
scrsize = x_res * y_res / ppb
scrsize = x_res * y_res / ppb
; Pixel aspect ratio
aspect = $0330 ; based on 4/3 display
aspect = $0330 ; based on 4/3 display
; Free memory needed
mem_needed = 15339
mem_needed = 15339
; Number of screen pages
pages = 2
pages = 2
.rodata
mask_table: ; Mask table to set pixels
.byte %11110000, %00001111
masks: ; Color masks
.byte $00, $11, $22, $33, $44, $55, $66, $77, $88
bar_table: ; Mask table for BAR
.byte %11111111, %00001111, %00000000
default_palette:
.byte $00, $0E, $32, $96, $68, $C4, $74, $EE, $4A
mask_table: ; Mask table to set pixels
.byte %11110000, %00001111
masks: ; Color masks
.byte $00, $11, $22, $33, $44, $55, $66, $77, $88
bar_table: ; Mask table for BAR
.byte %11111111, %00001111, %00000000
default_palette:
.byte $00, $0E, $32, $96, $68, $C4, $74, $EE, $4A
.code
@@ -55,22 +55,22 @@
.proc SETPALETTE
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
.code
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
sta PCOLR0,y
dey
bpl loop
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
sta PCOLR0,y
dey
bpl loop
; Done, reset the error code
; Done, reset the error code
lda #TGI_ERR_OK
sta error
rts

96
libsrc/atari/tgi/atr15p2.s
View File

@@ -4,50 +4,50 @@
; Fatih Aygun (2009)
;
.include "atari.inc"
.include "zeropage.inc"
.include "atari.inc"
.include "zeropage.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.macpack generic
.macpack generic
; ******************************************************************************
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; Graphics mode
grmode = 15
grmode = 15
; X resolution
x_res = 160
x_res = 160
; Y resolution
y_res = 192
y_res = 192
; Number of colors
colors = 4
colors = 4
; Pixels per byte
ppb = 4
ppb = 4
; Screen memory size in bytes
scrsize = x_res * y_res / ppb
scrsize = x_res * y_res / ppb
; Pixel aspect ratio
aspect = $0198 ; based on 4/3 display
aspect = $0198 ; based on 4/3 display
; Free memory needed
mem_needed = 15339
mem_needed = 15339
; Number of screen pages
pages = 2
pages = 2
.rodata
mask_table: ; Mask table to set pixels
.byte %11000000, %00110000, %00001100, %00000011
masks: ; Color masks
.byte %00000000, %01010101, %10101010, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %00111111, %00001111, %00000011, %00000000
default_palette:
.byte $00, $0E, $32, $96
mask_table: ; Mask table to set pixels
.byte %11000000, %00110000, %00001100, %00000011
masks: ; Color masks
.byte %00000000, %01010101, %10101010, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %00111111, %00001111, %00000011, %00000000
default_palette:
.byte $00, $0E, $32, $96
.code
@@ -55,31 +55,31 @@
.proc SETPALETTE
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
.code
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Get the color entries from the palette
lda palette
sta COLOR4
lda palette + 1
sta COLOR0
lda palette + 2
sta COLOR1
lda palette + 3
sta COLOR2
; Get the color entries from the palette
lda palette
sta COLOR4
lda palette + 1
sta COLOR0
lda palette + 2
sta COLOR1
lda palette + 3
sta COLOR2
; Done, reset the error code
; Done, reset the error code
lda #TGI_ERR_OK
sta error
rts

88
libsrc/atari/tgi/atr8p2.s
View File

@@ -4,77 +4,77 @@
; Fatih Aygun (2009)
;
.include "atari.inc"
.include "zeropage.inc"
.include "atari.inc"
.include "zeropage.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.macpack generic
.macpack generic
; ******************************************************************************
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; Graphics mode
grmode = 8
grmode = 8
; X resolution
x_res = 320
x_res = 320
; Y resolution
y_res = 192
y_res = 192
; Number of colors
colors = 2
colors = 2
; Pixels per byte
ppb = 8
ppb = 8
; Screen memory size in bytes
scrsize = x_res * y_res / ppb
scrsize = x_res * y_res / ppb
; Pixel aspect ratio
aspect = $00CC ; based on 4/3 display
aspect = $00CC ; based on 4/3 display
; Free memory needed
mem_needed = 15339
mem_needed = 15339
; Number of screen pages
pages = 2
pages = 2
.rodata
mask_table: ; Mask table to set pixels
.byte %10000000, %01000000, %00100000, %00010000, %00001000, %00000100, %00000010, %00000001
masks: ; Color masks
.byte %00000000, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %01111111, %00111111, %00011111, %00001111, %00000111, %00000011, %00000001, %00000000
default_palette:
.byte $00, $0E
mask_table: ; Mask table to set pixels
.byte %10000000, %01000000, %00100000, %00010000, %00001000, %00000100, %00000010, %00000001
masks: ; Color masks
.byte %00000000, %11111111
bar_table: ; Mask table for BAR
.byte %11111111, %01111111, %00111111, %00011111, %00001111, %00000111, %00000011, %00000001, %00000000
default_palette:
.byte $00, $0E
.code
; ******************************************************************************
.proc SETPALETTE
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
.code
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Copy the palette
ldy #colors - 1
loop: lda (ptr1),y
sta palette,y
dey
bpl loop
; Get the color entries from the palette
lda palette
sta COLOR2
lda palette + 1
sta COLOR1
; Get the color entries from the palette
lda palette
sta COLOR2
lda palette + 1
sta COLOR1
; Done, reset the error code
; Done, reset the error code
lda #TGI_ERR_OK
sta error
rts

66
libsrc/atari/tgi/atr9p2.s
View File

@@ -4,50 +4,50 @@
; Fatih Aygun (2009)
;
.include "atari.inc"
.include "zeropage.inc"
.include "atari.inc"
.include "zeropage.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.macpack generic
.macpack generic
; ******************************************************************************
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; Constants and tables
;
; ----------------------------------------------------------------------
; Graphics mode
grmode = 9
grmode = 9
; X resolution
x_res = 80
x_res = 80
; Y resolution
y_res = 192
y_res = 192
; Number of colors
colors = 16
colors = 16
; Pixels per byte
ppb = 2
ppb = 2
; Screen memory size in bytes
scrsize = x_res * y_res / ppb
scrsize = x_res * y_res / ppb
; Pixel aspect ratio
aspect = $0330 ; based on 4/3 display
aspect = $0330 ; based on 4/3 display
; Free memory needed
mem_needed = 15339
mem_needed = 15339
; Number of screen pages
pages = 2
pages = 2
.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, $0F, $01, $02, $03, $04, $05, $06, $07, $08, $09, $0A, $0B, $0C, $0D, $0E
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, $0F, $01, $02, $03, $04, $05, $06, $07, $08, $09, $0A, $0B, $0C, $0D, $0E
.code
@@ -55,14 +55,14 @@
.proc SETPALETTE
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
; ----------------------------------------------------------------------
;
; SETPALETTE: Set the palette (in ptr1)
;
; ----------------------------------------------------------------------
.code
; No palettes
; No palettes
lda #TGI_ERR_INV_FUNC
sta error
rts