| Routines

61408: Display the cast of characters and change their names

Continues from 61152. Walks each character onto the screen, changes his name (if desired), and walks him off again.
61408 | LD HL,32512 | 32512 holds the leftmost column of the skool on screen (0-64)
61411 | LD B,8 | There are 8 main characters to consider
61413 | LD (HL),B | Set the leftmost column to 8, so that the character can start off-screen (at x=3) and walk on from the left
61414 | PUSH BC | Save the character counter
61415 | CALL 45288 | Print the character's title and name, and walk him onto the screen
61418 | PUSH HL | Save the message address for the character's name
61419 | CALL 46824 | Print 'PRESS'C'TO CHANGE NAME' and wait for a keypress
61422 | POP HL | Restore the message address for the character's name
61423 | CALL Z,47208 | Change the character's name if 'c' was pressed
61426 | JR Z,61423 | Change the character's name if 'c' was pressed again
61428 | CALL 46568 | Walk the character off the screen
61431 | POP BC | Restore the character counter to B
61432 | DJNZ 61414 | Jump back until all 8 main characters have been done
61434 | LD HL,24859 | Set the instruction at 24859 in the routine at 24843 back to LD A,(HL)
61437 | LD (HL),126
61439 | RET |