/3.0
(Extension.1
	Name:	"Kriging Interpolation"
	Dependencies:	"$AVBIN/avdlog.dll\n$AVEXT/spatial.avx\n"
	FirstRootClassName:	"List"
	Roots:	2
	Roots:	3
	Roots:	4
	Roots:	12
	Roots:	13
	Roots:	57
	Roots:	58
	Roots:	59
	Roots:	60
	Roots:	61
	Roots:	62
	Roots:	63
	Roots:	64
	Version:	30
	About:	"Generate contour/surface with Kriging Method."
	CanUnloadScript:	64
	UnloadScript:	63
	InstallScript:	65
	UninstallScript:	66
	ExtVersion:	1
)

(List.2
)

(List.3
)

(List.4
	Child:	5
)

(List.5
	Child:	6
	Child:	10
	Child:	11
)

(List.6
	Child:	7
	Child:	8
	Child:	9
)

(AVStr.7
	S:	"View"
)

(AVStr.8
	S:	"Analysis"
)

(AVStr.9
	S:	"KGDialog"
)

(Choice.10
	Help:	"Creates contour or surface from a point theme by Kriging"
	Update:	"KGMenuUpdate"
	Label:	"&Kriging Interpolation"
	Click:	"KGDialog"
	Shortcut:	"Keys.None"
)

(Numb.11
	N:	9.00000000000000
)

(List.12
)

(AVDLog.13
	Name:	"KGDialogmenu"
	X:	24
	Y:	44
	W:	460
	H:	316
	ConstrainedControlNames:	14
	ConstrainedControlNames:	15
	Constraints:	16
	Constraints:	17
	Server:	18
	ControlPanel:	19
	Title:	"Kriging Interpolating"
	EscapeEnabled:	1
	Resizable:	1
	AlwaysOnTop:	1
	HasTitleBar:	1
	Closeable:	1
	DefaultButton:	56
)

(AVStr.14
	S:	"Comd_OK"
)

(AVStr.15
	S:	"Comd_Cancel"
)

(Numb.16
	N:	85.00000000000000
)

(Numb.17
	N:	85.00000000000000
)

(Nil.18
)

(CPanel.19
	Child:	20
	Child:	31
	Child:	32
	Child:	33
	Child:	34
	Child:	35
	Child:	36
	Child:	37
	Child:	38
	Child:	39
	Child:	44
	ResBox:	45
	ResBox:	46
	ResBox:	47
	ResBox:	48
	ResBox:	49
	ResBox:	50
	ResBox:	51
	ResBox:	52
	ResBox:	53
	ResBox:	54
	ResBox:	55
	Listening:	1
)

(CPanel.20
	InternalName:	"aControlPanel27"
	Child:	21
	Child:	22
	Child:	23
	Child:	26
	Constraints:	0x55
	ResBox:	27
	ResBox:	28
	ResBox:	29
	ResBox:	30
	Label:	"Data search option"
	VisibleBorder:	1
	Listening:	1
)

(RButn.21
	InternalName:	"RB_1"
	Constraints:	0x55
	Listening:	1
	Label:	"Fixed"
	Click:	"KGOptionBox"
)

(RButn.22
	InternalName:	"RB_2"
	Constraints:	0x55
	Listening:	1
	Label:	"Variable"
	Click:	"KGOptionBox"
)

(TextLine.23
	InternalName:	"Text_1"
	Label:	"aTextLine18:"
	Constraints:	0x55
	Listening:	1
	TextType:	24
	NextControl:	25
)

(AVEnum.24
	Name:	"TEXTLINE_TYPE_ALL"
)

(Nil.25
)

(TextLine.26
	InternalName:	"Text_2"
	Label:	"aTextLine19:"
	Constraints:	0x55
	Listening:	1
	TextType:	24
	NextControl:	25
)

(RectD.27
	Left:	19.00000000000000
	Top:	45.00000000000000
	Right:	78.00000000000000
	Bottom:	29.00000000000000
)

(RectD.28
	Left:	20.00000000000000
	Top:	77.00000000000000
	Right:	85.00000000000000
	Bottom:	57.00000000000000
)

(RectD.29
	Left:	118.00000000000000
	Top:	47.00000000000000
	Right:	402.00000000000000
	Bottom:	27.00000000000000
)

(RectD.30
	Left:	118.00000000000000
	Top:	77.00000000000000
	Right:	403.00000000000000
	Bottom:	57.00000000000000
)

(LButn.31
	InternalName:	"Comd_OK"
	Label:	"OK"
	Click:	"KGOKcomd"
)

