!previous_jump = $7f9e02
!previous_facing = $7f9e03

!jump = $72
!facing = $76
!xspeed = $7b

lda !jump
and #$08   
beq end        ; if jumping

lda !previous_jump
bne end        ; and previously grounded

leap:          ; activate leap

lda #$3f
sta !xspeed    ; right facing speed

lda !facing
bne end        ; if facing left

lda #$c0
sta !xspeed    ; left facing speed

end:

lda !jump
sta !previous_jump

lda !facing
sta !previous_facing

rtl

back to listings