STRE
	SGLB	Misc/Class Reference
		CLAS	354187
	ESBR
	SORD	2	Main parameters;Current Memory
		LVAL	0	track and hold
		LITO	0	held?
		PVAL	0.941771	/o,-1,1,0,1;Memory Filter (0 - 1.0)
		LVAL	0	old filter output
	ESBR
	SORD	10	Defeat parameters;Current Memory
		LITO	1	old state
		PORD	0	/t,Track,Hold;Memory Hold
		PORD	0	/t,Disabled,Enabled;Memory Enable
		LITO	0	web break?
	ESBR
	SORD	5	/e,,,,,,Main parameters;Diameter Calculator
		PVAL	0.0100101	/o,-100,100,0,100;Min. Diameter (% Full Roll)
		PVAL	0.941771	/o;Diameter Filter (0 - 1.0)
		PVAL	0.941771	/o;Core Filter (0 - 1.0)
		LVAL	0	filter input & output
		PVAL	0	/o,-100,100,0,100;Core Threshold (% Full Roll)
		LVAL	0	hold data
		PORD	0	/t,Track,Hold;Diameter Hold
		LVAL	0.100009	diameter preset
		PORD	0	/t,Disabled,Enabled;Preset Enable
		LITO	1	inverted tension enable
		PVAL	0.0499893	/o,-120,120,0,120;Min Speed (0 - 120%)
		LVAL	0	|line speed|
		LVAL	0	|winder speed|
		PVAL	0.0100101	/o/-100,100,1,20;Build Up (1 - 20)
		TIME	300.000	/o;Diameter Tick Time
	ESBR
	SORD	13	/e,,,,,,,,,,,,,,Web Break parameters;Diameter Calculator
		LITO	0	count
		PORD	10	/o;WB Delay Count
		LITO	0	Tension Enable
		LVAL	0.0100101	old diameter
		PORD	1	/t,Unwind,Rewind;Rewind-Unwind
		PORD	1	/t,Reverse,Forward;Forward-Reverse
		LITO	0	web broken?
		PORD	1	/t,Disabled,Enabled;WB Reset
	ESBR
	SORD	11	/e,,,,,,,,,,,,Core parameters;Diameter Calculator
		PVAL	0.100009	/o,-100,100,0,100;Ext Diameter (% Full Roll)
		PORD	0	/t,Core,External;Ext Dia Select
		PVAL	0.0499893	/o,-100,100;Core 1 (% Full Roll)
		PVAL	0.100009	/o,-100,100;Core 2 (% Full Roll)
		PORD	0	/t,Core 1, Core 2;Core Select
	ESBR
	SORD	4	Jog parameters;Speed Demand
		PVAL	0.0199896	/o,-100,100,0,100;Run Delta (%)
		PVAL	0.0199896	/o,-100,100,0,100;Stop Delta (%)
		PVAL	0	/o,-120,120;Jog Speed (0 - 120%)
		LVAL	0	line speed
		PORD	0	/t,Off,Started;Start
		PORD	0	/t,Disabled,Enabled;Jog
	ESBR
	SORD	7
		LVAL	0.100009	signed diameter
		LVAL	0.0199896	ramp delta
		LVAL	0	ramp input/output
		LVAL	0	speed from Jog routine
		LVAL	0.0100101	build up
		LVAL	0.500015	range
	ESBR
	SORD	3	/e,,,,PID parameters;Speed Demand
		LVAL	0	PID output
		PVAL	0.500015	/o,-100,100,-100,100;Setpoint (%)
		LIST
			LITO	0	time
			LVAL	0	last error
			LVAL	0	/o/-100,100,-100,100;Integral preset (-100% to 100%)
		ELST
		PORD	0	/t,Disabled,Enabled;PID Enable
		PORD	0	/t,Disabled,Enabled;PID Integral Enable
		LVAL	0.166662	Proportional Gain (0 to 30)
		LVAL	0	Derivative Time (0s to 5s)
		PVAL	1	/o/-100,100,0,100;PG limit (0% to 100%)
		PVAL	1	/o/-100,100,-100,100;FB upper limit (-100% to 100%)
		PVAL	-1	/o/-100,100,-100,100;FB lower limit (-100% to 100%)
		PVAL	0.666677	/o/-15,15,0.1,15;Integral TC (0.1 to 15)
	ESBR
	SORD	6	/e,,,,,,,Profile parameters;Speed Demand
		PVAL	0.500015	/o,-100,100,0,100;Drive Max Gain (0 to 100)
		PVAL	0	/o,-100,100,0,100;Drive Min Gain (% of Max)
		PORD	1	/o,1,10;Drive Exponent
		PVAL	0.599994	/o,-5,5,0,5;D Max Gain (0 to 5)
		PVAL	0	/o,-100,100,0,100;D Min Gain (% of Max)
		PORD	1	/o,1,10;D Exponent
		PVAL	0.666677	/o,-30,30,0,30;P Max Gain (0 to 30)
		PVAL	0	/o,-100,100,0,100;P Min Gain (% of Max)
		PORD	1	/o,1,10;P Exponent
	ESBR
	SORD	14	/e,,,,,,,,,,,,,,,Loadcell parameters;Speed Demand
		PVAL	0.100009	/o,-10,10;LC Span (-10 to 10)
		PVAL	1	/o,-100,100;LC 1 Sign (%)
		PVAL	0	/o,-100,100;LC 1 Zero (%)
		PVAL	1	/o,-100,100;LC 2 Sign (%)
		PVAL	0	/o,-100,100;LC 2 Zero (%)
		PVAL	0	/o,-100,100;Loadcell 2 (%)
	ESBR
	SORD	8	/e,,,,,,,,,Main parameters;Tension Demand
		TIME	300.000	/o;Tension Tick Time
		PVAL	0	/o,-100,100;Stall Tension (%)
		PORD	0	/e,Fixed,Proportional;Stall Select
		PORD	0	/t,Disabled,Enabled;Stall Enable
		PVAL	0	/o,-100,100;Boost (%)
		PORD	0	/e,Fixed,Proportional;Boost Select
		PORD	0	/t,Disabled,Enabled;Boost Enable
		PVAL	0	/o,-100,100;Tension SP (%)
		PVAL	0	/o,-100,100;Taper SP (%)
		LVAL	0.100009	core diameter
		LVAL	0.400006	diameter
		PORD	0	/e,Linear,Hyperbolic;Taper Select
	ESBR
	SORD	9	/e,,,,,,,,,,Output parameters;Tension Demand
		LITO	2	'In Tension?' state (2 to force initial output)
		PVAL	1	/o,-100,100;Dancer Cal (%)
		PORD	0	/t,Disabled,Enabled;Tension Enable
		PORD	0	/t,Disabled,Enabled;Other Enable
		PVAL	0.0100101	/o,-100,100,0,100;Tension Delta (%)
		LVAL	0	old ramp output
	ESBR
	SORD	12	Up to Speed
		PVAL	0.100009	/o,-120,120;UTS Threshold (%)
		LVAL	0	line speed
		LVAL	0.0100101	build up
		LVAL	0.100009	dia
	ESBR
	SORD	15	Miscellaneous values
		LVAL	1	loadcell 1
		LVAL	0	up to speed
		LITO	0	integral defeat
		PORD	1	/t,Under,Over;Over-Under
		LVAL	0	speed demand
		LVAL	0	speed loop prop gain
		LVAL	0	feedback
		PVAL	0.100009	/o,-100,100;Range Non-Extn (%)
		PVAL	0.149998	/o,-100,100;Range Extn (%)
		PORD	0	/t,Disabled,Enabled;Extensible Web
	ESBR
	SGLB	Output/#1	current demand
		LCON	 	/*+;Current Demand
	ESBR
	SGLB	Output/#2	integral defeat
		LCON	 	/*+;Current Enable
	ESBR
	SGLB	Output/#3	diameter
		LIST
			GSYM	Conns/Update[attach]
			LNOD
			MSGE
				ISYM	dummy	/i;Filled in instance name
				GSYM	Winders/Profiles
			EMSG
		ELST
		LIST
			GSYM	Conns/Update[attach]
			LNOD
			MSGE
				ISYM	dummy	/i;Filled in instance name
				GSYM	Winders/Dia Extras
			EMSG
		ELST
		LCON	 	/*+;Diameter
	ESBR
	SGLB	Output/#10	web break
		LCON	 	/*+;Web Break
	ESBR
	SGLB	Output/#4	speed demand
		LCON	 	/*+;Speed Demand
	ESBR
	SGLB	Output/#12	drive P gain
		LCON	 	/*+;Drive P Gain
	ESBR
	SGLB	Output/#13	loadcell tension
		LCON	 	/*+;Loadcell Tension
	ESBR
	SGLB	Output/#5	tension demand
		LCON	 	/*+;Tension Demand
	ESBR
	SGLB	Output/#6	calibrated demand
		LCON	 	/*+;Dancer Loading
	ESBR
	SGLB	Output/#7	in tension
		LCON	 	/*+;In Tension
	ESBR
	SGLB	Output/#8	up to speed
		LCON	 	/*+;Up to Speed
	ESBR
	SGLB	Output/#9	internal (tension demand)
		LIST
			GSYM	Conns/Update[attach]
			LNOD
			MSGE
				ISYM	dummy	/i;Filled in instance name
				GSYM	Winders/Tension Demand
			EMSG
		ELST
	ESBR
	SGLB	Output/#11	internal (web break dia.)
		LIST
			GSYM	Conns/Update[attach]
			LNOD
			MSGE
				ISYM	dummy	/i;Filled in instance name
				GSYM	Winders/Web Break Dia
			EMSG
		ELST
	ESBR
ESTR
STRE
	SGLB	Misc/Superclass Reference
		CLAS	354100
	ESBR
	SGLB	General/Initialize
		LCAL	Select Web	inst/É
		LCAL	CM Calc	inst/É
		LCAL	Core1	inst/É
		LITO	8	preset index
		LITO	5	dia. calc data
		PRIM	S_tree/Read	preset/inst/É
		PRIM	Stack/Dup to aux	É/preset ¥ preset/inst/É
		LCAL	FOut	É ¥ inst/É
		LITO	14	build up index
		LITO	5	dia. calc data
		PRIM	S_tree/Read	mode/inst/É
		LCAL	Build Up	inst/É
		LITO	3	TE? index
		LITO	9	other TE data
		PRIM	S_tree/Read	TE?/inst/É
		PRIM	Stack/Swap	inst/TE?/É
		LCAL	TEnable	inst/É
		MACR	 	start diameter timer
			PRIM	Timer/Get PAT	PAT/inst/É
			TIME	0.000	Æt/PAT/inst/É
			GSYM	Winders/Dia. Trigger	method/Æt/PAT/inst/É
			CALL	354057	inst/...
		EMAC
		MACR	 	start tension timer
			PRIM	Timer/Get PAT	PAT/inst/É
			TIME	31.000	Æt/PAT/inst/É
			GSYM	Winders/Tension Trigger	method/Æt/PAT/inst/É
			CALL	354057	inst/...
		EMAC
		MACR	 	start sender timer
			PRIM	Timer/Get PAT	PAT/inst/É
			TIME	2000.000	Æt/PAT/inst/É
			GSYM	Winders/Senders	method/Æt/PAT/inst/É
			CALL	354057	inst/...
		EMAC
		PRIM	Heap/Store self	É
	ESBR
	SGLB	Winders/Tension Trigger
		LITO	8	tension demand data
		PRIM	S_tree/Entry to stack	taper sel/dia/core/taper/tension/É
		BRFL	 	branch if Linear Taper
			PRIM	Value/Difference	É ¥ dia-core/taper/tension/É
			LCAL	Taper	É ¥ É
		BRTR
		CMNT	 	Hyperbolic Taper
		PRIM	Value/Divide	É ¥ (core/dia)/taper/tension/É
		LVAL	1	É ¥ 1/(core/dia)/taper/tension/É
		PRIM	Value/Difference	É ¥ (1-core/dia)/taper/tension/É
		LCAL	Taper	É ¥ É
	ESBR
	SGLB	Winders/Tension Demand
		PRIM	Stack/Second to aux	É/demand ¥ inst/É
		LITO	9	tension output data
		PRIM	S_tree/Entry to stack	É/demand ¥ old/incr/OTE?/TE?/cal/old/inst/É
		PRIM	Stack/Push from aux	É ¥ demand/old/incr/OTE?/TE?/cal/old/inst/É
		CALL	354070	demand/OTE?/TE?/cal/old/inst/É
		PRIM	Stack/Pop to aux	É/demand ¥ OTE?/TE?/cal/old/inst/É
		BRFL	 	branch if other tension enable false
			BRFL	 	branch if not in tension
				CMNT	 	not in tension, no cal. output
				PRIM	Stack/Drop	É/demand ¥ old/inst/É
				LITO	0	É/demand ¥ 0/old/inst/É
				LCAL	TDemand2
			BRTR
			CMNT	 	in tension, cal. output
			PRIM	Stack/Dup from aux	É/demand ¥ demand/cal/old/inst/É
			PRIM	Value/Multiply	É/demand ¥ cal demand/old/inst/É
			PRIM	Stack/Xswap	É/demand ¥ cal demand/inst/old/É
			GSYM	Output/#6
			PRIM	Misc/Send entry	É/demand ¥ inst/old/É
			PRIM	Stack/Swap	É/demand ¥ old/inst/É
			LITO	1	É/demand ¥ 1/old/inst/É
			LCAL	TDemand2
		BRTR
		CMNT	 	not in tension, no cal. output
		PRIM	Stack/Drop	É/demand ¥ cal/old/inst/É
		PRIM	Stack/Drop	É/demand ¥ old/inst/É
		LITO	0	É/demand ¥ 0/old/inst/É
		LCAL	TDemand2
	ESBR
	SGLB	Winders/Dia. Trigger
		PRIM	Stack/Second to aux	É/time ¥ inst/É
		LITO	5	dia main data
		PRIM	S_tree/Entry to stack	É/time ¥ Æt/build up/|winder sp|/|line sp|/min sp/!TE/É
		PRIM	Stack/Push from aux	É ¥ time/Æt/build up/|winder sp|/|line sp|É
		GSYM	Winders/Dia. Trigger	É ¥ method/time/Æt/build up/|winder sp|/|line sp|É
		CALL	354057	build up/|winder sp|/|line sp|É
		PRIM	Stack/Xover	|line|/build up/|winder|/|line|/É
		LVAL	0.0100101	.01/|line|/build up/|winder|/|line|/É
		PRIM	Stack/Rotate down	build up/.01/|line|/|winder|/|line|/É
		PRIM	Value/Scale	scaled line/|winder|/|line|/min sp/É
		PRIM	Value/Fraction	dia./|line|/min sp/É
		PRIM	Stack/Dup to aux	É/dia. ¥ dia./|line|/min sp/É
		PRIM	Stack/Pop to aux	É/dia/dia ¥ |line|/min sp/É
		PRIM	Value/Compare	É/dia/dia ¥ min?/min sp/!TE/preset?/preset/É
		PRIM	Stack/Xdrop	É/dia/dia ¥ min?/!TE/preset?/preset/É
		PRIM	Ordinal/Ior	É/dia/dia ¥ enabled?/preset?/preset/É
		BRFL	 	branch if not enabled (no preset)
			CMNT	 	É/dia/dia ¥ preset?/preset/hold?/É
			PRIM	Stack/Drop	É/dia/dia ¥ preset/hold?/hold/threshold/filter/É
			PRIM	Stack/Drop	É/dia/dia ¥ hold?/hold/threshold/filter/É
			BRFL	 	branch if not held, use calculated value
				PRIM	Stack/Drop	É/dia/dia ¥ threshold/filter/É
				LCAL	DFilter
			BRTR
			CMNT	 	use held value
			PRIM	Stack/Drop from aux	É/dia ¥ hold/threshold/filter/É
			PRIM	Stack/Pop to aux	É/dia/hold ¥ threshold/filter/É
			LCAL	DFilter
		BRTR
		CMNT	 	É/dia/dia ¥ preset?/preset/hold?/É
		BRFL	 	branch if no preset enable
			CMNT	 	held, use held value
			PRIM	Stack/Drop	É/dia/dia ¥ hold?/hold/threshold/filter/É
			PRIM	Stack/Drop	É/dia/dia ¥ hold/threshold/filter/É
			PRIM	Stack/Drop from aux	É/dia ¥ hold/threshold/filter/É
			PRIM	Stack/Pop to aux	É/dia/hold ¥ threshold/filter/É
			LCAL	DFilter
		BRTR
		CMNT	 	preset enabled, use preset value
		PRIM	Stack/Drop from aux	É/dia ¥ preset/hold?/hold/threshold/filter/É
		PRIM	Stack/Xdrop	É/dia ¥ preset/hold/threshold/filter/É
		PRIM	Stack/Xdrop	É/dia ¥ preset/threshold/filter/É
		PRIM	Stack/Dup to aux	É/dia/preset ¥ preset/threshold/filter/É
		PRIM	Stack/Rotate up	É/dia/preset ¥ threshold/filter/preset/É
		PRIM	Stack/Xdrop	É/dia/preset ¥ threshold/preset/É
		LCAL	DFilter
	ESBR
	SGLB	Winders/Dia Extras
		MACR	 	Up to Speed
			PRIM	Stack/Over	É ¥ dia/inst/dia/É
			LITO	4	dia index
			LITO	12	up to speed structure
			PRIM	S_tree/Replace	É ¥ inst/dia/É
		EMAC
		MACR	 	tension demand dia
			PRIM	Stack/Over	dia/inst/dia/É
			LITO	11	dia index
			LITO	8	tension data
			PRIM	S_tree/Replace	inst/dia/É
		EMAC
		MACR	 	speed demand, last item
			LITO	4	over? index
			LITO	15	misc data
			PRIM	S_tree/Read	over?/inst/dia/É
			BRFL	 	branch if underwinding (negative)
				PRIM	Stack/Swap	dia/inst/É
				PRIM	Value/Negate	-dia/inst/É
				PRIM	Stack/Swap	inst/-dia/É
				LITO	1	signed dia index
				CALL	354083
			BRTR
			LITO	1	signed dia index
			CALL	354083
		EMAC
	ESBR
	SGLB	Winders/Profiles
		PRIM	Stack/Second to aux	É/dia ¥ inst/É
		LITO	6	profile data
		PRIM	S_tree/Entry to stack	É/dia ¥ Pexp/Pmin/Pmax/Dexp/Dmin/Dmax/Lexp/Lmin/Lmax/É
		PRIM	Stack/Push from aux	É ¥ dia/Pexp/Pmin/Pmax/Dexp/Dmin/Dmax/É
		LCAL	Profile	É/prop ¥ dia/Dexp/Dmin/Dmax/Lexp/Lmin/Lmax/inst/É
		LCAL	Profile	É/prop/der ¥ dia/Lexp/Lmin/Lmax/inst/É
		LCAL	Profile	É/prop/der/driveP ¥ dia/inst/É
		PRIM	Stack/Drop	É/prop/der/driveP ¥ inst/É
		PRIM	Stack/Push from aux	É/prop/der ¥ driveP/inst/É
		PRIM	Stack/Dup down	É/prop/der ¥ driveP/inst/driveP/É
		GSYM	Output/#12	É/prop/der ¥ out #12/driveP/inst/driveP/É
		PRIM	Misc/Send entry	É/prop/der ¥ inst/driveP/É
		PRIM	Stack/Push from aux	É/prop ¥ der/inst/driveP/É
		LITO	7	dir index
		LITO	3	PID data
		PRIM	S_tree/Replace	É/prop ¥ inst/driveP/É
		PRIM	Stack/Push from aux	É ¥ prop/inst/driveP/É
		LITO	6	prop index
		LITO	3	PID data
		PRIM	S_tree/Replace	É ¥ inst/driveP/É
		LITO	6	speed loop prop gain index
		CALL	354146
	ESBR
	SGLB	Winders/Web Break Dia
		CMNT	 	web break is reset when tension is disabled (see TEnable)
		PRIM	Stack/Second to aux	É/dia ¥ inst/É
		LITO	13	web break data
		PRIM	S_tree/Entry to stack	É/dia ¥ reset/broke?/dir/rewind?/old dia/TE?/max/count/inst/É
		BRFL	 	branch if not in reset
			BRFL	 	branch if not broken already
				PRIM	Ordinal/Xor	É/dia ¥ directed rewind?/old dia/max/count/inst/É
				BRFL	 	branch if rewind (diameter should be increasing)
					PRIM	Stack/Dup from aux	É/dia ¥ dia/old dia./TE?/max/count/É
					PRIM	Value/Compare	É/dia ¥ decreasing?/old dia/TE?/max/count/É
					PRIM	Stack/Xdrop	É/dia ¥ decreasing?/TE?/max/count/É
					BRFL	 	branch if going right direction (increasing)
						LCAL	WB ok	É ¥ É
					BRTR
					CMNT	 	going wrong direction (decreasing)
					LCAL	WB bad	É ¥ É
				BRTR
				CMNT	 	rewind (diameter should be increasing)
				CMNT	 	unwind (diameter should be decreasing)
				PRIM	Stack/Dup from aux	É/dia ¥ dia/old dia./TE?/max/count/É
				PRIM	Value/Compare	É/dia ¥ decreasing?/old dia/TE?/max/count/É
				PRIM	Stack/Xdrop	É/dia ¥ decreasing?/TE?/max/count/É
				BRFL	 	branch if going wrong direction (increasing)
					LCAL	WB bad	É ¥ É
				BRTR
				CMNT	 	going the right direction (decreasing)
				LCAL	WB ok	É ¥ É
			BRTR
			CMNT	 	web already broken, nothing to do
			PRIM	Stack/Drop	É/dia ¥ rewind?/old dia/TE?/max/count/inst/É
			PRIM	Stack/Drop	É/dia ¥ old dia/TE?/max/count/inst/É
			PRIM	Stack/Drop	É/dia ¥ TE?/max/count/inst/É
			PRIM	Stack/Drop	É/dia ¥ max/count/inst/É
			PRIM	Stack/Drop	É/dia ¥ count/inst/É
			PRIM	Stack/Drop	É/dia ¥ inst/É
			PRIM	Stack/Drop from aux	É ¥ inst/É
			PRIM	Heap/Store self	É ¥ É
		BRTR
		PRIM	Stack/Drop	É/dia ¥ dir/rewind?/old dia/TE?/max/count/inst/É
		PRIM	Stack/Drop	É/dia ¥ rewind?/old dia/TE?/max/count/inst/É
		PRIM	Stack/Drop	É/dia ¥ old dia/TE?/max/count/inst/É
		PRIM	Stack/Drop	É/dia ¥ TE?/max/count/inst/É
		PRIM	Stack/Drop	É/dia ¥ max/count/inst/É
		LCAL	WB clear	É ¥ É
	ESBR
	SGLB	Winders/Senders
		PRIM	Stack/Swap	É ¥ PAT/inst/É
		TIME	2000.000	Æt/PAT/inst/É
		GSYM	Winders/Senders	method/Æt/PAT/inst/É
		CALL	354057	É ¥ inst/É
		MACR	 	web break
			LITO	7
			LITO	13
			PRIM	S_tree/Read	web break?/inst/É
			GSYM	Output/#10	#10/web break?/inst/É
			PRIM	Misc/Send entry	inst/É
		EMAC
		MACR	 	in tension
			LITO	1
			LITO	9
			PRIM	S_tree/Read	É ¥ in tension/inst/É
			GSYM	Output/#7	É ¥ #7/in tension/inst/É
			PRIM	Misc/Send entry	inst/É
		EMAC
		MACR	 	up to speed
			LITO	2
			LITO	15
			PRIM	S_tree/Read	É ¥ up to speed/inst/É
			GSYM	Output/#8	É ¥ #8/up to speed/inst/É
			PRIM	Misc/Send entry	inst/É
		EMAC
		PRIM	Heap/Store self	É
	ESBR
	SGLB	Winders/Loadcell 1	/3v7,-100,100;Enter Loadcell 1 (%)...
		PRIM	Stack/Swap	É ¥ ip1/inst/É
		PRIM	Stack/Dup to aux	É/ip1 ¥ ip1/inst/É
		LITO	1
		LITO	15	misc data
		PRIM	S_tree/Replace	É/ip1 ¥ inst/É
		LITO	14	loadcell data
		PRIM	S_tree/Entry to stack	É/ip1 ¥ ip2/zero2/sign2/zero1/sign1/span/inst/É
		PRIM	Value/Add	É/ip1 ¥ ip2+zero2/sign2/zero1/sign1/span/inst/É
		PRIM	Value/Multiply	É/ip1 ¥ result2/zero1/sign1/span/inst/É
		PRIM	Stack/Rotate up	É/ip1 ¥ zero1/sign1/result2/span/inst/É
		PRIM	Stack/Push from aux	É ¥ ip1/zero1/sign1/result2/span/inst/É
		PRIM	Value/Add	É ¥ ip1+zero1/sign1/result2/span/inst/É
		PRIM	Value/Multiply	É ¥ result1/result2/span/inst/É
		PRIM	Value/Add	É ¥ result/span/inst/É
		LVAL	0.100009	É ¥ .1/result/span/inst/É
		PRIM	Value/Scale	É ¥ op/inst/É
		PRIM	Stack/Dup down	É ¥ op/inst/op/É
		GSYM	Output/#13	É ¥ out #13/op/inst/op/É
		PRIM	Misc/Send entry	É ¥ inst/op/É
		LCAL	Feedback
	ESBR
	SGLB	Winders/Feedback	/3v7,-100,100;Enter Feedback (%)...
		LCAL	Feedback
	ESBR
	SGLB	Winders/LC Span	/3v55,-10,10;Enter LC Span (-10 to 10)...
		LITO	1
		CALL	354150
	ESBR
	SGLB	Winders/LC 1 Sign	/3v7,-100,100;Enter LC 1 Sign (%)...
		LITO	2
		CALL	354150
	ESBR
	SGLB	Winders/LC 1 Zero	/3v7,-100,100;Enter LC 1 Zero (%)...
		LITO	3
		CALL	354150
	ESBR
	SGLB	Winders/LC 2 Sign	/3v7,-100,100;Enter LC 2 Sign (%)...
		LITO	4
		CALL	354150
	ESBR
	SGLB	Winders/LC 2 Zero	/3v7,-100,100;Enter LC 2 Zero (%)...
		LITO	5
		CALL	354150
	ESBR
	SGLB	Winders/Loadcell 2	/3v7,-100,100;Enter Loadcell 2 (%)...
		LITO	6
		CALL	354150
	ESBR
	SGLB	Winders/Armature Current	/3v38,-200,200;Enter Armature Current (-200% to 200%)...
		PRIM	Stack/Second to aux	É/current ¥ inst/É
		LITO	2	current data
		PRIM	S_tree/Entry to stack	É/current ¥ old/delta/held?/hold/inst/É
		LCAL	Filter	É/current ¥ output/held?/hold/inst/É
		PRIM	Stack/Drop from aux	É ¥ output/held?/hold/inst/É
		PRIM	Stack/Pop to aux	É/output ¥ held?/hold/inst/É
		BRFL	 	branch if not held
			PRIM	Stack/Drop	É/output ¥ inst/É
			PRIM	Stack/Dup from aux	É/output ¥ output/inst/É
			LCAL	CMemory
		BRTR
		LCAL	CMemory
	ESBR
	SGLB	Winders/Memory Filter	/3v;Enter Memory Filter...
		LITO	3	AC filter rate index
		CALL	354073
	ESBR
	SGLB	Winders/Memory Hold	/3t89,Track,Hold;Enter Memory Hold State...
		LITO	2	hold index
		LCAL	CM Set
	ESBR
	SGLB	Winders/Memory Enable	/3t12,Disabled,Enabled;Set Memory Enable as...
		LITO	3	cm enable index
		LCAL	CM Set
	ESBR
	SGLB	Winders/Drive Max Gain	/3v10,-100,100,0,100;Drive Max Gain (0 to 100)...
		LITO	1	drive max gain index
		CALL	354081
	ESBR
	SGLB	Winders/Drive Min Gain	/3v8,-100,100,0,100;Drive Min Gain (% of Max)...
		LITO	2	L Min Gain index
		CALL	354081
	ESBR
	SGLB	Winders/Drive Exponent	/3u86,1,10;Drive Exponent (1-10)...
		LITO	3	L exp index
		CALL	354081
	ESBR
	SGLB	Winders/D Max Gain	/3v48,-5,5,0,5;Derivative Max (0 to 5)...
		LITO	4	der max index
		CALL	354081
	ESBR
	SGLB	Winders/D Min Gain	/3v8,-100,100,0,100;Derivative Min Gain (% of Max)...
		LITO	5	der min index
		CALL	354081
	ESBR
	SGLB	Winders/D Exponent	/3u86,1,10;Derivative Exponent (1-10)...
		LITO	6	der exp index
		CALL	354081
	ESBR
	SGLB	Winders/P Max Gain	/3v26,-30,30,0,30;Prop. Max Gain (0 to 30)...
		LITO	7	prop max index
		CALL	354081
	ESBR
	SGLB	Winders/P Min Gain	/3v8,-100,100,0,100;Prop. Min Gain (% of Max)...
		LITO	8	prop min index
		CALL	354081
	ESBR
	SGLB	Winders/P Exponent	/3u86,1,10;Prop. Exponent (1-10)...
		LITO	9	prop exp index
		CALL	354081
	ESBR
	SGLB	Winders/Line Speed SP	/3v57/-120,120;Enter Line Speed Setpoint (%)...
		MACR	 	Up to Speed
			PRIM	Stack/Over	line sp/inst/line sp/É
			PRIM	Value/Absolute	|sp|/inst/line sp/É
			LITO	2	line speed index
			LITO	12	up to speed structure
			PRIM	S_tree/Replace	É ¥ inst/line sp/É
		EMAC
		MACR	 	Speed Demand stuff, last item
			LITO	4	line speed index
			LCAL	Jog	É ¥ inst/line sp/É
		EMAC
		PRIM	Heap/Store self	É ¥ É
	ESBR
	SGLB	Winders/Line Speed	/3v57/-120,120;Enter Line Speed (%)...
		MACR	 	Diameter stuff, last item
			PRIM	Stack/Swap	sp/inst/É
			PRIM	Value/Absolute	|sp|/inst/É
			PRIM	Stack/Swap	inst/|sp|/É
			LITO	12	line speed index
			CALL	354079
		EMAC
	ESBR
	SGLB	Winders/WB Delay Count	/3u;Enter Web Break Delay Count...
		LITO	2	delay index
		CALL	354145
	ESBR
	SGLB	Winders/Rewind-Unwind	/3t73,Unwind,Rewind;Select Mode...
		LITO	5	rewind? index
		CALL	354145
	ESBR
	SGLB	Winders/Forward-Reverse	/3t75,Reverse,Forward;Select Direction...
		PRIM	Stack/Swap	dir/inst/É
		LITO	1	1/dir/inst/É
		PRIM	Ordinal/And	dir/inst/É
		LITO	6	direction index
		LITO	13	web break data
		PRIM	S_tree/Replace	inst/É
		PRIM	Heap/Store self	É
	ESBR
	SGLB	Winders/WB Reset	/3t12,Disabled,Enabled;Set Web Break Reset as...
		LITO	8	reset index
		CALL	354145
	ESBR
	SGLB	Winders/Dancer Cal	/3v7,-100,100;Dancer Calibration (%)...
		LITO	2	calibration index
		CALL	354132
	ESBR
	SGLB	Winders/Other Enable	/3t12,Disabled,Enabled;Set Other Enable as...
		LITO	4	other enable
		CALL	354132
	ESBR
	SGLB	Winders/Tension Delta	/3v8,-100,100,0,100;Enter Tension Ramp Delta (%)...
		LITO	5	ramp index
		CALL	354132
	ESBR
	SGLB	Winders/Stall Tension	/3v7,-100,100;Enter Stall Tension (%)...
		LITO	2	stall index
		CALL	354085
	ESBR
	SGLB	Winders/Stall Select	/3e81,Fixed,Proportional;Stall Select...
		LITO	3	stall  select index
		CALL	354085
	ESBR
	SGLB	Winders/Stall Enable	/3t12,Disabled,Enabled;Stall Enable...
		LITO	4	stall enable index
		CALL	354085
	ESBR
	SGLB	Winders/Boost	/3v7,-100,100;Enter Boost (%)...
		LITO	5	boost index
		CALL	354085
	ESBR
	SGLB	Winders/Boost Select	/3e81,Fixed,Proportional;Boost Select...
		LITO	6	boost select index
		CALL	354085
	ESBR
	SGLB	Winders/Boost Enable	/3t12,Disabled,Enabled;Boost Enable...
		LITO	7	boost enable index
		CALL	354085
	ESBR
	SGLB	Winders/Tension SP	/3v7,-100,100;Enter Tension (%)...
		LITO	8	tension index
		CALL	354085
	ESBR
	SGLB	Winders/Taper SP	/3v7,-100,100;Enter Taper (%)...
		LITO	9	taper index
		CALL	354085
	ESBR
	SGLB	Winders/Taper Select	/3e83,Linear,Hyperbolic;Taper Select...
		LITO	12	taper select index
		CALL	354085
	ESBR
	SGLB	Winders/UTS Threshold	/3v57,-120,120;Enter Threshold (0 - 120%)...
		PRIM	Stack/Swap	threshold/inst/É
		LITO	1	threshold index
		LITO	12	up to speed data
		PRIM	S_tree/Replace	inst/É
		PRIM	Heap/Store self	É
	ESBR
	SGLB	Winders/Over-Under	/3t77,Under,Over;Set Overwind/Underwind as ...
		LITO	4	over? index
		CALL	354146
	ESBR
	SGLB	Winders/Range Non-Extn	/3v7,-100,100;Enter Non-Extensible Range (%)...
		LITO	8
		LCAL	Set Web
	ESBR
	SGLB	Winders/Range Extn	/3v7,-100,100;Enter Extensible Range (%)...
		LITO	9
		LCAL	Set Web
	ESBR
	SGLB	Winders/Extensible Web	/3t12,Disabled,Enabled;Set Extensible Web as...
		LITO	10
		LCAL	Set Web
	ESBR
	SGLB	Winders/Tension Enable	/3t12,Disabled,Enabled;Set Tension Enable as...
		LCAL	TEnable	inst/É
		PRIM	Heap/Store self	value hasn't changed
	ESBR
	SGLB	Winders/Winder Speed	/3v57/-120,120;Enter Winder Speed (%)...
		PRIM	Stack/Swap	winder speed/inst/É
		PRIM	Value/Absolute	|winder speed|/inst/É
		PRIM	Stack/Dup down	|winder speed|/inst/|winder speed|/É
		LITO	13	|winder speed| index
		LITO	5	dia. calc data
		PRIM	S_tree/Replace	inst/|winder speed|/É
		MACR	 	Up to Speed
			PRIM	Stack/Over	|winder speed|/inst/|winder speed|/É
			PRIM	Stack/Pop to aux	É/|winder speed| ¥ inst/|winder speed|/É
			LITO	0	whole list
			LITO	12	up to speed data
			PRIM	S_tree/Read	É/winder speed ¥ list/inst/ws/É
			PRIM	List/Remove	É/w sp ¥ list/threshold/inst/ws/É
			PRIM	List/Remove	É/w sp ¥ list/line sp/threshold/inst/ws/É
			PRIM	List/Remove	É/w sp ¥ list/build up/line sp/threshold/inst/ws/É
			PRIM	List/List to item	É/w sp ¥ dia/build up/line sp/threshold/inst/É
			PRIM	Stack/Push from aux	É ¥ |w sp|/dia/build up/line sp/threshold/inst/É
			PRIM	Value/Multiply	w sp*dia/build up/line sp/threshold/inst/É
			LVAL	0.0100101	.01/w sp*dia/build up/line sp/threshold/inst/É
			PRIM	Value/Scale	cal. sp/line sp/threshold/inst/É
			PRIM	Value/Subtract	delta sp/threshold/inst/É
			PRIM	Value/Absolute	|delta sp|/threshold/inst/É
			PRIM	Value/Compare	up to speed/threshold/inst/É
			PRIM	Stack/Xdrop	up to speed/inst/É
			PRIM	Stack/Dup to aux	É/up to speed ¥ up to speed/inst/É
			LITO	2	up to speed index
			LITO	15	misc data structure
			PRIM	S_tree/Replace	É/up to speed ¥ inst/É
			PRIM	Stack/Push from aux	É ¥ up to speed/inst/É
			GSYM	Output/#8
			PRIM	Misc/Send entry	inst/|w sp|/É
		EMAC
		PRIM	Stack/Xdrop
		PRIM	Heap/Store self
	ESBR
	SGLB	Winders/Min Diameter	/3v8,-100,100,0,100;Enter Minimum Diameter (% Full Roll)...
		LITO	1	min. dia. index
		CALL	354079
	ESBR
	SGLB	Winders/Diameter Filter	/3v;Enter Diameter Filter (0 - 1.0)...
		LITO	2	filter rate index
		CALL	354079
	ESBR
	SGLB	Winders/Core Filter	/3v;Enter Core Filter (0 - 1.0)...
		LITO	3	core rate index
		CALL	354079
	ESBR
	SGLB	Winders/Core Threshold	/3v8,-100,100,0,100;Enter Core Threshold (% Full Roll)...
		LITO	5	threshold index
		CALL	354079
	ESBR
	SGLB	Winders/Diameter Hold	/3t89,Track,Hold;Enter Hold State...
		LITO	7	hold index
		CALL	354079
	ESBR
	SGLB	Winders/Preset Enable	/3t12,Disabled,Enabled;Set Preset as ...
		LITO	9	preset select index
		CALL	354079
	ESBR
	SGLB	Winders/Min Speed	/3v57,-120,120;Enter Minimum Speed (%)...
		LITO	11	min. speed index
		CALL	354079
	ESBR
	SGLB	Winders/Build Up	/3v41,-100,100,1,20;Build Up (1 - 20)...
		PRIM	Stack/Over	build up/inst/build up/É
		LCAL	Build Up	inst/build up/É
		LITO	14	build up index
		CALL	354079
	ESBR
	SGLB	Winders/Run Delta	/3v8,-100,100,0,100;Enter Speed Demand Run Delta (%)...
		LITO	1
		LCAL	Jog	inst/É
		PRIM	Heap/Store self	É ¥ É
	ESBR
	SGLB	Winders/Stop Delta	/3v8,-100,100,0,100;Enter Speed Demand Stop Delta (%)...
		LITO	2	ramp incr. index
		LCAL	Jog	inst/É
		PRIM	Heap/Store self	É ¥ É
	ESBR
	SGLB	Winders/Jog Speed	/3v57,-120,120;Enter Jog Speed (%)...
		LITO	3	jog speed index
		LCAL	Jog	inst/É
		PRIM	Heap/Store self	É ¥ É
	ESBR
	SGLB	Winders/Start	/3t79,Off,Started;Set Start as ...
		LITO	5	start signal index
		LCAL	Jog	inst/É
		PRIM	Heap/Store self	É ¥ É
	ESBR
	SGLB	Winders/Jog	/3t12,Disabled,Enabled;Set Jog as ...
		LITO	6	jog enable index
		LCAL	Jog	inst/É
		PRIM	Heap/Store self	É ¥ É
	ESBR
	SGLB	Winders/Ext Diameter	/3v7,-100,100,0,100;Enter Ext. Diameter (% Full Roll)...
		LITO	1	ext dia index
		LCAL	Core
	ESBR
	SGLB	Winders/Ext Dia Select	/3t12,Core,External;Set Diameter Select as...
		LITO	2	ext dia? index
		LCAL	Core
	ESBR
	SGLB	Winders/Core 1	/3v8,-100,100,0,100;Enter Core 1 (% Full Roll)...
		LITO	3	core 1 index
		LCAL	Core
	ESBR
	SGLB	Winders/Core 2	/3v8,-100,100,0,100;Enter Core 2 (% Full Roll)...
		LITO	4	core 2 index
		LCAL	Core
	ESBR
	SGLB	Winders/Core Select	/3t92,Core 1,Core 2;Select Core...
		LITO	5	ext dia? index
		LCAL	Core
	ESBR
	SGLB	Winders/Get Current Demand	/2v37,-200,200;%3.2f%%
		LITO	1
		CALL	354072
	ESBR
	SGLB	Winders/Get Memory Filter	/2v
		LITO	3	AC filter rate index
		CALL	354072
	ESBR
	SGLB	Winders/Get Filtered Current	/2v37,-200,200;%3.2f%%
		LITO	4	filter output index
		CALL	354072
	ESBR
	SGLB	Winders/Get Current Enable	/2t11,Disabled,Enabled
		LITO	1
		CALL	354131
	ESBR
	SGLB	Winders/Get Memory Hold	/2t90,Tracking,Holding
		LITO	2	hold index
		CALL	354131
	ESBR
	SGLB	Winders/Get Memory Enable	/2t11,Disabled,Enabled
		LITO	3	cm enable index
		CALL	354131
	ESBR
	SGLB	Winders/Get LC Span	/2v63,-10,10;%3.2f
		LITO	1
		CALL	354149
	ESBR
	SGLB	Winders/Get LC 1 Sign	/2v6,-100,100;%3.2f%%
		LITO	2
		CALL	354149
	ESBR
	SGLB	Winders/Get LC 1 Zero	/2v6,-100,100;%3.2f%%
		LITO	3
		CALL	354149
	ESBR
	SGLB	Winders/Get LC 2 Sign	/2v6,-100,100;%3.2f%%
		LITO	4
		CALL	354149
	ESBR
	SGLB	Winders/Get LC 2 Zero	/2v6,-100,100;%3.2f%%
		LITO	5
		CALL	354149
	ESBR
	SGLB	Winders/Get Loadcell 2	/2v6,-100,100;%3.2f%%
		LITO	6
		CALL	354149
	ESBR
	SGLB	Winders/Get Range	/2v6,-100,100;%3.2f%%
		LITO	6	trim index
		CALL	354082
	ESBR
	SGLB	Winders/Get Drive Max Gain	/2v9,-100,100;%3.2f
		LITO	1	drive max gain index
		CALL	354080
	ESBR
	SGLB	Winders/Get Drive Min Gain	/2v6,-100,100;%3.2f%%
		LITO	2	L Min Gain index
		CALL	354080
	ESBR
	SGLB	Winders/Get Drive Exponent	/2u2
		LITO	3	L exp index
		CALL	354080
	ESBR
	SGLB	Winders/Get D Max Gain	/2v30,-5,5;%1.2f
		LITO	4	der max index
		CALL	354080
	ESBR
	SGLB	Winders/Get D Min Gain	/2v6,-100,100;%3.2f%%
		LITO	5	der min index
		CALL	354080
	ESBR
	SGLB	Winders/Get D Exponent	/2u2
		LITO	6	der exp index
		CALL	354080
	ESBR
	SGLB	Winders/Get P Max Gain	/2v29,-30,30;%2.1f
		LITO	7	prop max index
		CALL	354080
	ESBR
	SGLB	Winders/Get P Min Gain	/2v6,-100,100;%3.2f%%
		LITO	8	prop min index
		CALL	354080
	ESBR
	SGLB	Winders/Get P Exponent	/2u2
		LITO	9	prop exp index
		CALL	354080
	ESBR
	SGLB	Winders/Get WB Delay Count	/2u2
		LITO	2	delay index
		CALL	354144
	ESBR
	SGLB	Winders/Get Rewind-Unwind	/2t72,Unwind,Rewind
		LITO	5	rewind? index
		CALL	354144
	ESBR
	SGLB	Winders/Get Forward-Reverse	/2t74,Reverse,Forward
		LITO	6	direction index
		CALL	354144
	ESBR
	SGLB	Winders/Get Web Break	/2t11,Disabled,Enabled
		LITO	7	web break index
		CALL	354144
	ESBR
	SGLB	Winders/Get WB Reset	/2t11,Disabled,Enabled
		LITO	8
		CALL	354144
	ESBR
	SGLB	Winders/Get In Tension	/2t11,Disabled,Enabled
		LITO	1
		CALL	354130
	ESBR
	SGLB	Winders/Get Dancer Cal	/2v6,-100,100;%3.2f%%
		LITO	2	cal index
		CALL	354130
	ESBR
	SGLB	Winders/Get Other Enable	/2t11,Disabled,Enabled
		LITO	4	other enable
		CALL	354130
	ESBR
	SGLB	Winders/Get Tension Delta	/2v6,-100,100;%3.2f%%
		LITO	5	ramp index
		CALL	354130
	ESBR
	SGLB	Winders/Get Tension Demand	/2v6,-100,100;%3.2f%%
		LITO	6	demand index
		CALL	354130
	ESBR
	SGLB	Winders/Get Stall Tension	/2v6,-100,100;%3.2f%%
		LITO	2	stall index
		CALL	354084
	ESBR
	SGLB	Winders/Get Stall Select	/2e80,Fixed,Proportional
		LITO	3	stall  select index
		CALL	354084
	ESBR
	SGLB	Winders/Get Stall Enable	/2t,Disabled,Enabled
		LITO	4	stall enable index
		CALL	354084
	ESBR
	SGLB	Winders/Get Boost	/2v6,-100,100;%3.2f%%
		LITO	5	boost index
		CALL	354084
	ESBR
	SGLB	Winders/Get Boost Select	/2e80,Fixed,Proportional
		LITO	6	boost select index
		CALL	354084
	ESBR
	SGLB	Winders/Get Boost Enable	/2t,Disabled,Enabled
		LITO	7	boost enable index
		CALL	354084
	ESBR
	SGLB	Winders/Get Tension SP	/2v6,-100,100;%3.2f%%
		LITO	8	tension index
		CALL	354084
	ESBR
	SGLB	Winders/Get Taper SP	/2v6,-100,100;%3.2f%%
		LITO	9	taper index
		CALL	354084
	ESBR
	SGLB	Winders/Get Core	/2v6,-100,100;%1.2f%% Full Roll
		LITO	10
		CALL	354084
	ESBR
	SGLB	Winders/Get Taper Select	/2e82,Linear,Hyperbolic
		LITO	12	taper select index
		CALL	354084
	ESBR
	SGLB	Winders/Get UTS Threshold	/2v58,-120,120;%1.2f%%
		LITO	1	threshold index
		CALL	354141
	ESBR
	SGLB	Winders/Get Loadcell 1	/2v6,-100,100;%3.2f%%
		LITO	1
		CALL	354140
	ESBR
	SGLB	Winders/Get Over-Under	/2t76,Under,Over
		LITO	4	over? index
		CALL	354140
	ESBR
	SGLB	Winders/Get Range Non-Extn	/2v6,-100,100;%3.2f%%
		LITO	8
		CALL	354140
	ESBR
	SGLB	Winders/Get Range Extn	/2v6,-100,100;%3.2f%%
		LITO	9
		CALL	354140
	ESBR
	SGLB	Winders/Get Extensible Web	/2t11,Disabled,Enabled
		LITO	10
		CALL	354140
	ESBR
	SGLB	Winders/Get Speed Demand	/2v58,-120,120;%1.1f%%
		LITO	5	sd index
		CALL	354140
	ESBR
	SGLB	Winders/Get Drive P Gain	/2v6,-100,100;%3.2f%%
		LITO	6	drive p gain index
		CALL	354140
	ESBR
	SGLB	Winders/Get Feedback	/2v6,-100,100;%3.2f%%
		LITO	7	feedback index
		CALL	354140
	ESBR
	SGLB	Winders/Get Tension Enable	/2t11,Disabled,Enabled
		LITO	3	tension enable index
		CALL	354130
	ESBR
	SGLB	Winders/Get Up to Speed	/2t4,false,true
		LITO	2	up to speed index
		CALL	354140
	ESBR
	SGLB	Winders/Get Diameter	/2v6,-100,100;%1.2f%% Full Roll
		LITO	4	dia index
		CALL	354141
	ESBR
	SGLB	Winders/Get Min Diameter	/2v6,-100,100;%1.2f%% Full Roll
		LITO	1	minimum diameter index
		CALL	354078
	ESBR
	SGLB	Winders/Get Diameter Filter	/2v
		LITO	2	rate index
		CALL	354078
	ESBR
	SGLB	Winders/Get Core Filter	/2v
		LITO	3	core rate index
		CALL	354078
	ESBR
	SGLB	Winders/Get Core Threshold	/2v6,-100,100;%3.2f%% Full Roll
		LITO	5	threshold index
		CALL	354078
	ESBR
	SGLB	Winders/Get Diameter Hold	/2t90,Tracking,Holding
		LITO	7	hold index
		CALL	354078
	ESBR
	SGLB	Winders/Get Diameter Preset	/2v6,-100,100;%1.2f%% Full Roll
		LITO	8	external diameter index
		CALL	354078
	ESBR
	SGLB	Winders/Get Preset Enable	/2t11,Disabled,Enabled;
		LITO	9	preset select index
		CALL	354078
	ESBR
	SGLB	Winders/Get Min Speed	/2v58,-120,120;%1.1f%%
		LITO	11	minimum speed index
		CALL	354078
	ESBR
	SGLB	Winders/Get Line Speed	/2v58,-120,120;%1.2f%%
		LITO	12	line speed index
		CALL	354078
	ESBR
	SGLB	Winders/Get Winder Speed	/2v58,-120,120;%1.2f%%
		LITO	13	|winder speed| index
		CALL	354078
	ESBR
	SGLB	Winders/Get Build Up	/2v9,-100,100;%1.2f
		LITO	14	build up index
		CALL	354078
	ESBR
	SGLB	Winders/Get Speed Delta	/2v6,-100,100;%1.2f%%
		LITO	2	ramp incr. index
		CALL	354082
	ESBR
	SGLB	Winders/Get Ramped Speed	/2v58,-120,120;%1.2f%%
		LITO	3	index of ramp output in list
		CALL	354082
	ESBR
	SGLB	Winders/Get Run Delta	/2v6,-100,100;%1.2f%%
		LITO	1
		CALL	354076
	ESBR
	SGLB	Winders/Get Stop Delta	/2v6,-100,100;%1.2f%%
		LITO	2
		CALL	354076
	ESBR
	SGLB	Winders/Get Jog Speed	/2v58,-120,120;%1.2f%%
		LITO	3	jog speed index
		CALL	354076
	ESBR
	SGLB	Winders/Get Line Speed SP	/2v58,-120,120;%1.2f%%
		LITO	4	line speed index
		CALL	354076
	ESBR
	SGLB	Winders/Get Start	/2t78,Off,Started
		LITO	5	start signal index
		CALL	354076
	ESBR
	SGLB	Winders/Get Jog	/2t11,Disabled,Enabled
		LITO	6	jog enable index
		CALL	354076
	ESBR
	SGLB	Winders/Get Ext Diameter	/2v6,-100,100;%1.2f%% Full Roll
		LITO	1	ext dia index
		CALL	354134
	ESBR
	SGLB	Winders/Get Ext Dia Select	/2t100,Core,External
		LITO	2	ext dia? index
		CALL	354134
	ESBR
	SGLB	Winders/Get Core 1	/2v6,-100,100;%1.2f%% Full Roll
		LITO	3	core 1 index
		CALL	354134
	ESBR
	SGLB	Winders/Get Core 2	/2v6,-100,100;%1.2f%% Full Roll
		LITO	4	core 2 index
		CALL	354134
	ESBR
	SGLB	Winders/Get Core Select	/2t92,Core 1,Core 2
		LITO	5	ext dia? index
		CALL	354134
	ESBR
ESTR
LDEF	DFilter	É/dia/input ¥ threshold/old/c time/f time/min dia/inst/É
	PRIM	Value/Compare	É/dia/input ¥ rslt/old/c time/f time/min dia/inst/É
	BRFL	 	branch if using core
		PRIM	Stack/Xswap	É/dia/input ¥ old/f time/c time/min dia/inst/É
		LCAL	FEnd
	BRTR
	LCAL	FEnd
EDEF
LDEF	FEnd	É/dia/input ¥ old/time 1/time 2/min dia/inst/É
	PRIM	Stack/Xdrop	É/dia/input ¥ old/time/min dia/inst/É
	LCAL	Filter	É/dia/input ¥ output/min dia/inst/É
	PRIM	Stack/Dup to aux	É/dia/input/output ¥ output/min dia/inst/É
	PRIM	Stack/Swap	É/dia/input/output ¥ min dia/output/inst/É
	PRIM	Value/Clamp low	É/dia/input/output ¥ dia./inst/É
	GSYM	Output/#3
	PRIM	Misc/Send entry	É/dia/input/output ¥ inst/É
	PRIM	Stack/Push from aux	É/dia/input ¥ output/inst/É
	LCAL	FOut	É/dia ¥ inst/É
	PRIM	Stack/Push from aux	É ¥ dia/inst/É
	GSYM	Output/#11	send computed diameter to web break detector
	PRIM	Misc/Send entry	É ¥ inst/É
	PRIM	Heap/Store self	É ¥ É
EDEF
LDEF	Filter	É/input ¥ old/rate/É
	CMNT	 	Output:  É/input ¥ output/É
	PRIM	Stack/Over	É/input ¥ rate/old/rate/É
	PRIM	Value/Multiply	É/input ¥ scaled old/rate/É
	PRIM	Stack/Swap	É/input ¥ rate/scaled old/É
	LVAL	1	É/input ¥ 1/rate/scaled old/É
	PRIM	Value/Difference	É/input ¥ 1-rate/scaled old/É
	PRIM	Stack/Dup from aux	É/input ¥ input/1-rate/scaled old/É
	PRIM	Value/Multiply	É/input ¥ scaled new/scaled old/É
	PRIM	Value/Add	É/input ¥ output/É
EDEF
LDEF	FOut	É/input ¥ output/inst/É
	LITO	4	filter in/out index
	LITO	5	dia. calc. data
	PRIM	S_tree/Replace	É/input ¥ inst/É
	PRIM	Stack/Push from aux	É ¥ input/inst/É
	LITO	6	hold data index
	LITO	5	dia. calc. data
	PRIM	S_tree/Replace	É ¥ inst/É
EDEF
LDEF	TEnable	inst/TE?/É
	MACR	 	Web Break Detection
		PRIM	Stack/Over	TE?/inst/TE?/É
		LITO	3	te index
		LITO	13	web break data
		PRIM	S_tree/Replace	inst/TE?/É
	EMAC
	MACR	 	Diameter stuff
		PRIM	Stack/Over	TE?/inst/TE?/É
		PRIM	Ordinal/Test zero	invert input
		LITO	10	tension enable index
		LITO	5	dia data structure
		PRIM	S_tree/Replace	inst/TE?/É
	EMAC
	MACR	 	Tension demand stuff, last item
		PRIM	Stack/Swap	TE?/inst/É
		LITO	3	Tension Enable index
		LITO	9	tension output structure
		PRIM	S_tree/Replace	inst/É
	EMAC
EDEF
LDEF	Build Up	build up/inst/É
	PRIM	Stack/Dup to aux	É/build up ¥ build up/inst/É
	LITO	3	build up index
	LITO	12	up to speed structure
	PRIM	S_tree/Replace	É/build up ¥ inst/É
	PRIM	Stack/Push from aux	É ¥ build up/inst/É
	LITO	5	build up index
	LITO	7	speed demand structure
	PRIM	S_tree/Replace	inst/É
EDEF
LDEF	Feedback	inst/feedback/É
	PRIM	Stack/Swap	É ¥Êfeedback/inst/É
	PRIM	Stack/Dup to aux	É/feedback ¥Êfeedback/inst/É
	LITO	7	feedback index
	LITO	15	misc data
	PRIM	S_tree/Replace	É/feedback ¥Êinst/É
	LITO	3
	PRIM	S_tree/Get exact	É/feedback ¥ÊPID data/3/inst/É
	PRIM	Stack/Push from aux	feedback/PID data/3/inst/É
	ASIO	Analog/DO_PID15	PID/PID data/3/inst/É
	PRIM	Stack/Pop to aux	É/PID ¥ PID data/3/inst/É
	PRIM	S_tree/Put	É/PID ¥ inst/É
	LITO	7	speed demand data
	PRIM	S_tree/Entry to stack	É/PID ¥ trim/build up/speed/old ramp/incr/inst/É
	LVAL	0.0100101	É/PID ¥ .01/trim/build up/speed/old ramp/incr/É
	PRIM	Stack/Xover	É/PID ¥ build up/.01/trim/build up/É
	PRIM	Value/Scale	É/PID ¥ scaled trim/build up/É
	PRIM	Stack/Push from aux	É ¥ PID/scaled trim/build up/É
	PRIM	Value/Multiply	É ¥ PID trim/build up/speed/old ramp/incr/É
	PRIM	Stack/Pop to aux	É/PID trim ¥ build up/speed/old ramp/incr/É
	PRIM	Stack/Pop to aux	É/PID trim/build up ¥ speed/old ramp/incr/É
	CALL	354070	É/PID trim/build up ¥ speed'/signed dia/inst/É
	PRIM	Stack/Dup down	É/PID trim/build up ¥ speed'/signed dia/speed'/inst/É
	LVAL	0.0100101	É/PID trim/build up ¥ .01/speed'/signed dia/speed'/inst/É
	PRIM	Stack/Push from aux	É/PID trim ¥ build up/.01/speed'/signed dia/speed'/inst/É
	PRIM	Value/Scale	É/PID trim ¥ scaled speed'/signed dia/speed'/inst/É
	PRIM	Stack/Push from aux	É ¥ PID trim/scaled speed'/signed dia/speed'/inst/É
	PRIM	Value/Add	É ¥ PID speed'/signed dia/speed'/inst/É
	PRIM	Value/Fraction	É ¥ sp demand/speed'/inst/É
	PRIM	Stack/Xswap	É ¥ sp demand/inst/speed'/É
	PRIM	Stack/Dup to aux	É/sp demand ¥ sp demand/inst/speed'/É
	LITO	5	speed demand
	LITO	15
	PRIM	S_tree/Replace	É/sp demand ¥ inst/speed'/É
	PRIM	Stack/Push from aux	É ¥ sp demand/inst/speed'/É
	GSYM	Output/#4	É ¥ out #4/sp demand/inst/speed'/É
	PRIM	Misc/Send entry	É ¥ inst/speed'/É
	LITO	3	old ramp index
	CALL	354083	É ¥ É
EDEF
LDEF	Jog	index/inst/data/É
	CMNT	 	sets input speed from jog/line speed
	PRIM	Stack/Xswap	index/data/inst/É
	LITO	4	jog structure
	PRIM	S_tree/Replace	inst/É
	LITO	4	jog structure
	PRIM	S_tree/Entry to stack	jog?/start?/line sp/jog/stopÆ/runÆ/inst/É
	BRFL	 	branch if not jog
		BRFL	 	branch if not start
			PRIM	Stack/Drop	jog/stopÆ/runÆ/inst/É
			PRIM	Stack/Drop	stopÆ/runÆ/inst/É
			PRIM	Stack/Xdrop	stopÆ/inst/É
			LVAL	0	0/stopÆ/inst/É
			LCAL	Jog save
		BRTR
		PRIM	Stack/Xdrop	line sp/stopÆ/runÆ/inst/É
		PRIM	Stack/Xdrop	line sp/runÆ/inst/É
		LCAL	Jog save
	BRTR
	PRIM	Stack/Drop	line sp/jog/stopÆ/runÆ/inst/É
	PRIM	Stack/Drop	jog/stopÆ/runÆ/inst/É
	PRIM	Stack/Xdrop	jog/runÆ/inst/É
	LCAL	Jog save
EDEF
LDEF	Jog save	output/Æ/inst/É
	PRIM	Stack/Xswap	output/inst/Æ/É
	LITO	4	speed index
	LITO	7	speed demand data
	PRIM	S_tree/Replace	inst/Æ/É
	PRIM	Stack/Swap	Æ/inst/É
	LITO	2	ramp delta
	LITO	7	speed demand data
	PRIM	S_tree/Replace	inst/É
EDEF
LDEF	Core	index/inst/data/É
	CMNT	 	Output:  É ¥ É
	PRIM	Stack/Xswap	index/data/inst/É
	LITO	11	core data
	PRIM	S_tree/Replace	inst/É
	LCAL	Core1	inst/É
	PRIM	Heap/Store self	É
EDEF
LDEF	Core1	inst/É
	CMNT	 	Output:  É ¥ inst/É
	LITO	11	core data
	PRIM	S_tree/Entry to stack	core?/core2/core1/external?/ext dia./inst/É
	BRFL	 	branch if core 1 selected
		PRIM	Stack/Drop	core1/external?/ext dia./inst/É
		LCAL	Core2	inst/É
	BRTR
	PRIM	Stack/Xdrop	core2/external?/ext dia./inst/É
	LCAL	Core2	inst/É
EDEF
LDEF	Core2	core/external?/ext dia./inst/É
	CMNT	 	Output:  É ¥ inst/É
	PRIM	Stack/Pop to aux	É/core ¥ external?/ext dia./inst/É
	BRFL	 	branch if using core (not external diameter)
		PRIM	Stack/Drop	É/core ¥ inst/É
		PRIM	Stack/Dup from aux	É/core ¥ core/inst/É
		LCAL	Preset	inst/É
	BRTR
	CMNT	 	É/core ¥ ext dia./inst/É
	LCAL	Preset	inst/É
EDEF
LDEF	Preset	É/core ¥ preset/inst/É
	LITO	8	preset index
	LITO	5	dia calc data
	PRIM	S_tree/Replace	É/core ¥ inst/É
	PRIM	Stack/Push from aux	É ¥ core/inst/É
	LITO	10	core index
	LITO	8	tension data structure
	PRIM	S_tree/Replace	É ¥ inst/É
EDEF
LDEF	Taper	É ¥ type/taper/tension/É
	PRIM	Value/Multiply	É ¥ type*taper/tension/É
	LVAL	1	1/type*taper/tension/É
	PRIM	Value/Difference	1-type*taper/tension/É
	PRIM	Value/Multiply	demand/boost enable/boost sel/boost/É
	PRIM	Stack/Dup to aux	É/demand ¥ demand/boost enable/boost sel/boost/É
	PRIM	Stack/Rotate up	É/demand ¥ boost enable/boost sel/demand/boost/É
	BRFL	 	branch if boost not enabled
		PRIM	Stack/Drop	É/demand ¥ demand/boost/É
		PRIM	Stack/Xdrop	É/demand ¥ demand/stall enable/stall sel/stall/É
		LCAL	Stall
	BRTR
	CMNT	 	boost enabled
	BRFL	 	branch if fixed boost
		PRIM	Value/Add	É/demand ¥ demand+boost/stall enable/stall sel/stall/É
		LCAL	Stall
	BRTR
	CMNT	 	proportional boost
	PRIM	Stack/Dup down	É/demand ¥ demand/boost/demand/É
	PRIM	Value/Multiply	É/demand ¥ demand*boost/demand/É
	PRIM	Value/Add	É/demand ¥ demand*boost+demand/stall enable/stall sel/stall/É
	LCAL	Stall
EDEF
LDEF	Stall	É/demand ¥ demand/stall enable/stall sel/stall/É
	PRIM	Stack/Rotate up	É/demand ¥ stall enable/stall sel/demand/stall/É
	BRFL	 	branch if not stall enable
		PRIM	Stack/Drop	É/demand ¥ demand/stall/Æt/inst/time/É
		PRIM	Stack/Xdrop	É/demand ¥ demand/Æt/inst/time/É
		PRIM	Stack/Drop from aux	É ¥ demand/Æt/inst/time/É
		LCAL	TDemand
	BRTR
	CMNT	 	stall enabled
	BRFL	 	branch if fixed stall
		PRIM	Stack/Drop	É/demand ¥ stall/Æt/inst/time/É
		PRIM	Stack/Drop from aux	É ¥ stall/Æt/inst/time/É
		LCAL	TDemand
	BRTR
	CMNT	 	proportional stall
	PRIM	Stack/Drop	É/demand ¥ stall/Æt/inst/time/É
	PRIM	Stack/Push from aux	É ¥ demand/stall/Æt/inst/time/É
	PRIM	Value/Multiply	demand*stall/Æt/inst/time/É
	LCAL	TDemand
EDEF
LDEF	TDemand	É ¥ demand/Æt/inst/time/É
	PRIM	Stack/Xswap	É ¥ demand/inst/Æt/time/É
	GSYM	Output/#9
	PRIM	Misc/Send entry	É ¥ inst/Æt/time/É
	PRIM	Stack/Rotate up	É ¥ Æt/time/inst/É
	GSYM	Winders/Tension Trigger	É ¥ method/Æt/time/inst/...
	CALL	354057	É ¥ inst/...
	PRIM	Heap/Store self	É ¥ É
EDEF
LDEF	TDemand2	É/demand ¥ In Tension?/old IT?/inst/É
	PRIM	Stack/Swap	É/demand ¥ old IT?/In Tension?/inst/É
	PRIM	Ordinal/Test equal	É/demand ¥ no change?/In Tension?/inst/É
	BRFL	 	branch if 'In Tension?' changed
		PRIM	Stack/Dup to aux	É/demand/In Tension? ¥ In Tension?/inst/É
		GSYM	Output/#7
		PRIM	Misc/Send entry	É/demand/In Tension? ¥ inst/É
		PRIM	Stack/Push from aux	É/demand ¥ In Tension?/inst/É
		LITO	1	old 'In Tension?' index
		LITO	9	tension demand data
		PRIM	S_tree/Replace	É/demand ¥ inst/É
		LCAL	TDemand3
	BRTR
	PRIM	Stack/Drop	É/demand ¥ inst/É
	LCAL	TDemand3
EDEF
LDEF	TDemand3	É/demand ¥ inst/É
	PRIM	Stack/Push from aux	É ¥ demand/inst/É
	PRIM	Stack/Dup down	É ¥ demand/inst/demand/É
	GSYM	Output/#5
	PRIM	Misc/Send entry	É ¥ inst/demand/É
	LITO	6	old value index
	CALL	354132
EDEF
LDEF	WB ok	É/dia ¥ TE?/max/count/inst/É
	CMNT	 	Output:  É ¥ É
	BRFL	 	branch if tension not enabled (reset)
		LCAL	WB clear	É ¥ É
	BRTR
	PRIM	Stack/Drop	É/dia ¥ count/inst/É
	PRIM	Stack/Duplicate	É/dia ¥ count/count/inst/É
	BRFL	 	branch if count already zero
		LCAL	WB save	É ¥ É
	BRTR
	CMNT	 	not zero, decrement count
	PRIM	Ordinal/Decrement	É/dia ¥ count-1/inst/É
	LCAL	WB save	É ¥ É
EDEF
LDEF	WB bad	É/dia ¥ TE?/max/count/inst/É
	CMNT	 	Output:  É ¥ É
	BRFL	 	branch if tension not enabled (reset)
		LCAL	WB clear	É ¥ É
	BRTR
	PRIM	Ordinal/Compare	É/dia ¥ broke?/count/inst/É
	BRFL	 	branch if no web break detected
		PRIM	Ordinal/Increment	É/dia ¥ count+1/inst/É
		LCAL	WB save	É ¥ É
	BRTR
	CMNT	 	web broke!
	PRIM	Stack/Drop from aux	É ¥ count/inst/É
	PRIM	Stack/Drop	É ¥ inst/É
	LITO	1	É ¥ broken/inst/É
	GSYM	Output/#10	É ¥ out #10/broken/inst/É
	PRIM	Misc/Send entry	É ¥ inst/É
	LITO	1	É ¥ broken/inst/É
	PRIM	Stack/Dup down	É ¥ broken/inst/broken/É
	LITO	4	web brake index
	LITO	10	cm logic data
	PRIM	S_tree/Replace	É ¥ inst/É
	LCAL	CM Calc	É ¥ inst/É
	LITO	7	broken index
	CALL	354145	É ¥ É
EDEF
LDEF	WB save	É/dia ¥ count/inst/É
	LITO	1	count index
	LITO	13	web break data
	PRIM	S_tree/Replace	É/dia ¥ inst/É
	PRIM	Stack/Push from aux	É ¥ dia/inst/É
	PRIM	Stack/Swap	É ¥ inst/dia/É
	LITO	4	dia index
	CALL	354145
EDEF
LDEF	WB clear	É/dia ¥ max/count/inst/É
	CMNT	 	Output:  É ¥ É
	PRIM	Stack/Drop	É/dia ¥ count/inst/É
	PRIM	Stack/Drop	É/dia ¥ inst/É
	PRIM	Stack/Push from aux	É ¥ dia/inst/É
	LITO	4	dia index
	LITO	13	web break data
	PRIM	S_tree/Replace	inst/É
	LITO	0	0/inst/É
	LITO	1	count index
	LITO	13	web break data
	PRIM	S_tree/Replace	inst/É
	CMNT	 	get old status of web break
	LITO	7	broken index
	LITO	13	web break data
	PRIM	S_tree/Read	broken?/inst/É
	BRFL	 	branch if not broken
		PRIM	Heap/Store self	É ¥ É
	BRTR
	LITO	0	0/inst/É
	LITO	4	web brake index
	LITO	10	cm logic data
	PRIM	S_tree/Replace	É ¥ inst/É
	LCAL	CM Calc	inst/É
	LITO	0	0/inst/É
	PRIM	Stack/Dup down	0/inst/0/É
	GSYM	Output/#10	É ¥ out #10/ok/inst/É
	PRIM	Misc/Send entry	É ¥ inst/É
	LITO	7	broken index
	CALL	354145	É ¥ É
EDEF
LDEF	Profile	É ¥ arg/N/Gmin/Gmax/É
	CMNT	 	Output:  É/result ¥ arg/É
	PRIM	Stack/Dup to aux	É/arg ¥ arg/N/Gmin/Gmax/É
	LCAL	exp	É/arg ¥ exp/Gmin/Gmax/É
	LVAL	1	É/arg ¥ 1/exp/Gmin/Gmax/É
	PRIM	Stack/Xover	É/arg ¥ Gmin/1/exp/Gmin/Gmax/É
	PRIM	Value/Subtract	É/arg ¥ 1-Gmin/exp/Gmin/Gmax/É
	PRIM	Value/Multiply	É/arg ¥ exp*(1-Gmin)/Gmin/Gmax/É
	PRIM	Value/Add	É/arg ¥ exp*(1-Gmin)+Gmin/Gmax/É
	PRIM	Value/Multiply	É/arg ¥ Gmax*(exp*(1-Gmin)+Gmin)/É
	PRIM	Stack/Push from aux	É ¥ arg/Gmax*(exp*(1-Gmin)+Gmin)/É
	PRIM	Stack/Second to aux	É/Gmax*(exp*(1-Gmin)+Gmin) ¥ arg/É
EDEF
LDEF	exp	É/arg ¥ exp/N/É
	CMNT	 	Output:  É/arg ¥ exp/É
	PRIM	Stack/Swap	É/arg ¥ N/exp/É
	PRIM	Ordinal/Decrement	É/arg ¥ N-1/exp/É
	PRIM	Stack/Dup down	É/arg ¥ N-1/exp/N-1/É
	BRFL	 	branch if done
		PRIM	Stack/Xdrop	É/arg ¥ exp/É
	BRTR
	PRIM	Stack/Dup from aux	É/arg ¥ arg/exp/N-1/É
	PRIM	Value/Multiply	É/arg ¥ exp'/N-1/É
	LCAL	exp
EDEF
LDEF	CM Set	É ¥ index/inst/data/É
	CMNT	 	Output:  É ¥ É
	PRIM	Stack/Xswap	index/data/inst/É
	LITO	10	cm logic data
	PRIM	S_tree/Replace	É ¥ inst/É
	LCAL	CM Calc	É ¥ inst/É
	PRIM	Heap/Store self	É ¥ É
EDEF
LDEF	CM Calc	É ¥ inst/É
	CMNT	 	Output:  É ¥ inst/É
	LITO	10	cm logic data
	PRIM	S_tree/Entry to stack	É ¥ wb?/enabled?/hold?/old state/inst/É
	PRIM	Ordinal/Test zero	É ¥ not wb?/enabled?/hold?/old state/inst/É
	PRIM	Ordinal/And	É ¥ defeat?/hold?/old state/inst/É
	LITO	1	É ¥ 1/defeat?/hold?/old state/inst/É
	PRIM	Ordinal/And	É ¥ defeat?/hold?/old state/inst/É
	PRIM	Stack/Dup down	É ¥ defeat?/hold?/defeat?/old state/inst/É
	PRIM	Ordinal/Ior	É ¥ held?/defeat?/old state/inst/É
	PRIM	Stack/Switch	É ¥ old state/defeat?/held?/inst/É
	PRIM	Ordinal/Test equal	É ¥ nochange?/defeat?/held?/inst/É
	BRFL	 	branch if output changed
		PRIM	Stack/Rotate down	É ¥ inst/defeat?/held?/É
		PRIM	Stack/Over	É ¥ defeat?/inst/defeat?/held?/É
		GSYM	Output/#2	É ¥ #2/defeat?/inst/defeat?/held?/É
		PRIM	Misc/Send entry	É ¥ inst/defeat?/held?/É
		PRIM	Stack/Swap	É ¥ defeat?/inst/held?/É
		LITO	1	old index
		LITO	10	cm logic data
		PRIM	S_tree/Replace	É ¥ inst/held?/É
		PRIM	Stack/Swap	É ¥ held?/inst/É
		LITO	2	held? index
		LITO	2	ac data
		PRIM	S_tree/Replace	É ¥ inst/É
	BRTR
	PRIM	Stack/Drop	É ¥ held?/inst/É
	LITO	2	held? index
	LITO	2	ac data
	PRIM	S_tree/Replace	É ¥ inst/É
EDEF
LDEF	CMemory	É/output ¥ hold/inst/É
	CMNT	 	Output:  É ¥ É
	PRIM	Stack/Dup down	É/output ¥ hold/inst/hold/É
	GSYM	Output/#1	É/output ¥ #1/hold/inst/hold/É
	PRIM	Misc/Send entry	É/output ¥ inst/hold/É
	PRIM	Stack/Push from aux	É ¥ output/inst/hold/É
	LITO	4	filter output index
	LITO	2	ac data
	PRIM	S_tree/Replace	É ¥ inst/hold/É
	LITO	1	hold data index
	CALL	354073
EDEF
LDEF	Set Web	index/inst/data/É
	CMNT	 	Output:  É ¥ É
	PRIM	Stack/Xswap	index/data/inst/É
	LITO	15	misc data
	PRIM	S_tree/Replace	inst/É
	LCAL	Select Web	inst/É
	PRIM	Heap/Store self	É
EDEF
LDEF	Select Web	inst/É
	CMNT	 	Output:  É ¥ inst/É
	LITO	10	web type
	LITO	15	misc data
	PRIM	S_tree/Read	web type?/inst/É
	LCAL	Get Web index	index/inst/É
	LITO	15	misc data
	PRIM	S_tree/Read	range/inst/É
	LITO	6	range index
	LITO	7	speed demand data
	PRIM	S_tree/Replace	inst/ext?/É
EDEF
LDEF	Get Web index	web type/inst/É
	CMNT	 	Output:  range index/inst/É
	BRFL	 	branch if non-extensible
		LITO	8	non-ext trim index
	BRTR
	LITO	9	extensible trim index
EDEF