(AVCBBox.32
	InternalName:	"Combo_2"
	NextControl:	25
	ContentKind:	4
	Constraints:	0x55
	Listening:	1
	Label:	" "
)

(AVCBox.33
	InternalName:	"Check_1"
	Listening:	1
	Label:	"Use a barrier theme in the interpolation"
	Click:	"KGCheckBox1"
	Constraints:	0x55
)

(AVCBBox.34
	InternalName:	"Combo_3"
	NextControl:	25
	ContentKind:	4
	Constraints:	0x55
	Listening:	1
)

(AVCBBox.35
	InternalName:	"Combo_1"
	NextControl:	25
	ContentKind:	4
	Constraints:	0x55
	Listening:	1
)

(TextLabel.36
	InternalName:	"aTextLabel24"
	Constraints:	0x55
	Label:	"Select a field to interpolate"
	Listening:	1
)

(TextLabel.37
	InternalName:	"aTextLabel25"
	Constraints:	0x55
	Label:	"Select a Kringing method"
	Listening:	1
)

(LButn.38
	InternalName:	"Comd_Cancel"
	Label:	"Cancel"
	Click:	"KGCancelcomd"
)

(CPanel.39
	InternalName:	"aControlPanel2"
	Child:	40
	Child:	41
	Constraints:	0x55
	ResBox:	42
	ResBox:	43
	Label:	"Output Format"
	VisibleBorder:	1
	Listening:	1
)

(RButn.40
	InternalName:	"RB_3"
	Constraints:	0x55
	Listening:	1
	Label:	"Contour"
)

(RButn.41
	InternalName:	"RB_4"
	Constraints:	0x55
	Listening:	1
	Label:	"Surface"
)

(RectD.42
	Left:	13.00000000000000
	Top:	39.00000000000000
	Right:	82.00000000000000
	Bottom:	23.00000000000000
)

(RectD.43
	Left:	85.00000000000000
	Top:	41.00000000000000
	Right:	157.00000000000000
	Bottom:	20.00000000000000
)

(AVCBox.44
	InternalName:	"Check_2"
	Listening:	1
	Label:	"Save variogram grid"
	Constraints:	0x55
)

(RectD.45
	Left:	22.00000000000000
	Top:	174.00000000000000
	Right:	437.00000000000000
	Bottom:	83.00000000000000
)

(RectD.46
	Left:	145.00000000000000
	Top:	299.00000000000000
	Right:	194.00000000000000
	Bottom:	275.00000000000000
)

(RectD.47
	Left:	269.00000000000000
	Top:	75.00000000000000
	Right:	437.00000000000000
	Bottom:	53.00000000000000
)

(RectD.48
	Left:	38.00000000000000
	Top:	210.00000000000000
	Right:	250.00000000000000
	Bottom:	181.00000000000000
)

(RectD.49
	Left:	285.00000000000000
	Top:	208.00000000000000
	Right:	415.00000000000000
	Bottom:	183.00000000000000
)

(RectD.50
	Left:	34.00000000000000
	Top:	75.00000000000000
	Right:	202.00000000000000
	Bottom:	53.00000000000000
)

(RectD.51
	Left:	40.00000000000000
	Top:	49.00000000000000
	Right:	180.00000000000000
	Bottom:	32.00000000000000
)

(RectD.52
	Left:	277.00000000000000
	Top:	50.00000000000000
	Right:	442.00000000000000
	Bottom:	31.00000000000000
)

(RectD.53
	Left:	256.00000000000000
	Top:	299.00000000000000
	Right:	305.00000000000000
	Bottom:	275.00000000000000
)

(RectD.54
	Left:	252.00000000000000
	Top:	262.00000000000000
	Right:	414.00000000000000
	Bottom:	211.00000000000000
)

(RectD.55
	Left:	38.00000000000000
	Top:	246.00000000000000
	Right:	190.00000000000000
	Bottom:	227.00000000000000
)

(Nil.56
)

(EnScript.57
	Name:	"KGCancelcomd"
	SourceCode:	"%YCkZht_%5co*Kas\\CkZht_-JI=efdt_lggq'!`Fb]qgl&bnhoj"
)

(EnScript.58
	Name:	"KGCheckBox1"
	SourceCode:	",Kocmefd3Cqk`?tfygtt]Iafdni9%Y{&Ekg`Iafdni!P?Ia`nhcr]sm!+#i]kamg_tfyjnnl%E~;gg\\g65f<hcekl&Kamf;uSYr]'$<dj[pW0$\"%E~Dhum/BYIa`nhc3>nfcDrJfej'$<krZtW2$\"%n^*FuH`j[j3'exKjddemai!%lggg%%ExNboy+3KdvOexagdd\"!Pwmj!	\"%lm]lgEexlBWsj^Rn]|&FgmPm]r]r%RqKklp8&I]ekgaKjteKklp-lm]lgEexl.\"^hx]\"I~Dnks5'Ojl[ark[hj->`nla.%dp]"
)

