17 lines
408 B
Plaintext
17 lines
408 B
Plaintext
;********************************************************************************
|
|
; Printing Program
|
|
;********************************************************************************
|
|
.ifndef INCLUDE_PRINTER
|
|
INCLUDE_PRINTER = 1
|
|
.code
|
|
printer:
|
|
jsr lcd_clear
|
|
@printer_loop:
|
|
jsr rb_keypad_read
|
|
beq @printer_loop
|
|
cmp #'*'
|
|
jeq return_home
|
|
jsr lcd_char
|
|
bra @printer_loop
|
|
.endif ; guard
|