| The Hobbit (v1.0) | Routines |
| Prev: 733B | Up: Map | Next: 735E |
|
Prints the word in DE (74B8) and then ends the message according to the flags in D: bit 6 set gives a new line; otherwise bit 4 set gives a full stop and a new line; if neither, nothing is added. Finally the registers saved on entry to 72D4 (A, DE and IX) are restored and the interpreter returns to its caller.
|
||||||||
| 733F | CALL $74B8 | Print the word left over in DE | ||||||
|
This entry point is used by the routines at 7337 and 733B.
|
||||||||
| 7342 | LD A,$2E | "." | ||||||
| 7344 | BIT 6,D | Does the message want a new line here? | ||||||
| 7346 | JR NZ,$734F | If so, skip the full stop | ||||||
| 7348 | BIT 4,D | Does it want a full stop instead? | ||||||
| 734A | CALL NZ,$7580 | If so, print it | ||||||
| 734D | BIT 4,D | (Tested again, this time to decide whether a new line follows the full stop) | ||||||
| 734F | CALL NZ,$7578 | Print the new line | ||||||
| 7352 | LD DE,($70D4) | Restore the DE the caller of this whole message had, before it began... | ||||||
| 7356 | LD IX,($70D7) | ...and its IX... | ||||||
| 735A | LD A,($70D3) | ...and its A, all saved back at the very start (72D4) | ||||||
| 735D | RET | The message is finished | ||||||
| Prev: 733B | Up: Map | Next: 735E |