L X DisplayOn ; October 12, 1979 5:59 PM L X Reset ; event counters midas display L X Do-it L X Ld eventCounters ; load the microprogram L B0 Addr RBASE 0 ; Rbase values L B1 Addr RBASE 17 L B0 Val 17 L B1 Val 17 L B2 Addr MEMRQ ; MIDAS MUFFLERS L B3 Addr LOADS L B4 Addr HJ L B5 Addr MX L B6 Addr JMPEXC L B7 Addr PCJ L B8 Addr FFK L B9 Addr HOLD; L B10 Addr L B11 Addr L B12 Addr L B13 Addr KLINK; place where return link from ifu jumps is kept L B14 Addr TPC 1; convenient task pc we can clobber w/ KLINK contents to get pretty print L B15 Addr STKP L B15 Val 1; initialize stkp for convenience L B15 Addr ; throw it away to avoid cluttered screen L B16 Addr CTRLO L C0 Addr R0 ; display common registers L C1 Addr L C2 Addr L C3 Addr L C4 Addr L C5 Addr L C6 Addr RSCR L C7 Addr RSCR2 L C8 Addr T 20 L C9 Addr FLAGS ; control for hold, task simulator L C10 Addr ITERATIONS ; count of iterations L C11 Addr NEXTTASK L C12 Addr HOLDVALUE L C13 Addr L C14 Addr L C15 Addr L A19 Addr TASK 20 ; use task 0 as default L A19 Val 0 L A7 Addr RBASE 20 ; use rbase 17 as default L A7 Val 17