	.386p
	ifndef	??version
?debug	macro
	endm
publicdll macro	name
	public	name
	endm
	endif
	?debug	V 300h
	?debug	S "PLANE.CPP"
	?debug	C E9F796783809504C414E452E435050
	?debug	C E9235C334719433A5C424333315C494E434C554445325C53594D42+
	?debug	C 4F4C2E48
	?debug	C E972A3413919433A5C424333315C494E434C554445325C4249544D+
	?debug	C 41502E48
	?debug	C E91A56CA3417433A5C424333315C494E434C554445325C49434F4E+
	?debug	C 2E48
	?debug	C E9D271443916433A5C424333315C494E434C554445325C4749462E+
	?debug	C 48
	?debug	C E996A48B4219433A5C424333315C494E434C554445325C4D454D4F+
	?debug	C 52592E48
	?debug	C E94019CA1818433A5C424333315C494E434C5544455C5354444C49+
	?debug	C 422E48
	?debug	C E94019CA1817433A5C424333315C494E434C5544455C5F44454653+
	?debug	C 2E48
	?debug	C E94019CA1815433A5C424333315C494E434C5544455C444F532E48
	?debug	C E94019CA1817433A5C424333315C494E434C5544455C535444494F+
	?debug	C 2E48
	?debug	C E94019CA1818433A5C424333315C494E434C5544455C5F4E46494C+
	?debug	C 452E48
	?debug	C E94019CA1817433A5C424333315C494E434C5544455C434F4E494F+
	?debug	C 2E48
	?debug	C E94019CA181B433A5C424333315C494E434C5544455C5359535C5C+
	?debug	C 535441542E48
	?debug	C E98881753917433A5C424333315C494E434C554445325C4A504547+
	?debug	C 2E48
	?debug	C E9E94C7C4F1A433A5C424333315C494E434C554445325C50524956+
	?debug	C 4154452E48
	?debug	C E9E258824F1A433A5C424333315C494E434C554445325C4D594652+
	?debug	C 414D452E48
	?debug	C E94019CA1818433A5C424333315C494E434C5544455C5354444C49+
	?debug	C 422E48
	?debug	C E94019CA1817433A5C424333315C494E434C5544455C535444494F+
	?debug	C 2E48
	?debug	C E94019CA1816433A5C424333315C494E434C5544455C42494F532E+
	?debug	C 48
	?debug	C E94019CA1814433A5C424333315C494E434C5544455C494F2E48
	?debug	C E94019CA1817433A5C424333315C494E434C5544455C434F4E494F+
	?debug	C 2E48
	?debug	C E94019CA181A433A5C424333315C494E434C5544455C4752415048+
	?debug	C 4943532E48
	?debug	C E94019CA1817433A5C424333315C494E434C5544455C414C4C4F43+
	?debug	C 2E48
	?debug	C E94019CA1815433A5C424333315C494E434C5544455C4449522E48
	?debug	C E94019CA1818433A5C424333315C494E434C5544455C535452494E+
	?debug	C 472E48
	?debug	C E94019CA1815433A5C424333315C494E434C5544455C444F532E48
	?debug	C E94019CA1816433A5C424333315C494E434C5544455C54494D452E+
	?debug	C 48
	?debug	C E94019CA1816433A5C424333315C494E434C5544455C4D4154482E+
	?debug	C 48
	?debug	C E94019CA1818433A5C424333315C494E434C5544455C4D414C4C4F+
	?debug	C 432E48
	?debug	C E94019CA1817433A5C424333315C494E434C5544455C414C4C4F43+
	?debug	C 2E48
	?debug	C E9235C334719433A5C424333315C494E434C554445325C53594D42+
	?debug	C 4F4C2E48
	?debug	C E97762234018433A5C424333315C494E434C554445325C4D4F5553+
	?debug	C 452E48
	?debug	C E996A48B4219433A5C424333315C494E434C554445325C4D454D4F+
	?debug	C 52592E48
	?debug	C E93851453A17433A5C424333315C494E434C554445325C464F4E54+
	?debug	C 2E48
	?debug	C E9654661411B433A5C424333315C494E434C554445325C48474C47+
	?debug	C 505249542E48
	?debug	C E996A48B4219433A5C424333315C494E434C554445325C4D454D4F+
	?debug	C 52592E48
	?debug	C E9BC5039391B433A5C424333315C494E434C554445325C52454749+
	?debug	C 535445522E48
	?debug	C E9235C334719433A5C424333315C494E434C554445325C53594D42+
	?debug	C 4F4C2E48
	?debug	C E9D353E23A1A433A5C424333315C494E434C554445325C4C495354+
	?debug	C 494E472E48
	?debug	C E9D353E23A1A433A5C424333315C494E434C554445325C4C495354+
	?debug	C 494E472E48
	?debug	C E9D4A5D9401B433A5C424333315C494E434C554445325C53564741+
	?debug	C 5F4445562E48
	?debug	C E98950FD3E17433A5C424333315C494E434C554445325C56424533+
	?debug	C 2E48
	?debug	C E9235C334719433A5C424333315C494E434C554445325C53594D42+
	?debug	C 4F4C2E48
	?debug	C E9DA89FB4619433A5C424333315C494E434C554445325C4B45524E+
	?debug	C 454C2E48
	?debug	C E94019CA1816433A5C424333315C494E434C5544455C54494D452E+
	?debug	C 48
	?debug	C E9C76B384F18433A5C424333315C494E434C554445325C47524150+
	?debug	C 482E48
	?debug	C E9F8B829451A433A5C424333315C494E434C554445325C534F434B+
	?debug	C 4554332E48
	?debug	C E9235C334719433A5C424333315C494E434C554445325C53594D42+
	?debug	C 4F4C2E48
	?debug	C E996A48B4219433A5C424333315C494E434C554445325C4D454D4F+
	?debug	C 52592E48
	?debug	C E9A454E23A1A433A5C424333315C494E434C554445325C534F434B+
	?debug	C 4554352E48
	?debug	C E92DAB29451A433A5C424333315C494E434C554445325C534F434B+
	?debug	C 4554342E48
	?debug	C E9F8B829451A433A5C424333315C494E434C554445325C534F434B+
	?debug	C 4554332E48
	?debug	C E92258714F1A433A5C424333315C494E434C554445325C4E45574D+
	?debug	C 4154482E48
	?debug	C E9A8548B4319433A5C424333315C494E434C554445325C53504C49+
	?debug	C 4E452E48
	?debug	C E91D51E23A19433A5C424333315C494E434C554445325C57495A41+
	?debug	C 52442E48
