2 ; Maciej 'YTM/Elysium' Witkowiak
6 ; void cvlinexy (unsigned char x, unsigned char y, unsigned char length);
7 ; void cvline (unsigned char length);
9 .export _cvlinexy, _cvline
10 .import gotoxy, fixcursor
11 .importzp cursor_x, cursor_y, cursor_r
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 ; x position
27 adc #3 ; in the middle of cell
32 lda cursor_y ; top start
44 lda #%11111111 ; pattern