STRE
	SGLB	Misc/Class Reference
		CLAS	354632	Display Handler SS
	ESBR
	SORD	1
		ICAL	A.1	/o,354801,354802,354691,354695,354696,354699,354689,354803,354702,354703,354704,354705,354706;Band 1
	ESBR
	SORD	2
		ICAL	A.2	/o,354801,354802,354691,354695,354696,354699,354689,354803,354702,354703,354704,354705,354706;Band 2
	ESBR
	SORD	3
		ICAL	A.3	/o,354801,354802,354691,354695,354696,354699,354689,354803,354702,354703,354704,354705,354706;Band 3
	ESBR
	SORD	4
		ICAL	A.4	/o,354801,354802,354691,354695,354696,354699,354689,354803,354702,354703,354704,354705,354706;Band 4
	ESBR
	SORD	5
		ICAL	A.5	/o,354801,354802,354691,354695,354696,354699,354689,354803,354702,354703,354704,354705,354706;Band 5
	ESBR
	SORD	6
		ICAL	A.6	/o,354801,354802,354691,354695,354696,354699,354689,354803,354702,354703,354704,354705,354706;Band 6
	ESBR
	SORD	7	State & touch mode
		LITO	0	last band
		LITO	1	/t,Disabled,Enabled;Touch Screen
	ESBR
	SORD	8	INIT_TOUCH parameters
		PERS	1
		PERS	2
		PERS	3
		PERS	4
		PERS	5
		PERS	6
	ESBR
	SORD	9	screen saver data
		LITO	0	timeout counter
		LITO	3000	/s,30,30001,0.00333333;%.1f min;Screen Saver Delay (mins)
		LITO	0	/t,Disabled,Enabled;Screen Saver
		TIME	200.000	touch timer rate
	ESBR
