2 ; Ullrich von Bassewitz, 08.08.1998
4 ; void chlinexy (unsigned char x, unsigned char y, unsigned char length);
5 ; void chline (unsigned char length);
8 .export _chlinexy, _chline
9 .import gotoxy, cputdirect
11 .include "atari5200.inc"
15 jsr gotoxy ; Call this one, will pop params
16 pla ; Restore the length
19 cmp #0 ; Is the length zero?
22 L1: lda #CH_HLINE ; Horizontal line, screen code
23 jsr cputdirect ; Direct output