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

Moved common symbol names out of sources, and into a global include file.

Browse Source
This commit is contained in:
Greg King
2013-07-16 00:30:56 -04:00
parent c9c66dcfdd
commit 641a609cf3
6 changed files with 105 additions and 92 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
libsrc/atmos/tgi/atmos-228-200-3.s
View File

@@ -2,7 +2,7 @@
; Graphics driver for the 228x200x3 palette mode on the Atmos
;
; Stefan Haubenthal <polluks@sdf.lonestar.org>
; 2012-08-11, Greg King <greg.king5@verizon.net>
; 2013-07-15, Greg King <gregdk@users.sf.net>
;
.include "zeropage.inc"
@@ -79,21 +79,7 @@ ERROR: .res 1 ; Error code
MODE: .res 1 ; Graphics mode
PALETTE: .res 2
; Constants and table
; BASIC 1.1 addresses
PATTERN := $213
PARAM1 := $2E1 ; & $2E2
PARAM2 := $2E3 ; & $2E4
PARAM3 := $2E5 ; & $2E6
TEXT := $EC21
HIRES := $EC33
CURSET := $F0C8
CURMOV := $F0FD
DRAW := $F110
CHAR := $F12D
POINT := $F1C8
PAPER := $F204
INK := $F210
; Constant table
.rodata

28
libsrc/atmos/tgi/atmos-240-200-2.s
View File

@@ -2,7 +2,7 @@
; Graphics driver for the 240x200x2 monochrome mode on the Atmos
;
; Stefan Haubenthal <polluks@sdf.lonestar.org>
; 2012-08-11, Greg King <greg.king5@verizon.net>
; 2013-07-15, Greg King <gregdk@users.sf.net>
;
.include "zeropage.inc"
@@ -66,10 +66,10 @@ YSIZE = 8 ; System font height
; Variables mapped to the zero page segment variables. Some of these are
; used for passing parameters to the driver.
X1 = ptr1
Y1 = ptr2
X2 = ptr3
Y2 = ptr4
X1 := ptr1
Y1 := ptr2
X2 := ptr3
Y2 := ptr4
; Absolute variables used in the code
@@ -78,19 +78,7 @@ Y2 = ptr4
ERROR: .res 1 ; Error code
MODE: .res 1 ; Graphics mode
; Constants and tables
PARAM1 = $2E1
PARAM2 = $2E3
PARAM3 = $2E5
TEXT = $EC21
HIRES = $EC33
CURSET = $F0C8
CURMOV = $F0FD
DRAW = $F110
CHAR = $F12D
POINT = $F1C8
PAPER = $F204
INK = $F210
; Constant table
.rodata
@@ -152,7 +140,7 @@ INIT:
; Must set an error code: NO
;
DONE = TEXT
DONE := TEXT
; ------------------------------------------------------------------------
; GETERROR: Return the error code in A and clear it.
@@ -181,7 +169,7 @@ CONTROL:
; Must set an error code: NO
;
CLEAR = HIRES
CLEAR := HIRES
; ------------------------------------------------------------------------
; SETVIEWPAGE: Set the visible page. Called with the new page in A (0..n).