.include "keypad_printer.h65"
.include "lcd.h65"
.include "keypad.h65"

.code

;;********************************************************************************
;; @brief Print characters to the display when a button was pressed
;; @ingroup applications
;;********************************************************************************
.proc keypad_printer
    jsr lcd::clear
@printer_loop:
    jsr kp::read
    beq @printer_loop
    cmp #'*'
    jeq home
    jsr lcd::print_char
    bra @printer_loop
.endproc