db $42
JMP Mario : JMP Mario : JMP Mario : JMP Return : JMP Return : JMP Return : JMP Mario : JMP Mario : JMP Mario : JMP Mario

Mario:
LDA #$02 ; Replace block with blank tile
STA $9C
JSL $00BEB0
PHB
LDA #$02
PHA
PLB
LDA #$00
JSR $028663
PLB
Return:
RTL