PLANE_TEXT	segment byte public use16 'CODE'
PLANE_TEXT	ends
DGROUP	group	_DATA,_BSS
	assume	cs:PLANE_TEXT,ds:DGROUP
_DATA	segment word public use16 'DATA'
d@	label	byte
d@w	label	word
_DATA	ends
_BSS	segment word public use16 'BSS'
b@	label	byte
b@w	label	word
_BSS	ends
PLANE_TEXT	segment byte public use16 'CODE'
	assume	cs:PLANE_TEXT
@CDialCtrl@$bctr$qn7CObject	proc	far
	push	bp
	mov	bp,sp
	cmp	dword ptr [bp+6],large 0
	jne	short @1@86
	push	98
	call	far ptr @$bnew$qui
	pop	cx
	mov	word ptr [bp+8],dx
	mov	word ptr [bp+6],ax
	or	ax,dx
	je	short @1@114
@1@86:
	push	dword ptr [bp+10]
	push	dword ptr [bp+6]
	call	far ptr @CObject@$bctr$qn7CObject
	add	sp,8
	les	bx,dword ptr [bp+6]
	mov	word ptr es:[bx],offset @@CDialCtrl@
	mov	word ptr es:[bx+94],12
	mov	word ptr es:[bx+96],0
	mov	word ptr es:[bx+22],15
	mov	word ptr es:[bx+20],0
	mov	word ptr es:[bx+92],3
@1@114:
	mov	dx,word ptr [bp+8]
	mov	ax,word ptr [bp+6]
	pop	bp
	ret	
@CDialCtrl@$bctr$qn7CObject	endp
	assume	cs:PLANE_TEXT
@CDialCtrl@DrawArmature$qiii	proc	far
	enter	22,0
	push	si
	push	di
	push	ss
	lea	ax,word ptr [bp-12]
	push	ax
	push	dword ptr [bp+6]
	call	far ptr @@CObject@GetScreenRect$qn7tagRECT
	add	sp,8
	mov	ax,word ptr [bp-12]
	add	ax,word ptr [bp-8]
	cwd	
	sub	ax,dx
	mov	di,ax
	sar	di,1
	mov	ax,word ptr [bp-10]
	add	ax,word ptr [bp-6]
	cwd	
	sub	ax,dx
	sar	ax,1
	mov	word ptr [bp-14],ax
	mov	ax,word ptr [bp-6]
	sub	ax,word ptr [bp-10]
	inc	ax
	cwd	
	sub	ax,dx
	mov	si,ax
	sar	si,1
	cmp	word ptr [bp+14],0
	jne short	@@57
	jmp	@2@226
@@57:
	les	bx,dword ptr [bp+6]
	push	word ptr es:[bx+92]
	call	far ptr @SetColor$qi
	pop	cx
	les	bx,dword ptr [bp+6]
	push	word ptr es:[bx+22]
	push	1
	call	far ptr @SetFillStyle$qii
	add	sp,4
	push	si
	push	si
	push	word ptr [bp-14]
	push	di
	call	far ptr @FillEllipse$qiiii
	add	sp,8
	mov	ax,si
	dec	ax
	push	ax
	mov	ax,si
	dec	ax
	push	ax
	push	word ptr [bp-14]
	push	di
	call	far ptr @FillEllipse$qiiii
	add	sp,8
	mov	ax,si
	add	ax,-2
	push	ax
	mov	ax,si
	add	ax,-2
	push	ax
	push	word ptr [bp-14]
	push	di
	call	far ptr @FillEllipse$qiiii
	add	sp,8
	les	bx,dword ptr [bp+6]
	push	word ptr es:[bx+20]
	call	far ptr @SetColor$qi
	pop	cx
	mov	word ptr [bp-18],0
	jmp	@2@198
