Prev: 743F Up: Map Next: 7488
7478: Message: Print The Class Token
Prints the class token for the noun being named. When no noun is selected it returns the token at AD35.
Message_PrintTheClassToken 7478 PUSH DE Read which noun is being named.
7479 LD A,($B703)
747C AND A Call Message_ChooseAClassToken if A is non-zero.
747D CALL NZ,Message_ChooseAClassToken
7480 POP DE Take the high byte of the saved word.
7481 LD A,D
7482 AND %00001111 Keep the low four bits of the class token.
7484 LD D,A Store that class token.
7485 JP PrintToken Jump to PrintToken to print a dictionary token.
View the equivalent code in;
Prev: 743F Up: Map Next: 7488