Blizzard Pass: Routine at 733B

733B: Set Drawing Origin

Used by the routine at DrawFromOrigin. Stores the next coordinates as the origin later shapes are drawn from.
SetOrigin	733B	LD A,(IX+$01)
	733E	LD ($7337),A
	7341	LD ($7339),A
	7344	LD A,(IX+$02)
	7347	LD ($7338),A
	734A	LD A,(IX+$03)
	734D	LD ($733A),A
	7350	LD A,(IX+$04)
	7353	LD ($7319),A
	7356	LD ($72E6),A
	7359	LD A,(IX+$03)
	735C	SUB (IX+$02)
	735F	AND A
	7360	RRA
This entry point is used by the routine at ResetOrigin.
SetOrigin_0	7361	LD ($7333),A
	7364	LD ($72FA),A
	7367	LD BC,($7337)
	736B	LD DE,($7339)
	736F	PUSH BC
	7370	PUSH DE
	7371	CALL DrawFixedShift_1
	7374	POP DE
	7375	POP BC
	7376	LD ($7337),BC
	737A	LD ($7339),DE
	737E	CALL DrawFixedShift_0
	7381	RET