2 ; Maciej 'YTM/Elysium' Witkowiak
6 ; void chlinexy (unsigned char x, unsigned char y, unsigned char length);
7 ; void chline (unsigned char length);
9 .export _chlinexy, _chline
10 .import gotoxy, fixcursor
11 .importzp cursor_x, cursor_y, cursor_c
13 .include "jumptab.inc"
14 .include "geossym.inc"
18 jsr gotoxy ; Call this one, will pop params
19 pla ; Restore the length
22 cmp #0 ; Is the length zero?
25 lda cursor_x ; left start
31 adc #4 ; in the middle of a cell
50 lda #%11111111 ; pattern