;********************************************************************************
; Printing Program
;********************************************************************************
.ifndef INCLUDE_PRINTER
INCLUDE_PRINTER = 1

printer:
    stz LCD_CHARCOUNT
    lda #%10000000
    jsr _lcd_cmd
    lda #LCD_CMD_CLEAR
    jsr _lcd_cmd
@printer:
    jsr kb_read
    beq @printer
    cmp #'*'
    jeq return_home
    jsr _lcd_char
    bra @printer
.endif