From 5809eaf03746e7158623aef295b9afb337095c1a Mon Sep 17 00:00:00 2001 From: Bob Andrews Date: Sat, 26 Jul 2025 00:01:07 +0200 Subject: [PATCH] Update libsrc/telestrat/lseek.s Co-authored-by: kugelfuhr <98353208+kugelfuhr@users.noreply.github.com> --- libsrc/telestrat/lseek.s | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) diff --git a/libsrc/telestrat/lseek.s b/libsrc/telestrat/lseek.s index f2f7a32bd..e94cba46c 100644 --- a/libsrc/telestrat/lseek.s +++ b/libsrc/telestrat/lseek.s @@ -38,11 +38,9 @@ ; A & X contains position (from 0 to 15 bits) ; RES (2 bytes) contains position (from 16 to 31 bits) ; Returns long - pha - lda RES+1 - sta sreg+1 - lda RES - sta sreg - pla + ldy RES+1 + sty sreg+1 + ldy RES + sty sreg rts .endproc