2 ; void chlinexy (unsigned char x, unsigned char y, unsigned char length);
3 ; void chline (unsigned char length);
6 .export soft80_chlinexy, soft80_chline
7 .import popa, _gotoxy, soft80_cputdirect
16 jsr _gotoxy ; Call this one, will pop params
17 pla ; Restore the length
20 cmp #0 ; Is the length zero?
23 L1: lda #CH_HLINE ; Horizontal line, petscii code
24 jsr soft80_cputdirect ; Direct output