;
.export _chlinexy, _chline
- .import popa, _gotoxy, cputdirect
+ .import gotoxy, cputdirect
.importzp tmp1, chlinechar
_chlinexy:
pha ; Save the length
- jsr popa ; Get y
- jsr _gotoxy ; Call this one, will pop params
+ jsr gotoxy ; Call this one, will pop params
pla ; Restore the length
_chline:
dec tmp1
bne L1
L9: rts
-
-
-
-