STRE	 	Prototype
	SGLB	Misc/Class Reference
		CLAS	354313
	ESBR
	SORD	2
		LITO	1	state
		TIME	2000.000	/o;Time Range (ms)
		PVAL	1	/o,-100,100,0,100;Delay time (% of Time Range)
	ESBR
	CMNT	 	SORD 3 is used by the timer
	SORD	4	edge store
		LITO	0	initialize input
		LITO	0	position S input
		LITO	0	position C input
	ESBR
	SGLB	Output/#1
		LCON	 	/*+;Non-inverted Output
	ESBR
	SGLB	Output/#2
		LCON	 	/*+;Inverted Output
	ESBR
ESTR
STRE
	SGLB	Misc/Superclass Reference
		CLAS	354008
	ESBR
	SGLB	General/Initialize
		CMNT	 	Expects:  É ¥ inst/É
		LITO	3	É ¥ 3/inst/É
		CALL	354305	É ¥ inst/É
		MACR	 	Stop
			LITO	0	É ¥ 0/inst/É
			CALL	354064	É ¥ inst/É
		EMAC
		PRIM	Heap/Store self
	ESBR
	SGLB	Logic/Mode	/3t5,Continuous,Single;Mode input
		CMNT	 	Expects:  É ¥ inst/data/É
		CALL	354063	É ¥ state/data/inst/É
		STRE	 	state s-tree
			SORD	0	state 4, 5, 7, 8, 9
				PRIM	Stack/Drop	É ¥ data/inst/É
				BRFL	 	branch if mode=0
					LITO	6	É ¥ new_state/inst/É
					CALL	354065
				BRTR
				PRIM	Heap/Store self
			ESBR
			SORD	1	state 1
				BRFL	 	branch if input is low
					LITO	2	É ¥ new_state/inst/É
					CALL	354065
				BRTR
				PRIM	Heap/Store self
			ESBR
			SORD	2	state 2
				BRFL	 	branch if input is low
					PRIM	Heap/Store self
				BRTR
				LITO	1	É ¥ new_state/inst/É
				CALL	354065
			ESBR
			SORD	3	state 3
				BRFL	 	branch if input=0
					MACR	 	Run
						LITO	1	É ¥ 1/inst/É
						CALL	354064	É ¥ inst/É
					EMAC
					LITO	6	É ¥ new_state/inst/É
					CALL	354065
				BRTR
				PRIM	Heap/Store self
			ESBR
			SORD	6	state 6
				BRFL	 	branch if input is low
					PRIM	Heap/Store self
				BRTR
				LITO	7	É ¥ new_state/inst/É
				CALL	354065
			ESBR
		ESTR
	ESBR
	SGLB	Logic/Stop	/3t5,Stop,Run;Stop input
		CMNT	 	Expects:  É ¥ inst/data/É
		CALL	354063	É ¥ state/data/inst/É
		STRE	 	state s-tree
			SORD	0	state 4, 5, 7, 8, 9
				PRIM	Stack/Drop	É ¥ data/inst/É
				BRFL	 	branch if mode=0
					MACR	 	Stop
						LITO	0	É ¥ 0/inst/É
						CALL	354064	É ¥ inst/É
					EMAC
					LITO	1	É ¥ new_state/inst/É
					CALL	354065
				BRTR
				PRIM	Heap/Store self
			ESBR
			SORD	1	state 1
				BRFL	 	branch if input is low
					PRIM	Heap/Store self
				BRTR
				LITO	3	É ¥ new_state/inst/É
				CALL	354065
			ESBR
			SORD	2	state 2
				BRFL	 	branch if input is low
					PRIM	Heap/Store self
				BRTR
				MACR	 	Run
					LITO	1	É ¥ 1/inst/É
					CALL	354064	É ¥ inst/É
				EMAC
				LITO	6	É ¥ new_state/inst/É
				CALL	354065
			ESBR
			SORD	3	state 3
				BRFL	 	branch if input=0
					LITO	1	É ¥ new_state/inst/É
					CALL	354065
				BRTR
				PRIM	Heap/Store self
			ESBR
			SORD	6	state 6
				BRFL	 	branch if input is low
					MACR	 	Stop
						LITO	0	É ¥ 0/inst/É
						CALL	354064	É ¥ inst/É
					EMAC
					LITO	2	É ¥ new_state/inst/É
					CALL	354065
				BRTR
				PRIM	Heap/Store self
			ESBR
		ESTR
	ESBR
	SGLB	Logic/Initiate	/3t5,false,true;Input
		CMNT	 	Expects:  É ¥ inst/data/É
		LITO	1	É ¥ 1/inst/arg/É
		LITO	4	É ¥ 4/1/inst/arg/É
		CALL	354236	É ¥ rslt/inst/É
		BRFL	 	branch if not a positive edge
			PRIM	Heap/Store self
		BRTR
		LITO	1	É ¥ 1/inst/É
		LITO	2	É ¥ 2/1/inst/É
		PRIM	S_tree/Read	É ¥ state/inst/É
		STRE
			SORD	0	else
				PRIM	Stack/Drop	É ¥ inst/É
				PRIM	Heap/Store self
			ESBR
			SORD	3	state 3
				MACR	 	Run
					LITO	1	É ¥ 1/inst/É
					CALL	354064	É ¥ inst/É
				EMAC
				LITO	4	É ¥ new_state/inst/É
				CALL	354065
			ESBR
		ESTR
	ESBR
	SGLB	Logic/Jog	/3t5,false,true;Input
		CMNT	 	Expects:  É ¥ inst/data/É
		CALL	354063	É ¥ state/data/inst/É
		STRE	 	state s-tree
			SORD	0	else
				PRIM	Stack/Drop	É ¥ data/inst/É
				PRIM	Stack/Drop	É ¥ inst/É
				PRIM	Heap/Store self
			ESBR
			SORD	3	state 3
				BRFL	 	branch if input=0
					PRIM	Heap/Store self
				BRTR
				MACR	 	Run
					LITO	1	É ¥ 1/inst/É
					CALL	354064	É ¥ inst/É
				EMAC
				LITO	9	É ¥ new_state/inst/É
				CALL	354065
			ESBR
			SORD	9	state 9
				BRFL	 	branch if input is low
					MACR	 	Stop
						LITO	0	É ¥ 0/inst/É
						CALL	354064	É ¥ inst/É
					EMAC
					LITO	3	É ¥ new_state/inst/É
					CALL	354065
				BRTR
				PRIM	Heap/Store self
			ESBR
		ESTR
	ESBR
	SGLB	Logic/Position S	/3t5,false,true;Input
		CMNT	 	Expects:  É ¥ inst/data/É
		LITO	2	É ¥ 2/inst/arg/É
		LITO	4	É ¥ 4/2/inst/arg/É
		CALL	354236	É ¥ rslt/inst/É
		BRFL	 	branch if not a positive edge
			PRIM	Heap/Store self
		BRTR
		LITO	1	É ¥ 1/inst/É
		LITO	2	É ¥ 2/1/inst/É
		PRIM	S_tree/Read	É ¥ state/inst/É
		STRE
			SORD	0	else
				PRIM	Stack/Drop	É ¥ inst/É
				PRIM	Heap/Store self
			ESBR
			SORD	4	state 4
				LCAL	timer
				LITO	5	É ¥ new_state/inst/É
				CALL	354065
			ESBR
		ESTR
	ESBR
	SGLB	Logic/Position C	/3t5,false,true;Input
		CMNT	 	Expects:  É ¥ inst/data/É
		LITO	3	É ¥ 3/inst/arg/É
		LITO	4	É ¥ 4/3/inst/arg/É
		CALL	354236	É ¥ rslt/inst/É
		BRFL	 	branch if not a positive edge
			PRIM	Heap/Store self
		BRTR
		LITO	1	É ¥ 1/inst/É
		LITO	2	É ¥ 2/1/inst/É
		PRIM	S_tree/Read	É ¥ state/inst/É
		STRE
			SORD	0	else
				PRIM	Stack/Drop	É ¥ inst/É
				PRIM	Heap/Store self
			ESBR
			SORD	7	state 7
				LCAL	timer
				LITO	8	É ¥ new_state/inst/É
				CALL	354065
			ESBR
		ESTR
	ESBR
	SGLB	Logic/Delay Time	/3v8,-100,100,0,100;Delay time (% of Time Range)
		LITO	3
		CALL	354073
	ESBR
	SGLB	Logic/Get Delay Time	/2v6,-100,100;%3.2f%%
		LITO	3
		CALL	354072
	ESBR
	SGLB	Logic/Get Output	/2e,error,Stop 1,Stop 2,Stop 3,Run 4,Run 5, Run 6, Run 7, Run 8, Run 9
		LITO	1
		CALL	354072
	ESBR
	SGLB	Timer/Timeout	for internal class use only
		CMNT	 	Expects:  (handled by 'Timer/Receiver')
		CALL	354308	É/(time) ¥ ref/inst/É
		BRFL	 	branch if no timeout
			PRIM	Heap/Store self
		BRTR
		PRIM	Stack/Drop from aux	É ¥ inst/É
		LITO	1	É ¥ 1/inst/É
		LITO	2	É ¥ 2/1/inst/É
		PRIM	S_tree/Read	É ¥ state/inst/É
		STRE	 	state s-tree
			SORD	0	else
				PRIM	Stack/Drop	É ¥ inst/É
				PRIM	Heap/Store self
			ESBR
			SORD	5	End Single
				MACR	 	Stop
					LITO	0	É ¥ 0/inst/É
					CALL	354064	É ¥ inst/É
				EMAC
				LITO	3	É ¥ new_state/inst/É
				CALL	354065
			ESBR
			SORD	8	End2 Cont.
				MACR	 	Stop
					LITO	0	É ¥ 0/inst/É
					CALL	354064	É ¥ inst/É
				EMAC
				LITO	3	É ¥ new_state/inst/É
				CALL	354065
			ESBR
		ESTR
	ESBR
ESTR
LDEF	timer
	CMNT	 	Starts the timer
	CMNT	 	Input:  É ¥ inst/É
	CMNT	 	Output: É ¥ inst/É
	LITO	2	É ¥ 2/inst/É
	PRIM	S_tree/Entry to stack	É ¥ time%/range/state/inst/É
	PRIM	Timer/Multiply	É ¥ Æt/state/inst/É
	PRIM	Stack/Xdrop	É ¥ Æt/inst/É
	LITO	3	É ¥ key/Æt/inst/É
	CALL	354285	É ¥ inst/É
EDEF