ESTR
STRE
	SGLB	Misc/Superclass Reference
		CLAS	354008	Object
	ESBR
	SGLB	General/Initialize
		CMNT	 	Expects:  É ¥ inst/É
		CMNT	 	---- Initialize the video hardware
		LCAL	Show	É ¥ inst/É
		CMNT	 	---- Initialize the bands
		LITO	0	É ¥ 0/inst/É
		PRIM	Stack/Swap	É ¥ inst/0/É
		LITO	6	É ¥ 6/inst/0/É
		PRIM	Heap/Name of self	É ¥ self/6/inst/0/É
		PRIM	Stack/Pop to aux	É/self ¥ 6/inst/0/É
		CALL	354088	É/self ¥ inst/É
		PRIM	Stack/Push from aux	É ¥ self/inst/É
		PRIM	Heap/Set self	É ¥ inst/É
		CMNT	 	---- Initialize the touch screen
		LITO	8	key
		PRIM	S_tree/Get exact	É ¥ list/8/inst/É
		ASIO	OpStn/INIT_TOUCH	É ¥ list/8/inst/É
		PRIM	S_tree/Put	É ¥ inst/É
		CMNT	 	---- initialize the timers
		MACR	 	start timer
			PRIM	Timer/Get PAT	PAT/inst/É
			TIME	1000.000	Æt/PAT/inst/É
			GSYM	Timer/Timeout	method/Æt/PAT/inst/É
			CALL	354057	inst/...
		EMAC
		PRIM	Heap/Store self
	ESBR
	SGLB	Timer/Timeout	For internal class use only!
		PRIM	Stack/Xdrop	É ¥ inst/É
		LITO	9	timer data
		PRIM	S_tree/Entry to stack	É ¥ Æt/enabled?/max/count/inst/É
		PRIM	Timer/Get PAT	É ¥ PAT/Æt/enabled?/max/count/inst/É
		GSYM	Timer/Timeout	É ¥ method/PAT/Æt/enabled?/max/count/inst/É
		CALL	354057	É ¥ enabled?/max/count/inst/...
		LCAL	SScount	É ¥ inst/É
		ASIO	OpStn/READ_SCREEN	É ¥ touch?/inst/É
		ASIO	OpStn/GET_TOUCH	É ¥ touch?/y/x/inst/É
		ASIO	OpStn/SCREEN_SPRITE	É ¥ touch?/y/x/inst/É
		BRFL	 	branch if no touch
			PRIM	Stack/Drop	É ¥ x/inst/É
			PRIM	Stack/Drop	É ¥ inst/É
			LITO	7
			PRIM	S_tree/Entry to stack	É ¥ enabled?/band/inst/É
			PRIM	Stack/Drop	É ¥ band/inst/É
			LCAL	NoTouch	É ¥ inst/É
			PRIM	Heap/Store self	É ¥ É
		BRTR
		PRIM	Stack/Switch	É ¥ inst/x/y/É
		CMNT	 	turn off screen save and reset count
		LCAL	Show	É ¥ inst/x/y/É
		CMNT	 	---- process touch
		PRIM	Stack/Second to aux	É/x ¥ inst/y/É
		PRIM	Stack/Second to aux	É/x/y ¥ inst/É
		LITO	7
		PRIM	S_tree/Entry to stack	É/x/y ¥ enabled?/band/inst/É
		BRFL	 	branch if touch screen disabled
			PRIM	Stack/Drop from aux	É/x ¥ band/inst/É
			PRIM	Stack/Drop from aux	É ¥ band/inst/É
			LCAL	NoTouch	É ¥ inst/É
			PRIM	Heap/Store self	É ¥ É
		BRTR
		PRIM	Stack/Duplicate	É/x/y ¥ band/band/inst/É
		BRFL	 	branch if new touch
			PRIM	Stack/Drop	É/x/y ¥ inst/É
			PRIM	Stack/Push from aux	É/x ¥ y/inst/É
			PRIM	Ordinal/Right
			PRIM	Ordinal/Right
			PRIM	Ordinal/Right
			PRIM	Ordinal/Right
			PRIM	Ordinal/Right
			PRIM	Ordinal/Increment	É/x ¥ band/inst/É
			PRIM	Stack/Dup down	É/x ¥ band/inst/band/É
			LITO	1	É/x ¥ band index/band/inst/band/É
			LITO	7	É/x ¥ touch data/band index/band/inst/band/É
			PRIM	S_tree/Replace	É/x ¥ inst/band/É
			PRIM	Stack/Swap	É/x ¥ band/inst/É
			LCAL	Touch	É ¥ É
		BRTR
		PRIM	Stack/Drop from aux	É/x ¥ band/inst/É
		LCAL	Touch	É ¥ É
	ESBR
	SGLB	OpStn/Touch mode	/3t12,Disabled,Enabled;Set Mode ...
		LITO	2
		CALL	354083	Method 7 Set
	ESBR
	SGLB	OpStn/Get Touch Mode	/2t11,Disabled,Enabled
		LITO	2
		CALL	354082	Method 7 Get
	ESBR
	SGLB	OpStn/Screen Saver	/3t12,Disabled,Enabled;Set Mode...
		CMNT	 	Expects:  É ¥ inst/arg/É
		PRIM	Stack/Over	É ¥ arg/inst/arg/É
		BRFL	 	branch if disabled
			LCAL	Show	É ¥ inst/arg/É
			LITO	3	enable index
			CALL	354132	É ¥ É
		BRTR
		LITO	3	enable index
		CALL	354132	É ¥ É
	ESBR
	SGLB	OpStn/Get Screen Saver	/2t11,Disabled,Enabled
		LITO	3
		CALL	354130	Method 9 Get
	ESBR