@2@114:
	mov	ax,word ptr [bp-18]
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fmul	qword ptr DGROUP:s@+1
	les	bx,dword ptr [bp+6]
	mov	ax,word ptr es:[bx+94]
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fdiv	
	sub	sp,8
	fstp	qword ptr [bp-34]
	fwait	
	call	far ptr _cos
	add	sp,8
	mov	ax,si
	add	ax,-2
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fmul	
	call	far ptr F_FTOL@
	mov	dx,di
	add	dx,ax
	mov	word ptr [bp-2],dx
	mov	ax,word ptr [bp-18]
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fmul	qword ptr DGROUP:s@+1
	les	bx,dword ptr [bp+6]
	mov	ax,word ptr es:[bx+94]
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fdiv	
	sub	sp,8
	fstp	qword ptr [bp-34]
	fwait	
	call	far ptr _sin
	add	sp,8
	mov	ax,si
	add	ax,-2
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fmul	
	call	far ptr F_FTOL@
	mov	dx,word ptr [bp-14]
	add	dx,ax
	mov	word ptr [bp-4],dx
	mov	ax,word ptr [bp-18]
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fmul	qword ptr DGROUP:s@+1
	les	bx,dword ptr [bp+6]
	mov	ax,word ptr es:[bx+94]
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fdiv	
	sub	sp,8
	fstp	qword ptr [bp-34]
	fwait	
	call	far ptr _cos
	add	sp,8
	mov	ax,si
	add	ax,-6
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fmul	
	call	far ptr F_FTOL@
	mov	dx,di
	add	dx,ax
	mov	word ptr [bp-20],dx
	mov	ax,word ptr [bp-18]
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fmul	qword ptr DGROUP:s@+1
	les	bx,dword ptr [bp+6]
	mov	ax,word ptr es:[bx+94]
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fdiv	
	sub	sp,8
	fstp	qword ptr [bp-34]
	fwait	
	call	far ptr _sin
	add	sp,8
	mov	ax,si
	add	ax,-6
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fmul	
	call	far ptr F_FTOL@
	mov	dx,word ptr [bp-14]
	add	dx,ax
	mov	word ptr [bp-22],dx
	push	dx
	push	word ptr [bp-20]
	push	word ptr [bp-4]
	push	word ptr [bp-2]
	call	far ptr @Line$qiiii
	add	sp,8
	inc	word ptr [bp-18]
@2@198:
	les	bx,dword ptr [bp+6]
	mov	ax,word ptr es:[bx+94]
	cmp	ax,word ptr [bp-18]
	jle short	@@58
	jmp	@2@114
@@58:
@2@226:
	cmp	word ptr [bp+12],-1
	jne short	@@59
	jmp	@2@282
@@59:
	les	bx,dword ptr [bp+6]
	push	word ptr es:[bx+22]
	call	far ptr @SetColor$qi
	pop	cx
	mov	ax,word ptr [bp+12]
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fmul	qword ptr DGROUP:s@+1
	les	bx,dword ptr [bp+6]
	mov	ax,word ptr es:[bx+94]
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fdiv	
	sub	sp,8
	fstp	qword ptr [bp-34]
	fwait	
	call	far ptr _cos
	add	sp,8
	mov	ax,si
	add	ax,-10
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fmul	
	call	far ptr F_FTOL@
	mov	word ptr [bp-2],ax
	mov	ax,word ptr [bp+12]
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fmul	qword ptr DGROUP:s@+1
	les	bx,dword ptr [bp+6]
	mov	ax,word ptr es:[bx+94]
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fdiv	
	sub	sp,8
	fstp	qword ptr [bp-34]
	fwait	
	call	far ptr _sin
	add	sp,8
	mov	ax,si
	add	ax,-10
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fmul	
	call	far ptr F_FTOL@
	mov	word ptr [bp-4],ax
	mov	ax,word ptr [bp-14]
	add	ax,word ptr [bp-4]
	push	ax
	mov	ax,di
	add	ax,word ptr [bp-2]
	push	ax
	push	word ptr [bp-14]
	push	di
	call	far ptr @Line$qiiii
	add	sp,8
@2@282:
	les	bx,dword ptr [bp+6]
	push	word ptr es:[bx+20]
	call	far ptr @SetColor$qi
	pop	cx
	mov	ax,word ptr [bp+10]
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fmul	qword ptr DGROUP:s@+1
	les	bx,dword ptr [bp+6]
	mov	ax,word ptr es:[bx+94]
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fdiv	
	sub	sp,8
	fstp	qword ptr [bp-34]
	fwait	
	call	far ptr _cos
	add	sp,8
	mov	ax,si
	add	ax,-10
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fmul	
	call	far ptr F_FTOL@
	mov	word ptr [bp-2],ax
	mov	ax,word ptr [bp+10]
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fmul	qword ptr DGROUP:s@+1
	les	bx,dword ptr [bp+6]
	mov	ax,word ptr es:[bx+94]
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fdiv	
	sub	sp,8
	fstp	qword ptr [bp-34]
	fwait	
	call	far ptr _sin
	add	sp,8
	mov	ax,si
	add	ax,-10
	mov	word ptr [bp-16],ax
	fild	word ptr [bp-16]
	fmul	
	call	far ptr F_FTOL@
	mov	word ptr [bp-4],ax
	mov	ax,word ptr [bp-14]
	add	ax,word ptr [bp-4]
	push	ax
	mov	ax,di
	add	ax,word ptr [bp-2]
	push	ax
	push	word ptr [bp-14]
	push	di
	call	far ptr @Line$qiiii
	add	sp,8
	mov	ax,1
	pop	di
	pop	si
	leave	
	ret	
