NEWSIZE	EQU	$2
ThisTask	EQU	$114
AbsExecBase	EQU	$4
_LVOSetFunction	EQU	-$1A4
im_Code	EQU	$18
wd_WScreen	EQU	$2E
_LVOInitBitMap	EQU	-$186
pr_CLI	EQU	$AC
ib_FirstScreen	EQU	$3C
rk_esc	EQU	$45
WINDOWCLOSE	EQU	$8
wd_UserPort	EQU	$56
_LVOForbid	EQU	-$84
RAWKEY	EQU	$400
_LVOWait	EQU	-$13E
_LVOFreeRaster	EQU	-$1F2
_LVOWaitPort	EQU	-$180
RMBTRAP	EQU	$10000
MOUSEBUTTONS	EQU	$8
_LVOGetMsg	EQU	-$174
_LVOCloseLibrary	EQU	-$19E
sc_Width	EQU	$C
_LVOCloseWindow	EQU	-$48
nw_Width	EQU	$4
wd_LeftEdge	EQU	$4
nw_Height	EQU	$6
bm_Depth	EQU	$5
_LVOAllocRaster	EQU	-$1EC
_LVOBltBitMapRastPort	EQU	-$25E
SMART_REFRESH	EQU	$0
ACTIVATE	EQU	$1000
sc_Flags	EQU	$14
wd_MouseY	EQU	$C
sc_Height	EQU	$E
wd_MouseX	EQU	$E
MP_SIGBIT	EQU	$F
sc_MouseX	EQU	$12
MOUSEMOVE	EQU	$10
wd_Height	EQU	$A
sc_MouseY	EQU	$10
im_Class	EQU	$14
_LVOBltBitMap	EQU	-$1E
wd_RPort	EQU	$32
wd_TopEdge	EQU	$6
_LVOOpenWindow	EQU	-$CC
NOCAREREFRESH	EQU	$20000
_LVOWaitTOF	EQU	-$10E
_LVOSetWindowTitles	EQU	-$114
CUSTOMSCREEN	EQU	$F
WINDOWDEPTH	EQU	$4
_LVOPermit	EQU	-$8A
WBENCHSCREEN	EQU	$1
pr_MsgPort	EQU	$5C
_LVOOpenLibrary	EQU	-$228
WINDOWDRAG	EQU	$2
_LVOCloseScreen	EQU	-$42
wd_Width	EQU	$8
rp_BitMap	EQU	$4
WINDOWSIZING	EQU	$1
nw_LeftEdge	EQU	$0
SIZEVERIFY	EQU	$1
_LVOReplyMsg	EQU	-$17A
sc_BitMap	EQU	$B8
_LVOFindTask	EQU	-$126
rk_backspace	EQU	$41
CLOSEWINDOW	EQU	$200
sc_NextScreen	EQU	$0
rk_w	EQU	$11
_LVOScreenToBack	EQU	-$F6
**********************************************************************
	SECTION QLensrs000000,CODE
ProgStart
	opt	o+
	MOVE.L	A0,BitMap
	MOVE.L	AbsExecBase,A6
	SUB.L	A1,A1
	JSR	_LVOFindTask(A6)
	MOVE.L	D0,A4
	MOVE.L	A4,Task
	MOVEQ	#1,D0
	TST.L	pr_CLI(A4)
	BNE.S	lbC000026
	MOVEQ	#0,D0
lbC000026	MOVE.B	D0,CLI
	LEA	intuitionlibr.MSG,A1
	MOVEQ	#33,D0
	MOVE.L	AbsExecBase,A6
	JSR	_LVOOpenLibrary(A6)
	MOVE.L	D0,IntBase
	BEQ	Exit
	LEA	graphicslibra.MSG,A1
	MOVEQ	#0,D0
	MOVE.L	AbsExecBase,A6
	JSR	_LVOOpenLibrary(A6)
	MOVE.L	D0,GfxBase
	BEQ	Exit
	MOVE.W	#1,Zoom
	TST.B	CLI
	BEQ.S	lbC00009A
	MOVE.L	BitMap,A0
	CMP.B	#$32,(A0)
	BEQ.S	lbC000090
	CMP.B	#$34,(A0)
	BNE.S	lbC0000BA
	MOVE.W	#4,Zoom
	BRA.S	lbC0000BA

lbC000090	MOVE.W	#2,Zoom
	BRA.S	lbC0000BA

lbC00009A	MOVE.L	AbsExecBase,A6
	MOVE.L	ThisTask(A6),A4
	LEA	pr_MsgPort(A4),A0
	JSR	_LVOWaitPort(A6)
	LEA	pr_MsgPort(A4),A0
	JSR	_LVOGetMsg(A6)
	MOVE.L	D0,Msg
lbC0000BA	MOVE.L	IntBase,A1
	MOVE.W	#_LVOCloseScreen,A0
	MOVE.L	#lbC0004C4,D0
	MOVE.L	AbsExecBase,A6
	JSR	_LVOSetFunction(A6)
	MOVE.L	D0,lbL000E24
	MOVE.L	D0,lbW000518
	MOVE.L	IntBase,A6
	MOVE.L	ib_FirstScreen(A6),A1
	BSR	lbC0003E6
	TST.L	D0
	BNE.S	Exit
	BRA	lbC000298

