Prev: 7384 Up: Map Next: 739A
738B: Message code $04: print a word with an article
Removes a word from the stack (as 736D) and prints it with an article, by setting B5F4 and calling 746F. Returns with Z set.
738B POP DE Reach past the interpreter's own two return addresses...
738C POP HL
738D EX (SP),HL ...to find the word the caller pushed, lifting it out...
738E PUSH DE ...and putting the two return addresses back
738F EX DE,HL DE = that word
7390 LD A,$01 This time an article is wanted first...
7392 LD ($B5F4),A
7395 CALL $746F ...so print it that way
7398 XOR A Already printed: tell the interpreter nothing more is needed
7399 RET
Prev: 7384 Up: Map Next: 739A