levelinit138: LDA.b $71 ; \ return if CMP.b #$0A ; | Mario is in a BEQ + ; / no-Yoshi intro JMP level138 + RTS level138: macro scanlines16(addr) db $01 : dw db $01 : dw db $01 : dw db $01 : dw db $01 : dw db $01 : dw db $01 : dw db $01 : dw db $01 : dw db $01 : dw db $01 : dw db $01 : dw db $01 : dw db $01 : dw db $01 : dw db $01 : dw endmacro LDA.b $71 ; \ return if CMP.b #$0A ; | Mario is in a BEQ + ; / no-Yoshi intro REP #%00010000 LDA.b #%01000010 STA.w $4340 LDA.b #$0F STA.w $4341 LDY.w #.HDMATbl STY.w $4342 LDA.b #.HDMATbl>>16 STA.w $4344 LDA.b #$7F STA.w $4347 LDA.b #%00010000 TSB.w $0D9F REP #%00100000 LDA.w $1468 ASL CLC : ADC.w $1468 CLC : ADC.w #.HDMATbl STA.w $4342 LDA.w $1466 STA.l $7FBB00 LSR STA.l $7FBB04 LSR STA.l $7FBB06 CLC : ADC.l $7FBB04 STA.l $7FBB02 SEP.b #%00110000 + RTS .HDMATbl %scanlines16($BB04) %scanlines16($BB02) %scanlines16($BB00) %scanlines16($BB02) %scanlines16($BB04) %scanlines16($BB06) %scanlines16($BB04) %scanlines16($BB02) %scanlines16($BB00) %scanlines16($BB02) %scanlines16($BB04) %scanlines16($BB06) %scanlines16($BB04) %scanlines16($BB02) %scanlines16($BB00) %scanlines16($BB02) %scanlines16($BB04) %scanlines16($BB06) %scanlines16($BB04) %scanlines16($BB02) %scanlines16($BB00) %scanlines16($BB02) %scanlines16($BB04) %scanlines16($BB06) %scanlines16($BB04) %scanlines16($BB02) %scanlines16($BB00) %scanlines16($BB02) %scanlines16($BB04) %scanlines16($BB06) %scanlines16($BB04) %scanlines16($BB02) db $00