Exit	TST.L	lbL000E24
	BEQ.S	lbC000120
	MOVE.L	IntBase,A1
	MOVE.W	#_LVOCloseScreen,A0
	MOVE.L	lbL000E24,D0
	MOVE.L	AbsExecBase,A6
	JSR	_LVOSetFunction(A6)
	CLR.L	Screen
lbC000120	JSR	lbC000252(PC)
	TST.L	Window
	BEQ.S	lbC00013E
	MOVE.L	Window,A0
	MOVE.L	IntBase,A6
	JSR	_LVOCloseWindow(A6)
lbC00013E	MOVE.L	AbsExecBase,A6
	TST.L	GfxBase
	BEQ.S	lbC000156
	MOVE.L	GfxBase,A1
	JSR	_LVOCloseLibrary(A6)
lbC000156	TST.L	IntBase
	BEQ.S	lbC000168
	MOVE.L	IntBase,A1
	JSR	_LVOCloseLibrary(A6)
lbC000168	TST.B	CLI
	BNE.S	lbC00018C
	TST.L	Msg
	BEQ.S	lbC00018C
	JSR	_LVOForbid(A6)
	MOVE.L	Msg,A1
	JSR	_LVOReplyMsg(A6)
	JSR	_LVOPermit(A6)
lbC00018C	CLR.L	D0
	RTS

lbC000190	TST.L	Window
	BEQ	lbC000252
	MOVE.L	Window,A0
	MOVE.W	wd_Width(A0),D0
	CMP.W	#1,Zoom
	BEQ.S	lbC0001CA
	CMP.W	#4,Zoom
	BEQ.S	lbC0001C2
	ADD.W	#$10,D0
	AND.W	#$FFF0,D0
	BRA.S	lbC0001CA

lbC0001C2	ADD.W	#$20,D0
	AND.W	#$FFE0,D0
lbC0001CA	MOVE.W	D0,Width
	MOVE.W	wd_Height(A0),Height
	MOVE.L	wd_RPort(A0),A1
	MOVE.L	rp_BitMap(A1),A1
	MOVE.B	bm_Depth(A1),lbB000E55
	LEA	BitMap,A0
	MOVE.W	Depth,D0
	MOVE.W	Width,D1
	MOVE.W	Height,D2
	MOVE.L	GfxBase,A6
	JSR	_LVOInitBitMap(A6)
	LEA	BitMap,A0
	ADD.L	#8,A0
	MOVEQ	#$1C,D2
lbC000218	MOVE.L	#0,0(A0,D2.W)
	SUBQ.L	#4,D2
	BPL.S	lbC000218
	MOVE.W	Depth,D4
	LEA	BitMap,A4
	ADD.L	#8,A4
lbC000236	MOVE.W	Width,D0
	MOVE.W	Height,D1
	JSR	_LVOAllocRaster(A6)
	MOVE.L	D0,(A4)+
	BEQ.S	lbC000252
	SUBQ.W	#1,D4
	BNE.S	lbC000236
	MOVEQ	#0,D0
	RTS

lbC000252	MOVE.L	GfxBase,A6
	LEA	BitMap,A4
	ADD.L	#8,A4
lbC000264	TST.L	(A4)
	BEQ.S	lbC000282
	MOVE.L	(A4),A0
	MOVE.W	Width,D0
	MOVE.W	Height,D1
	JSR	_LVOFreeRaster(A6)
	MOVE.L	#0,(A4)+
	BRA.S	lbC000264

lbC000282	CLR.W	Width
	CLR.W	Height
	CLR.W	Depth
	MOVEQ	#1,D0
	RTS

lbC000298	MOVE.W	Zoom,D0
	JSR	lbC00051C(PC)
NextEvent	MOVE.L	Window,A0
	MOVE.W	wd_MouseX(A0),D0
	MOVE.W	wd_MouseY(A0),D1
	CMP.W	lbW000E5A,D0
	BNE.S	lbC0002C2
	CMP.W	lbW000E5C,D1
	BEQ.S	lbC0002DA
lbC0002C2	MOVE.W	D0,lbW000E5A
	MOVE.W	D1,lbW000E5C
	JSR	lbC000644(PC)
	CLR.W	lbW000E5E
lbC0002DA	ADD.W	#1,lbW000E5E
	CMP.W	#10,lbW000E5E
	BGE.S	lbC0002C2
lbC0002EC	CLR.B	lbB000E6A
	MOVE.L	GfxBase,A6
	JSR	_LVOWaitTOF(A6)
	MOVE.B	#1,lbB000E6A
	TST.B	lbB000E69
	BNE.S	lbC0002EC
	JSR	lbC0007A0(PC)
	CMP.L	#CLOSEWINDOW,D1
	BEQ	Exit
	CMP.L	#RAWKEY,D1
	BEQ.S	lbC000370
	CMP.L	#MOUSEBUTTONS,D1
	BEQ.S	lbC00034A
	CMP.L	#NEWSIZE,D1
	BNE	NextEvent
