| Routines

25525: Set the interruptible subcommand (unused)

This routine is not used. It drops the return address from the stack and copies it into bytes 9 and 10 of the character's buffer (thus setting the interruptible subcommand), and then jumps to the routine whose address is in BC.
Input
BC | Routine address
H | Character number (183-214)
25525 | LD A,H | A=character number
25526 | POP HL | Drop the return address from the stack into HL
25527 | PUSH BC | Push the routine address in BC onto the stack
25528 | LD C,L |
25529 | LD L,9 |
25531 | JR 25514 | Copy the return address into bytes 9 and 10 of the character's buffer, and jump to the routine whose address was in BC on entering this routine