Paradise Café: Routine at 90B1

90B1: Vaginal animation loop (one pass)

Saves BC. Delays 2, draws frame 2 (frame_prostitute_vaginal_2), delays 2, draws frame 1 (frame_prostitute_vaginal_1). Restores B and checks: if B==7 calls vaginal_orgasm_bubble (orgasm bubble). Loops via DJNZ until B reaches 0. Saves BC. Delays 2, draws frame 2 (frame_prostitute_vaginal_2), delays 2, draws frame 1 (frame_prostitute_vaginal_1). At pass 7 calls vaginal_orgasm_bubble (orgasm bubble). DJNZ until B==0.
vaginal_anim_loop	90B1	PUSH BC	PUSH BC
	90B2	LD A,$02	Delay 2
	90B4	CALL delay_a	Delay 2
	90B7	LD HL,$91E1	Draw frame frame_prostitute_vaginal_2
	90BA	CALL draw_frame	Draw frame frame_prostitute_vaginal_2
	90BD	LD A,$02	Delay 2
	90BF	CALL delay_a	Delay 2
	90C2	LD HL,$919B	Draw frame frame_prostitute_vaginal_1
	90C5	CALL draw_frame	Draw frame frame_prostitute_vaginal_1
	90C8	POP BC	POP BC
	90C9	LD A,B	A = B
	90CA	CP $07	A = B
	90CC	CALL Z,vaginal_orgasm_bubble	If B==7 → show orgasm bubble (vaginal_orgasm_bubble)
	90CF	DJNZ vaginal_anim_loop	DJNZ — loop back
	90D1	RET