1;---------------------------------------------------------------------- 2; Channel: Messages 3;---------------------------------------------------------------------- 4; (C)1983 Commodore Business Machines (CBM) 5; additions: (C)2020 Michael Steil, License: 2-clause BSD 6 7ms1 .byt $d,"I/O ERROR ",$a3 8ms5 .byt $d,"SEARCHING",$a0 9ms6 .byt "FOR",$a0 10ms7 .byte " FROM ",'$'+$80 11ms8 .byte " TO ",'$'+$80 12ms10 .byt $d,"LOADIN",$c7 13ms11 .byt $d,"SAVING",$a0 14ms21 .byt $d,"VERIFYIN",$c7 15ms17 .byt $d,"FOUND",$a0 16ms18 .byt $d,"OK",$8d 17; ms34 .byt $d,"MONITOR",$8d 18; ms36 .byt $d,"BREA",$cb 19 20;print message to screen only if 21;output enabled 22; 23spmsg bit msgflg ;printing messages? 24 bpl msg10 ;no... 25msg lda ms1,y 26 php 27 and #$7f 28 jsr bsout 29 iny 30 plp 31 bpl msg 32msg10 clc 33 rts 34 35