[BASIC] fix VPOKE pointer preservation

mooinglemur · Mar 30, 2024 · e88b0fa · e88b0fa
1 parent b158434
commit e88b0fa
Showing 1 changed file with 10 additions and 1 deletion.
diff --git a/basic/x16additions.s b/basic/x16additions.s
@@ -247,7 +247,16 @@ vpeek	jsr chrget
 vpoke	jsr getbyt ; bank
 	phx
 	jsr chkcom
-	jsr getnum
+	jsr frmadr
+	lda poker+1
+	pha
+	lda poker
+	pha
+	jsr combyt
+	pla
+	sta poker
+	pla
+	sta poker+1
 	pla
 	cmp #4
 	bcs @io4