@CDialCtrl@DrawArmature$qiii	endp
	assume	cs:PLANE_TEXT
@CDialCtrl@Show$qv	proc	far
	enter	20,0
	push	ss
	lea	ax,word ptr [bp-10]
	push	ax
	call	far ptr @CObject@StartControlView$qn12viewporttype
	add	sp,4
	mov	word ptr [bp-12],ax
	push	ss
	lea	ax,word ptr [bp-20]
	push	ax
	push	dword ptr [bp+6]
	call	far ptr @@CObject@GetScreenRect$qn7tagRECT
	add	sp,8
	mov	ax,word ptr [bp-20]
	add	ax,word ptr [bp-16]
	cwd	
	sub	ax,dx
	mov	ax,word ptr [bp-18]
	add	ax,word ptr [bp-14]
	cwd	
	sub	ax,dx
	mov	ax,word ptr [bp-14]
	sub	ax,word ptr [bp-18]
	inc	ax
	cwd	
	sub	ax,dx
	push	1
	les	bx,dword ptr [bp+6]
	push	word ptr es:[bx+96]
	push	word ptr es:[bx+96]
	push	word ptr [bp+8]
	push	bx
	push	cs
	call	near ptr @CDialCtrl@DrawArmature$qiii
	add	sp,10
	push	word ptr [bp-12]
	push	ss
	lea	ax,word ptr [bp-10]
	push	ax
	call	far ptr @CObject@EndControlView$qn12viewporttypei
	add	sp,6
	mov	ax,1
	leave	
	ret	
@CDialCtrl@Show$qv	endp
	assume	cs:PLANE_TEXT
@CDialCtrl@ShowNumber$qi	proc	far
	enter	20,0
	push	si
	mov	si,word ptr [bp+10]
	push	ss
	lea	ax,word ptr [bp-10]
	push	ax
	call	far ptr @CObject@StartControlView$qn12viewporttype
	add	sp,4
	mov	word ptr [bp-12],ax
	push	ss
	lea	ax,word ptr [bp-20]
	push	ax
	push	dword ptr [bp+6]
	call	far ptr @@CObject@GetScreenRect$qn7tagRECT
	add	sp,8
	mov	ax,word ptr [bp-20]
	add	ax,word ptr [bp-16]
	cwd	
	sub	ax,dx
	mov	ax,word ptr [bp-18]
	add	ax,word ptr [bp-14]
	cwd	
	sub	ax,dx
	mov	ax,word ptr [bp-14]
	sub	ax,word ptr [bp-18]
	inc	ax
	cwd	
	sub	ax,dx
	push	0
	les	bx,dword ptr [bp+6]
	push	word ptr es:[bx+96]
	push	si
	push	word ptr [bp+8]
	push	bx
	push	cs
	call	near ptr @CDialCtrl@DrawArmature$qiii
	add	sp,10
	les	bx,dword ptr [bp+6]
	mov	word ptr es:[bx+96],si
	push	word ptr [bp-12]
	push	ss
	lea	ax,word ptr [bp-10]
	push	ax
	call	far ptr @CObject@EndControlView$qn12viewporttypei
	add	sp,6
	mov	ax,1
	pop	si
	leave	
	ret	
@CDialCtrl@ShowNumber$qi	endp
	assume	cs:PLANE_TEXT
@ClickDial_DialDemoDialog$qn7CObject	proc	far
	push	bp
	mov	bp,sp
	push	dword ptr [bp+6]
	call	far ptr @@CObject@GetParent$qv
	add	sp,4
	push	large 1
	push	ds
	push	offset DGROUP:s@+14
	push	ds
	push	offset DGROUP:s@+9
	call	far ptr @AfxMessageBox$qnzct1ul
	add	sp,12
	pop	bp
	ret	
@ClickDial_DialDemoDialog$qn7CObject	endp
	assume	cs:PLANE_TEXT
