16 lines
253 B
Plaintext
16 lines
253 B
Plaintext
.include "keypad_printer.h65"
|
|
.include "lcd.h65"
|
|
.include "keypad.h65"
|
|
|
|
.code
|
|
.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
|