The Hobbit (v1.0): Routine at 746F

746F: Print a word, with an article if required

If the article flag B5F4 is set, 7436 prints the article first. The flag bits in D are then cleared and the word is printed by 74B8.

Input
DE	Word reference

746F

PUSH DE

Save DE, the word to print

7470

LD A,($B5F4)

Was an article asked for?

7473

AND A

7474

CALL NZ,$7436

If so, print it first

7477

POP DE

Restore DE

7478

LD A,D

Strip the flag bits out of D, keeping just the word's own offset...

7479

AND $0F

747B

LD D,A

747C

...then print the word itself