Paradise Café: Routine at B8E9

Called when the player presses 's' in prostitute.

1. Sets CHARS=$CD6A (transition font) via direct $5C36 write. Redraws the opening-line bubble (frame_bubble_prostitute_r0c16) as a transition. 2. Two long delays (delay_ffff x 2). 3. Calls prostitute_enter: prostitute enters, door sprite erased. 4. One more delay (delay_ffff). 5. Calls erase_door_strip: erase the 4-column prostitute+door area. 6. Calls hero_enter_door_anim: hero-enters-door animation. 7. Closes door (door_close). One more delay. 8. Jumps to prostitute_room (main room encounter dispatcher).

Called when the player presses 's' in prostitute. 1. Sets CHARS=$CD6A (transition font) via direct $5C36 write. Redraws the opening-line bubble (frame_bubble_prostitute_r0c16) as a transition. 2. Two long delays (delay_ffff x 2). 3. Calls prostitute_enter: prostitute enters, door sprite erased. 4. One more delay (delay_ffff). 5. Calls erase_door_strip: erase the 4-column prostitute+door area. 6. Calls hero_enter_door_anim: hero-enters-door animation. 7. Closes door (door_close). One more delay. 8. Jumps to prostitute_room (main room encounter dispatcher).
accept_prostitute	B8E9	LD HL,$5C36	Set CHARS=$CD6A ("Então anda!") — write $CD6A directly to $5C36/$5C37
	B8EC	LD A,$6A
	B8EE	LD (HL),A
	B8EF	INC HL
	B8F0	LD A,$CD
	B8F2	LD (HL),A
	B8F3	LD HL,$B8B1	HL = frame_bubble_prostitute_r0c16 (speech bubble frame)
	B8F6	CALL draw_frame	Draw "Então anda!" bubble (draw_frame)
	B8F9	CALL delay_ffff	Long delay (delay_ffff)
	B8FC	CALL delay_ffff	Long delay (delay_ffff)
	B8FF	CALL prostitute_enter	Prostitute enters, erase door (prostitute_enter)
	B902	CALL delay_ffff	Long delay (delay_ffff)
	B905	CALL erase_door_strip	Erase 4-column doorway strip (erase_door_strip)
	B908	CALL hero_enter_door_anim	Hero enters door animation (hero_enter_door_anim)
	B90B	CALL door_close	Close door (door_close)
	B90E	CALL delay_ffff	Long delay (delay_ffff)
	B911	JP prostitute_room	Jump to room encounter dispatcher (prostitute_room)