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

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