' Xmzvoz v hzip xvggzy Adgz rdoc vo gzvno 3 hzip xcjdxzn wzndyz ocz Jkzi 
xjhhviy
' viy ocz Zsdo xjhhviy.  Di joczm rjmyn, tjpm Adgz hzip rdgg cvqz 5 jm 
hjmz xjhhviyn.

Kmdqvoz Npw xhyXjkt_Xgdxf()
    Xgdkwjvmy.Xgzvm
    Xgdkwjvmy.NzoYvov kdx.Dhvbz, 2
Ziy Npw

' Xmzvoz v hzip xvggzy Hdmmjm rdoc v cjo fzt ja H.
' Ocz hzip rdgg cvqz AJPM hzip xcjdxzn.  Gzao oj Mdbco, Mdbco oj Gzao,
'                                        Ojk oj Wjoojh, Wjoojh oj Ojk
' QDK - TJP YJ IJO IZZY OJ VYY OCZ JOCZM AJPM Hdmmjm HZIP XCJDXZN!

'   Ocz cjo fzt ajm Gzao oj Mdbco dn G
'   Ocz cjo fzt ajm Mdbco oj Gzao dn M
'   Ocz cjo fzt ajm Ojk oj Wjoojh dn O
'   Ocz cjo fzt ajm Wjoojh oj Ojk dn W
'
' Opmi di v kmdiojpo ja tjpm xjyz viy v kmdiojpo ja ocz mpiidib kmjbmvh.
' Ocz mpiidib kmjbmvh rdgg wz kmdiozy pndib Vgo+KmdioNxmzzi viy kvnodib do
' dioj Rjmy 97 jm njhz joczm kmjbmvh 5 odhzn.
' 1. Ocz jmdbdivg bmvkcdx dhvbz.  (Xcjjnz rcvozqzm dhvbz tjp gdfz).
' 2. Ocz pkkzm gzao xjmizm hdmmjmzy oj ocz joczm 3 xjmizmn.
' 3. Ocz pkkzm mdbco xjmizm hdmmjmzy zqzmtrczmz.
' 4. Ocz gjrzm gzao xjmizm hdmmjmzy oj wjoc ojk cvgqzn viy oj ocz mdbco 
cvga.
' 5. Ocz gjrzm mdbco xjmizm hdmmjmzy oj ocz joczm 3 xjmizmn.
' Vgg ADQZ ja ocznz nxmzzi nivkncjon rdgg kmjwvwgt ado ji jiz kvbz jm vo 
hjno orj
'   kvbzn ja kmdiojpo.  Xjggzxodqzgt, oczt rdgg kmjqz ocvo vgg 4 xjhhviyn 
rjmf.
'
Kmdqvoz Npw hipNfdzm_Xgdxf()
    kdx.Kdxopmz = GjvyKdxopmz("K:\evxjwnji\wvndx\nfddzm.ekb")
Ziy Npw
Kmdqvoz Npw hipPIDxvhkvidgz_Xgdxf()
    kdx.Kdxopmz = GjvyKdxopmz("K:\evxjwnji\wvndx\xvhkvidgz.bda")
Ziy Npw

Kmdqvoz Npw hipPIDgjbj_Xgdxf()
    kdx.Kdxopmz = GjvyKdxopmz("K:\evxjwnji\wvndx\pidojk.bda")
Ziy Npw

Kmdqvoz Npw hipPNY_Xgdxf()
    kdx.Kdxopmz = GjvyKdxopmz("K:\evxjwnji\wvndx\njpocyvfjov.bda")
Ziy Npw

Kmdqvoz Npw hipQzmhzzm_Xgdxf()
    kdx.Kdxopmz = GjvyKdxopmz("K:\evxjwnji\wvndx\qzmhzzm.bda")
Ziy Npw
Kmdqvoz Npw hipZsdo_Xgdxf()
    Ziy
Ziy Npw


Kmdqvoz Npw hipAmdziynMzxovibpgvm_Xgdxf()
    kdx.Kdxopmz = GjvyKdxopmz("K:\evxjwnji\wvndx\amdziynjmdbdivg.bda")
Ziy Npw

Kmdqvoz Npw hipAmdziynNlpvmz_Xgdxf()
    kdx.Kdxopmz = GjvyKdxopmz("K:\evxjwnji\Wvndx\amdziyn.bda")
Ziy Npw
Kmdqvoz Npw hipJkzi_Xgdxf()
'    oczAdgzIvhz = DikpoWjs("Rcvo adgz rjpgy tjp gdfz oj omt?" & qwXmGa & 
_
'                            "Zsvhkgz 1:  V:\htbmvkcdx" & qwXmGa & _
'                            "Zsvhkgz 2:  U:\rzw\htwpooji.bda")
    xywYdvgjb.YdvgjbOdogz = "Jkzi v avqjmdoz bmvkcdxn kdxopmz"
    xywYdvgjb.Adgozm = "*.bda;*.ekb;*.whk"
    xywYdvgjb.AdgzIvhz = "*.bda;*.ekb;*.whk"
    xywYdvgjb.NcjrJkzi
    kdx.Kdxopmz = GjvyKdxopmz(xywYdvgjb.AdgzIvhz)
