better MONITOR -> DOS Wedge integration
This commit is contained in:
1 parent
ecb8155976
commit
06116cd0ee
2 files changed
+19
-2
No files matched your search
@@ -471,6 +471,7 @@ wedge_dos_wrapper_error_common:
|
|||||||
; Print error - within the MONITOR
|
; Print error - within the MONITOR
|
||||||
|
|
||||||
jsr do_error_print_only
|
jsr do_error_print_only
|
||||||
|
jsr print_return
|
||||||
bra wedge_dos_wrapper_exit_nocheck
|
bra wedge_dos_wrapper_exit_nocheck
|
||||||
|
|
||||||
wedge_dos_SYNTAX_error:
|
wedge_dos_SYNTAX_error:
|
||||||
|
|||||||
+18
-2
@@ -1599,9 +1599,25 @@ Print_BCD:
|
|||||||
Mon_DOS:
|
Mon_DOS:
|
||||||
; ******
|
; ******
|
||||||
|
|
||||||
JSR Print_CR
|
; Shift BUF content so that '@' is first character
|
||||||
|
|
||||||
|
@lp1 LDA BUF
|
||||||
|
CMP #'@'
|
||||||
|
BEQ @wedge
|
||||||
|
LDX #01
|
||||||
|
@lp2 LDA BUF,x
|
||||||
|
DEX
|
||||||
|
STA BUF,x
|
||||||
|
INX
|
||||||
|
INX
|
||||||
|
CPX #80
|
||||||
|
BNE @lp2
|
||||||
|
BRA @lp1
|
||||||
|
|
||||||
|
; Launch DOS Wedge
|
||||||
|
|
||||||
|
@wedge JSR Print_CR
|
||||||
JSR wedge_dos_monitor
|
JSR wedge_dos_monitor
|
||||||
JSR Print_CR
|
|
||||||
JMP Main
|
JMP Main
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
Reference in new issue
Block a user