PSSST: Routine at 24720

24720: Player Turn Ends


Message_Eaten	24720	DEFM 71	Attribute: 71 + "YOUR PLANT HAS BEEN EATEN".
	24721	DEFM "YOUR PLANT HAS BEEN EATE","N"+128	Attribute: 71 + "YOUR PLANT HAS BEEN EATEN".
This entry point is used by the routine at AnimateExplosion.
PlayerTurnEnds	24746	XOR A	Reset 24124.
	24747	LD (24124),A	Reset 24124.
	24750	LD HL,24206
	24753	LD A,(HL)
	24754	CP 183
	24756	JR C,Message_Eaten_0
	24758	LD (HL),167
	24760	CALL CreateWindow	Call CreateWindow.
	24763	LD DE,24720	DE=Message_Eaten.
	24766	LD HL,28704	HL=28704.
	24769	CALL GameOverPrint_Pause	Call GameOverPrint_Pause.
Message_Eaten_0	24772	LD HL,24244	HL=24244.
	24775	LD B,7	B=7.
	24777	CALL SetObjectInactive	Call SetObjectInactive.
	24780	LD A,(24067)	If GameOptions says this is a 2UP game, jump to PlayerTurnEnds_2UP.
	24783	AND %00000001
	24785	JR NZ,PlayerTurnEnds_2UP
Handle 1UP player.
PlayerTurnEnds_1UP	24787	LD A,(24120)	If 1UP is out of lives (using CurrentPlayer_Lives), jump to GameOver_ControllerRestart.
	24790	AND A
	24791	JP Z,GameOver_ControllerRestart
	24794	CALL LevelInit	Call LevelInit.
	24797	JP PlayerInit	Jump to PlayerInit.
Handle 2UP player.
PlayerTurnEnds_2UP	24800	LD A,(24122)	If InactivePlayer_Lives says this is a 1UP game, jump to PlayerTurnEnds_1UP.
	24803	AND A
	24804	JR Z,PlayerTurnEnds_1UP
	24806	LD A,(24120)	If 2UP is out of lives (using CurrentPlayer_Lives), jump to GameOver_Controller.
	24809	AND A
	24810	CALL Z,GameOver_Controller
	24813	CALL ChangePlayer	Call ChangePlayer.
	24816	LD A,(24094)	Change current player at Current_Player (flip bits between 0 and 255).
	24819	CPL
	24820	LD (24094),A
	24823	CALL LevelInit	Call LevelInit.
	24826	JP PlayerInit	Jump to PlayerInit.