STRE	 	Prototype
	SGLB	Misc/Class Reference
		CLAS	354541
	ESBR
	SORD	2
		LITO	6	state
		LITO	0	video ref
		LITO	1	blink state:  1-low, 2-high, 3-blink low, 4-blink high
	ESBR
	SORD	3	strings
		LIST	 	Default Legend (Initialization)
			STRG	Network OK	/o;Legend
		ELST
		LIST	 	Legend 2 (No Configuration)
			STRG	No Config.
		ELST
		LIST	 	Legend 3 (L Error)
			STRG	L Error
		ELST
		LIST	 	Legend 4 (H Error)
			STRG	H Error
		ELST
		LIST	 	Legend 5 (Failed Self-Test)
			STRG	*
		ELST
		LIST	 	Legend 6 (Shutdown)
			STRG	*
		ELST
		LIST	 	Legend 7 (OK [used internally])
			STRG	*
		ELST
		LIST	 	Legend 8 (Network Warning)
			STRG	*
		ELST
		LIST	 	Legend 9 (Network Failure)
			STRG	Network Failure
		ELST
		LIST	 	Legend 10 (Checking Network)
			STRG	*
		ELST
		LIST	 	Legend 11 (Peer Halted)
			STRG	*
		ELST
	ESBR
	SORD	4	connector to be installed in System Control
		LIST	 	connector to install connector in system control
			GSYM	Conns/Update[ignore]
			LIST	 	data to be sent to System Control (output # and connector)
				GSYM	Output/#1
				LIST	 	connector
					GSYM	Conns/Update[attach]
					LNOD
					MSGE
						ICAL	 System	/i
						GSYM	OpStn/Report
					EMSG
				ELST
			ELST
			LNOD
			MSGE
				ICAL	 System
				GSYM	Hierarchy/Attach Conn
			EMSG
		ELST
	ESBR
	SORD	5	Alarm info
		LITO	0	Addr (0 if no current alarm)
		LITO	0	Code (high bit set if cleared)
	ESBR
ESTR
STRE
	SGLB	Misc/Superclass Reference
		CLAS	354040	inherits from SuperPM to get button functionality
	ESBR
	SGLB	OpStn/Init	internal class use only
		CMNT	 	Expects:  É ¥ inst/index/base/É
		CALL	354089	É ¥ inst/video ref/É
		MACR	 	initializes video object
			PRIM	Stack/Second to aux	É/video ref ¥ inst/É
			LITO	9	É/video ref ¥ 0/inst/É
			LITO	32768	É/video ref ¥ 0/0/inst/É
			LITO	3	É/video ref ¥ 0/0/0/inst/É
			LITO	0	É/video ref ¥ 0/0/0/0/inst/É
			LITO	3	É/video ref ¥ 0/0/0/0/0/inst/É
			LITO	0	É/video ref ¥ 0/0/0/0/0/0/inst/É
			LITO	5	É/video ref ¥ 5/0/0/0/0/0/0/inst/É
			PRIM	Stack/Dup from aux	É/video ref ¥ video ref/5/0/3/0/3/32768/9/inst/É
			ASIO	OpStn/INIT_VIDOBJ	É/video ref ¥ inst/É
		EMAC
		MACR	 	install format string
			LIST	 	É/video ref ¥ string/inst/É
				STRG	Address: ####	format string
			ELST
			PRIM	List/List to stack	É/video ref ¥ stringÉ/inst/É
			PRIM	Stack/Push from aux	É ¥ video ref/stringÉ/inst/É
			ASIO	OpStn/INSTALL_STRING	É ¥ inst/É
		EMAC
		MACR	 	install System Control connector
			LITO	4	É ¥ 4/inst/É
			PRIM	Stack/Dup to aux	É/dummy ¥ 4/inst/É
			PRIM	S_tree/Get exact	É/dummy ¥ list/4/inst/É
			PRIM	Misc/Send	É ¥ 4/inst/É
			PRIM	Stack/Drop	É ¥ inst/É
		EMAC
		LCAL	Refresh	É ¥ inst/É
		PRIM	Heap/Store self
	ESBR
	SGLB	OpStn/Button	internal class use only
		CMNT	 	Expects:  É ¥ inst/new/prev/É
		PRIM	Stack/Switch	É ¥ prev/new/inst/É
		STRE	 	previous state
			SORD	0	pressed
				PRIM	Stack/Drop	É ¥ new/inst/É
				PRIM	Stack/Drop	É ¥ inst/É
				PRIM	Heap/Store self
			ESBR
			SORD	6	release
				STRE	 	new state
					SORD	0	(2-6) don't care
						PRIM	Stack/Drop	É ¥ inst/É
						PRIM	Heap/Store self
					ESBR
					SORD	1	clear button
						CMNT	 	Ack
						LITO	2	É ¥ 2/inst/É
						LITO	5	É ¥ 5/2/inst/É
						PRIM	S_tree/Read	É ¥ code/inst/É
						LITO	128	É ¥ 128/code/inst/É
						PRIM	Ordinal/And	É ¥ rslt/inst/É
						BRFL	 	branch if not cleared
							PRIM	Heap/Store self
						BRTR
						LITO	0	É ¥ 0/inst/É
						LITO	1	É ¥ 1/0/inst/É
						LITO	5	É ¥ 5/1/0/inst/É
						PRIM	S_tree/Replace	É ¥ inst/É
						LCAL	Refresh	É ¥ inst/É
						PRIM	Heap/Store self
					ESBR
				ESTR
			ESBR
		ESTR
	ESBR
	SGLB	OpStn/Report	internal class use only (from System Control)
		CMNT	 	Expects:  É ¥ inst/data/É
		CMNT	 	data is : -->addr-->code--X
		PRIM	Stack/Swap	É ¥ data/inst/É
		PRIM	List/List to stack	É ¥ code/addr/inst/É
		PRIM	Stack/Switch	É ¥ inst/addr/code/É
		PRIM	Stack/Xover	É ¥ code/inst/addr/code/É
		PRIM	Ordinal/Increment	É ¥ code+1/inst/addr/code/É
		STRE	 	code+1 s-tree
			SORD	0	Discard
				PRIM	Stack/Drop	É ¥ inst/code/addr/É
				PRIM	Stack/Xdrop	É ¥ inst/addr/É
				PRIM	Stack/Xdrop	É ¥ inst/É
				PRIM	Heap/Store self
			ESBR
			SORD	3	No Config : Add
				LCAL	Add
			ESBR
			SORD	4	L Error : Add
				LCAL	Add
			ESBR
			SORD	5	H Error : Add
				LCAL	Add
			ESBR
			SORD	8	Mark as clear: Clear
				CMNT	 	É ¥ inst/addr/code/É
				PRIM	Stack/Rotate down	É ¥ code/inst/addr/É
				PRIM	Stack/Drop	É ¥ inst/addr/É
				LITO	1	É ¥ 1/inst/addr/É
				LITO	5	É ¥ 5/1/inst/addr/É
				PRIM	S_tree/Read	É ¥ curr/inst/addr/É
				PRIM	Stack/Rotate down	É ¥ addr/curr/inst/É
				PRIM	Ordinal/Test equal	É ¥ rslt/curr/inst/É
				PRIM	Stack/Xdrop	É ¥ rslt/inst/É
				BRFL	 	branch if not equal
					PRIM	Heap/Store self
				BRTR
				LITO	2	É ¥ 2/inst/É
				LITO	5	É ¥ 5/2/inst/É
				PRIM	S_tree/Read	É ¥ code/inst/É
				LITO	128	É ¥ 1/code/inst/É
				PRIM	Ordinal/Ior	É ¥ code'/inst/É
				LITO	2	É ¥ 2/code'/inst/É
				LITO	5	É ¥ 5/2/code'/inst/É
				PRIM	S_tree/Replace	É ¥ inst/É
				LCAL	Refresh	É ¥ inst/É
				PRIM	Heap/Store self
			ESBR
			SORD	10	Network Failure : Add
				LCAL	Add
			ESBR
		ESTR
	ESBR
	SGLB	OpStn/Measured Value	override
	ESBR
	SGLB	OpStn/Setpoint	override
	ESBR
	SGLB	OpStn/Get Measured Value	override
	ESBR
	SGLB	OpStn/Get Setpoint	override
	ESBR
	SGLB	OpStn/Highlight	override
	ESBR
ESTR
CMTL	5	graphic info
	CMNT	4	-18,-18,2088,288
	CMTL	7	0
		CMNT	18	1080,127,0,3,1,;/s;%s
	ECMT
	CMNT	8	0,0,2070,270
	CMNT	16	30,36,2040,162,54
ECMT
LDEF	Refresh	Called from:  Init, ScrollEnd, 'Ack' (Button/6/1), Report
	CMNT	 	Refreshes the display based on the current state
	CMNT	 	Input:  É ¥ inst/É
	CMNT	 	Output: É ¥ inst/É
	CALL	354093	É ¥ vref/inst/É
	PRIM	Stack/Pop to aux	É/vref ¥ inst/É
	LITO	5	É/vref ¥ 5/inst/É
	PRIM	S_tree/Entry to stack	É/vref ¥ code/addr/inst/É
	PRIM	Stack/Over	É/vref ¥ addr/code/addr/inst/É
	BRFL	 	branch if no fault information to display
		PRIM	Stack/Drop	É/vref ¥ 0/inst/É
		PRIM	Stack/Drop	É/vref ¥ inst/É
		MACR	 	Draws addr placeholder and turns off highlighting
			LITO	132	É/vref ¥ 132/inst/É
			PRIM	Stack/Dup from aux	É/vref ¥ vref/132/inst/É
			ASIO	OpStn/DRAW_TEXT	É/vref ¥ inst/É
			PRIM	Heap/Name of self	É/vref ¥ name/inst/É
			GSYM	OpStn/Highlight	É/vref ¥ method/name/inst/É
			LITO	0	É/vref ¥ 0/method/name/inst/É
			PRIM	Stack/Pop to aux	É/vref/0 ¥ method/name/inst/É
			CALL	354060	É/vref ¥ inst/É
		EMAC
		MACR	 	Draws default legend
			LITO	1	É/vref ¥ 1/inst/É
			LITO	3	É/vref ¥ 3/1/inst/É
			PRIM	S_tree/Read	É/vref ¥ legend/inst/É
			PRIM	List/List to stack	É/vref ¥ stringÉ/inst/É
			PRIM	Stack/Push from aux	É ¥ vref/stringÉ/inst/É
			PRIM	Ordinal/Increment	É ¥ vref'/stringÉ/inst/É
			PRIM	Stack/Duplicate	É ¥ vref'/vref'/stringÉ/inst/É
			ASIO	OpStn/LOWLIGHT	É ¥ vref'/stringÉ/inst/É
			ASIO	OpStn/DRAW_TEXT	É ¥ inst/É
		EMAC
	BRTR
	MACR	 	turn on highlighting
		PRIM	Heap/Name of self	É/vref ¥ name/code/addr/inst/É
		GSYM	OpStn/Highlight	É/vref ¥ method/name/code/addr/inst/É
		LITO	2	É/vref ¥ 2/method/name/code/addr/inst/É
		PRIM	Stack/Pop to aux	É/vref/2 ¥ method/name/code/addr/inst/É
		CALL	354060	É/vref ¥ code/addr/inst/É
	EMAC
	MACR	 	draw address
		PRIM	Stack/Dup from aux	É/vref ¥ vref/code/addr/inst/É
		PRIM	Stack/Rotate down	É/vref ¥ addr/vref/code/inst/É
		ASIO	OpStn/WRITE_VAL	É/vref ¥ code/inst/É
	EMAC
	MACR	 	draw legend for code
		PRIM	Stack/Dup down	É/vref ¥ code/inst/code/É
		LITO	127	É/vref ¥ 127/code/inst/code/É
		PRIM	Ordinal/And	É/vref ¥ code'/inst/code/É
		LITO	3	É/vref ¥ 3/code'/inst/code/É
		PRIM	S_tree/Read	É/vref ¥ string/inst/code/É
		PRIM	List/List to stack	É/vref ¥ stringÉ/inst/code/É
		PRIM	Stack/Push from aux	É ¥ vref/stringÉ/inst/code/É
		PRIM	Ordinal/Increment	É ¥ vref'/stringÉ/inst/code/É
		PRIM	Stack/Dup to aux	É/vref' ¥ vref'/stringÉ/inst/code/É
		ASIO	OpStn/DRAW_TEXT	É/vref' ¥ inst/code/É
	EMAC
	MACR	 	apply appropriate highlighting
		PRIM	Stack/Push from aux	É ¥ vref'/inst/code/É
		PRIM	Stack/Rotate down	É ¥ code/vref'/inst/É
		LITO	127	É ¥ 127/code/vref'/inst/É
		PRIM	Ordinal/Compare	É ¥ rslt/code/vref'/inst/É
		PRIM	Stack/Xdrop	É ¥ rslt/vref'/inst/É
		BRFL
			ASIO	OpStn/HIGHLIGHT	É ¥ inst/É
		BRTR
		ASIO	OpStn/LOWLIGHT	É ¥ inst/É
	EMAC
EDEF
LDEF	Add	Called from Report
	CMNT	 	Input:  É ¥ inst/addr/code/É
	LITO	1	É ¥ 1/inst/addr/code/É
	LITO	5	É ¥ 5/1/inst/addr/code/É
	PRIM	S_tree/Read	É ¥ curr/inst/addr/code/É
	BRFL	 	branch if no current entry
		PRIM	Stack/Switch	É ¥ code/addr/inst/É
		PRIM	List/Item to list	É ¥ leaf/addr/inst/É
		PRIM	List/Add	É ¥ entry/inst/É
		LITO	0	É ¥ 0/entry/inst/É
		LITO	5	É ¥ 5/0/entry/inst/É
		PRIM	S_tree/Replace	É ¥ inst/É
		LCAL	Refresh	É ¥ inst/É
		PRIM	Heap/Store self
	BRTR
	PRIM	Stack/Xdrop	É ¥ inst/code/É
	PRIM	Stack/Xdrop	É ¥ inst/É
	PRIM	Heap/Store self
EDEF