!yspeed = $7d

lda !yspeed
cmp #$80
bcs end
cmp #$30
bcc end
lda #$10
sta !yspeed

end:
rtl

back to listings