(EnScript.59
	Name:	"KGDialog"
	SourceCode:	",Kocmefd3Cqk`?tfygtt[y`jNhgpBfn-I^pF[yaug=khy<\"Xpm][ady'CjlF[skoaY`jeduek-l-EhqslB((\"mdjfLu`>tp3Amhh$%Uddcla%kjddemff[skoa%lm]lg'$%JtbcnflCcm]%AsldtikqYyanp.%]wkmjfis?m*L]y /+]Iafdni9%Y{&Ekg`Iafdni!P?Ia`nhcr]sm!+#i]kamg_tfyjnneoRqKklp65f<hcekl&Kamf;uSYr]*?tegg^3%RqKklp75f<hcekl&Kamf;uSYr]*?tegg^4%RqKklp85f<hcekl&Kamf;uSYr]*?tegg^5%RqSgqp65f<hcekl&Kamf;uSYr]*PjpyW0$\"%E~Ldzm.BYIa`nhc3>nfcDrJfej'$Ma}ld*!+RqThskhj65f<hcekl&Kamf;uSYr]'$K>d)'!	\"FuThyanp+9f<nYkq`*Ka
s\\A{G]r]-QDX.'!L{Hlyatf2?Z@nYqgf0?es\\GqMcfa-W:^5%RqBj^_p)BYCkZht_3>hp]>~Ffed*?m]hc^3%RqBj^_p*BYCkZht_3>hp]>~Ffed*?m]hc^4%RqBqf`75f<hcekl&Kamf;uSYr]'$<kr\\d;`p\\aq.&kgeyafdh|_tfyjnneoRqNrmetf7&RgeahlL{Hlyatf20Laq]hl	\"FuThyanp+*X]y;kk\\g-P?NrmetfGgw$\"%E~;gg\\g6&X]su^hj[y]c*?]qkj!	\"FuH`j[j4'Ojlx]kg\\pj\\->`nla.%ExEaahc6&Rgm?qahc'$DCH`j[jDht6.&\"FuH`j[j4'OjlHdhed$'CL;gg\\gGg}*!+RqHglf+*X]y;kk\\g-P?Bcg_jdhglf%RqSgqp6&X]sNZ^jd-Qc]ezk%<hum]s[j't^_ter]mfjnd.(I~Ljps4'OjlQYage$'Jf\\hwlHg
zfs\"!nj[telgg`%)7,\"*1..OrPjpy)-U^pY]}l'$geq.OrPjpy*-U^pY]}l'$*.'!L{Eexl8&RgmRnknZkg$KYqkd+#6&%_dvv2^n]kfbwgrsj^ij%sj^ij<fl`?m*L]y>Sc[%RqKklp6&I]ekgaKjteKklp-lm]lg=]yY3?dv?ejdik(RqQarv**I]q]sgKk|k% 0+7&u^hj[yjtbcnfllgmdt\\L{Eexl7&Cg_es]KjnoEexl-s!Wge{]wk`nHnfjYq$%Xhm]qk\\]q1Bkk_zdfj!.A}htfdpmefd'$!IZqxknYm$%Qas]`t('Msaugkofd%Itc]nfln[!\"%%YCkZht_3Gogg%"
)