@OnTime_DialDemoDialog$qn7CObject	proc	far
	enter	12,0
	push	si
	mov	eax,dword ptr [bp+6]
	mov	dword ptr [bp-4],eax
	push	2001
	push	dword ptr [bp-4]
	call	far ptr @CObject@ObjectFromID$qui
	add	sp,6
	mov	word ptr [bp-6],dx
	mov	word ptr [bp-8],ax
	push	2002
	push	dword ptr [bp-4]
	call	far ptr @CObject@ObjectFromID$qui
	add	sp,6
	mov	word ptr [bp-10],dx
	mov	word ptr [bp-12],ax
	push	dword ptr [bp-8]
	call	far ptr @@CDialCtrl@GetTotalDial$qv
	add	sp,4
	mov	si,ax
	push	dword ptr [bp-8]
	call	far ptr @@CDialCtrl@GetDial$qv
	add	sp,4
	mov	dx,ax
	inc	ax
	cwd	
	idiv	si
	mov	ax,dx
	push	dx
	push	dword ptr [bp-8]
	push	cs
	call	near ptr @CDialCtrl@ShowNumber$qi
	add	sp,6
	push	dword ptr [bp-12]
	call	far ptr @@CDialCtrl@GetTotalDial$qv
	add	sp,4
	mov	si,ax
	push	dword ptr [bp-12]
	call	far ptr @@CDialCtrl@GetDial$qv
	add	sp,4
	mov	dx,ax
	inc	ax
	cwd	
	idiv	si
	mov	ax,dx
	push	dx
	push	dword ptr [bp-12]
	push	cs
	call	near ptr @CDialCtrl@ShowNumber$qi
	add	sp,6
	pop	si
	leave	
	ret	
@OnTime_DialDemoDialog$qn7CObject	endp
	assume	cs:PLANE_TEXT
@OnDraw_DialDemoDialog$qn7CObject	proc	far
	push	bp
	mov	bp,sp
	push	0
	push	ds
	push	offset DGROUP:s@+30
	push	large 1
	push	large 0000F000Eh
	push	large 0000A000Ah
	call	far ptr @ChPrintf$qiiiiiinxzci
	add	sp,18
	push	0
	push	ds
	push	offset DGROUP:s@+55
	push	large 1
	push	large 0000F000Eh
	push	large 0001A000Ah
	call	far ptr @ChPrintf$qiiiiiinxzci
	add	sp,18
	push	0
	push	ds
	push	offset DGROUP:s@+94
	push	large 1
	push	large 0000F000Eh
	push	large 0002A000Ah
	call	far ptr @ChPrintf$qiiiiiinxzci
	add	sp,18
	push	0
	push	ds
	push	offset DGROUP:s@+133
	push	large 1
	push	large 0000F000Eh
	push	large 0003A000Ah
	call	far ptr @ChPrintf$qiiiiiinxzci
	add	sp,18
	pop	bp
	ret	
@OnDraw_DialDemoDialog$qn7CObject	endp
	assume	cs:PLANE_TEXT
@DialDemoDialog$qv	proc	far
	enter	12,0
	push	large 0
	call	far ptr @CDialog@$bctr$qv
	add	sp,4
	mov	word ptr [bp-2],dx
	mov	word ptr [bp-4],ax
	push	ds
	push	offset DGROUP:s@+167
	push	large 0017C0140h
	push	large 0
	push	dx
	push	ax
	call	far ptr @CWindow@CreateWindow$qiiiinxzc
	add	sp,16
	push	dword ptr [bp-4]
	call	far ptr @CWindow@Center$qv
	add	sp,4
	push	seg @OnTime_DialDemoDialog$qn7CObject
	push	offset @OnTime_DialDemoDialog$qn7CObject
	push	dword ptr [bp-4]
	call	far ptr @@CWindow@SetTimeFc$qnqn7CObject$v
	add	sp,8
	push	seg @OnDraw_DialDemoDialog$qn7CObject
	push	offset @OnDraw_DialDemoDialog$qn7CObject
	push	dword ptr [bp-4]
	call	far ptr @@CWindow@SetDrawFc$qnqn7CObject$v
	add	sp,8
	push	dword ptr [bp-4]
	push	large 0
	call	far ptr @CCloseButton@$bctr$qn7CObject
	add	sp,8
	push	dword ptr [bp-4]
	push	large 0
	push	cs
	call	near ptr @CDialCtrl@$bctr$qn7CObject
	add	sp,8
	mov	word ptr [bp-6],dx
	mov	word ptr [bp-8],ax
	push	large 0
	push	large 000640064h
	push	large 0009600AAh
	push	dx
	push	ax
	call	far ptr @CObject@CreateObject$qiiiinxzc
	add	sp,16
	push	dword ptr [bp-4]
	push	large 0
	push	cs
	call	near ptr @CDialCtrl@$bctr$qn7CObject
	add	sp,8
	mov	word ptr [bp-10],dx
	mov	word ptr [bp-12],ax
	push	large 0
	push	large 000640064h
	push	large 000960032h
	push	dx
	push	ax
	call	far ptr @CObject@CreateObject$qiiiinxzc
	add	sp,16
	push	1
	push	dword ptr [bp-8]
	call	far ptr @@CObject@SetShape$qi
	add	sp,6
	push	2001
	push	dword ptr [bp-8]
	call	far ptr @@CObject@SetID$qui
	add	sp,6
	push	seg @ClickDial_DialDemoDialog$qn7CObject
	push	offset @ClickDial_DialDemoDialog$qn7CObject
	push	dword ptr [bp-8]
	call	far ptr @CObject@SetFc$qnqn7CObject$v
	add	sp,8
	push	14
	push	dword ptr [bp-12]
	call	far ptr @@CObject@SetBackColor$qi
	add	sp,6
	push	0
	push	dword ptr [bp-12]
	call	far ptr @@CDialCtrl@SetBoxColor$qi
	add	sp,6
	push	48
	push	dword ptr [bp-12]
	call	far ptr @@CDialCtrl@SetTotalDial$qi
	add	sp,6
	push	1
	push	dword ptr [bp-12]
	call	far ptr @@CObject@SetShape$qi
	add	sp,6
	push	2002
	push	dword ptr [bp-12]
	call	far ptr @@CObject@SetID$qui
	add	sp,6
	push	seg @ClickDial_DialDemoDialog$qn7CObject
	push	offset @ClickDial_DialDemoDialog$qn7CObject
	push	dword ptr [bp-12]
	call	far ptr @CObject@SetFc$qnqn7CObject$v
	add	sp,8
	push	large 001180032h
	push	dword ptr [bp-4]
	call	far ptr @MyCustom$qn7CObjectii
	add	sp,8
	push	large 0011800AAh
	push	dword ptr [bp-4]
	call	far ptr @MyCustom$qn7CObjectii
	add	sp,8
	push	large 1
	push	dword ptr [bp-4]
	call	far ptr @CWindow@ShowWindow$qul
	add	sp,8
	push	dword ptr [bp-4]
	call	far ptr @CDialog@DoModal$qv
	add	sp,4
	cmp	dword ptr [bp-4],large 0
	je	short @8@86
	push	3
	push	dword ptr [bp-4]
	les	bx,dword ptr [bp-4]
	mov	bx,word ptr es:[bx]
	call	dword ptr [bx+44]
	add	sp,6
	jmp	short @8@86
