STRE
	SGLB	Misc/Class Reference
		CLAS	354034
	ESBR
	SORD	2	Main Data Structure
		TIME	300.000	/o;Diameter Tick Time
		PORD	0	/t,Disabled,Enabled;Preset
		PORD	0	/t,Not Held,Held;Hold State
		LVAL	0	Line Speed
		PVAL	0.0499893	/o,-120,120;Minimum Speed (%)
		PVAL	1	/o,-120,120;Winder Speed (%)
		PVAL	0.0100101	/o/-100,100,1,20;Build Up (1 - 20)
		LVAL	0	hold data
		PVAL	0.100009	/o,-100,100,0,100;Diameter Preset (%)
	ESBR
	SORD	4	filter data structure
		PVAL	0.199988	/o;Filter Time Rate
		PVAL	0.400006	/o;Core Time Rate
		LVAL	0	filter input & output (3)
		PVAL	0.199988	/o;Filter Threshold
	ESBR
	SORD	5	Core data structure
		PVAL	0.0100101	/o,-100,100,0,100;Minimum Diameter (%)
	ESBR
	SGLB	Output/#1
		LCON	 	/*+;Diameter
	ESBR
ESTR
STRE
	SGLB	Misc/Superclass Reference
		CLAS	354008
	ESBR
	SGLB	General/Initialize
		PRIM	Timer/Get PAT	PAT/inst/É
		PRIM	Stack/Swap	inst/PAT/É
		GSYM	Winders/Trigger	method/inst/PAT/...
		CLAS	354034
	ESBR
	SGLB	Winders/Trigger
		LITO	0
		LITO	2
		PRIM	S_tree/Read	list/inst/time/...
		PRIM	Stack/Xswap	list/time/inst/...
		PRIM	List/Remove	list/Æt/time/inst/...
		PRIM	Stack/Pop to aux	É/list ¥ Æt/time/inst/...
		GSYM	Winders/Trigger	É/list ¥ method/Æt/time/inst/...
		CALL	354057	É/list ¥ inst/...
		PRIM	Stack/Push from aux	É ¥ list/inst/...
		PRIM	List/Behead	preset/list/inst/...
		BRFL	 	branch if not preset
			PRIM	List/Behead	hold/list/inst/...
			BRFL	 	branch if not held
				PRIM	List/Behead	line speed/list/inst/...
				PRIM	Value/Absolute	line speed/list/inst/...
				PRIM	Stack/Pop to aux	.../line speed ¥ list/inst/...
				PRIM	List/Behead	.../line speed ¥ min speed/list/inst/...
				PRIM	Stack/Dup from aux	.../line speed ¥ line speed/min speed/list/inst/...
				PRIM	Value/Compare	.../line speed ¥ rslt/min speed/list/inst/...
				PRIM	Stack/Xdrop	.../line speed ¥ rslt/list/inst/...
				BRFL	 	branch if line speed > minimum speed
					PRIM	List/Remove	.../line speed ¥ list/winder speed/inst/...
					LVAL	0.0100101	.../line speed ¥ .01/list/winder speed/inst/...
					PRIM	Stack/Push from aux	... ¥ line speed/.01/list/winder speed/inst/...
					PRIM	Stack/Rotate down	list/line speed/.01/winder speed/inst/...
					PRIM	List/Remove	list/build up/line speed/.01/winder speed/inst/...
					PRIM	Stack/Drop	build up/line speed/.01/winder speed/inst/...
					PRIM	Value/Scale	scaled line speed/winder speed/inst/...
					PRIM	Stack/Swap	winder speed/scaled line speed/inst/...
					PRIM	Value/Absolute	winder speed/scaled line speed/inst/...
					PRIM	Value/Divide	hold input/inst/...
					PRIM	Stack/Dup to aux	.../filter input ¥ hold input/inst/...
					LITO	8	index of hold data
					LITO	2
					PRIM	S_tree/Replace	.../filter input ¥ inst/...
					LCAL	Filter
				BRTR
				LITO	3	current offset of hold
				PRIM	List/Read	.../line speed ¥ hold/list/inst/...
				PRIM	Stack/Drop from aux	... ¥ hold/list/inst/...
				PRIM	Stack/Pop to aux	.../hold ¥ list/inst/...
				PRIM	Stack/Drop	.../hold ¥ inst/...
				LCAL	Filter
			BRTR
			LITO	5	current offset of hold
			PRIM	List/Read	hold data/list/inst/...
			PRIM	Stack/Pop to aux	.../hold data ¥ list/inst/...
			PRIM	Stack/Drop	.../hold data ¥ inst/...
			LCAL	Filter
		BRTR
		LITO	7	current offset of preset dia.
		PRIM	List/Read	preset dia/list/inst/...
		PRIM	Stack/Dup to aux	.../preset dia ¥ preset dia/list/inst/...
		PRIM	Stack/Xdrop	.../preset dia ¥ preset dia/inst/...
		LITO	8	index of hold data
		LITO	2
		PRIM	S_tree/Replace	.../preset dia ¥ inst/...
		PRIM	Stack/Push from aux	... ¥ preset dia/inst/...
		LCAL	Dcalc
	ESBR
	SGLB	Winders/Preset Enable	/3t12,Disabled,Enabled;Set Preset as ...
		LITO	2	preset select index
		CALL	354073
	ESBR
	SGLB	Winders/Tension Enable	/3t12,Disabled,Enabled;Set Tension as ...
		PRIM	Stack/Swap	data/inst/...
		PRIM	Ordinal/Test zero	invert input
		PRIM	Stack/Swap	inst/!data/...
		LITO	3	hold state index
		CALL	354073
	ESBR
	SGLB	Winders/Line Speed	/3v57,-120,120;Enter Line Speed (%):
		LITO	4	line speed index
		CALL	354073
	ESBR
	SGLB	Winders/Minimum Speed	/3v57,-120,120;Enter Minimum Speed (%):
		LITO	5	min. speed index
		CALL	354073
	ESBR
	SGLB	Winders/Winder Speed	/3v57,-120,120;Enter Winder Speed (%):
		LITO	6	winder speed index
		CALL	354073
	ESBR
	SGLB	Winders/Build Up	/3v41,-100,100,1,20;Build Up (1 - 20)...
		LITO	7	build up index
		CALL	354073
	ESBR
	SGLB	Winders/External Load	/3v8,-100,100;Enter External Load (% Full Roll)...
		PRIM	Stack/Over	ext dia/inst/ext dia/É
		LITO	8	hold index
		LITO	2	main data
		PRIM	S_tree/Replace	inst/ext dia/É
		LITO	3
		CALL	354077
	ESBR
	SGLB	Winders/Dia. Preset 0	/3v8,-100,100;Enter Preset Diameter (% Full Roll)...
		LITO	9	preset dia. index
		CALL	354073
	ESBR
	SGLB	Winders/Filter Rate	/3
		LITO	1	filter rate index
		CALL	354077
	ESBR
	SGLB	Winders/Core Rate	/3
		LITO	2	core rate index
		CALL	354077
	ESBR
	SGLB	Winders/Threshold	/3
		LITO	4	threshold index
		CALL	354077
	ESBR
	SGLB	Winders/Minimum Diameter	/3v8,-100,100;Enter Minimum Diameter (% Full Roll)...
		LITO	1	min. dia. index
		CALL	354079
	ESBR
	SGLB	Winders/Get Preset Enable	/2t11,Disabled,Enabled;
		LITO	2	preset select index
		CALL	354072
	ESBR
	SGLB	Winders/Get Hold	/2t61,Not Held,Held;
		LITO	3	hold index
		CALL	354072
	ESBR
	SGLB	Winders/Get Line Speed	/2v58,-120,120;%1.1f%%
		LITO	4	line speed index
		CALL	354072
	ESBR
	SGLB	Winders/Get Minimum Speed	/2v58,-120,120;%1.1f%%
		LITO	5	minimum speed index
		CALL	354072
	ESBR
	SGLB	Winders/Get Winder Speed	/2v58,-120,120;%1.1f%%
		LITO	6	winder speed index
		CALL	354072
	ESBR
	SGLB	Winders/Get Build Up	/2v9,-100,100;%1.2f
		LITO	7
		CALL	354072
	ESBR
	SGLB	Winders/Get Preset 0	/2v6,-100,100;%1.2f%%
		LITO	9	external diameter index
		CALL	354072
	ESBR
	SGLB	Winders/Get Filter Rate	/2
		LITO	1	rate index
		CALL	354076
	ESBR
	SGLB	Winders/Get Core Rate	/2
		LITO	2	core rate index
		CALL	354076
	ESBR
	SGLB	Winders/Get Diameter	/2v6,-100,100;%1.2f%%
		LITO	3
		CALL	354076
	ESBR
	SGLB	Winders/Get Threshold	/2
		LITO	4	threshold index
		CALL	354076
	ESBR
	SGLB	Winders/Get Min. Diameter	/2v6,-100,100;%1.2f%%
		LITO	1	minimum diameter index
		CALL	354078
	ESBR
ESTR
LDEF	Hold	input/inst/...
	PRIM	Stack/Dup to aux
	LITO	8	index of hold data
	LITO	2
	PRIM	S_tree/Replace	.../input ¥ inst/...
	LCAL	Filter
EDEF
LDEF	Filter	.../input ¥ inst/...
	LITO	0	get whole list
	LITO	4	filter data
	PRIM	S_tree/Read	.../input ¥ filter data/inst/...
	PRIM	List/Remove	.../input ¥ list/f time/inst/...
	PRIM	List/Remove	.../input ¥ list/c time/f time/inst/...
	PRIM	List/Remove	.../input ¥ list/old/c time/f time/inst/...
	PRIM	List/List to item	.../input ¥ threshold/old/c time/f time/inst/...
	PRIM	Value/Compare	.../input ¥ rslt/old/c time/f time/inst/...
	BRFL	 	branch if using core
		PRIM	Stack/Xswap	.../input ¥ old/f time/c time/inst/...
		LCAL	FEnd
	BRTR
	LCAL	FEnd
EDEF
LDEF	FEnd	.../input ¥ old/time 1/time 2/inst/...
	PRIM	Stack/Xdrop	.../input ¥ old/time/inst/...
	PRIM	Stack/Over	.../input ¥ time/old/time/inst/...
	PRIM	Value/Multiply	.../input ¥ scaled old/time/inst/...
	PRIM	Stack/Swap	.../input ¥ time/scaled old/inst/...
	LVAL	1	.../input ¥ 1/time/scaled old/inst/...
	PRIM	Value/Difference	.../input ¥ 1-time/scaled old/inst/...
	PRIM	Stack/Push from aux	... ¥ input/1-time/scaled old/inst/...
	PRIM	Value/Multiply	scaled new/scaled old/inst/...
	PRIM	Value/Add	output/inst/...
	LCAL	Dcalc
EDEF
LDEF	Dcalc	output/inst/...
	PRIM	Stack/Swap	inst/output/...
	LITO	1	minimum diameter index
	LITO	5	core data
	PRIM	S_tree/Read	min/inst/output/...
	PRIM	Stack/Xover	output/min/inst/output/...
	PRIM	Stack/Swap	min/output/inst/output/...
	PRIM	Value/Clamp low	clamped output/inst/output/...
	GSYM	Output/#1
	PRIM	Misc/Send entry	inst/output/...
	LITO	3	filter output index
	CALL	354077
EDEF