Stormbringer (48k): Routine at 63302

63302: Draw a run of characters (e.g. edge of frame of a window)

Used by the routines at 39393, 47491, 47833 and 63598.

Input
HL	Repeat count for printing character (e.g. width of window in characters minus 1)

63302

LD A,H

Check whether remaining window's width is zero...

63303

OR L

...and if it is...

63304

RET Z

...then return without doing anything

The operand of the instruction at 63305 represents the index of a character set character to draw. This is modified by the instructions at 39413, 47234, 47498, 47844 and 63630.

63305

LD A,0

Else, load A with the character index

63307

CALL 63005

Print text/graphic character in A and advance bitmap virtual text cursor

63310

DEC HL

Decrease remaining width

63311

JR 63302

Loop back to 63302