@8@86:
	leave	
	ret	
@DialDemoDialog$qv	endp
PLANE_TEXT	ends
PLANE_TEXT	segment byte public use16 'CODE'
@CObject@GetScreenRect$qn7tagRECT	segment	virtual
	assume	cs:@CObject@GetScreenRect$qn7tagRECT
@@CObject@GetScreenRect$qn7tagRECT	proc	far
	push	bp
	mov	bp,sp
	push	dword ptr [bp+10]
	mov	ax,word ptr [bp+6]
	add	ax,10
	push	word ptr [bp+8]
	push	ax
	mov	cx,8
	call	far ptr F_SCOPY@
	pop	bp
	ret	
@@CObject@GetScreenRect$qn7tagRECT	endp
@CObject@GetScreenRect$qn7tagRECT	ends
PLANE_TEXT	ends
PLANE_TEXT	segment byte public use16 'CODE'
@CObject@GetParent$qv	segment	virtual
	assume	cs:@CObject@GetParent$qv
@@CObject@GetParent$qv	proc	far
	push	bp
	mov	bp,sp
	les	bx,dword ptr [bp+6]
	mov	dx,word ptr es:[bx+52]
	mov	ax,word ptr es:[bx+50]
	pop	bp
	ret	
@@CObject@GetParent$qv	endp
@CObject@GetParent$qv	ends
PLANE_TEXT	ends
PLANE_TEXT	segment byte public use16 'CODE'
@CDialCtrl@GetTotalDial$qv	segment	virtual
	assume	cs:@CDialCtrl@GetTotalDial$qv
@@CDialCtrl@GetTotalDial$qv	proc	far
	push	bp
	mov	bp,sp
	les	bx,dword ptr [bp+6]
	mov	ax,word ptr es:[bx+94]
	pop	bp
	ret	
@@CDialCtrl@GetTotalDial$qv	endp
@CDialCtrl@GetTotalDial$qv	ends
PLANE_TEXT	ends
PLANE_TEXT	segment byte public use16 'CODE'
@CDialCtrl@GetDial$qv	segment	virtual
	assume	cs:@CDialCtrl@GetDial$qv
@@CDialCtrl@GetDial$qv	proc	far
	push	bp
	mov	bp,sp
	les	bx,dword ptr [bp+6]
	mov	ax,word ptr es:[bx+96]
	pop	bp
	ret	
@@CDialCtrl@GetDial$qv	endp
@CDialCtrl@GetDial$qv	ends
PLANE_TEXT	ends
PLANE_TEXT	segment byte public use16 'CODE'
@CWindow@SetTimeFc$qnqn7CObject$v	segment	virtual
	assume	cs:@CWindow@SetTimeFc$qnqn7CObject$v
@@CWindow@SetTimeFc$qnqn7CObject$v	proc	far
	push	bp
	mov	bp,sp
	les	bx,dword ptr [bp+6]
	mov	eax,dword ptr [bp+10]
	mov	dword ptr es:[bx+288],eax
	pop	bp
	ret	
@@CWindow@SetTimeFc$qnqn7CObject$v	endp
@CWindow@SetTimeFc$qnqn7CObject$v	ends
PLANE_TEXT	ends
PLANE_TEXT	segment byte public use16 'CODE'
@CWindow@SetDrawFc$qnqn7CObject$v	segment	virtual
	assume	cs:@CWindow@SetDrawFc$qnqn7CObject$v
@@CWindow@SetDrawFc$qnqn7CObject$v	proc	far
	push	bp
	mov	bp,sp
	les	bx,dword ptr [bp+6]
	mov	eax,dword ptr [bp+10]
	mov	dword ptr es:[bx+276],eax
	pop	bp
	ret	
