STRE	 	Prototype
	SGLB	Misc/Class Reference
		CLAS	354868	abstract base class
	ESBR
ESTR
STRE
	SGLB	Misc/Superclass Reference
		CLAS	354710	SuperSmartFinger
	ESBR
	SGLB	ProfiBus/RegInit
		CMNT	 	Expects:  É ¥ inst/LIST(PF DP key + site)/É
		PRIM	Stack/Swap	É ¥ LIST(PF DP key + site)/inst/É
		PRIM	Stack/Dup to aux	É/LIST(PF DP key + site) ¥ LIST(PF DP key + site)/inst/É
		CMNT
		CMNT	 	save site to indicate that we're inited
		PRIM	List/List to stack	É/LIST(PF DP key + site) ¥ PF DP key/site/inst/É
		PRIM	Stack/Drop	É/LIST(PF DP key + site) ¥ site/inst/É
		PRIM	List/Item to list	É/LIST(PF DP key + site) ¥ <site>/inst/É
		LITO	0	É/LIST(PF DP key + site) ¥ 0/site/inst/É
		LITO	10	É/LIST(PF DP key + site) ¥ 10/0/site/inst/É
		PRIM	S_tree/Replace	É/LIST(PF DP key + site) ¥ inst/É
		LITO	3
		PRIM	S_tree/Test for entry	É/LIST(PF DP key + site) ¥ rslt/3/inst/É
		BRFL
			PRIM	Stack/Drop	É/LIST(PF DP key + site) ¥ inst/É
			GSYM	PFBus/GetRegType
			PRIM	Heap/Delegate to self	É/LIST(PF DP key + site) ¥ TYPE/inst/É
			PRIM	Heap/Name of self	names the register
			GSYM	1PFBus/FromCard
			ASIO	Ordinal/Bytes To Ord	É/LIST(PF DP key + site) ¥ RetPath(meth H : inst L)/TYPE/inst/É
			PRIM	Stack/Push from aux
			PRIM	List/List to stack	É ¥ PF DP key/site/RetPath/TYPE/inst/É
			PRIM	Stack/Second to aux	É/site ¥ PF DP key/RetPath/TYPE/inst/É
			GSYM	1PFBus/StartInit	É/site ¥ initmethod/initinst/RetPath/TYPE/inst/É
			ASIO	Ordinal/Bytes To Ord	É/site ¥ initPath/RetPath/TYPE/inst/É
			LITO	3	É/site ¥ ADDREG/initPath/RetPath/TYPE/inst/É
			LITO	1027
			PRIM	Stack/Push from aux	É ¥ site/countH:flagsL($0403)/ADDREG/initPath/RetPath/TYPE/inst/É
			ASIO	CX/Send Message	É ¥ inst/É
			PRIM	Heap/Store self
		BRTR
		PRIM	Stack/Drop
		LITO	0
		LITO	3
		PRIM	S_tree/Read
		PRIM	Stack/Swap	É/LIST(PF DP key + site) ¥ inst/<presets>/É
		GSYM	PFBus/GetRegType
		PRIM	Heap/Delegate to self	É/LIST(PF DP key + site) ¥ TYPE/inst/<presets>/É
		PRIM	Stack/Rotate down	É/LIST(PF DP key + site) ¥ <presets>/TYPE/inst/É
		PRIM	Stack/Second to aux	É/LIST(PF DP key + site)/TYPE ¥ <presets>/inst/É
		PRIM	List/List to stack
		PRIM	Stack/Push from aux	É/LIST(PF DP key + site) ¥ TYPE/pre1Épre8/inst/É
		PRIM	Heap/Name of self	names the register
		GSYM	1PFBus/FromCard
		ASIO	Ordinal/Bytes To Ord	É/LIST(PF DP key + site) ¥ RetPath(meth H : inst L)/TYPE/pre1Épre8/inst/É
		PRIM	Stack/Push from aux
		PRIM	List/List to stack	É ¥ PF DP key/site/RetPath/TYPE/pre1Épre8/inst/É
		PRIM	Stack/Second to aux	É/site ¥ PF DP key/RetPath/TYPE/pre1Épre8/inst/É
		GSYM	1PFBus/StartInit	É/site ¥ initmethod/initinst/RetPath/TYPE/pre1Épre8/inst/É
		ASIO	Ordinal/Bytes To Ord	É/site ¥ initPath/RetPath/TYPE/pre1Épre8/inst/É
		LITO	3	É/site ¥ ADDREG/initPath/RetPath/TYPE/pre1Épre8/inst/É
		LITO	3075
		PRIM	Stack/Push from aux	É ¥ site/countH:flagsL($0C03)/ADDREG/initPath/RetPath/TYPE/pre1Épre8/inst/É
		ASIO	CX/Send Message	É ¥ inst/É
		PRIM	Heap/Store self
	ESBR
	SGLB	1PFBus/FromCard
		CMNT	 	Expects:  É ¥ inst/input/É
		PRIM	Stack/Swap	É ¥ input list/inst/É
		PRIM	List/List to stack	É ¥ offset/input/inst/É
		GSYM	Output/#1
		PRIM	Ordinal/Add	É ¥ output#/input/inst/É
		PRIM	Misc/Send entry	É ¥ inst/É
		PRIM	Heap/Store self	É ¥ É
	ESBR
	SGLB	PFBus/Get Input  1
		LITO	1
		CALL	354074	Method 3 Get
	ESBR
	SGLB	PFBus/Get Input  2
		LITO	2
		CALL	354074	Method 3 Get
	ESBR
	SGLB	PFBus/Get Input  3
		LITO	3
		CALL	354074	Method 3 Get
	ESBR
	SGLB	PFBus/Get Input  4
		LITO	4
		CALL	354074	Method 3 Get
	ESBR
	SGLB	PFBus/Get Input  5
		LITO	5
		CALL	354074	Method 3 Get
	ESBR
	SGLB	PFBus/Get Input  6
		LITO	6
		CALL	354074	Method 3 Get
	ESBR
	SGLB	PFBus/Get Input  7
		LITO	7
		CALL	354074	Method 3 Get
	ESBR
	SGLB	PFBus/Get Input  8
		LITO	8
		CALL	354074	Method 3 Get
	ESBR
	SGLB	PFBus/Get Output  1
		CMNT	1	Expects:É ¥ inst/route/É
		LITO	0	É ¥ offset/inst/route/É
		LCAL	Start SAM Get
	ESBR
	SGLB	PFBus/Get Output  2
		CMNT	2	Expects:É ¥ inst/route/É
		LITO	1	É ¥ offset/inst/route/É
		LCAL	Start SAM Get
	ESBR
	SGLB	PFBus/Get Output  3
		CMNT	3	Expects:É ¥ inst/route/É
		LITO	2	É ¥ offset/inst/route/É
		LCAL	Start SAM Get
	ESBR
	SGLB	PFBus/Get Output  4
		CMNT	4	Expects:É ¥ inst/route/É
		LITO	3	É ¥ offset/inst/route/É
		LCAL	Start SAM Get
	ESBR
	SGLB	PFBus/Get Output  5
		CMNT	5	Expects:É ¥ inst/route/É
		LITO	4	É ¥ offset/inst/route/É
		LCAL	Start SAM Get
	ESBR
	SGLB	PFBus/Get Output  6
		CMNT	6	Expects:É ¥ inst/route/É
		LITO	5	É ¥ offset/inst/route/É
		LCAL	Start SAM Get
	ESBR
	SGLB	PFBus/Get Output  7
		CMNT	7	Expects:É ¥ inst/route/É
		LITO	6	É ¥ offset/inst/route/É
		LCAL	Start SAM Get
	ESBR
	SGLB	PFBus/Get Output  8
		CMNT	8	Expects:É ¥ inst/route/É
		LITO	7	É ¥ offset/inst/route/É
		LCAL	Start SAM Get
	ESBR
	SGLB	PFBus/Input  1
		CMNT	 	Expects:  É ¥ inst/input/É
		LITO	1	É ¥ offset/inst/input/É
		LCAL	Do Write	É ¥ É
	ESBR
	SGLB	PFBus/Input  2
		CMNT	 	Expects:  É ¥ inst/input/É
		LITO	2	É ¥ offset/inst/input/É
		LCAL	Do Write	É ¥ É
	ESBR
	SGLB	PFBus/Input  3
		CMNT	 	Expects:  É ¥ inst/input/É
		LITO	3	É ¥ offset/inst/input/É
		LCAL	Do Write	É ¥ É
	ESBR
	SGLB	PFBus/Input  4
		CMNT	 	Expects:  É ¥ inst/input/É
		LITO	4	É ¥ offset/inst/input/É
		LCAL	Do Write	É ¥ É
	ESBR
	SGLB	PFBus/Input  5
		CMNT	 	Expects:  É ¥ inst/input/É
		LITO	5	É ¥ offset/inst/input/É
		LCAL	Do Write	É ¥ É
	ESBR
	SGLB	PFBus/Input  6
		CMNT	 	Expects:  É ¥ inst/input/É
		LITO	6	É ¥ offset/inst/input/É
		LCAL	Do Write	É ¥ É
	ESBR
	SGLB	PFBus/Input  7
		CMNT	 	Expects:  É ¥ inst/input/É
		LITO	7	É ¥ offset/inst/input/É
		LCAL	Do Write	É ¥ É
	ESBR
	SGLB	PFBus/Input  8
		CMNT	 	Expects:  É ¥ inst/input/É
		LITO	8	É ¥ offset/inst/input/É
		LCAL	Do Write	É ¥ É
	ESBR