lbC000338	JSR	lbC000252(PC)
	JSR	lbC000190(PC)
	TST.L	D0
	BEQ	NextEvent
	BRA	Exit

lbC00034A	CMP.W	#$69,Code
	BNE	NextEvent
	MOVE.W	Zoom,D0
	LSL.W	#1,D0
	CMP.W	#4,D0
	BLE.S	lbC000368
	MOVE.W	#1,D0
lbC000368	JSR	lbC00051C(PC)
	BRA.S	lbC000338

lbC000370	CMP.W	#rk_esc,Code
	BEQ	Exit
	CMP.W	#rk_backspace,Code
	BEQ.S	Jump
	CMP.W	#rk_w,Code
	BNE	NextEvent
	MOVE.L	Screen,A4
ToWB	TST.L	sc_NextScreen(A4)
	BEQ	NextEvent
	MOVE.L	sc_NextScreen(A4),A4
	MOVE.W	sc_Flags(A4),D0
	AND.W	#CUSTOMSCREEN,D0
	CMP.W	#WBENCHSCREEN,D0
	BNE.S	ToWB
	BRA.S	lbC0003D6

Jump	MOVE.L	Screen,A4
	TST.L	sc_NextScreen(A4)
	BEQ	NextEvent
	MOVE.L	sc_NextScreen(A4),A4
	MOVE.L	Screen,A0
	MOVE.L	IntBase,A6
	JSR	_LVOScreenToBack(A6)
lbC0003D6	MOVE.L	A4,A1
	BSR.S	lbC0003E6
	TST.L	D0
	BNE	Exit
	BRA	NextEvent

lbC0003E6	MOVE.L	A1,lbL000E28
	JSR	lbC000252(PC)
	TST.L	Window
	BEQ.S	lbC000408
	MOVE.L	Window,A0
	MOVE.L	IntBase,A6
	JSR	_LVOCloseWindow(A6)
lbC000408	CLR.L	Window
	CLR.L	Screen
	CLR.L	lbL000DF6
	LEA	NewWindow,A0
	MOVE.L	lbL000E28,A1
	MOVE.W	#228,nw_Width(A0)
	MOVE.W	#91,nw_Height(A0)
	MOVE.W	sc_Flags(A1),D0
	AND.W	#CUSTOMSCREEN,D0
	MOVE.W	D0,ScreenFlags
	CMP.W	#WBENCHSCREEN,D0
	BEQ.S	lbC00044C
	MOVE.L	A1,lbL000DF6
lbC00044C	MOVE.W	sc_Width(A1),D0
	SUB.W	#228,D0
	LSR.W	#1,D0
	MOVE.W	D0,nw_LeftEdge(A0)
	MOVE.L	IntBase,A6
	JSR	_LVOOpenWindow(A6)
	MOVE.L	D0,Window
	BEQ.S	Fail
	MOVE.L	D0,A0
	MOVE.L	wd_WScreen(A0),Screen
	MOVE.L	wd_RPort(A0),RasterPort
	MOVE.L	Window,A0
	LEA	Title,A1
	MOVE.L	A1,A2
	CMP.B	#'B',BerroBCSSoftw.MSG
	BNE.S	Fail
	CMP.B	#'r',rroBCSSoftwar.MSG
	BNE.S	Fail
	MOVE.L	IntBase,A6
	JSR	_LVOSetWindowTitles(A6)
	JSR	lbC000190(PC)
	TST.L	D0
	BNE.S	Fail
	RTS

Fail	MOVE.L	#$FFFFFFFF,D0
	RTS

lbC0004C4	MOVE.B	#1,lbB000E69
	MOVEM.L	D0-D7/A0-A6,-(SP)
	MOVE.L	A0,D2
	CMP.L	Screen,D2
	BNE.S	lbC000504
	MOVE.L	Screen,A4
	TST.L	sc_NextScreen(A4)
	BEQ.S	lbC000504
lbC0004E6	TST.B	lbB000E6A
	BEQ.S	lbC0004FA
	MOVE.L	GfxBase,A6
	JSR	_LVOWaitTOF(A6)
	BRA.S	lbC0004E6

lbC0004FA	MOVE.L	0(A4),A1
	JSR	lbC0003E6(PC)
lbC000504	MOVEM.L	(SP)+,D0-D7/A0-A6
	MOVE.L	lbL000E24,A1
	CLR.B	lbB000E69
	JMP	(A1)

	JMP	0
lbW000518	EQU	*-2

	RTS

lbC00051C	MOVE.W	D0,Zoom
	MOVE.W	#0,Scale
	MOVE.W	#1,lbW000E64
	CMP.W	#1,D0
	BEQ.S	lbC000566
	MOVE.W	#1,Scale
	MOVE.W	#2,lbW000E64
	CMP.W	#2,D0
	BEQ.S	lbC000566
	MOVE.W	#2,Scale
	MOVE.W	#3,lbW000E64
	CMP.W	#4,D0
	BEQ.S	lbC000566
	NOP
lbC000566	RTS