@@CWindow@SetDrawFc$qnqn7CObject$v	endp
@CWindow@SetDrawFc$qnqn7CObject$v	ends
PLANE_TEXT	ends
PLANE_TEXT	segment byte public use16 'CODE'
@CObject@SetShape$qi	segment	virtual
	assume	cs:@CObject@SetShape$qi
@@CObject@SetShape$qi	proc	far
	push	bp
	mov	bp,sp
	les	bx,dword ptr [bp+6]
	mov	ax,word ptr [bp+10]
	mov	word ptr es:[bx+18],ax
	pop	bp
	ret	
@@CObject@SetShape$qi	endp
@CObject@SetShape$qi	ends
PLANE_TEXT	ends
PLANE_TEXT	segment byte public use16 'CODE'
@CObject@SetID$qui	segment	virtual
	assume	cs:@CObject@SetID$qui
@@CObject@SetID$qui	proc	far
	push	bp
	mov	bp,sp
	les	bx,dword ptr [bp+6]
	mov	ax,word ptr [bp+10]
	mov	word ptr es:[bx+38],ax
	pop	bp
	ret	
@@CObject@SetID$qui	endp
@CObject@SetID$qui	ends
PLANE_TEXT	ends
PLANE_TEXT	segment byte public use16 'CODE'
@CObject@SetBackColor$qi	segment	virtual
	assume	cs:@CObject@SetBackColor$qi
@@CObject@SetBackColor$qi	proc	far
	push	bp
	mov	bp,sp
	les	bx,dword ptr [bp+6]
	mov	ax,word ptr [bp+10]
	mov	word ptr es:[bx+22],ax
	pop	bp
	ret	
@@CObject@SetBackColor$qi	endp
@CObject@SetBackColor$qi	ends
PLANE_TEXT	ends
PLANE_TEXT	segment byte public use16 'CODE'
@CDialCtrl@SetBoxColor$qi	segment	virtual
	assume	cs:@CDialCtrl@SetBoxColor$qi
@@CDialCtrl@SetBoxColor$qi	proc	far
	push	bp
	mov	bp,sp
	les	bx,dword ptr [bp+6]
	mov	ax,word ptr [bp+10]
	mov	word ptr es:[bx+92],ax
	pop	bp
	ret	
@@CDialCtrl@SetBoxColor$qi	endp
@CDialCtrl@SetBoxColor$qi	ends
PLANE_TEXT	ends
PLANE_TEXT	segment byte public use16 'CODE'
@CDialCtrl@SetTotalDial$qi	segment	virtual
	assume	cs:@CDialCtrl@SetTotalDial$qi
@@CDialCtrl@SetTotalDial$qi	proc	far
	push	bp
	mov	bp,sp
	les	bx,dword ptr [bp+6]
	mov	ax,word ptr [bp+10]
	mov	word ptr es:[bx+94],ax
	pop	bp
	ret	
@@CDialCtrl@SetTotalDial$qi	endp
@CDialCtrl@SetTotalDial$qi	ends
PLANE_TEXT	ends
_DATA	segment word public use16 'DATA'
@CDialCtrl@	segment	virtual
@@CDialCtrl@	label	byte
	dd	@CObject@ModifyCoordinate$qv
	dd	@CObject@AddCoordinate$qii
	dd	@CObject@SetCaption$qnxzc
	dd	@@CObject@KillFocus$qv
	dd	@@CObject@SetFocus$qv
	dd	@CObject@OnDraw$qv
	dd	@CObject@Paint$qv
	dd	@CObject@ShowFrame$qv
	dd	@CDialCtrl@Show$qv
	dd	@CObject@AntiShow$qv
	dd	@CObject@Swapping$qv
	dd	@@CDialCtrl@$bdtr$qv
@CDialCtrl@	ends
_DATA	ends
PLANE_TEXT	segment byte public use16 'CODE'
@CObject@KillFocus$qv	segment	virtual
	assume	cs:@CObject@KillFocus$qv
@@CObject@KillFocus$qv	proc	far
	push	bp
	mov	bp,sp
	pop	bp
	ret	
@@CObject@KillFocus$qv	endp
@CObject@KillFocus$qv	ends
PLANE_TEXT	ends
PLANE_TEXT	segment byte public use16 'CODE'
@CObject@SetFocus$qv	segment	virtual
	assume	cs:@CObject@SetFocus$qv
@@CObject@SetFocus$qv	proc	far
	push	bp
	mov	bp,sp
	pop	bp
	ret	
@@CObject@SetFocus$qv	endp
@CObject@SetFocus$qv	ends
PLANE_TEXT	ends
PLANE_TEXT	segment byte public use16 'CODE'
@CDialCtrl@$bdtr$qv	segment	virtual
	assume	cs:@CDialCtrl@$bdtr$qv
@@CDialCtrl@$bdtr$qv	proc	far
	push	bp
	mov	bp,sp
	push	si
	mov	si,word ptr [bp+10]
	cmp	dword ptr [bp+6],large 0
	je	short @22@114
	push	0
	push	dword ptr [bp+6]
	call	far ptr @CObject@$bdtr$qv
	add	sp,6
	test	si,1
	je	short @22@114
	push	dword ptr [bp+6]
	call	far ptr @$bdele$qnv
	add	sp,4
	jmp	short @22@114
