STRE	 	Prototype
	SGLB	Misc/Class Reference
		CLAS	354463
	ESBR
	SORD	2
		PERS	1	Z
		PERS	2	Q
		PERS	3	P
		PERS	4	X min
		PERS	5	X max
		PERS	6	D (unused)
	ESBR
	SGLB	Output/#1
		LCON	 	/*+;1 Output
	ESBR
	SGLB	Output/#2
		LCON	 	/*+;2 Output
	ESBR
	SGLB	Output/#3
		LCON	 	/*+;3 Output
	ESBR
	SGLB	Output/#4
		LCON	 	/*+;4 Output
	ESBR
	SGLB	Output/#5
		LCON	 	/*+;5 Output
	ESBR
	SGLB	Output/#6
		LCON	 	/*+;6 Output
	ESBR
ESTR
STRE
	SGLB	Misc/Superclass Reference
		CLAS	354008
	ESBR
	SGLB	General/Initialize
		LCAL	initTouch
		PRIM	Timer/Get PAT
		PRIM	Stack/Swap
		GSYM	OpStn/Trigger
		CLAS	354463
	ESBR
	SGLB	OpStn/Trigger
		PRIM	Stack/Swap
		TIME	500.000
		GSYM	OpStn/Trigger
		CALL	354057
		ASIO	OpStn/READ_SCREEN	É ¥ touch?/p1/p2/p3/p4/p5/p6/inst/É
		BRFL
			PRIM	Heap/Store self
		BRTR
		PRIM	Stack/Pop to aux	É/p1 ¥ p2/p3/p4/p5/p6/inst/É
		PRIM	Stack/Pop to aux	É/p1/p2 ¥ p3/p4/p5/p6/inst/É
		PRIM	Stack/Pop to aux	É/p1/p2/p3 ¥ p4/p5/p6/inst/É
		PRIM	Stack/Pop to aux	É/p1/p2/p3/p4 ¥ p5/p6/inst/É
		PRIM	Stack/Pop to aux	É/p1/p2/p3/p4/p5 ¥ p6/inst/É
		GSYM	Output/#6
		PRIM	Misc/Send entry
		PRIM	Stack/Push from aux
		GSYM	Output/#5
		PRIM	Misc/Send entry
		PRIM	Stack/Push from aux
		GSYM	Output/#4
		PRIM	Misc/Send entry
		PRIM	Stack/Push from aux
		GSYM	Output/#3
		PRIM	Misc/Send entry
		PRIM	Stack/Push from aux
		GSYM	Output/#2
		PRIM	Misc/Send entry
		PRIM	Stack/Push from aux
		GSYM	Output/#1
		PRIM	Misc/Send entry
		PRIM	Heap/Store self
	ESBR
	SGLB	OpStn/P1	/3u
		LITO	1	É ¥ 1/inst/arg/É
		LCAL	NewParm
	ESBR
	SGLB	OpStn/P2	/3u
		LITO	2
		LCAL	NewParm
	ESBR
	SGLB	OpStn/P3	/3u
		LITO	3
		LCAL	NewParm
	ESBR
	SGLB	OpStn/P4	/3u
		LITO	4
		LCAL	NewParm
	ESBR
	SGLB	OpStn/P5	/3u
		LITO	5
		LCAL	NewParm
	ESBR
	SGLB	OpStn/P6	/3u
		LITO	6
		LCAL	NewParm
	ESBR
ESTR
LDEF	initTouch
	LITO	0
	LITO	2
	PRIM	S_tree/Read
	ASIO	OpStn/INIT_TOUCH
	PRIM	Stack/Drop
EDEF
LDEF	NewParm
	PRIM	Stack/Xswap
	LITO	2
	PRIM	S_tree/Replace
	LCAL	initTouch
	PRIM	Heap/Store self
EDEF