Cleanup BASIC sources
This commit is contained in:
1 parent
385de7a111
commit
25236f542d
36 files changed
+319
-2909
No files matched your search
+2
-4
@@ -1,5 +1,3 @@
|
||||
.segment "WOZMON"
|
||||
|
||||
XAML = $24 ; Last "opened" location Low
|
||||
XAMH = $25 ; Last "opened" location High
|
||||
STL = $26 ; Store address Low
|
||||
@@ -27,7 +25,7 @@ ESCAPE:
|
||||
JSR ECHO ; Output it.
|
||||
|
||||
GETLINE:
|
||||
LDA #$0D ; Send CR
|
||||
LDA #$0A ; Send LF
|
||||
JSR ECHO
|
||||
|
||||
LDY #$01 ; Initialize text index.
|
||||
@@ -120,7 +118,7 @@ SETADR: LDA L-1,X ; Copy hex data to
|
||||
|
||||
NXTPRNT:
|
||||
BNE PRDATA ; NE means no address to print.
|
||||
LDA #$0D ; CR.
|
||||
LDA #$0A ; LF.
|
||||
JSR ECHO ; Output it.
|
||||
LDA XAMH ; 'Examine index' high-order byte.
|
||||
JSR PRBYTE ; Output it in hex format.
|
||||
|
||||
Reference in new issue
Block a user