db $42 ; enable corner and inside offsets
JMP Return : JMP Return : JMP Return : JMP Return : JMP Return : JMP Return : JMP Return
JMP Return : JMP Mario : JMP Mario

Mario:
	LDA $16
	AND #$08
	BEQ Return
	LDA $19
	CMP #$02
	BEQ Cape
	CMP #$03
	BNE Return
	LDA #$02
	STA $0DC2
	BRA Change

Cape:
	LDA #$04
	STA $0DC2

Change:
	STZ $19
	LDA #$02
	STA $71
	LDA #$2F
	STA $1496
	STA $9D
	LDA #$0A
	STA $1DF9

Return:
	RTL