!FreeRAM = $7FA000

                    print "INIT ",pc
					PHX
					LDX #$00
					.loop
					LDA $94
					STA $7FA000,x
					INX
					CPX #$15
					BCC .loop
					PLX
					RTL
	                print "MAIN ",pc
                    PHB
                    PHK
                    PLB
                    JSR SPRITE_ROUTINE			;Jump to the routine to keep organized
                    PLB
                    RTL

SPRITE_ROUTINE:

					PHX
					PHB
					REP #$30
					LDA #$0013
					LDX.w #!FreeRAM+1
					LDY.w #!FreeRAM
					MVN $7F7F
					SEP #$30
					PLB
					PLX
					LDA $94
					STA !FreeRAM+20
					LDA !FreeRAM
					STA $E4,x