STRE	 	Prototype
	SGLB	Misc/Class Reference
		CLAS	354441
	ESBR
	SORD	2
		LITO	0	Raise Fast
		LITO	0	Raise
		LITO	0	Lower
		LITO	0	Lower Fast
	ESBR
	SORD	3
		LITO	1	previous state
		LITO	1	current state
	ESBR
	SORD	4
		LVAL	0	setpoint
		LITO	100	/o,10,10000;Gain (10-10000)
	ESBR
	CMNT	 	SORD 5 used for rate info
	SGLB	Output/#1	Setpoint output
		LCON	 	/*+;Output
	ESBR
	SGLB	Output/#2
		LCON	 	/*+;'Changing' output
	ESBR
ESTR
STRE
	SGLB	Misc/Superclass Reference
		CLAS	354008
	ESBR
	SGLB	General/Initialize	For internal class use only!!
		CMNT	 	Expects:  É ¥ inst/É
		CMNT	 	---- initialize rates
		LITO	2	É ¥ 2/inst/É
		LITO	4	É ¥ 4/2/inst/É
		PRIM	S_tree/Read	É ¥ gain/inst/É
		LVAL	0.0150151	É ¥ 0.015/gain/inst/É
		LVAL	0.00100711	É ¥ 0.001/0.015/gain/inst/É
		PRIM	Stack/Rotate down	É ¥ gain/0.001/0.015/inst/É
		PRIM	Value/Scale	É ¥ rate/inst/É
		CALL	354092	É ¥ inst/É
		PRIM	Timer/Get PAT	É ¥ time/inst/É
		PRIM	Stack/Swap	É ¥ inst/time/É
		GSYM	OpStn/Trigger	É ¥ method/inst/time/É
		PRIM	Heap/Delegate to self
	ESBR
	SGLB	OpStn/Trigger	For internal class use only!!
		CMNT	 	Expects:  É ¥ inst/time/É
		CMNT	 	---- requeue trigger
		PRIM	Stack/Swap	É ¥ time/inst/É
		TIME	200.000	É ¥ Æt/time/inst/É
		GSYM	OpStn/Trigger	É ¥ method/Æt/time/inst/É
		CALL	354057	É ¥ inst/É
		CMNT	 	---- generate output
		LITO	3	É ¥ 3/inst/É
		PRIM	S_tree/Entry to stack	É ¥ new/prev/inst/É
		PRIM	Stack/Dup to aux	É/new ¥ new/prev/inst/É
		LCAL	speedup	É/new ¥ inst/É
		PRIM	Stack/Dup from aux	É/new ¥ new/inst/É
		LITO	1	É/new ¥ 1/new/inst/É
		LITO	3	É/new ¥ 3/1/new/inst/É
		PRIM	S_tree/Replace	É/new ¥ inst/É
		PRIM	Stack/Push from aux	É ¥ new/inst/É
		STRE
			SORD	0	raise/lower
				LITO	5	É ¥ 5/button/inst/É
				PRIM	S_tree/Read	É ¥ ÆSP/inst/É
				PRIM	Stack/Swap	É ¥ inst/ÆSP/É
				LITO	1	É ¥ 1/inst/ÆSP/É
				LITO	4	É ¥ 4/1/inst/ÆSP/É
				PRIM	S_tree/Read	É ¥ SP/inst/ÆSP/É
				PRIM	Stack/Xswap	É ¥ SP/ÆSP/inst/É
				PRIM	Value/Add	É ¥ newSP/inst/É
				GSYM	Output/#1	É ¥ #1/newSP/inst/É
				PRIM	Misc/Send entry	É ¥ inst/É
				PRIM	Heap/Store self
			ESBR
			SORD	1	none
				PRIM	Heap/Store self
			ESBR
			SORD	6	contention
				PRIM	Heap/Store self
			ESBR
		ESTR
	ESBR
	SGLB	SignalP/Setpoint	/3v7,-100,100,-100,100;Setpoint (%)
		LITO	1
		CALL	354077
	ESBR
	SGLB	SignalP/Get Setpoint	/2v6,-100,100;%3.1f%%
		LITO	1
		CALL	354076
	ESBR
	SGLB	SignalP/Raise Fast	/3t5,false,true;Raise Fast input
		LITO	1
		LCAL	ButtonIn
	ESBR
	SGLB	SignalP/Raise	/3t5,false,true;Raise input
		LITO	2
		LCAL	ButtonIn
	ESBR
	SGLB	SignalP/Lower	/3t5,false,true;Lower input
		LITO	3
		LCAL	ButtonIn
	ESBR
	SGLB	SignalP/Lower Fast	/3t5,false,true;Lower Fast input
		LITO	4
		LCAL	ButtonIn
	ESBR
	SGLB	SignalP/Get Raise Fast	/2t4,false,true
		LITO	1
		CALL	354072
	ESBR
	SGLB	SignalP/Get Raise	/2t4,false,true
		LITO	2
		CALL	354072
	ESBR
	SGLB	SignalP/Get Lower	/2t4,false,true
		LITO	3
		CALL	354072
	ESBR
	SGLB	SignalP/Get Lower Fast	/2t4,false,true
		LITO	4
		CALL	354072
	ESBR
	SGLB	SignalP/Get Button State	/2e,error,None,Lower Fast,Lower,Raise,Raise Fast,Contention
		LITO	2
		CALL	354074
	ESBR
ESTR
LDEF	speedup
	CMNT	 	computes speedup
	CMNT	 	Input:  É ¥ new/prev/inst/É
	CMNT	 	Output:  É ¥ inst/É
	PRIM	Ordinal/Test equal	É ¥ rslt/prev/inst/É
	BRFL	 	branch if not equal
		PRIM	Stack/Drop	É ¥ inst/É
		LITO	4	É ¥ 4/inst/É
		LITO	5	É ¥ 5/4/inst/É
		PRIM	S_tree/Read	É ¥ rate/inst/É
		CALL	354092	É ¥ inst/É
	BRTR
	STRE
		SORD	0	other
			PRIM	Stack/Drop	É ¥ inst/É
			LITO	4	É ¥ 4/inst/É
			LITO	5	É ¥ 5/4/inst/É
			PRIM	S_tree/Read	É ¥ rate/inst/É
			CALL	354092	É ¥ inst/É
		ESBR
		SORD	2	lower fast
			LITO	5	É ¥ 5/inst/É
			PRIM	S_tree/Get exact	É ¥ list/5/inst/É
			PRIM	List/Behead	É ¥ count/list/5/inst/É
			PRIM	Ordinal/Decrement	É ¥ new_count/list/5/inst/É
			PRIM	Stack/Duplicate	É ¥ new_count/new_count/list/5/inst/É
			BRFL	 	branch if done
				PRIM	Stack/Drop	É ¥ list/5/inst/É
				PRIM	List/Behead	É ¥ lf/list/5/inst/É
				LVAL	0.500015	É ¥ 0.5/lf/list/5/inst/É
				PRIM	Value/Divide	É ¥ new_lf/list/5/inst/É
				LVAL	-0.100009	É ¥ -0.1/new_lf/list/5/inst/É
				PRIM	Stack/Swap	É ¥ new_lf/-0.1/list/5/inst/É
				PRIM	Value/Clamp low	É ¥ new_lf/list/5/inst/É
				PRIM	List/Splice	É ¥ list/5/inst/É
				LITO	3	É ¥ base_count/list/5/inst/É
				PRIM	List/Splice	É ¥ list/5/inst/É
				PRIM	S_tree/Put	É ¥ inst/É
			BRTR
			PRIM	List/Splice	É ¥ list/5/inst/É
			PRIM	S_tree/Put	É ¥ inst/É
		ESBR
		SORD	5	raise fast
			LITO	5	É ¥ 5/inst/É
			PRIM	S_tree/Get exact	É ¥ list/5/inst/É
			PRIM	List/Behead	É ¥ count/list/5/inst/É
			PRIM	Ordinal/Decrement	É ¥ new_count/list/5/inst/É
			PRIM	Stack/Duplicate	É ¥ new_count/new_count/list/5/inst/É
			BRFL	 	branch if done
				PRIM	Stack/Drop	É ¥ list/5/inst/É
				PRIM	List/Remove	É ¥ list/lf/5/inst/É
				PRIM	List/Remove	É ¥ list/l/lf/5/inst/É
				PRIM	List/Remove	É ¥ list/r/l/lf/5/inst/É
				PRIM	List/List to item	É ¥ rf/r/l/lf/5/inst/É
				LVAL	0.500015	É ¥ 0.5/rf/r/l/lf/5/inst/É
				PRIM	Value/Divide	É ¥ new_rf/r/l/lf/5/inst/É
				LVAL	0.100009	É ¥ 0.1/new_rf/r/l/lf/5/inst/É
				PRIM	Stack/Swap	É ¥ new_rf/0.1/r/l/lf/5/inst/É
				PRIM	Value/Clamp high	É ¥ new_rf/r/l/lf/5/inst/É
				PRIM	List/Item to list	É ¥ list/r/l/lf/5/inst/É
				PRIM	List/Add	É ¥ list/l/lf/5/inst/É
				PRIM	List/Add	É ¥ list/lf/5/inst/É
				PRIM	List/Add	É ¥ list/5/inst/É
				LITO	3	É ¥ base_count/list/5/inst/É
				PRIM	List/Splice	É ¥ list/5/inst/É
				PRIM	S_tree/Put	É ¥ inst/É
			BRTR
			PRIM	List/Splice	É ¥ list/5/inst/É
			PRIM	S_tree/Put	É ¥ inst/É
		ESBR
	ESTR
EDEF
LDEF	Button
	CMNT	 	Computes button state
	CMNT	 	Input: É ¥ inst/É
	CMNT	 	Output: É ¥ output/state/inst/É
	LITO	2	É ¥ 2/inst/É
	PRIM	S_tree/Entry to stack	É ¥ LF/L/R/RF/inst/É
	BRFL
		BRFL
			BRFL
				BRFL
					LITO	1
					LITO	0
				BRTR
				LITO	5
				LITO	1
			BRTR
			BRFL
				LITO	4
				LITO	1
			BRTR
			LITO	6
			LITO	0
		BRTR
		BRFL
			BRFL
				LITO	3
				LITO	1
			BRTR
			LITO	6
			LITO	0
		BRTR
		BRFL
			LITO	6
			LITO	0
		BRTR
		LITO	6
		LITO	0
	BRTR
	BRFL
		BRFL
			BRFL
				LITO	2
				LITO	1
			BRTR
			LITO	6
			LITO	0
		BRTR
		BRFL
			LITO	6
			LITO	0
		BRTR
		LITO	6
		LITO	0
	BRTR
	BRFL
		BRFL
			LITO	6
			LITO	0
		BRTR
		LITO	6
		LITO	0
	BRTR
	BRFL
		LITO	6
		LITO	0
	BRTR
	LITO	6
	LITO	0
EDEF
LDEF	ButtonIn
	CMNT	 	Accepts input and computes new state
	CMNT	 	input:  É ¥ index/inst/arg/É
	CMNT	 	output:  É ¥ É
	PRIM	Stack/Xswap	É ¥ index/arg/inst/É
	LITO	2	É ¥ 2/index/arg/inst/É
	PRIM	S_tree/Replace	É ¥ inst/É
	LCAL	Button	É ¥ output/state/inst/É
	PRIM	Stack/Xswap	É ¥ output/inst/state/É
	GSYM	Output/#2	É ¥ #2/output/inst/state/É
	PRIM	Misc/Send entry	É ¥ inst/state/É
	LITO	2	É ¥ 2/inst/state/É
	CALL	354075
EDEF