(EnScript.60
	Name:	"KGOKcomd"
	SourceCode:	",Kocmefd3Cqk`?tfygtt]Iafdni9%Y{&Ekg`Iafdni!P?Ia`nhcr]sm!+#i]kamg_tfyjnneoRqKklp65f<hcekl&Kamf;uSYr]*?tegg^3%RqKklp75f<hcekl&Kamf;uSYr]*?tegg^4%RqKklp85f<hcekl&Kamf;uSYr]*?tegg^5%RqSgqp65f<hcekl&Kamf;uSYr]*PjpyW0$\"%E~Ldzm.BYIa`nhc3>nfcDrJfej'$Ma}ld*!+RqThskhj65f<hcekl&Kamf;uSYr]'$K>d)'!	\"FuThyanp,9f<nYkq`*Kas\\A{G]r]-QDX/'!L{<dj[p)<c=efdt_-Hbji:~F`o^$';m]bmX-'!L{<dj[p*<c=efdt_-Hbji:~F`o^$';m]bmX.'!L{<kr\\75`Fb]qgl&Ekg`GqSYlg!Hgr\\^EZjh]q(#h`j[j\"bb%_wac\"mdjej$qmdjj|arg%wm
shpmawhtd`vbksx[qkipx,bt^]y]%[npmkzj%Kgciakaq]hhn%^njrvCY`jed\"hn%htamvBYYgeqnjiy<\"Xpm][ady'CjlF[skoaY`jedu'Cjl-((%q[pfasothfj[yanp]Ujo<\"Xpm][ady'CjlUjnl^_yatf	 nfy]qrhhfljag_kw]%[npmkzj%ae\"iknfyEVZ^ak'v'Ex KLGGFA.!%lggg%,ndm]nf%]wv^jyffc\"\\aqd%kh|^n^%fnvojlc^BdlggOejo3?dv>ty]skhqg$FffdxuboJf{aqqgijfy!	\"^tp%5T^_y&RYjg!,E(1)?3\"%h]knLe]%53%ak'*Za3?jlDzmasl-Znz\"A6%@P:H^KNKDPO[[9QMD+kw-Yd0@ay;jdkUbvj h]knLe].;@FFFDXUBOJF[WUCEQJ!.sj^j%e^BFf`nronkUjnr^nya
jkCkZht_3Kgqp$dlm]Uk^s1YJTG%'Kzjec\\a%?wac\"Llj[n^heZpngs(%n^*\\a%5%FHN\"y`jft^pzjsMKEjfi\"h]3?dv<aqdXayg!_jdqKh|^%%e^*L]y=wv^jy ggw+%]s\\	\",)3rgeahl%amv^nugqYskgc%^n]kf%l]s\"s)kajdc\"_nte%lggfa%yHbaq\\BExNboy)3?dv<qwjjfsXZhz]%&4'x]q]bvGwalamiijlmgc%cwafEakn[j<\"FuQaxl10@ay;zjqggp[Yqmd\"%n^'mkel;mghe^9'Ku`dtb_fd'!vaas%\"dnn_R]sj6PJN?HP@[XHM=QK<=Q%dnlan^% jtbcH`tabg6Haw[tnZn'!%lggg%%jtbcR]y`<%DNN?NFFa<EW;ZD@T%]qkdk_-cwafEakn[j5!GqltfjfskZh'!%lggg%%jtbcR]y`<%DNN?
NFFa>TUGS=MVB=Q%dnlan^% jtbcH`tabg6LYzkrkZj'!%lggg%%jtbcR]y`<%DNN?NFFa@=ZKXA@P%]qkdk_-cwafEakn[j5!NbjjYw(\"mdjf\"gwalEdva9(CWAFKGCdDNFDCK%jdrgbb% pjhi<dtah]<$NjnnjjrceQas]`t%%lm]m%pjhiFay`BJTBCNFLWTPBRJJX9K3%]qkdk_-cwafEakn[j5!Wge{]wk`nMzYij`vb_'!%lggg%%jtbcR]y`<%DNN?NFFaNJNNJJRCE.%]mf#8&%kdn^_ywYckno%hfj`o^pjjx\" nf\\nmr\"lafjh`vrlj%hh$RqThskhj6&nkRgeahlj\\(\"mdjf\"nf\\Iarv6$RqY]wv**L]yLdzm%39xFto[aw%\"k]i;tmmv6I~Ljps4'CjlY]wv%%ae\"!nf\\Hgtpm9'fnd!+pm]s\"%y`dTZ`nm
x5Qc]ezk3E`m^Bnpj\\'tZ`Iaxl+2\"%%dnla%\"nf\\HgtpmJzeBj`f<kzfy&@uGqrZjj	\"%%lggK]iazk<TZ`nmx&LcdaKa}]c*k]i<nks.k]i;tmmvGqr!\"as\\geoj%\"k]i<nks?FuY]}l00@ayLjps%wYcEhqslB L{Ma}l7&FgmPjpy!-ClJzeg]q%n^*k]i<nks?jnd'!vaas%\"y`jJ`fbqx5WYckno3EfcdXZnnYgdd*k]i;tmmv%jnd.\"jdx]	\"%%j`f=exlSml?k]i<nks0:oSmrZdt%%vaaWYiatu6Nf\\nmr0F]p][YqkZ^q]-j`f<kzfy$qc]@nkyFto\"%%dp]%jfc 03x]kg\\p%Zfjqk^n%lm]lg%ak'Or?m]hc00boX]q]bv^`.y`dp%%Z`tMdjej5L{Eexl8&Fgm?zjw]mvO]qmj\"gYwLggfaKL
fZ<dZnY`jed0@ay>YYajdx]	\"%ZfjSj^ij>YYa?geq%dp]%40ofnjucket_wYl\"`nn\\%govbks%hh$RqH`ded.3axKdn^_y]i!vaas%\"obB{Yqikei\"rk5{^-ClBndjF`o^%%nwmRfjLjhf?JB>nddFb]qgl&Owm${^1!.Kzlums\"O]wat_qcfQghYskhj'!geoj%\"hqyNfjFtb`KFBfhn%]s\\	\"]Iafdni'_qgx]%lcda%cwafkgc%asldtikqYyanpp~hj\"ZjNfy]qr9%Asldti*RYp]Jtbcnfl jtbcR]y`+vaaWYiatu%^fjY`do^BYYg$nwmRfjLjhf?J.%	\"%,ogkbtjrhpmawhtd`vbks%q\"6Ljn\\-OZgj:~Amv^nugqYskhj-l3?dv?PfZ1`Rkf1>hge`1ffHpmawh1ze^hqKnrd.^tp‚!	\"ek
-ExQipngs+-klOjdj[sg]%%lm]m,xenqmd%_wac\"%y`dP[nMgt\\?JgjMgnf'Ifcj\"n%5%j-Hh_fdXl`vl$(?WACaLPFL^HDaFAFF%$sj^JgjMgnf%BFDX=(jfidnlaf<hcekl&hdnu^%j?p3?jlFtb`]s\\	k_-E~Govbks+3arU^hj[y]c+pm]s&\"h^yYnfehjygzjkgpjj{Yk\"ZjigYrg_tfygtt%asldto]qk%5}%5&-2',5(5)+%(3(/2)-3&5&/2)-1%2',5(6&-2',5)1\",3(5)-0)*5)1\",3(6&-2'-1%2'-3&6$	\"6&3)/.%6(-0*,5$\"*,5&3)/2)(%02),3&6(/2)(%02),5&3)/2),5$\"*,5(5(-0*,5(5(/.%6(/2),5&3)/2),5(5(/2),5(5(/2),5(5(/2),5(5(|y`jKscmoQa
xl?n3?jlRvZpnkyabu%ak't'DfkJjqqk%%lm]m\"kaymwfPBH%]s\\	\"pm]WYmi^By`dUm]ykQarv'Cjl-)(\"&y`jKscmoQaxl-I^p-(.\"mdjAsldto]qB/kgwdc\\d%a%am\"bjy]wn`nl%%hh$n&Kamf!pm]WYmi^%.y`dp%%vaaNfy]qxZh%5%a	\"%%ZqgZg%gg`%]mf%kz_fglpHA%5vaaNfy]qxZh3?jlKqpaw402%ak'uncl]xlBK9%(.sj^j%uncl]xlBK9%(3(/2),5)gg`%kscmqxBSTNA%ogkea% xl`vno.%\"i]wYrkKklp%5%Eri;k}&RmkvbEshzl'$>jy]wock]r]y]qu31';npmkzj%H`tZijljjr$%€Hgmvhqwnfsgkrfd?+\">fkjbqgptmw2!%€kz_fglpHA39rUmnnfl$$)‚!
\"ek-h`tZixDnks0<kzfy;\"+%%lm]m\"kaymwfPBH%]s\\	\"%lm]Hpmawnfd?lfjferNboy&L]s*)%%vaaGYx]?lfjferNboy&L]s**%%k_-lm]Hpmawnfd-KlJzeg]q\"Zji-lggBjy]wn`n'=xFzeagkC5!(\"mdjf\"%asldto]qGP<\"MNZ=\"aqkj\"%nfsgkrfdTC?BFDX=	\"%%Eri;k}&Nfeq!Y`jbqgptmwhpmawnfdonoyg]cjzeg]q\"`njYy]q\"mdff%(!.?w]fld\"<ksltmqu%%gg`%k_-lm]Acla3AxFto[aw!%lggg%%\"[]x]TC?PWMJ\"jdx]	\"%%Z`u^KPBECEOJ%\"Rkl:nz'Es^t !Vaa%Zfkd\"\\ksltmq\"fqxl%Zd\"ZsmrZdt(';w]`v^Hgslnwko'!\"as\\\"ek
-amv^n{YqGJ\"ZjigYrgHG.y`dp%%um]ymx<\"?=QKJ\"jdx]	\"%%kscmqxBSTNA%gg`%]mf,hjdcma%[tfsqnn%KmYog_eq]ehjygzjEVZ^%5%j-Ehjygzj'co*L]yHqqcahl3?dvPkwcIaq0F]p]Yeo*_ygzj!.omh'!+\"mdjAsldto]q&FkMwf^jj1lgg;]x]39rPnig]w$cIno!k_-[tfsqnnKLfZ?JND.sj^j%jjlttgSAQdp]%hgmvhqw>YYa0<njYy]Hp]a} hgmvhqw>YYa0?es\\Kadn]$'KmYog%.,bt^]y]%Yvaar]%\"mdrBEVaar]3E`m^$hgslnwkBYYg! x]ymcfa%^tjvaar]vai3KjlMcfa-Hgmvhqwk%ge$'0y&FgmJfej!	geoj,qgg]r]%\\`vZx]y\"ZBSB`x'CjlUjnl^_y&L]sYhnp<
nj-OZgjLrh'$lbf[j+\".%q0KasYr]'c?J.,bj^_pn^qnpumyhukp%hh$w&MYrGkntj.sj^j%jjlttgSAQdp],hjdcma%Y%lggfa%%sjfBLLggfa3Efcd*k%%[qgZpjfhothlwafld\"eal]s\\hhn%lm]lg%lm]Kg`as\\%5vai3?jlKg`as\\vaaQ]l]mf'Esljjuce$y`r$!XZhz]'$8+%lm]R{f^tdQarv9%lm]Kg`as\\3?dvLurZtdry`jFtneO~eggk\"6y`jKxo[kqDnks0@ay y`dUriggqDhum*Hgzfs\"&6!vaaXqrZnnEexl3Jdohrj y`dUriggqDhum*Hgzfs\"&6!um]wlHgkqkBHgkqk*RYp]	\"oyYwlBqekw&X]sT`^Qaxl'}2,115$82v%%lggLurZtdKklp3JfeoEhhtjx rvZny;tdnt%?tdtj-I^p\\`nld+%l
m]R{f^tdQarv'=i\\-lggGqqdXqldhh.%sjf*ZhiYsgEal]s\\	)ojl%f`o^kgwsj^ij%sjf*X]yF`o^$'Cwafg]xmw^`e^kjte$'%l3?dvG]r].dp],f\\c\"mdjejsqpm]%Nhgpdlm]Uk^s39i\\Sj^ij y`l+		"
)

