refactored LOAD routine so that it's parts are reuseable

2019-07-19 17:23:11 +02:00
1 parent 66047996bb
commit da4cc3a89b
@@ -13,8 +13,8 @@ setnam:
 	;; There are 6 sane ways to implement this routine,
 	;; I hope this one won't cause similarity to CBM code

-	sta current_filename_length
-	sty current_filename_ptr + 1
-	stx current_filename_ptr + 0
+	sta FNLEN
+	sty STAL + 1
+	stx STAL + 0

 	rts