.ENABLE SUBSTITUTION
.ENABLE QUIET
.;
.; SCH may be assembled to either 
.;	1) Run on any RSX V4.0 system 
.;		Modifies and displays a)Round Robin interval
.;		 		      b)Swap interval
.;				      c)#SHF runs/swap interval
.;		Displays a)Round Robin Priority range
.;			 b)Swap priorities
.;
.;	2) Run on a RSX V4.0 system with SYSCM and TDSCH SLP mods
.;		Behaves as 1) above but also
.;			   a)Modifies the Round Robin Priority Range
.;			   b)Modifies the lower swap priority
.;
.; By default SCH will assemble (KMS=1) to require the SYSCM/TDSCH
.; changes.  If this is not desired, edit SCH.MAC and comment out
.; the line KMS=1.
.;
.IFNDF $RESLB .GOTO 10
.SET'$RESLB' RESLB
.GOTO 11
.10:.ASK RESLB BUILD WITH A FCS RESIDENT LIBRARY
.11:
MAC SCH.OBJ;1=LB0:[1,1]EXEMC/ML,[11,10]RSXMC/PA:1,SY:'<UIC>'SCH
.IF <EXSTAT> NE 1 /
.OPEN SCHFCSBLD.CMD;1
.DATA SCH.TSK;1/CP/PR=SCH
.DATA LB:[1,1]EXELIB/LB
.DATA LB:[1,54]RSX11M.STB/SS
.DATA LB:[1,1]SYSLIB/LB/MA
.DATA /
.DATA ASG=SY0:1
.DATA TASK=...SCH
.DATA ASG=TI0:2
.IFT RESLB .DATA LIBR=FCSRES:RO
.DATA STACK=64
.DATA PRI=50
.DATA //
.CLOSE
TKB @SCHFCSBLD
PIP SCHFCSBLD.CMD;1/DE/NM,SCH.OBJ;1
.DISABLE DISPLAY
.DISABLE QUIET
;
.ENABLE QUIET