(EnScript.61
	Name:	"KGOptionBox"
	SourceCode:	",Kocmefd3Cqk`?tfygtt]Iafdni9%Y{&Ekg`Iafdni!P?Ia`nhcr]sm!+#i]kamg_tfyjnnl%E~Ldzm-BYIa`nhc3>nfcDrJfej'$Ma}ld)!+RqY]wv+9f<nYkq`*Kas\\A{G]r]% !V^tyW7(I~Gulhqg-BYIa`nhc3>nfcDrJfej !T;[6.&4'x]q]bvnf\\nmr\"i]wYr]sgko%ae\"!I~Gulhqg-3AxKdn^_y]i!vaas%\"FuY]}l00LayDfZdn!WYiatu@nkyYme^-jj[nofas\\%).4`flfdzmasl.(%RqSgqp7&X]sNZ^jd-Qc]ezk%;nwgp% w]bqfijfimke%'!\"I~Ljps3'OjlY]wv!'!\"I~Ljps4'OjlY]wv!saq(jdx]	\"%E~Ldzm-3KjlKc[aq 'J`fbqxIarvZjh]% qg\\krejfc\"geq!'!	\"%E~Ldzm.3KjlKc[aq 
'J`fbqxHgtpm-jj[nofas\\%)1\"&6-.(%RqSgqp6&X]sV^ty 'fhn%%OrPjpy*-U^pY]}l'$*.'!gg`"
)

(EnScript.62
	Name:	"KGMenuUpdate"
	SourceCode:	"y`dXba|B`x'CjlF[skoaIghdpZ^q]i<\"?=QKJ	)asYgdd\"bb%Yhlhx^y`jed\"bo%Y%hnkgp%gwlwepnhtamvpm]r]ybpmsmlgkehkadn]n^% sj^Rn]|&Fgm=hlnndVaar]x&BqnjyB0+pm]s\"mBy`dXba|&L]sC\\pnnjLggfax&L]s*)%%ae\"!p3Ax EVAAR=.`p]- y&FgmBYYg&Ekg`Kajdc*OmYu]!+'CjlYqog9%KADN=[X@FHDRHESL.nt%%\"%%\"%%\"$y&L]sHM]g&Kamf?ejdi !Ua]u]'!-I^pYqu]?KAJDCaLDFHJETNMEUGNFS+\"%%lm]m\"%%^ntaf[me\"bj%l3?dv?PfZ3?dv?ejdik	\"%%ae\"!b3AxLxr^Jzeg]q\"Zjik&HuOexagdd+pm]s\"%%dpZ^q]i<\"MNZ=\"%%ZqgZg%\"as\\
