bslathi19/cc65
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

telestrat target : lseek now returns position as it should

Browse Source
This commit is contained in:
jedeoric
2025-07-23 22:49:15 +02:00
committed by GitHub
parent 32313a8c56
commit 87ce45ba01
1 changed files with 9 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
libsrc/telestrat/lseek.s
View File

@@ -35,5 +35,14 @@
ldy tmp3 ldy tmp3
ldx tmp1 ; Get whence ldx tmp1 ; Get whence
BRK_TELEMON XFSEEK BRK_TELEMON XFSEEK
; 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
rts rts
.endproc .endproc