Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;; Midpoint reset code - resets midpoints if Select+L is pressed
- ; again, this routine needs to run on the overworld
- LDA $15 ; load controller data 1
- AND $17 ; bitwise AND with controller data 2
- AND #$20 ; filter out bit #$20 (Select in $15, L in $17)
- BEQ + ; if either bit is unset, don't reset
- LDx $13BF ; translevel number
- LDA $1EA2,x ; load overworld flags for current level
- AND #$40 ; midpoint flag
- BEQ + ; if midpoint flag is not set, skip
- LDA $1EA2,x
- AND #$BF ; clear midpoint flag
- STA $1EA2,x
- LDA #$00 ; load 00 since there's no 24-bit STZ
- STA.l !RAM_MIDWAY,x ; clear multi-midpoint number
- LDA #$08 ;\ play spin-jump kill sound effect
- STA $1DF9 ;/
- +
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement