!previous_xspeed = $7f9e01

!jump = $72
!blocked = $77    ;RAM_MarioObjStatus
!xspeed = $7b
!goaltimer = $1493
!gamemode = $0100

lda !gamemode
cmp #$14 ; Normal Level
bne end        ; if inside a level

lda !goaltimer
bne normal        ; and not goal tape

lda !jump
bne normal        ; and not airborne

lda !blocked
and #$03
bne normal        ; and not blocked

lda !previous_xspeed
sta !xspeed       ; make slippery

normal:
lda !xspeed
sta !previous_xspeed

end:
rtl

back to listings