implemented SETMSG routine, LOAD command uses it

This commit is contained in:
FeralChild64 committed 2019-07-12 19:22:46 +02:00
1 parent 3039c108cb
commit ee6e7bc9d5
5 files changed
+23 -11

No files matched your search

+1 -2
View File
@@ -61,8 +61,7 @@
.alias LDTND $98 ; number of entries in LAT / FAT / SAT tables
.alias DFLTN $99
.alias input_device_number DFLTN
; bit 6 = error messages, bit 7 = control messages
.alias kernal_message_control_flags $9d
.alias MSGFLG $9D ; bit 6 = error messages, bit 7 = control message
.alias jiffy_clock_24bits $a0
.alias cassette_buffer_bytes_used $A6
.alias load_or_scroll_temp_pointer $AC
+9
View File
@@ -11,6 +11,15 @@ cmd_load:
;; middle of a program. For safety, we do.
jsr basic_do_clr
;; Setup Kernal to print control messages or not
lda #$80 ; display control messages and omit error messages
ldx basic_current_line_number+1
cpx #$FF
beq +
lda #$00 ; direct mode - don't display anything
*
jsr $FF90 ; SETMSG
;; XXX temporary, to set valid device number
lda #$08
sta current_device_number