O%=mcode%:P%=&0000
[OPT opt%
LD   A,??:OUT  (SpeedA),A
LD   A,??:OUT  (SIO_CX),A
.Loop0
LD   HL,Message
LD   BC,0
.Loop1
LD   A,(HL):INC HL
OUT  (SIO_Out),A  ; Send to serial port
.Delay
DEC  BC:LD A,B:OR C
JR   NZ,Delay
LD   A,(HL)
CP   &FF:JR NZ,Loop1
JR   Loop0
:
.Message
DEFM " !"#$%&'():;<=>?"
DEFM "@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_"
DEFM "`abcdefghijklmnopqrstuvwxyz{|}~"
DEFM ". . . . TEST MESSAGE FROM Z80 TEST ROM . . . . "
DEFM "THE QUICK BROWN FOX JUMPS OVER THE LAZY DOG. . . . "
DEFM "ONE TWO THREE FOUR FIVE SIX SEVEN EIGHT NINE TEN. . . . . ."
DEFM "TEN NINE EIGHT SEVEN SIX FIVE FOUR THREE TWO ONE. . . . . ."
DEFB &FF
]NEXT
P."SAVE TESTROM ";~mcode%;" ";~O%;" 0 0"