Changed literal zeroes of the style "#>0" into the style "#>$0000".

This commit is contained in:
Greg King
2014-09-10 19:15:07 -04:00
parent e702832e80
commit 74c2415795
16 changed files with 75 additions and 69 deletions

View File

@@ -1,9 +1,9 @@
;
; 2003-03-07, Ullrich von Bassewitz
; 2011-01-28, Stefan Haubenthal
; 2013-12-22, Greg King
; 2014-09-10, Greg King
;
; Setup arguments for main
; Set up arguments for main
;
.constructor initmainargs, 24
@@ -80,7 +80,7 @@ setterm:sta term ; Set end of argument marker
txa ; Get low byte
add #<args
sta argv,y ; argv[y]= &arg
lda #>0
lda #>$0000
adc #>args
sta argv+1,y
iny
@@ -99,7 +99,7 @@ argloop:lda BASIC_BUF,x
; A contains the terminating character. To make the argument a valid C string,
; replace the terminating character by a zero.
lda #0
lda #$00
sta args-1,x
; Check if the maximum number of command line arguments is reached. If not,
@@ -130,4 +130,4 @@ args: .res SCREEN_XSIZE * 2 - 1
.data
argv: .addr name
.res MAXARGS * 2, 0
.res MAXARGS * 2, $00

View File

@@ -2,7 +2,7 @@
; Graphics driver for the 228x200x3 palette mode on the Atmos
;
; Stefan Haubenthal <polluks@sdf.lonestar.org>
; 2013-07-15, Greg King <gregdk@users.sf.net>
; 2014-09-10, Greg King <gregdk@users.sf.net>
;
.include "zeropage.inc"
@@ -275,7 +275,7 @@ mymode: sta PARAM3
lda X1
add #2 * XSIZE ; Skip screen attribute columns
sta PARAM1
lda #0
lda #>$0000
sta PARAM1+1
sta PARAM2+1
sta PARAM3+1
@@ -291,13 +291,13 @@ GETPIXEL:
sta PARAM1
lda Y1
sta PARAM2
lda #0
lda #>$0000
sta PARAM1+1
sta PARAM2+1
jsr POINT
lda PARAM1
and #%00000001
ldx #0
ldx #>$0000
rts
; ------------------------------------------------------------------------
@@ -323,7 +323,7 @@ LINE:
sta PARAM2+1
lda MODE
sta PARAM3
ldx #>0
ldx #>$0000
stx PARAM3+1
jmp DRAW
@@ -359,7 +359,7 @@ BAR:
; ------------------------------------------------------------------------
; TEXTSTYLE: Set the style used when calling OUTTEXT. Text scaling in the x
; and y directions is passend in X/Y, the text direction is passed in A.
; and y directions is passed in X/Y, the text direction is passed in A.
;
; Must set an error code: NO
;
@@ -369,7 +369,7 @@ TEXTSTYLE:
; ------------------------------------------------------------------------
; OUTTEXT: Output text at X/Y = ptr1/ptr2 using the current color and the
; OUTTEXT: Output text at x/y = ptr1/ptr2, using the current color and the
; current text style. The text to output is given as a zero-terminated
; string with its address in ptr3.
;

View File

@@ -2,7 +2,7 @@
; Graphics driver for the 240x200x2 monochrome mode on the Atmos
;
; Stefan Haubenthal <polluks@sdf.lonestar.org>
; 2013-07-16, Greg King <gregdk@users.sf.net>
; 2014-09-10, Greg King <gregdk@users.sf.net>
;
.include "zeropage.inc"
@@ -254,7 +254,7 @@ SETPIXEL:
mymode: sta PARAM3
lda X1
sta PARAM1
lda #0
lda #>$0000
sta PARAM1+1
sta PARAM2+1
sta PARAM3+1
@@ -270,13 +270,13 @@ GETPIXEL:
sta PARAM1
lda Y1
sta PARAM2
lda #0
lda #>$0000
sta PARAM1+1
sta PARAM2+1
jsr POINT
lda PARAM1
and #%00000001
ldx #0
ldx #>$0000
rts
; ------------------------------------------------------------------------
@@ -302,7 +302,7 @@ LINE:
sta PARAM2+1
lda MODE
sta PARAM3
ldx #>0
ldx #>$0000
stx PARAM3+1
jmp DRAW

View File

@@ -8,7 +8,7 @@
.proc _toascii
; .X must be zero, on return.
ldx #>0
ldx #>$0000
rts
.endproc