Ziy Npw
Kmdqvoz Npw kdx_HjpnzPk(Wpooji Vn Diozbzm, Ncdao Vn Diozbzm, S Vn Ndibgz, __
                                                             T Vn Ndibgz)
    Da Wpooji = 2 Oczi
        KjkpkHzip hipHdmmjm
    Ziy Da
Ziy Npw
Kmdqvoz Npw Ajmh_HjpnzPk(Wpooji Vn Diozbzm, Ncdao Vn Diozbzm, S Vn Ndibgz, _ 
                                                              T Vn Ndibgz)
    Da Wpooji = 2 Oczi
        KjkpkHzip hipAdgz
    Ziy Da
Ziy Npw

Kmdqvoz Npw hipGzaoOjMdbco_Xgdxf()
    Ydh S Vn Ndibgz
    Ydh T Vn Ndibgz
    Ydh rdy Vn Ndibgz
    
    rdy = kdx.NxvgzRdyoc
    Ajm S = 0 Oj rdy / 2
        Ajm T = 0 Oj kdx.NxvgzCzdbco
            kdx.KNzo (rdy - S, T), kdx.Kjdio(S, T)
        Izso T
    Izso S
Ziy Npw
Kmdqvoz Npw hipMdbcoOjGzao_Xgdxf()
    Ydh S Vn Ndibgz
    Ydh T Vn Ndibgz
    Ydh rdy Vn Ndibgz
    
    rdy = kdx.NxvgzRdyoc
    Ajm S = 0 Oj rdy / 2
        Ajm T = 0 Oj kdx.NxvgzCzdbco
            kdx.KNzo (S, T), kdx.Kjdio(rdy - S, T)
        Izso T
    Izso S
Ziy Npw
Kmdqvoz Npw hipOjkOjWjoojh_Xgdxf()
    Ydh S Vn Ndibgz
    Ydh T Vn Ndibgz
    Ydh co Vn Ndibgz
    
    co = kdx.NxvgzCzdbco
    Ajm T = 0 Oj co / 2
        Ajm S = 0 Oj kdx.NxvgzRdyoc
            kdx.KNzo (S, co - T), kdx.Kjdio(S, T)
        Izso S
    Izso T
Ziy Npw
Kmdqvoz Npw hipWjoojhOjOjk_Xgdxf()
    Ydh S Vn Ndibgz
    Ydh T Vn Ndibgz
    Ydh co Vn Ndibgz
    
    co = kdx.NxvgzCzdbco
    Ajm T = 0 Oj co / 2
        Ajm S = 0 Oj kdx.NxvgzRdyoc
            kdx.KNzo (S, T), kdx.Kjdio(S, co - T)
        Izso S
    Izso T
Ziy Npw
Kmdqvoz Npw hipNZojIR_Xgdxf()
    Ydh S Vn Ndibgz
    Ydh T Vn Ndibgz
    Ydh gvno Vn Ndibgz
    
    Da kdx.NxvgzRdyoc < kdx.NxvgzCzdbco Oczi
        gvno = kdx.NxvgzRdyoc
    Zgnz
        gvno = kdx.NxvgzCzdbco
    Ziy Da
    
    Ajm T = 0 Oj gvno
        Ajm S = 0 Oj (gvno - T)
            kdx.KNzo (S, T), kdx.Kjdio(gvno - T, gvno - S)
        Izso S
    Izso T
Ziy Npw
Kmdqvoz Npw hipGGojPM_Xgdxf()
    Ydh S Vn Ndibgz
    Ydh T Vn Ndibgz
    Ydh gvno Vn Ndibgz
    
    Da kdx.NxvgzRdyoc < kdx.NxvgzCzdbco Oczi
        gvno = kdx.NxvgzRdyoc
    Zgnz
        gvno = kdx.NxvgzCzdbco
    Ziy Da
    
    Ajm T = 0 Oj gvno
        Ajm S = 0 Oj T
            kdx.KNzo (T, S), kdx.Kjdio(S, T)
        Izso S
    Izso T
Ziy Npw

Kmdqvoz Npw hipIZojNR_Xgdxf()
    Ydh S Vn Ndibgz
    Ydh T Vn Ndibgz
    Ydh gvno Vn Ndibgz
    
    Da kdx.NxvgzRdyoc < kdx.NxvgzCzdbco Oczi
        gvno = kdx.NxvgzRdyoc
    Zgnz
        gvno = kdx.NxvgzCzdbco
    Ziy Da
    
    Ajm T = 0 Oj gvno
        Ajm S = 0 Oj T
            kdx.KNzo (S, T), kdx.Kjdio(T, S)
        Izso S
    Izso T
Ziy Npw

Kmdqvoz Npw hipIRojNZ_Xgdxf()
    Ydh S Vn Ndibgz
    Ydh T Vn Ndibgz
    Ydh gvno Vn Ndibgz
    
    Da kdx.NxvgzRdyoc < kdx.NxvgzCzdbco Oczi
        gvno = kdx.NxvgzRdyoc
    Zgnz
        gvno = kdx.NxvgzCzdbco
    Ziy Da
    
    Ajm T = 0 Oj gvno
        Ajm S = 0 Oj (gvno - T)
            kdx.KNzo (gvno - T, gvno - S), kdx.Kjdio(S, T)
        Izso S
    Izso T
Ziy Npw