Compucolor.org – Virtual Media

Listing of file='MONITR.BAS;02' on disk='vmedia/ncc_4_11-sector.ccvf'

100 REM  THIS IS JUST PHASE ONE TO LOAD RGWTCH AND INSTRUCTIONS
300 PLOT 12,14:PRINT "MONITOR(16K) BY PAT LEABO & E. SWANK":PRINT
305 DV= PEEK (33044)AND 1:REM  LOAD DRIVE
404 PRINT "LOAD";DV;":RGWTCH.LDA;1"
405 PLOT 27,4:PRINT "LOAD";DV;":RGWTCH.LDA;1":PLOT 27,27
407 IF PEEK (29184)< > 32THEN PRINT "ABOVE FILE MUST BE ON LOAD DISK":END :RUN
410 PLOT  28,11,10,10,14,9,9:PRINT "     INSTRUCTIONS":PLOT  10
415 PRINT "THIS MONITOR IS USED TO TEST & DEBUG YOUR ASSEMBLY LANGUAGE"
420 PRINT "PROGRAMS.  MONITR OCCUPIES FROM 8200H TO 9FFFH."
425 PRINT "YOUR PROGRAM MUST BE ASSEMBLED ABOVE THIS AREA."
430 PLOT 10:PRINT "ADDRESSES AND VALUES ENTERED DEFAULT TO DECIMAL UNLESS"
435 PRINT "AN H SUFFIX IS ENTERED TO DENOTE HEXADECIMAL."
440 PRINT "ALSO, ALWAYS ENTER ZERO AS 00 OR 0H TO"
445 PRINT "AVOID CONFUSION WITH A BARE RETURN, WHICH INDICATES"
450 PRINT "NO CHANGE IN REGISTER AND STORAGE MODIFY COMMANDS."
451 PLOT 10:PRINT "YOU CAN INTERRUPT YOUR PROGRAM DURING EXECUTION BY SETTING"
452 PRINT "A BREAKPOINT, WHERE CONTROL IS RETURNED TO THE MONITOR,"
453 PRINT "AND YOU CAN EXAMINE & ALTER 8080 REGISTERS AND STORAGE."
460 PLOT  10:PRINT "BE AWARE THAT BREAKS OVERLAY 3 BYTES AT THE SPECIFIED"
470 PRINT "ADDRESS.  YOU MUST NOT OVERLAY INSTRUCTIONS OR DATA"
480 PRINT "THAT MIGHT BE NEEDED BEFORE THE BREAK IS EXECUTED,"
490 PRINT "WHEN THE ORIGINAL DATA IS RESTORED."
500 P2$= STR$ (DV)+ ":MONITR.BAS;1":LOAD  P2$:RUN