ESTR
LDEF	Do Write
	CMNT	 	Expects: É ¥ offset/inst/input/É
	CMNT	 	Exit: É ¥ É
	PRIM	Stack/Pop to aux	É/offset ¥ inst/input/É
	PRIM	Stack/Over	É/offset ¥ input/inst/input/É
	PRIM	Stack/Dup from aux	É/offset ¥ offset/input/inst/input/É
	LITO	3	É/offset ¥ key/offset/input/inst/input/É
	PRIM	S_tree/Replace	É/offset ¥ inst/input/É
	LITO	1
	LITO	10
	PRIM	S_tree/Test and read	É/offset ¥ rslt/(site)/inst/input/É
	BRFL
		CMNT	 	then not initialized yet, can't send to LinkCard
		CMNT	 	É ¥ inst/input/É
		PRIM	Stack/Xdrop
		PRIM	Stack/Drop from aux
		PRIM	Heap/Store self
	BRTR
	CMNT	 	É/offset ¥ site/inst/input/É
	PRIM	Stack/Pop to aux	É/offset/site ¥ inst/input/É
	PRIM	Stack/Aux swap	É/site/offset ¥ inst/input/É
	PRIM	Heap/Name of self	É/site/offset ¥ regname/inst/input/É
	PRIM	Stack/Pop to aux	É/site/offset/regname ¥ inst/input/É
	GSYM	PFBus/GetRegType
	PRIM	Heap/Delegate to self	É/site/offset/regname ¥ TYPE/inst/input/É
	PRIM	Stack/Rotate down	É/site/offset/regname ¥ input/TYPE/inst/É
	ASIO	Ordinal/Ord To Bytes	É/site/offset/regname ¥ input hi/input lo/TYPE/inst/É
	CMNT
	PRIM	Stack/Push from aux	É/site/offset ¥ regname/input hi/input lo/TYPE/inst/É
	PRIM	Stack/Push from aux	É/site ¥ offset/regname/input hi/input lo/TYPE/inst/É
	LITO	4	É/site ¥ WRITE/offset/regname/input hi/input lo/TYPE/inst/É
	LITO	1538	É/site ¥ countH:flagsL($0602)/WRITE/offset/regname/input hi/input lo/TYPE/inst/É
	PRIM	Stack/Push from aux	É ¥ site/countH:flagsL($0602)/WRITE/offset/regname/input hi/input lo/TYPE/inst/É
	ASIO	CX/Send Message	É ¥ inst/É
	PRIM	Heap/Store self	É ¥ É
