Title screen palette update

	LDA $7FB005 : STA $4204
	STZ $4205
	LDA #$06 : STA $4206
	NOP #8
	LDA $4216; : STA $7FC070

	ASL					;double it to access word table
	TAX					;take into x
	REP #$20			;enter 16 bit mode
	LDA Palt,x			;load palette based on index
	STA !MarioPalette	;store
	SEP #$20			;exit 16 bit mode
	RTS

	Palt:
		dw $001F,$03FF,$03E0,$7FE0,$7C00,$7C1F