Atic Atac: Routine at 36215

36215: Control Player

Used by the routines at HandlerWizard, HandlerSerf and HandlerKnight.
ControlPlayer	36215	LD A,(60049)	A=PlayerRoom.
	36218	LD (61017),A
	36221	PUSH BC	Stash BC, DE and HL on the stack.
	36222	PUSH DE
	36223	PUSH HL
	36224	CALL AutoWalkStep	Call AutoWalkStep.
	36227	LD A,(IX+2)
	36230	OR %00110000	Set bits 4-5.
	36232	LD (IX+2),A
	36235	CALL StoreEntity	Call StoreEntity.
	36238	CALL HandlerCaveDoorLocked_20	Call HandlerCaveDoorLocked_20.
	36241	LD C,A
	36242	POP HL	Restore HL from the stack.
	36243	LD DE,0	DE=0000.
	36246	BIT 1,C
	36248	JR NZ,ControlPlayer_0
	36250	LD A,B
	36251	NEG
	36253	LD E,A
ControlPlayer_0	36254	BIT 0,C
	36256	JR NZ,ControlPlayer_1
	36258	LD E,B
ControlPlayer_1	36259	BIT 2,C
	36261	JR NZ,ControlPlayer_2
	36263	LD D,B
ControlPlayer_2	36264	BIT 3,C
	36266	JR NZ,ControlPlayer_3
	36268	LD A,B
	36269	NEG
	36271	LD D,A
ControlPlayer_3	36272	POP HL	Restore HL from the stack.
	36273	CALL ApplyMovement_3	Call ApplyMovement_3.
	36276	POP HL	Restore HL from the stack.
	36277	CALL HandlerKnight_14	Call HandlerKnight_14.
	36280	CALL ApplyMovement_11	Call ApplyMovement_11.
	36283	CALL CheckDoorway	Call CheckDoorway.
	36286	CALL ApplyMovement_15	Call ApplyMovement_15.
	36289	JP ApplyMovement	Jump to ApplyMovement.