db $37

JMP MarioBelow : JMP MarioAbove : JMP MarioSide
JMP SpriteV : JMP SpriteH
JMP Cape : JMP Fireball
JMP MarioCorner : JMP MarioBody : JMP MarioHead
JMP WallFeet : JMP WallBody

MarioBelow:
MarioAbove:
MarioSide:
SpriteV:
SpriteH:
Cape:
Fireball:
MarioCorner:
RTL

MarioBody:
	LDA $19					; \ If the player is not small...
	BEQ Label_0000				; /
	LDA #$00				; \ Make the player small (without the animation).
	STA $19					; /
	LDA #$00				; \ Set $7E0DC2 to #$00
	STA $0DC2				; /
Label_0000:					; > --------


MarioHead:
WallFeet:
WallBody:
RTL



print "power down"