;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Invincible Mario palette changer
; By Smallhacker
; 
; Makes invincible Mario use a single palette
; (Sprite palette 7 by default)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;CHANGE THIS ADDRESS TO A FREE SECTION OF THE ROM!
!freeSpace = $218000

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

macro RATS_start(id)
db "STAR"
dw RATS_Endcode<id>-RATS_Startcode<id> 
dw RATS_Endcode<id>-RATS_Startcode<id>^#$FFFF 
RATS_Startcode<id>: 
endmacro

macro RATS_end(id)
RATS_Endcode<id>: 
endmacro

lorom
header

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

; Hijack the routine loading Mario's palette
org $029FB8
	JSL NewFireballRoutine
	NOP
	NOP
	NOP
	JSR $B554
	INC $1765,x	

org !freeSpace
%RATS_start(0)

NewFireballRoutine:
	LDA $1729,x
	SBC $1D
	BEQ Branchd
	JMP $02A211
Branchd:
	RTL

%RATS_end(0)