STRE	 	Prototype
	SGLB	Misc/Class Reference
		CLAS	354934	Value Pers. Sender
	ESBR
	SORD	2
		PVAL	0	/o,-100,100,-100,100;Initial value (%)
	ESBR
	SGLB	Output/#1
		LCON	 	/*+0,69,36,45;Output
	ESBR
ESTR
STRE
	SGLB	Misc/Superclass Reference
		CLAS	354109	Value Sender
	ESBR
	SGLB	General/Initialize
		CMNT	 	Expects:  É ¥ inst/É
		LITO	1	É ¥ 1/inst/É
		LITO	2	É ¥ 2/1/inst/É
		PRIM	S_tree/Test and read	É ¥ valid?/(value)/inst/É
		BRFL	 	branch if not instance
			PRIM	Heap/Store self	É ¥ É
		BRTR
		PRIM	Stack/Swap	É ¥ inst/value/É
		GSYM	Utility/Input	É ¥ method/inst/value/É
		PRIM	Heap/Delegate to self	É ¥ É
	ESBR
ESTR
CMTL	5	graphic info
	CMNT	4	-18,0,87,72,5
	CMTL	3	0
		CMNT	24	0,0,36,45,2,1,;Utility/Input
	ECMT
	CMTL	7	0
		CMNT	22	-10,28,0,2,1,Utility/Get Output;/v,-100,100;%.2f%%
	ECMT
	CMNT	12	0,18,0,54
	CMNT	12	15,18,15,54
	CMNT	10	69,36
	CMNT	10	15,18
ECMT