EDEF
LDEF	Start SAM Get
	CMNT	 	on entry É ¥ offset/inst/route/É
	CMNT	 	on exit É ¥ É
	PRIM	Stack/Pop to aux
	GSYM	PFBus/GetRegType
	PRIM	Heap/Delegate to self	É/offset ¥ TYPE/inst/route/É
	PRIM	Stack/Push from aux
	PRIM	Stack/Swap
	ASIO	Ordinal/Bytes To Ord	É ¥ TO/inst/route/É
	PRIM	Stack/Swap	É ¥ inst/TO/route/É
	LITO	1
	LITO	10
	PRIM	S_tree/Read	É ¥ site/inst/TO/route/É
	PRIM	Stack/Pop to aux	É/site ¥ inst/TO/route/É
	PRIM	Stack/Second to aux	É/site/TO ¥ inst/route/É
	PRIM	Stack/Swap	É/site/TO ¥ route/inst/É
	PRIM	Heap/Name of self
	GSYM	CX/SAM Responder	É/site/TO ¥ ret meth/ret inst/route/inst/É
	ASIO	Ordinal/Bytes To Ord	É/site/TO ¥ RetPath(meth H : inst L)/route/inst/É
	PRIM	Stack/Push from aux	É/site ¥ TO/RetPath/route/inst/É
	PRIM	Stack/Swap	É/site ¥ RetPath/TO/route/inst/É
	LITO	5	É/site ¥ READ/RetPath/TO/route/inst/É
	LITO	1027
	PRIM	Stack/Push from aux	É ¥ site/countH:flagsL($0403)/READ/RetPath/TO/route/inst/É
	CMNT	 	The route is sent to the finger as an ordinal heap address.
	ASIO	CX/Send Message	É ¥ inst/É
	PRIM	Heap/Store self	É ¥ É
EDEF