lbC000568	MOVE.W	Height,D1
	LSR.W	#2,D1
	SUB.W	#1,D1
	MOVE.L	D1,D0
	MOVE.W	Width,D4
	LSR.W	#3,D4
	AND.L	#$FFFF,D4
	MULU	D4,D0
	ADD.L	D0,A0
	MOVE.L	A0,A3
	ADD.L	D0,A3
	ADD.L	D0,A3
	ADD.L	D0,A3
	LEA	TableZ4,A2
lbC000596	MOVE.L	D4,D0
	LSR.L	#2,D0
	SUBQ.L	#1,D0
	MOVE.L	D0,D3
	ASL.L	#2,D3
lbC0005A0	MOVE.B	0(A0,D0.W),D2
	AND.L	#$FF,D2
	ASL.L	#2,D2
	MOVE.L	0(A2,D2.W),D2
	MOVE.L	D2,0(A3,D3.W)
	ADD.L	D4,D3
	MOVE.L	D2,0(A3,D3.W)
	ADD.L	D4,D3
	MOVE.L	D2,0(A3,D3.W)
	ADD.L	D4,D3
	MOVE.L	D2,0(A3,D3.W)
	SUB.L	D4,D3
	SUB.L	D4,D3
	SUB.L	D4,D3
	SUBQ.L	#4,D3
	DBRA	D0,lbC0005A0

	SUB.L	D4,A0
	SUB.L	D4,A3
	SUB.L	D4,A3
	SUB.L	D4,A3
	SUB.L	D4,A3
	DBRA	D1,lbC000596

	RTS

lbC0005E2	MOVE.W	Height,D1
	LSR.W	#1,D1
	SUB.W	#1,D1
	MOVE.L	D1,D0
	MOVE.W	Width,D4
	LSR.W	#3,D4
	AND.L	#$FFFF,D4
	MULU	D4,D0
	ADD.L	D0,A0
	MOVE.L	A0,A3
	ADD.L	D0,A3
	LEA	TableZ2,A2
lbC00060C	MOVE.L	D4,D0
	LSR.L	#1,D0
	SUBQ.L	#1,D0
	MOVE.L	D0,D3
	ASL.L	#1,D3
lbC000616	MOVE.B	0(A0,D0.W),D2
	AND.L	#$FF,D2
	ASL.L	#1,D2
	MOVE.W	0(A2,D2.W),D2
	MOVE.W	D2,0(A3,D3.W)
	ADD.W	D4,D3
	MOVE.W	D2,0(A3,D3.W)
	SUB.W	D4,D3
	SUBQ.L	#2,D3
	DBRA	D0,lbC000616

	SUB.L	D4,A0
	SUB.L	D4,A3
	SUB.L	D4,A3
	DBRA	D1,lbC00060C

	RTS

lbC000644	MOVE.L	Window,A0
	MOVE.W	wd_Width(A0),D4
	SUBQ.W	#4,D4
	MOVE.W	lbW000E64,D0
	LSR.W	D0,D4
	MOVE.W	D4,D5
	NEG.W	D5
	MOVE.L	Screen,A1
	ADD.W	sc_Width(A1),D5
	MOVE.W	wd_Height(A0),D6
	SUB.W	#11,D6
	LSR.W	D0,D6
	MOVE.W	D6,D7
	NEG.W	D7
	ADD.W	sc_Height(A1),D7
	LEA	sc_BitMap(A1),A0
	MOVE.W	sc_MouseX(A1),D0
	CMP.W	D5,D0
	BLT.S	lbC00068A
	MOVE.W	D5,D0
	SUB.W	D4,D0
	BRA.S	lbC000690

lbC00068A	SUB.W	D4,D0
	BPL.S	lbC000690
	MOVEQ	#0,D0
lbC000690	MOVE.W	sc_MouseY(A1),D1
	CMP.W	D7,D1
	BLT.S	lbC00069E
	MOVE.W	D7,D1
	SUB.W	D6,D1
	BRA.S	lbC0006A4

lbC00069E	SUB.W	D6,D1
	BPL.S	lbC0006A4
	MOVEQ	#0,D1
lbC0006A4	LEA	BitMap,A1
	MOVEQ	#0,D2
	MOVEQ	#0,D3
	MOVE.W	Width,D4
	MOVE.W	Scale,D6
	LSR.W	D6,D4
	MOVE.W	Height,D5
	LSR.W	D6,D5
	MOVE.L	#$C0,D6
	MOVE.L	#$FF,D7
	SUB.L	A2,A2
	MOVE.L	GfxBase,A6
	JSR	_LVOBltBitMap(A6)
	CMP.W	#1,Zoom
	BEQ.S	lbC00070E
	LEA	BitMap,A5
	ADD.L	#8,A5
lbC0006F2	TST.L	(A5)
	BEQ.S	lbC00070E
	MOVE.L	(A5)+,A0
	CMP.W	#4,Zoom
	BEQ.S	lbC000708
	BSR	lbC0005E2
	BRA.S	lbC0006F2

lbC000708	BSR	lbC000568
	BRA.S	lbC0006F2

