DP0:[12,35]RNORSX.MAC=DP0:[12,35]RNORSX.MAC;-1
-,,/;DBC001/
-82
	CSI$SW	RI,,,,,RIGVAL		;RIGHT SHIFT SWITCH
-90,91
RIGVAL:	CSI$SV	NUMERIC,RIGSHI,2
	CSI$ND

ULSWT::.BLKB	2	;BUFFER FOR UNDERLINE SWITCH
RIGSHI:: .BLKW	1	;BUFFER FOR SHIFT VALUE
/