\"as\\gg`]s\\	U>HK&X]sGg]gdj\\'gg]gdj\\("
)

(Script.63
	Name:	"KGUnload"
	SourceCode:	"' MyDialogExt.Unload\nDialog.DetachFromExtension(self)"
)

(Script.64
	Name:	"KGCanUnload"
	SourceCode:	"' MyDialogExt.CanUnload\nreturn (System.CanUnloadLibrary(self.GetDependencies.Get(0)))"
)

(Script.65
	Name:	"KGInstall"
	SourceCode:	"'DO NOT EDIT!!!\n\nif (av.getproject=nil) then return(nil) end\n\n\ntheDocs = SELF.get(0)\ntheControlList = SELF.get(1)\ntheMenuList = SELF.get(2)\ntheToolMenuList=SELF.Get(3)\ntheProject=Av.getproject\n\n\n'Add the Docs\n'\nfor each adoc in theDocs\n theProject.addDoc(adoc)\nend\n\n'Add the Controls\n'\nfor each totalControl in theControlList\n   'The Control list\n   acontrol=totalControl.get(0)\n   \n   'The physical control\n   theControl = totalControl.get(1)\n   \n   'The control Index\n   theCindex=totalControl.get(2)\n\n   'Find
 the DocGUI\n   theControlDoc=av.getproject.findGUI(aControl.get(0))\n     if (theControlDoc=NIL) then   \n       MsgBox.Warning(\"The GUI \"+aControl.get(0)+\" cannot be found in the current project.\",\"Script Eror\")\n       return(nil)\n     end\n   \n   'This finds the control set  \n  thecommand=\"av.getproject.findGUI(\"\"\"+aControl.get(0)+\"\"\").Get\"+acontrol.get(1)\n  thescript1=Script.Make(thecommand)\n  thecontrolset=thescript1.doit(\"\")\n  \n  'Add the control to the control set\n  theControlSet.Add(theControl,theCindex
)\nend\n\n\n'Add the menus\nfor each totalcontrol in theMenuList\n  \n   'The Control list\n   acontrol=totalControl.get(0)\n      mDoc=acontrol.get(0)\n      mMenu=acontrol.get(1)\n      mMenuItem=acontrol.get(2)\n\n   'The physical control\n   theControl = totalControl.get(1)\n   \n   'The control Index\n   theCindex=totalControl.get(2)\n\n   'Find the DocGUI\n   theControlDoc=av.getproject.findGUI(aControl.get(0))\n     if (theControlDoc=NIL) then   \n       MsgBox.Warning(\"The GUI \"+aControl.get(0)+\" cannot be found in the c
urrent project.\",\"Script Eror\")\n       return(nil)\n     end\n   \n  theMbar=av.getproject.findGUI(mDoc).GetMenuBar\n  themenu=theMbar.findbylabel(mMenu)\n  if (themenu=NiL) then\n      themenu=menu.make\n      themenu.setlabel(mMenu)\n      theMbar.add(themenu,999)\n  end\n  \n  themenu.add(thecontrol, theCindex)\nend\n   \n   \n'Add the Tool Menus\n\nfor each totalControl in theToolMenuList\n   'The Control list\n   acontrol=totalControl.get(0)\n   \n   'The physical control\n   theControl = totalControl.get(1)\n   \n   'The con
trol Index\n   theCindex=totalControl.get(2)\n\n   'Find the DocGUI\n   theControlDoc=av.getproject.findGUI(aControl.get(0))\n     if (theControlDoc=NIL) then   \n       MsgBox.Warning(\"The GUI \"+aControl.get(0)+\" cannot be found in the current project.\",\"Script Eror\")\n       return(nil)\n     end\n   \n   'This finds the control set  \n  thecommand=\"av.getproject.findGUI(\"\"\"+aControl.get(0)+\"\"\").Get\"+acontrol.get(1)\n  thescript1=Script.Make(thecommand)\n  thecontrolset=av.getproject.findGUI(aControl.get(0)).GetToolBa
r\n  \n  'Add the control to the control set\n  theControlSet.Add(theControl,theCindex)\nend\n\n\nav.getproject.setmodified(true)\n\n\n'And the scripts add themselves\n"
)

