;\r
.export _clrscr\r
.import plot\r
- .importzp CURS_X, CURS_Y\r
+ .include "extzp.inc"\r
.include "osic1p.inc"\r
\r
; Adapted from the Challenger Character Graphics\r
; void gotox (unsigned char x);
;
.export _gotox
- .import plot
- .importzp CURS_X
+ .import plot
+ .include "extzp.inc"
_gotox: sta CURS_X ; Set new position
jmp plot ; And activate it
;
.export _gotoxy
.import popa, plot
- .importzp CURS_X, CURS_Y
+ .include "extzp.inc"
_gotoxy:
sta CURS_Y ; Set Y
;
.export _gotoy
.import plot
- .importzp CURS_Y
+ .include "extzp.inc"
_gotoy: sta CURS_Y ; Set the new position
jmp plot ; And activate it
; unsigned char wherex (void);
;
.export _wherex
- .import CURS_X: zp
+ .include "extzp.inc"
.proc _wherex
lda CURS_X
; unsigned char wherey (void);
;
.export _wherey
- .import CURS_Y: zp
+ .include "extzp.inc"
.proc _wherey
lda CURS_Y