| Routines

6CF0: Make a character stand up if he's not already standing

Used by the routine at 63BE to make sure a character is standing up before setting off for his destination.
Input
H | Character number (0x98-0xA9)
6CF0 | LD L,$63 | Change the primary command routine address in bytes 0x63 and 0x64 of the character's buffer to 63D1
6CF2 | LD (HL),$D1
6CF4 | LD L,$60 | Point HL at the character's animatory state
6CF6 | LD A,(HL) | Pick this up in A
6CF7 | AND $07 | Keep only bits 0-2
6CF9 | CP $04 | Is the character standing?
6CFB | RET C | Return if so
6CFC | POP DE | Drop the return address (63D1) from the stack
6CFD | CALL $6214 | Update the SRB for the character's current animatory state
6D00 | AND $F8 | A=animatory state of the character standing up
6D02 | JP $61B0 | Update the character's animatory state and update the SRB