fixed SETNAM storing pointer in wrong place

2019-07-27 21:14:35 +02:00
1 parent aa7e220575
commit 9ea1c04da3
@@ -41,7 +41,9 @@
 	.alias CMP0       $B0 ; $B0-$B1
 	
 	.alias FNLEN      $B7 ; current file name length
-	
+
+	.alias FNADDR     $BB ; $BB-$BC, current file name pointer
+
 	.alias STAL       $C1 ; $C1-$C2 LOAD/SAVE start address

 	;;
@@ -14,7 +14,7 @@ setnam:
 	;; I hope this one won't cause similarity to CBM code

 	sta FNLEN
-	sty STAL + 1
-	stx STAL + 0
+	sty FNADDR + 1
+	stx FNADDR + 0

 	rts