lbC00070E	LEA	BitMap,A0
	MOVEQ	#0,D0
	MOVEQ	#0,D1
	MOVE.L	RasterPort,A1
	MOVEQ	#2,D2
	MOVEQ	#10-10,D3
	MOVE.L	Window,A2
	MOVE.B	55(A2),D3
	MOVE.W	wd_Width(A2),D4
	SUBQ.W	#4,D4
	MOVE.W	wd_Height(A2),D5
*	SUB.W	#11,D5
	SUB.W	D3,D5
	SUBQ.W	#1,D5
	MOVE.L	#$C0,D6
*	MOVE.L	#$FF,D7
*	SUB.L	A2,A2
	MOVE.L	GfxBase,A6
	JSR	_LVOBltBitMapRastPort(A6)
	RTS

	MOVE.L	Window,A5
	BRA.S	lbC000772

lbC00075A	MOVE.L	A5,A0
	MOVE.L	AbsExecBase,A6
	MOVE.L	wd_UserPort(A0),A0
	MOVE.B	MP_SIGBIT(A0),D1
	MOVEQ	#1,D0
	LSL.L	D1,D0
	JSR	_LVOWait(A6)
lbC000772	MOVE.L	A5,A0
	MOVE.L	AbsExecBase,A6
	MOVE.L	wd_UserPort(A0),A0
	JSR	_LVOGetMsg(A6)
	MOVEQ	#0,D1
	MOVE.L	D0,A1
	TST.L	D0
	BEQ.S	lbC00075A
	MOVE.W	im_Code(A1),Code
	MOVE.L	im_Class(A1),D1
	MOVE.L	D1,-(SP)
	JSR	_LVOReplyMsg(A6)
	MOVE.L	(SP)+,D1
	RTS

lbC0007A0	MOVE.L	Window,A0
	MOVE.L	AbsExecBase,A6
	MOVE.L	wd_UserPort(A0),A0
	JSR	_LVOGetMsg(A6)
	MOVE.L	D0,A1
	TST.L	D0
	BEQ.S	lbC0007D4
	MOVE.W	im_Code(A1),Code
	MOVE.L	im_Class(A1),D4
	JSR	_LVOReplyMsg(A6)
	CMP.L	#MOUSEMOVE,D4
	BEQ.S	lbC0007A0
	MOVE.L	D4,D0
lbC0007D4	MOVE.L	D0,D1
	RTS

