2 ; Maciej 'YTM/Elysium' Witkowiak
4 ; 27.10.2001, 23.12.2002
10 .importzp cursor_c, cursor_r
12 .include "jumptab.inc"
13 .include "geossym.inc"
17 lda curPattern ; save current pattern
19 lda #0 ; set pattern to clear
27 jsr fixcursor ; home cursor
33 lda #>639 ; 80 columns
36 L40: lda #>319 ; 40 columns
49 jmp SetPattern ; restore pattern