Wheelie: Routine at 27648

27648: Game Loop

Used by the routines at 60403 and 60416.
Game_Loop	27648	LD A,(30763)	A=*30763.
	27651	XOR %00000001	Flip bit 0.
	27653	LD (30763),A	Write A back to *30763.
	27656	LD HL,65535	SP=65535.
	27659	LD SP,HL	SP=65535.
	27660	LD A,(23672)	A=*FRAMES.
	27663	INC A	Increment A by one.
	27664	LD HL,30746	HL=30746.
	27667	DEC (HL)	Decrease *HL by one.
	27668	LD L,90	L=90.
	27670	LD (HL),A	Write A to *HL.
	27671	JR NZ,Game_Loop_4	Jump to Game_Loop_4 if *HL is not zero.
	27673	INC (HL)	Increment *HL by one.
	27674	LD L,43	L=43.
	27676	LD A,(HL)	A=*HL.
	27677	XOR %00000001	Flip bit 0.
	27679	LD (HL),A	Write A to *HL.
	27680	NOP
	27681	NOP
	27682	LD A,2
	27684	LD (30756),A
	27687	LD A,(30762)
	27690	AND A
	27691	JP NZ,28184
	27694	CALL RemoveSprites
	27697	LD A,(30754)
	27700	BIT 7,A
	27702	JR Z,Game_Loop_0
	27704	CALL ScrollPlayarea
	27707	CALL DrawPlayarea
	27710	CALL 27136
	27713	JR Game_Loop_1
Game_Loop_0	27715	CALL 26192
	27718	CALL DrawPlayarea
	27721	CALL 27308
Game_Loop_1	27724	CALL 29379
	27727	CALL 29457
	27730	CALL GetControls
	27733	CALL 27468
	27736	LD A,(30754)
	27739	BIT 7,A
	27741	JR Z,Game_Loop_2
	27743	CPL
Game_Loop_2	27744	SUB 102
	27746	JR NC,Game_Loop_3
	27748	XOR A
Game_Loop_3	27749	SRL A
	27751	SRL A
	27753	INC A
	27754	LD (30746),A
	27757	NOP
	27758	NOP
	27759	NOP
	27760	CALL Handler_Fuel
Game_Loop_4	27763	LD A,(30763)
	27766	AND A
	27767	JR NZ,Game_Loop_6
	27769	LD A,(30762)
	27772	AND A
	27773	JR NZ,Game_Loop_5
	27775	CALL 29379
	27778	CALL GetControls
	27781	CALL 27468
Game_Loop_5	27784	XOR A
	27785	LD (30756),A
	27788	CALL 27984
Game_Loop_6	27791	LD A,(30756)
	27794	AND A
	27795	JR NZ,Game_Loop_7
	27797	CALL RemoveSprites
	27800	CALL 29457
Game_Loop_7	27803	CALL 27984
	27806	HALT
	27807	NOP
	27808	NOP
	27809	NOP
	27810	NOP
	27811	NOP
	27812	NOP
	27813	NOP
	27814	NOP
	27815	NOP
	27816	NOP
	27817	NOP