2 Commits
bios ... buzbee

2 changed files with 8 additions and 6 deletions

View File

@@ -2,6 +2,8 @@
; Copyright (c) 2024-2025 Amber Zeller, Gale Faraday ; Copyright (c) 2024-2025 Amber Zeller, Gale Faraday
; Licensed under MIT ; Licensed under MIT
INCLUDE "serial.inc"
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; ;;
;; CHIBI/O Stable BIOS Interface ;; CHIBI/O Stable BIOS Interface

View File

@@ -327,11 +327,11 @@ NOTOK@
; IF pointer table ; IF pointer table
IFPTRTBL IFPTRTBL
fdb IFCALL fdb IFCALL ; CALL
fdb IFHELP fdb IFHELP ; HELP
fdb IFPEEK fdb IFPEEK ; PEEK
fdb IFPOKE fdb IFPOKE ; POKE
fdb IFSREC fdb IFSREC ; SREC
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; ;;
@@ -384,7 +384,7 @@ IFPOKE
ldx BBVAR.cbtokens ; Make sure we have enough tokens ldx BBVAR.cbtokens ; Make sure we have enough tokens
cmpx #4 cmpx #4
lblo INVALIDARG lblo INVALIDARG
leax -3,x ; Get count of bytes to write into X leax -3,x ; Get count of bytes to copy from token buffer
ldy #0 ; Setup Y for indexing ldy #0 ; Setup Y for indexing
NEXTB@ NEXTB@
lda BBVAR.tokens+3,y ; Get source byte to copy lda BBVAR.tokens+3,y ; Get source byte to copy