diff --git a/libsrc/telestrat/gotoxy.s b/libsrc/telestrat/gotoxy.s index 04a680e61..890970ebb 100644 --- a/libsrc/telestrat/gotoxy.s +++ b/libsrc/telestrat/gotoxy.s @@ -19,12 +19,13 @@ gotoxy: jsr popa ; Get Y ; In telemon, there is a position for the prompt, and another for the cursor. sta SCRY - jsr update_adscr ; Update adress video ram position when SCRY is modified + jsr popa sta SCRX - rts + jmp update_adscr ; Update adress video ram position when SCRY is modified + .endproc .proc update_adscr diff --git a/libsrc/telestrat/gotoy.s b/libsrc/telestrat/gotoy.s index 182e3f74e..008d4413f 100644 --- a/libsrc/telestrat/gotoy.s +++ b/libsrc/telestrat/gotoy.s @@ -9,6 +9,5 @@ .proc _gotoy sta SCRY - jsr update_adscr - rts + jmp update_adscr .endproc