| Routines

6CA0: Make a character find a seat

Used by command lists 0x88, 0x8C, 0x8E, 0x90, 0x92, 0x94, 0x96, 0x98, 0x9A, 0x9C, 0x9E, 0xA0, 0xA2, 0xA4, 0xA6 and 0xA8. Makes a character start looking for a seat.
Input
H | Character number (0x98-0xA9)
6CA0 | LD L,$64 | Remove the address of this primary command routine from bytes 0x63 and 0x64 of the character's buffer, triggering a move to the next command in the command list (which will be 79BA if the character is EINSTEIN, or 629F=RET otherwise) as soon as the character has found a seat
6CA2 | LD (HL),$00
6CA4 | LD L,$6F | Place the address of the uninterruptible subcommand routine at 6C7C into bytes 0x6F and 0x70 of the character's buffer
6CA6 | LD (HL),$7C
6CA8 | INC L
6CA9 | LD (HL),$6C
6CAB | JP $6C7C | Set the character off in search of a seat