L X DisplayOn		; memA.midas  August 13, 1979  6:44 PM
L X Reset
L X Do-it  		; Added by Sosinski March 14, 1980  2:39 PM
L X Ld MEMA		; load memAll diagnostic
L X DisplayOn
L C0 Addr R0;		This code is stolen from "showS.midas"
L C1 Addr SVA		; current virtual address for storage
L C2 Addr COL		; current cache column
L C3 Addr SEXPECTED
L C4 Addr ;	leave it blank
L C5 Addr RSCR
L C6 Addr RSCR2
L C7 Addr T 20;	End code stolen from "showS.midas"
L C8 Addr 
L C9 Addr 
L C10 Addr 
L C11 Addr 
L C12 Addr ITERATIONS
L C13 Addr MEMFLAGS
L C14 Addr FLAGS
L C15 Addr 
L C16 Addr 
L B0 Addr SPATX;		Begin more code stolen from "showS.midas"
L B1 Addr CURSPATTERN
L B2 Addr SVAX
L B3 Addr SVAHIX
L B4 Addr SMAXBRHI
L B5 Addr SNMODULES
L B6 Addr SSUBRSCR
L B7 Addr SVAHIOLD
L B8 Addr SVAXOLD
L B9 Addr SIMSCR0		; SIM TASK SCRATCH REGISTER
L B10 Addr SIMSCR1	; SIM TASK SCRATCH REGISTER
L B11 Addr SMCRVICTIM
L B11 Addr HOLD
L B12 Addr PIPE 0
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
L A17 Addr PROCSRN	; init procsrn to zero
L A17 Val 0