.export _mouse_txt_callbacks
.importzp tmp4
- .import mul40,loc_tmp
+ .import _mul40
.importzp mouse_txt_char ; screen code of mouse cursor
.include "atari.inc"
; Move the mouse cursor y position to the value in A/X.
movey:
- tax
- ldy tmp4 ; mul40 uses tmp4
- lda loc_tmp ; and this local variable
- pha
- txa ; get parameter back
+ ldy tmp4 ; mul40 uses tmp4, save in Y
lsr a ; convert y position to character line
lsr a
lsr a
- jsr mul40
- clc
+ jsr _mul40 ; carry is cleared by _mul40
adc SAVMSC
sta scrptr
txa
adc SAVMSC+1
sta scrptr+1
- pla
- sta loc_tmp
- sty tmp4
+ sty tmp4 ; restore tmp4
rts