2023-12-08 22:56:35 +01:00
|
|
|
.include "system.h65"
|
2023-12-16 02:41:19 +01:00
|
|
|
.include "sleep.h65"
|
2023-12-08 22:56:35 +01:00
|
|
|
.include "lcd.h65"
|
2023-11-09 12:06:48 +01:00
|
|
|
|
2023-12-16 02:41:19 +01:00
|
|
|
.export print_slow
|
|
|
|
|
|
2023-12-08 22:56:35 +01:00
|
|
|
.code
|
2024-08-08 20:15:50 +02:00
|
|
|
;;********************************************************************************
|
|
|
|
|
;; @function Print a null-terminated string with a delay between each character
|
|
|
|
|
;; @param ARG0-1: Address of the string to print
|
|
|
|
|
;; @param x: time to sleep in centiseconds
|
|
|
|
|
;; @ingroup applications
|
2024-08-08 20:39:25 +02:00
|
|
|
;; @clock_dependent
|
2024-08-08 20:15:50 +02:00
|
|
|
;;********************************************************************************
|
2023-11-09 12:06:48 +01:00
|
|
|
.proc print_slow
|
|
|
|
|
ldy #$00
|
|
|
|
|
@print_loop:
|
|
|
|
|
lda (ARG0),y
|
|
|
|
|
beq @print_end
|
|
|
|
|
phx
|
|
|
|
|
jsr sleep
|
|
|
|
|
plx
|
2023-12-08 22:56:35 +01:00
|
|
|
jsr lcd::print_char
|
2023-11-09 12:06:48 +01:00
|
|
|
iny
|
|
|
|
|
bra @print_loop
|
|
|
|
|
@print_end:
|
|
|
|
|
rts
|
|
|
|
|
.endproc
|