(Script.66
	Name:	"KGUninstall"
	SourceCode:	"'DO NOT EDIT!!!\n\n'The SELF is the Extension\n\ntheDocs = SELF.get(0)\ntheControlList = SELF.get(1)\ntheMenuList = SELF.get(2)\ntheToolMenuList=SELF.get(3)\ntheProject=Av.getproject\n\n\n'Add the Docs\n'\nfor each adoc in theDocs\n If (theProject.finddoc(adoc.getname)<>NIL) then \n  theAnswer=msgbox.yesno(\"Remove the Document \"+adoc.getname+\"?\",\"Remove Document?\",TRUE)\n  if (theAnswer=TRUE) then theProject.RemoveDoc(adoc) end\n end\nend\n\n'Removethe Controls\n'\nfor each totalControl in theControlList\n   'Get the control list
 from the Ext\n   acontrol=totalControl.get(0)\n   \n   'Get the physical Control\n   theControl = totalControl.get(1)\n   \n   'Get the Controls Index\n   theCindex=totalControl.get(2)\n\n   'Find the DocGUI for the Control\n   theControlDoc=av.getproject.findGUI(aControl.get(0))\n     if (theControlDoc=NIL) then   \n       MsgBox.Warning(\"The GUI \"+aControl.get(0)+\" cannot be found in the current project.\",\"Script Eror\")\n       return(nil)\n     end\n   \n   'This sequence finds the appropiate control set\n   thecommand=
\"av.getproject.findGUI(\"\"\"+aControl.get(0)+\"\"\").Get\"+acontrol.get(1)\n   thescript1=Script.Make(thecommand)\n   thecontrolset=thescript1.doit(\"\")\n\n   'See if the control is in the set , if so remove it\n    if (theControlSet.GetControls.find(theControl)<>NIL) then\n      theControlSet.remove(theControl)\n      if (thecontrol = \"ToolBar\") then\n        theControlSet.selectdefault\n      end\n    end\nend\n\n\n'Remove the Menus\n'\nfor each totalcontrol in theMenuList\n  \n   'The Control list\n    acontrol=totalControl.get(0
)\n      mDoc=acontrol.get(0)\n      mMenu=acontrol.get(1)\n      mMenuItem=acontrol.get(2)\n\n   'The physical control\n   theControl = totalControl.get(1)\n   \n   'The control Index\n   theCindex=totalControl.get(2)\n\n   'Find the DocGUI\n   theControlDoc=av.getproject.findGUI(aControl.get(0))\n     if (theControlDoc=NIL) then   \n       MsgBox.Warning(\"The GUI \"+aControl.get(0)+\" cannot be found in the current project.\",\"Script Eror\")\n       return(nil)\n     end\n   \n  theMbar=av.getproject.findGUI(mDoc).GetMenuBar\n 
 themenu=theMbar.findbylabel(mMenu)\n  if (themenu=NiL) then\n       MsgBox.Warning(\"The menu named \"+mMenu+\" is not here.\",\"Script Eror\")\n      'return(nil)\n  else\n  \n    thething=themenu.getcontrols.find(thecontrol)\n    if (thething<>NIL) then \n      themenu.remove(thecontrol) \n    end\n    'msgbox.info(themenu.GetControls.count.asstring,\"\")\n    if (themenu.GetControls.count<1) then\n      theMbar.remove(themenu)\n    end\n  end\nend\n   \nfor each totalControl in theToolMenuList\n   'Get the control list from the 
Ext\n   acontrol=totalControl.get(0)\n   \n   'Get the physical Control\n   theControl = totalControl.get(1)\n   \n   'Get the Controls Index\n   theCindex=totalControl.get(2)\n\n   'Find the DocGUI for the Control\n   theControlDoc=av.getproject.findGUI(aControl.get(0))\n     if (theControlDoc=NIL) then   \n       MsgBox.Warning(\"The GUI \"+aControl.get(0)+\" cannot be found in the current project.\",\"Script Eror\")\n       return(nil)\n     end\n   \n   'This sequence finds the appropiate control set\n   thecontrolset=av.getp
roject.findGUI(aControl.get(0)).GetToolBar\n\n \n    'See if the control is in the set , if so remove it\n    if (theControlSet.GetControls.find(theControl)<>NIL) then\n \n      theControlSet.remove(theControl)\n      theControlSet.selectdefault\n    end\n\nend\n   \n\n'And the scripts delete themselves\n\nav.getproject.setmodified(true)\n'Clear global value\nav.ClearGlobals \n"
)