ESTR
CMTL	5	graphic info
	CMNT	4	-18,-18,878,714
	CMTL	3	0
		CMNT	24	16,0,134,45,7,2,TOUCH SCREEN;OpStn/Touch mode
		CMNT	24	16,0,214,45,9,3, ;OpStn/Screen Saver
	ECMT
	CMTL	7	0
		CMNT	22	-10,130,0,7,2,OpStn/Get Touch Mode;/t,DIS,EN
		CMNT	22	-10,210,0,9,3,OpStn/Get Screen Saver;/t,DIS,EN
		CMNT	14	15,240,0,9,2,;/w,30,30001,0.00333333;SCREEN SAVER:  %3.1f mins
		CMNT	14	108,310,0,1,1,;/i;%s
		CMNT	14	108,380,0,2,1,;/i;%s
		CMNT	14	108,450,0,3,1,;/i;%s
		CMNT	14	108,520,0,4,1,;/i;%s
		CMNT	14	108,590,0,5,1,;/i;%s
		CMNT	14	108,660,0,6,1,;/i;%s
	ECMT
	CMNT	8	0,0,860,696
	CMNT	18	430,70,DISPLAY HANDLER
	CMNT	14	24,310,1:
	CMNT	14	24,380,2:
	CMNT	14	24,450,3:
	CMNT	14	24,520,4:
	CMNT	14	24,590,5:
	CMNT	14	24,660,6:
ECMT
CMTL	 	FB Exclusions
	CLAS	350765	/~
	CLAS	350766	/~
	CLAS	350763	/~
	CLAS	354037	/~
	CLAS	354466	/~
	CLAS	354249	/~
	CLAS	354542	/~
	CLAS	354515	/~
	CLAS	350840	/~
	CLAS	354424	/~
	CLAS	354541	/~
	CLAS	354103	/~
	CLAS	354495	/~
	CLAS	350841	/~
	CLAS	350842	/~
ECMT
LDEF	SScount	É ¥ enabled?/max/count/inst/...
	CMNT	 	Output:  É ¥ inst/É
	BRFL	 	branch if not enabled
		PRIM	Stack/Drop	É ¥ count/inst/...
		PRIM	Stack/Drop	É ¥ inst/...
	BRTR
	PRIM	Ordinal/Compare	É ¥ max<=count?/count/inst/...
	BRFL	 	branch if still counting
		PRIM	Ordinal/Increment	É ¥ count+1/inst/...
		LITO	1	screen saver count index
		LITO	9	screen saver data
		PRIM	S_tree/Replace	É ¥ inst/...
	BRTR
	CMNT	 	turn on screen saver
	PRIM	Stack/Drop	É ¥ inst/...
	ASIO	OpStn/VID_DISABLE	É ¥ inst/...
EDEF
LDEF	NoTouch	É ¥ band/inst/É
	CMNT	 	Cleans up state if there is no current touch
	CMNT	 	Output:  É ¥ inst/É
	PRIM	Stack/Duplicate	É ¥ band/band/inst/É
	BRFL	 	branch if no previous touch
		PRIM	Stack/Drop	É ¥ inst/É
	BRTR
	LITO	1	É ¥ 1/band/inst/É
	PRIM	Stack/Swap	É ¥ band/1/inst/É
	PRIM	S_tree/Read	É ¥ name/inst/É
	GSYM	OpStn/Touch Release	É ¥ method/name/inst/É
	CALL	354059	É ¥ inst/É
	LITO	0	É ¥ no band/inst/É
	LITO	1	É ¥ band index/no band/inst/É
	LITO	7	É ¥ touch data/band index/no band/inst/É
	PRIM	S_tree/Replace	É ¥ inst/É
EDEF
LDEF	Touch	É/x ¥ band/inst/É
	CMNT	 	on exit: É ¥ É
	LITO	1	É/x ¥ 1/band/inst/É
	PRIM	Stack/Swap	É/x ¥ band/1/inst/É
	PRIM	S_tree/Read	É/x ¥ name/inst/É
	GSYM	OpStn/Touch Screen	É/x ¥ method/name/inst/É
	CALL	354060	É ¥ inst/É
	PRIM	Heap/Store self	É ¥ É
EDEF
LDEF	Show	É ¥ inst/É
	CMNT	 	turn off screen save and reset count
	CMNT	 	on exit: É ¥ inst/É
	ASIO	OpStn/VID_ENABLE	É ¥ inst/É
	LITO	0	É ¥ reset/inst/É
	LITO	1	screen saver count index
	LITO	9	screen saver data
	PRIM	S_tree/Replace	É ¥ inst/É
EDEF