TableZ2	dc.w	0
	dc.w	3
	dc.w	12
	dc.w	15
	dc.w	$30
	dc.w	$33
	dc.w	$3C
	dc.w	$3F
	dc.w	$C0
	dc.w	$C3
	dc.w	$CC
	dc.w	$CF
	dc.w	$F0
	dc.w	$F3
	dc.w	$FC
	dc.w	$FF
	dc.w	$300
	dc.w	$303
	dc.w	$30C
	dc.w	$30F
	dc.w	$330
	dc.w	$333
	dc.w	$33C
	dc.w	$33F
	dc.w	$3C0
	dc.w	$3C3
	dc.w	$3CC
	dc.w	$3CF
	dc.w	$3F0
	dc.w	$3F3
	dc.w	$3FC
	dc.w	$3FF
	dc.w	$C00
	dc.w	$C03
	dc.w	$C0C
	dc.w	$C0F
	dc.w	$C30
	dc.w	$C33
	dc.w	$C3C
	dc.w	$C3F
	dc.w	$CC0
	dc.w	$CC3
	dc.w	$CCC
	dc.w	$CCF
	dc.w	$CF0
	dc.w	$CF3
	dc.w	$CFC
	dc.w	$CFF
	dc.w	$F00
	dc.w	$F03
	dc.w	$F0C
	dc.w	$F0F
	dc.w	$F30
	dc.w	$F33
	dc.w	$F3C
	dc.w	$F3F
	dc.w	$FC0
	dc.w	$FC3
	dc.w	$FCC
	dc.w	$FCF
	dc.w	$FF0
	dc.w	$FF3
	dc.w	$FFC
	dc.w	$FFF
	dc.w	$3000
	dc.w	$3003
	dc.w	$300C
	dc.w	$300F
	dc.w	$3030
	dc.w	$3033
	dc.w	$303C
	dc.w	$303F
	dc.w	$30C0
	dc.w	$30C3
	dc.w	$30CC
	dc.w	$30CF
	dc.w	$30F0
	dc.w	$30F3
	dc.w	$30FC
	dc.w	$30FF
	dc.w	$3300
	dc.w	$3303
	dc.w	$330C
	dc.w	$330F
	dc.w	$3330
	dc.w	$3333
	dc.w	$333C
	dc.w	$333F
	dc.w	$33C0
	dc.w	$33C3
	dc.w	$33CC
	dc.w	$33CF
	dc.w	$33F0
	dc.w	$33F3
	dc.w	$33FC
	dc.w	$33FF
	dc.w	$3C00
	dc.w	$3C03
	dc.w	$3C0C
	dc.w	$3C0F
	dc.w	$3C30
	dc.w	$3C33
	dc.w	$3C3C
	dc.w	$3C3F
	dc.w	$3CC0
	dc.w	$3CC3
	dc.w	$3CCC
	dc.w	$3CCF
	dc.w	$3CF0
	dc.w	$3CF3
	dc.w	$3CFC
	dc.w	$3CFF
	dc.w	$3F00
	dc.w	$3F03
	dc.w	$3F0C
	dc.w	$3F0F
	dc.w	$3F30
	dc.w	$3F33
	dc.w	$3F3C
	dc.w	$3F3F
	dc.w	$3FC0
	dc.w	$3FC3
	dc.w	$3FCC
	dc.w	$3FCF
	dc.w	$3FF0
	dc.w	$3FF3
	dc.w	$3FFC
	dc.w	$3FFF
	dc.w	$C000
	dc.w	$C003
	dc.w	$C00C
	dc.w	$C00F
	dc.w	$C030
	dc.w	$C033
	dc.w	$C03C
	dc.w	$C03F
	dc.w	$C0C0
	dc.w	$C0C3
	dc.w	$C0CC
	dc.w	$C0CF
	dc.w	$C0F0
	dc.w	$C0F3
	dc.w	$C0FC
	dc.w	$C0FF
	dc.w	$C300
	dc.w	$C303
	dc.w	$C30C
	dc.w	$C30F
	dc.w	$C330
	dc.w	$C333
	dc.w	$C33C
	dc.w	$C33F
	dc.w	$C3C0
	dc.w	$C3C3
	dc.w	$C3CC
	dc.w	$C3CF
	dc.w	$C3F0
	dc.w	$C3F3
	dc.w	$C3FC
	dc.w	$C3FF
	dc.w	$CC00
	dc.w	$CC03
	dc.w	$CC0C
	dc.w	$CC0F
	dc.w	$CC30
	dc.w	$CC33
	dc.w	$CC3C
	dc.w	$CC3F
	dc.w	$CCC0
	dc.w	$CCC3
	dc.w	$CCCC
	dc.w	$CCCF
	dc.w	$CCF0
	dc.w	$CCF3
	dc.w	$CCFC
	dc.w	$CCFF
	dc.w	$CF00
	dc.w	$CF03
	dc.w	$CF0C
	dc.w	$CF0F
	dc.w	$CF30
	dc.w	$CF33
	dc.w	$CF3C
	dc.w	$CF3F
	dc.w	$CFC0
	dc.w	$CFC3
	dc.w	$CFCC
	dc.w	$CFCF
	dc.w	$CFF0
	dc.w	$CFF3
	dc.w	$CFFC
	dc.w	$CFFF
	dc.w	$F000
	dc.w	$F003
	dc.w	$F00C
	dc.w	$F00F
	dc.w	$F030
	dc.w	$F033
	dc.w	$F03C
	dc.w	$F03F
	dc.w	$F0C0
	dc.w	$F0C3
	dc.w	$F0CC
	dc.w	$F0CF
	dc.w	$F0F0
	dc.w	$F0F3
	dc.w	$F0FC
	dc.w	$F0FF
	dc.w	$F300
	dc.w	$F303
	dc.w	$F30C
	dc.w	$F30F
	dc.w	$F330
	dc.w	$F333
	dc.w	$F33C
	dc.w	$F33F
	dc.w	$F3C0
	dc.w	$F3C3
	dc.w	$F3CC
	dc.w	$F3CF
	dc.w	$F3F0
	dc.w	$F3F3
	dc.w	$F3FC
	dc.w	$F3FF
	dc.w	$FC00
	dc.w	$FC03
	dc.w	$FC0C
	dc.w	$FC0F
	dc.w	$FC30
	dc.w	$FC33
	dc.w	$FC3C
	dc.w	$FC3F
	dc.w	$FCC0
	dc.w	$FCC3
	dc.w	$FCCC
	dc.w	$FCCF
	dc.w	$FCF0
	dc.w	$FCF3
	dc.w	$FCFC
	dc.w	$FCFF
	dc.w	$FF00
	dc.w	$FF03
	dc.w	$FF0C
	dc.w	$FF0F
	dc.w	$FF30
	dc.w	$FF33
	dc.w	$FF3C
	dc.w	$FF3F
	dc.w	$FFC0
	dc.w	$FFC3
	dc.w	$FFCC
	dc.w	$FFCF
	dc.w	$FFF0
	dc.w	$FFF3
	dc.w	$FFFC
	dc.w	$FFFF
