Include "extzp.inc" instead of using direct imports of symbols.
This commit is contained in:
@@ -3,7 +3,7 @@
|
|||||||
;
|
;
|
||||||
.export _clrscr
|
.export _clrscr
|
||||||
.import plot
|
.import plot
|
||||||
.importzp CURS_X, CURS_Y
|
.include "extzp.inc"
|
||||||
.include "osic1p.inc"
|
.include "osic1p.inc"
|
||||||
|
|
||||||
; Adapted from the Challenger Character Graphics
|
; Adapted from the Challenger Character Graphics
|
||||||
|
|||||||
@@ -7,7 +7,7 @@
|
|||||||
;
|
;
|
||||||
.export _gotox
|
.export _gotox
|
||||||
.import plot
|
.import plot
|
||||||
.importzp CURS_X
|
.include "extzp.inc"
|
||||||
|
|
||||||
_gotox: sta CURS_X ; Set new position
|
_gotox: sta CURS_X ; Set new position
|
||||||
jmp plot ; And activate it
|
jmp plot ; And activate it
|
||||||
|
|||||||
@@ -8,7 +8,7 @@
|
|||||||
;
|
;
|
||||||
.export _gotoxy
|
.export _gotoxy
|
||||||
.import popa, plot
|
.import popa, plot
|
||||||
.importzp CURS_X, CURS_Y
|
.include "extzp.inc"
|
||||||
|
|
||||||
_gotoxy:
|
_gotoxy:
|
||||||
sta CURS_Y ; Set Y
|
sta CURS_Y ; Set Y
|
||||||
|
|||||||
@@ -7,7 +7,7 @@
|
|||||||
;
|
;
|
||||||
.export _gotoy
|
.export _gotoy
|
||||||
.import plot
|
.import plot
|
||||||
.importzp CURS_Y
|
.include "extzp.inc"
|
||||||
|
|
||||||
_gotoy: sta CURS_Y ; Set the new position
|
_gotoy: sta CURS_Y ; Set the new position
|
||||||
jmp plot ; And activate it
|
jmp plot ; And activate it
|
||||||
|
|||||||
@@ -5,7 +5,7 @@
|
|||||||
; unsigned char wherex (void);
|
; unsigned char wherex (void);
|
||||||
;
|
;
|
||||||
.export _wherex
|
.export _wherex
|
||||||
.import CURS_X: zp
|
.include "extzp.inc"
|
||||||
|
|
||||||
.proc _wherex
|
.proc _wherex
|
||||||
lda CURS_X
|
lda CURS_X
|
||||||
|
|||||||
@@ -5,7 +5,7 @@
|
|||||||
; unsigned char wherey (void);
|
; unsigned char wherey (void);
|
||||||
;
|
;
|
||||||
.export _wherey
|
.export _wherey
|
||||||
.import CURS_Y: zp
|
.include "extzp.inc"
|
||||||
|
|
||||||
.proc _wherey
|
.proc _wherey
|
||||||
lda CURS_Y
|
lda CURS_Y
|
||||||
|
|||||||
Reference in New Issue
Block a user