@22@114:
	pop	si
	pop	bp
	ret	
@@CDialCtrl@$bdtr$qv	endp
	?debug	C E9
	?debug	C FA10010000
@CDialCtrl@$bdtr$qv	ends
PLANE_TEXT	ends
_DATA	segment word public use16 'DATA'
s@	label	byte
	db	0
	db	234
	db	'.DT'
	db	251
	db	'!'
	db	25
	db	'@'
	db	177
	db	237
	db	197
	db	204
	db	0
	db	196
	db	227
	db	181
	db	165
	db	187
	db	247
	db	193
	db	203
	db	177
	db	237
	db	197
	db	204
	db	'!!!'
	db	0
	db	196
	db	227
	db	186
	db	195
	db	163
	db	172
	db	213
	db	226
	db	202
	db	199
	db	210
	db	187
	db	184
	db	246
	db	177
	db	237
	db	197
	db	204
	db	209
	db	221
	db	202
	db	190
	db	163
	db	161
	db	0
	db	184
	db	195
	db	195
	db	254
	db	191
	db	233
	db	209
	db	221
	db	202
	db	190
	db	193
	db	203
	db	200
	db	231
	db	186
	db	206
	db	202
	db	185
	db	211
	db	195
	db	180
	db	176
	db	191
	db	218
	db	'Draw'
	db	187
	db	216
	db	181
	db	247
	db	186
	db	175
	db	202
	db	253
	db	163
	db	161
	db	0
	db	184
	db	195
	db	195
	db	254
	db	191
	db	233
	db	209
	db	221
	db	202
	db	190
	db	193
	db	203
	db	200
	db	231
	db	186
	db	206
	db	202
	db	185
	db	211
	db	195
	db	180
	db	176
	db	191
	db	218
	db	'Time'
	db	187
	db	216
	db	181
	db	247
	db	186
	db	175
	db	202
	db	253
	db	163
	db	161
	db	0
	db	184
	db	195
	db	195
	db	254
	db	191
	db	233
	db	209
	db	221
	db	202
	db	190
	db	193
	db	203
	db	200
	db	231
	db	186
	db	206
	db	182
	db	168
	db	214
	db	198
	db	'ActiveX'
	db	191
	db	216
	db	188
	db	254
	db	163
	db	161
	db	0
	db	177
	db	237
	db	197
	db	204
	db	209
	db	221
	db	202
	db	190
	db	0
_DATA	ends
PLANE_TEXT	segment byte public use16 'CODE'
PLANE_TEXT	ends
	extrn	F_SCOPY@:far
	public	@DialDemoDialog$qv
	public	@OnDraw_DialDemoDialog$qn7CObject
	public	@OnTime_DialDemoDialog$qn7CObject
	public	@ClickDial_DialDemoDialog$qn7CObject
	extrn	F_FTOL@:far
	public	@CDialCtrl@$bctr$qn7CObject
	public	@CDialCtrl@ShowNumber$qi
	public	@CDialCtrl@Show$qv
	public	@CDialCtrl@DrawArmature$qiii
	extrn	@MyCustom$qn7CObjectii:far
	extrn	@AfxMessageBox$qnzct1ul:far
	extrn	@CCloseButton@$bctr$qn7CObject:far
	extrn	@CDialog@$bctr$qv:far
	extrn	@CDialog@DoModal$qv:far
	extrn	@CWindow@ShowWindow$qul:far
	extrn	@CWindow@Center$qv:far
	extrn	@CWindow@CreateWindow$qiiiinxzc:far
	extrn	@CObject@$bdtr$qv:far
	extrn	@CObject@$bctr$qn7CObject:far
	extrn	@CObject@Swapping$qv:far
	extrn	@CObject@AntiShow$qv:far
	extrn	@CObject@ShowFrame$qv:far
	extrn	@CObject@Paint$qv:far
	extrn	@CObject@OnDraw$qv:far
	extrn	@CObject@SetCaption$qnxzc:far
	extrn	@CObject@AddCoordinate$qii:far
	extrn	@CObject@ModifyCoordinate$qv:far
	extrn	@CObject@CreateObject$qiiiinxzc:far
	extrn	@CObject@ObjectFromID$qui:far
	extrn	@CObject@SetFc$qnqn7CObject$v:far
	extrn	@CObject@EndControlView$qn12viewporttypei:far
	extrn	@CObject@StartControlView$qn12viewporttype:far
	extrn	@SetFillStyle$qii:far
	extrn	@SetColor$qi:far
	extrn	@Line$qiiii:far
	extrn	@FillEllipse$qiiii:far
	extrn	@ChPrintf$qiiiiiinxzci:far
	extrn	_sin:far
	extrn	_cos:far
_pokeb	equ	pokeb
_poke	equ	poke
_peekb	equ	peekb
_peek	equ	peek
_atoi	equ	atoi
_abs	equ	abs
	extrn	@$bdele$qnv:far
	extrn	@$bnew$qui:far
_s@	equ	s@
	end