TableZ4	dc.l	0
	dc.l	15
	dc.l	$F0
	dc.l	$FF
	dc.l	$F00
	dc.l	$F0F
	dc.l	$FF0
	dc.l	$FFF
	dc.l	$F000
	dc.l	$F00F
	dc.l	$F0F0
	dc.l	$F0FF
	dc.l	$FF00
	dc.l	$FF0F
	dc.l	$FFF0
	dc.l	$FFFF
	dc.l	$F0000
	dc.l	$F000F
	dc.l	$F00F0
	dc.l	$F00FF
	dc.l	$F0F00
	dc.l	$F0F0F
	dc.l	$F0FF0
	dc.l	$F0FFF
	dc.l	$FF000
	dc.l	$FF00F
	dc.l	$FF0F0
	dc.l	$FF0FF
	dc.l	$FFF00
	dc.l	$FFF0F
	dc.l	$FFFF0
	dc.l	$FFFFF
	dc.l	$F00000
	dc.l	$F0000F
	dc.l	$F000F0
	dc.l	$F000FF
	dc.l	$F00F00
	dc.l	$F00F0F
	dc.l	$F00FF0
	dc.l	$F00FFF
	dc.l	$F0F000
	dc.l	$F0F00F
	dc.l	$F0F0F0
	dc.l	$F0F0FF
	dc.l	$F0FF00
	dc.l	$F0FF0F
	dc.l	$F0FFF0
	dc.l	$F0FFFF
	dc.l	$FF0000
	dc.l	$FF000F
	dc.l	$FF00F0
	dc.l	$FF00FF
	dc.l	$FF0F00
	dc.l	$FF0F0F
	dc.l	$FF0FF0
	dc.l	$FF0FFF
	dc.l	$FFF000
	dc.l	$FFF00F
	dc.l	$FFF0F0
	dc.l	$FFF0FF
	dc.l	$FFFF00
	dc.l	$FFFF0F
	dc.l	$FFFFF0
	dc.l	$FFFFFF
	dc.l	$F000000
	dc.l	$F00000F
	dc.l	$F0000F0
	dc.l	$F0000FF
	dc.l	$F000F00
	dc.l	$F000F0F
	dc.l	$F000FF0
	dc.l	$F000FFF
	dc.l	$F00F000
	dc.l	$F00F00F
	dc.l	$F00F0F0
	dc.l	$F00F0FF
	dc.l	$F00FF00
	dc.l	$F00FF0F
	dc.l	$F00FFF0
	dc.l	$F00FFFF
	dc.l	$F0F0000
	dc.l	$F0F000F
	dc.l	$F0F00F0
	dc.l	$F0F00FF
	dc.l	$F0F0F00
	dc.l	$F0F0F0F
	dc.l	$F0F0FF0
	dc.l	$F0F0FFF
	dc.l	$F0FF000
	dc.l	$F0FF00F
	dc.l	$F0FF0F0
	dc.l	$F0FF0FF
	dc.l	$F0FFF00
	dc.l	$F0FFF0F
	dc.l	$F0FFFF0
	dc.l	$F0FFFFF
	dc.l	$FF00000
	dc.l	$FF0000F
	dc.l	$FF000F0
	dc.l	$FF000FF
	dc.l	$FF00F00
	dc.l	$FF00F0F
	dc.l	$FF00FF0
	dc.l	$FF00FFF
	dc.l	$FF0F000
	dc.l	$FF0F00F
	dc.l	$FF0F0F0
	dc.l	$FF0F0FF
	dc.l	$FF0FF00
	dc.l	$FF0FF0F
	dc.l	$FF0FFF0
	dc.l	$FF0FFFF
	dc.l	$FFF0000
	dc.l	$FFF000F
	dc.l	$FFF00F0
	dc.l	$FFF00FF
	dc.l	$FFF0F00
	dc.l	$FFF0F0F
	dc.l	$FFF0FF0
	dc.l	$FFF0FFF
	dc.l	$FFFF000
	dc.l	$FFFF00F
	dc.l	$FFFF0F0
	dc.l	$FFFF0FF
	dc.l	$FFFFF00
	dc.l	$FFFFF0F
	dc.l	$FFFFFF0
	dc.l	$FFFFFFF
	dc.l	$F0000000
	dc.l	$F000000F
	dc.l	$F00000F0
	dc.l	$F00000FF
	dc.l	$F0000F00
	dc.l	$F0000F0F
	dc.l	$F0000FF0
	dc.l	$F0000FFF
	dc.l	$F000F000
	dc.l	$F000F00F
	dc.l	$F000F0F0
	dc.l	$F000F0FF
	dc.l	$F000FF00
	dc.l	$F000FF0F
	dc.l	$F000FFF0
	dc.l	$F000FFFF
	dc.l	$F00F0000
	dc.l	$F00F000F
	dc.l	$F00F00F0
	dc.l	$F00F00FF
	dc.l	$F00F0F00
	dc.l	$F00F0F0F
	dc.l	$F00F0FF0
	dc.l	$F00F0FFF
	dc.l	$F00FF000
	dc.l	$F00FF00F
	dc.l	$F00FF0F0
	dc.l	$F00FF0FF
	dc.l	$F00FFF00
	dc.l	$F00FFF0F
	dc.l	$F00FFFF0
	dc.l	$F00FFFFF
	dc.l	$F0F00000
	dc.l	$F0F0000F
	dc.l	$F0F000F0
	dc.l	$F0F000FF
	dc.l	$F0F00F00
	dc.l	$F0F00F0F
	dc.l	$F0F00FF0
	dc.l	$F0F00FFF
	dc.l	$F0F0F000
	dc.l	$F0F0F00F
	dc.l	$F0F0F0F0
	dc.l	$F0F0F0FF
	dc.l	$F0F0FF00
	dc.l	$F0F0FF0F
	dc.l	$F0F0FFF0
	dc.l	$F0F0FFFF
	dc.l	$F0FF0000
	dc.l	$F0FF000F
	dc.l	$F0FF00F0
	dc.l	$F0FF00FF
	dc.l	$F0FF0F00
	dc.l	$F0FF0F0F
	dc.l	$F0FF0FF0
	dc.l	$F0FF0FFF
	dc.l	$F0FFF000
	dc.l	$F0FFF00F
	dc.l	$F0FFF0F0
	dc.l	$F0FFF0FF
	dc.l	$F0FFFF00
	dc.l	$F0FFFF0F
	dc.l	$F0FFFFF0
	dc.l	$F0FFFFFF
	dc.l	$FF000000
	dc.l	$FF00000F
	dc.l	$FF0000F0
	dc.l	$FF0000FF
	dc.l	$FF000F00
	dc.l	$FF000F0F
	dc.l	$FF000FF0
	dc.l	$FF000FFF
	dc.l	$FF00F000
	dc.l	$FF00F00F
	dc.l	$FF00F0F0
	dc.l	$FF00F0FF
	dc.l	$FF00FF00
	dc.l	$FF00FF0F
	dc.l	$FF00FFF0
	dc.l	$FF00FFFF
	dc.l	$FF0F0000
	dc.l	$FF0F000F
	dc.l	$FF0F00F0
	dc.l	$FF0F00FF
	dc.l	$FF0F0F00
	dc.l	$FF0F0F0F
	dc.l	$FF0F0FF0
	dc.l	$FF0F0FFF
	dc.l	$FF0FF000
	dc.l	$FF0FF00F
	dc.l	$FF0FF0F0
	dc.l	$FF0FF0FF
	dc.l	$FF0FFF00
	dc.l	$FF0FFF0F
	dc.l	$FF0FFFF0
	dc.l	$FF0FFFFF
	dc.l	$FFF00000
	dc.l	$FFF0000F
	dc.l	$FFF000F0
	dc.l	$FFF000FF
	dc.l	$FFF00F00
	dc.l	$FFF00F0F
	dc.l	$FFF00FF0
	dc.l	$FFF00FFF
	dc.l	$FFF0F000
	dc.l	$FFF0F00F
	dc.l	$FFF0F0F0
	dc.l	$FFF0F0FF
	dc.l	$FFF0FF00
	dc.l	$FFF0FF0F
	dc.l	$FFF0FFF0
	dc.l	$FFF0FFFF
	dc.l	$FFFF0000
	dc.l	$FFFF000F
	dc.l	$FFFF00F0
	dc.l	$FFFF00FF
	dc.l	$FFFF0F00
	dc.l	$FFFF0F0F
	dc.l	$FFFF0FF0
	dc.l	$FFFF0FFF
	dc.l	$FFFFF000
	dc.l	$FFFFF00F
	dc.l	$FFFFF0F0
	dc.l	$FFFFF0FF
	dc.l	$FFFFFF00
	dc.l	$FFFFFF0F
	dc.l	$FFFFFFF0
	dc.l	$FFFFFFFF

	SECTION QLensrs000DD8,DATA
