New code from Oliver Schmidt

git-svn-id: svn://svn.cc65.org/cc65/trunk@3351 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz
2005-01-06 12:26:47 +00:00
parent 2ebb276929
commit 8188795240
15 changed files with 123 additions and 144 deletions

View File

@@ -47,15 +47,15 @@ noxy: sta XORIGIN
plx ; Restore index
loop: lda XOFFS,x
clc
bpl L1 ; Relative to left edge?
bpl :+ ; Relative to left edge?
adc WIDTH
L1: adc XORIGIN
: adc XORIGIN
jsr pusha
lda YOFFS,x
clc
bpl L2 ; Relative to top?
bpl :+ ; Relative to top?
adc HEIGHT
L2: adc YORIGIN
: adc YORIGIN
jsr _gotoxy ; Call this one, will pop params
txa
tay