NewWindow	dc.w	206
	dc.w	12
	dc.w	228
	dc.w	91
	dc.b	0
	dc.b	1
	dc.l	(SIZEVERIFY!NEWSIZE!MOUSEBUTTONS!MOUSEMOVE!CLOSEWINDOW!RAWKEY)
	dc.l	(WINDOWSIZING!WINDOWDRAG!WINDOWDEPTH!WINDOWCLOSE!SMART_REFRESH!NOCAREREFRESH!RMBTRAP!ACTIVATE)
	dcb.l	2,0
	dc.l	Title
lbL000DF6	dcb.l	2,0
	dc.w	126
	dc.w	27
	dc.w	800
	dc.w	500
ScreenFlags	dc.w	WBENCHSCREEN
IntBase	dc.l	0
GfxBase	dc.l	0
Msg	dc.l	0
Task	dc.l	0
Window	dc.l	0
Screen	dc.l	0
RasterPort	dc.l	0
lbL000E24	dc.l	0
lbL000E28	dc.l	0
BitMap	dcb.l	10,0
Depth	dc.b	0
lbB000E55	dc.b	0
Width	dc.w	0
Height	dc.w	0
lbW000E5A	dc.w	$FFFF
lbW000E5C	dc.w	$FFFF
lbW000E5E	dc.w	0
Zoom	dc.w	0
Scale	dc.w	0
lbW000E64	dc.w	0
Code	dc.w	0
CLI	dc.b	0
lbB000E69	dc.b	0
lbB000E6A	dc.b	0
intuitionlibr.MSG	dc.b	'intuition.library',0
graphicslibra.MSG	dc.b	'graphics.library',0
	dc.b	'$VER: '
Title	dc.b	'QLENS: QuickLens  v2.02  by Mike '
BerroBCSSoftw.MSG	dc.b	'Be'
rroBCSSoftwar.MSG	dc.b	'rro/BCS Software',0,0
	dc.b	0