From 6a894e9d33ea45683e4e233af48dbb55fce8663c Mon Sep 17 00:00:00 2001
From: NicolaP <nicola.p@eglatech.com>
Date: Thu, 16 Sep 2021 11:42:23 +0200
Subject: [PATCH] Gestione lavorazione diretta con foretto

---
 DirectCuts/DirectCutPageUC.xaml     |  24 ++++++++++++----
 DirectCuts/DirectCutPageUC.xaml.vb  |   3 +-
 DirectCuts/SingleDrillUC.xaml.vb    |  42 +++++++++++++++-------------
 OmagCUT.vbproj                      |   3 ++
 OmagCUTDictionary.xaml              |   1 +
 Resources/NewIcons/Foro-singolo.png | Bin 0 -> 10373 bytes
 6 files changed, 46 insertions(+), 27 deletions(-)
 create mode 100644 Resources/NewIcons/Foro-singolo.png

diff --git a/DirectCuts/DirectCutPageUC.xaml b/DirectCuts/DirectCutPageUC.xaml
index 2eacb00..bc9ae31 100644
--- a/DirectCuts/DirectCutPageUC.xaml
+++ b/DirectCuts/DirectCutPageUC.xaml
@@ -114,7 +114,21 @@
                     </Grid>
                 </Button>
 
-                <Button Name="FlatteningCutBtn" Grid.Row="4"
+
+                <Button Name="SingleDrillBtn" Grid.Row="4"
+                        Style="{DynamicResource OmagCut_YellowIconButton}">
+                    <Grid>
+                        <Grid.ColumnDefinitions>
+                            <ColumnDefinition Width="80"/>
+                            <ColumnDefinition Width="140"/>
+                        </Grid.ColumnDefinitions>
+                        <Image Source="{DynamicResource Foro-singoloImg}" Style="{DynamicResource OmagCut_ButtonIcon}" Grid.Column="0" />
+                        <TextBlock Name="SingleDrillTxt" Grid.Column="1"
+                                   Style="{StaticResource OmagCut_LowerCaseCharacterTextBlock}"/>
+                    </Grid>
+                </Button>
+
+                <Button Name="FlatteningCutBtn" Grid.Row="5"
                         Style="{DynamicResource OmagCut_YellowIconButton}">
                     <Grid>
                         <Grid.ColumnDefinitions>
@@ -127,10 +141,10 @@
                     </Grid>
                 </Button>
              
-            <Button Name="PolishingBtn" Grid.Row="5"
+            <Button Name="PolishingBtn" Grid.Row="6"
                Style="{DynamicResource OmagCut_YellowTextButton}"/>
 
-            <Button Name="CopyTemplateBtn" Grid.Row="6"
+            <Button Name="CopyTemplateBtn" Grid.Row="7"
                     Style="{DynamicResource OmagCut_YellowIconButton}">
                 <Grid>
                     <Grid.ColumnDefinitions>
@@ -143,11 +157,9 @@
                 </Grid>
             </Button>
              
-            <Button Name="SawTestBtn" Grid.Row="7"
+            <Button Name="SawTestBtn" Grid.Row="8"
                Style="{DynamicResource OmagCut_YellowTextButton}"/>
 
-            <Button Name="SingleDrillBtn" Grid.Row="8"
-               Style="{DynamicResource OmagCut_YellowTextButton}"/>
             </Grid>
       
       </Grid>
diff --git a/DirectCuts/DirectCutPageUC.xaml.vb b/DirectCuts/DirectCutPageUC.xaml.vb
index 1e027b2..91f4a44 100644
--- a/DirectCuts/DirectCutPageUC.xaml.vb
+++ b/DirectCuts/DirectCutPageUC.xaml.vb
@@ -114,7 +114,8 @@ Public Class DirectCutPageUC
       ManualTxt.Text = EgtMsg(90201)
       'SingleCutBtn.Content = EgtMsg(90202)
       SingleCutTxt.Text = EgtMsg(90202)
-      SingleDrillBtn.Content = "Foro singolo"
+      'SingleDrillBtn.Content = "Foro singolo"
+      SingleDrillTxt.Text = EgtMsg(90258)
       'MultipleCutBtn.Content = EgtMsg(90203)
       MultipleCutTxt.Text = EgtMsg(90203)
       'GridCutBtn.Content = EgtMsg(90204)
diff --git a/DirectCuts/SingleDrillUC.xaml.vb b/DirectCuts/SingleDrillUC.xaml.vb
index 9397e81..597c2e9 100644
--- a/DirectCuts/SingleDrillUC.xaml.vb
+++ b/DirectCuts/SingleDrillUC.xaml.vb
@@ -27,12 +27,7 @@ Public Class SingleDrillUC
    Private m_vtToolP2 As Vector3d
    ' Parametri della lavorazione
    Private m_bCutOk As Boolean = False
-   Private m_dDepth As Double = 0
-   Private m_dLen As Double = 1000
-   Private m_dAngO As Double = 180
-   Private m_dAngV As Double = 0
-   Private m_dOffset As Double = 0
-   Private m_bSawTh As Boolean = False
+
    ' Array delle modalità di acquisizione dei punti
    Private m_PointsModeArray(2) As String
    ' Punto selezionato nel disegno
@@ -48,7 +43,7 @@ Public Class SingleDrillUC
    Private Const MAX_SIDE_ANG As Double = 60.0
    ' Costanti che indicano la modalità di acquisizione dei punti
    Private Enum PT_MODE As Integer
-      SAW = 0
+      DRILL = 0
       LASER = 1
       DRAW = 2
    End Enum
@@ -59,7 +54,7 @@ Public Class SingleDrillUC
       m_CurrentMachine = m_MainWindow.m_CurrentMachine
 
       ' Creo lista modalità di acquisizione punto 
-      m_PointsModeArray(PT_MODE.SAW) = EgtMsg(MSG_DIRECTCUTPAGEUC + 24)
+      m_PointsModeArray(PT_MODE.DRILL) = EgtMsg(90752)
       m_PointsModeArray(PT_MODE.LASER) = EgtMsg(MSG_DIRECTCUTPAGEUC + 12)
       m_PointsModeArray(PT_MODE.DRAW) = EgtMsg(MSG_DIRECTCUTPAGEUC + 25)
       ' la associo alla combobox
@@ -168,6 +163,8 @@ Public Class SingleDrillUC
    End Sub
 
    Private Sub OnMyMouseDownScene(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles m_CurrProjPage.OnMouseDownScene
+      ' deselezione il bottone per acquisizione
+      Point1Btn.IsChecked = False
       ' Verifico di essere il gestore attivo
       If Not m_bActive Then Return
       ' Si può selezionare solo con il tasto sinistro e se stato NULL
@@ -211,14 +208,14 @@ Public Class SingleDrillUC
       If Not m_bRawOk Then Return
 
       ' Se acquisizione lama o laser
-      If PointModeCmBx.SelectedIndex = PT_MODE.SAW Or PointModeCmBx.SelectedIndex = PT_MODE.LASER Then
+      If PointModeCmBx.SelectedIndex = PT_MODE.DRILL Or PointModeCmBx.SelectedIndex = PT_MODE.LASER Then
 
          ' Recupero la posizione macchina
          Dim dL1, dL2, dL3, dR1, dR2 As Double
          If Not m_MainWindow.m_CNCommunication.GetAxesPositions(dL1, dL2, dL3, dR1, dR2) Then Return
 
          ' Ricavo dati Foretto corrente
-         Dim sSaw As String = m_MainWindow.m_CurrentMachine.sCurrDrill
+         Dim sDrill As String = m_MainWindow.m_CurrentMachine.sCurrDrill
          ' Se punto da laser
          If PointModeCmBx.SelectedIndex = PT_MODE.LASER Then
             ' Imposto come testa corrente il laser (senza utensile ovviamente)
@@ -226,11 +223,11 @@ Public Class SingleDrillUC
             ' Trasformo in posizione punta utensile in basso
             If Not EgtGetCalcTipFromPositions(dL1, dL2, dL3, dR1, dR2, True, m_ptTipP1) Then Return
             ' Ora imposto la lama corrente
-            If Not EgtSetCalcTool(sSaw, "H1", 1) Then Return
+            If Not EgtSetCalcTool(sDrill, "H1", 2) Then Return
             ' Altrimenti da lama
          Else
             ' Imposto la lama corrente
-            If Not EgtSetCalcTool(sSaw, "H1", 1) Then Return
+            If Not EgtSetCalcTool(sDrill, "H1", 2) Then Return
             ' Trasformo in posizione punta utensile in basso
             If Not EgtGetCalcTipFromPositions(dL1, dL2, dL3, dR1, dR2, True, m_ptTipP1) Then Return
          End If
@@ -254,7 +251,7 @@ Public Class SingleDrillUC
       End If
 
       ' Disegno il taglio
-      CreateSingleCut()
+      CreateSingleDrill()
       ' Disegno la macchina nella sua posizione reale
       SetMachineInCurrPos()
       m_MainWindow.m_DirectCutPageUC.m_bShowMachine = True
@@ -346,7 +343,7 @@ Public Class SingleDrillUC
       m_MainWindow.m_DirectCutPageUC.LeftButtonGrid.Children.Remove(Me)
    End Sub
 
-   Private Function CreateSingleCut() As Boolean
+   Private Function CreateSingleDrill() As Boolean
       ' Verifico sia definito il punto iniziale e il grezzo
       If Not m_bPointP1Ok Or Not m_bRawOk Then
          m_bCutOk = False
@@ -357,8 +354,8 @@ Public Class SingleDrillUC
       ' Spessore grezzo
       Dim dRawHeight As Double = m_ptRawMax.z - m_ptRawMin.z
       ' Recupero spessore lama corrente
-      Dim sSaw As String = m_MainWindow.m_CurrentMachine.sCurrDrill
-      EgtTdbSetCurrTool(sSaw)
+      Dim sDrill As String = m_MainWindow.m_CurrentMachine.sCurrDrill
+      EgtTdbSetCurrTool(sDrill)
       Dim dThick As Double = 0
       EgtTdbGetCurrToolParam(MCH_TP.THICK, dThick)
       ' Rimuovo eventuale vecchio pezzo per taglio diretto
@@ -369,8 +366,8 @@ Public Class SingleDrillUC
       ' Creo nuovo pezzo per il taglio diretto
       Dim nPartId = CreateDirectCutPart()
       Dim nLayerId = EgtCreateGroup(nPartId)
-      EgtSetName(nLayerId, NAME_OUTLOOP)
-      ' Creo il taglio
+      EgtSetName(nLayerId, NAME_INLOOP)
+      ' Creo il Drill
       Dim ptStart As Point3d = m_ptTipP1
       ptStart.z = 0
 
@@ -381,7 +378,12 @@ Public Class SingleDrillUC
          CreateCross(nCrossLayerId, ptStart)
       End If
 
-      Dim ptIns As Point3d = ptStart
+      Dim nCutId = EgtCreateCircle(nLayerId, ptStart, m_dDiameter / 2)
+
+      ' Calcolo punto di inserimento nel grezzo
+      Dim ptMin, ptMax As Point3d
+      EgtGetBBoxGlob(nPartId, GDB_BB.STANDARD, ptMin, ptMax)
+      Dim ptIns As Point3d = ptMin + (m_ptTabOri - m_ptRawMin)
       ptIns.z = dRawHeight
       ' Inserisco il pezzo nel grezzo
       EgtAddPartToRawPart(nPartId, ptIns, m_MainWindow.m_CurrentProjectPageUC.m_nRawId)
@@ -408,7 +410,7 @@ Public Class SingleDrillUC
       EgtSetColor(nCrossId2, New Color3d(255, 0, 0))
       Dim nPntId = EgtCreateGeoPoint(nLayerId, ptP)
       EgtSetColor(nPntId, New Color3d(255, 0, 0))
-      Dim nCirleId = EgtCreateCircle(nLayerId, ptP, m_dDiameter)
+      Dim nCirleId = EgtCreateCircle(nLayerId, ptP, m_dDiameter / 2)
       EgtSetColor(nCirleId, New Color3d(0, 255, 0))
       Return True
    End Function
diff --git a/OmagCUT.vbproj b/OmagCUT.vbproj
index 200ba31..e386058 100644
--- a/OmagCUT.vbproj
+++ b/OmagCUT.vbproj
@@ -1096,6 +1096,9 @@
   <ItemGroup>
     <Resource Include="Resources\NewIcons\Sezione-cornice.png" />
   </ItemGroup>
+  <ItemGroup>
+    <Resource Include="Resources\NewIcons\Foro-singolo.png" />
+  </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
   <PropertyGroup>
     <PostBuildEvent>IF "$(PlatformName)"=="x86" IF "$(ConfigurationName)" == "Release" copy $(TargetPath) c:\EgtProg\OmagCUT\OmagCUTR32.exe
diff --git a/OmagCUTDictionary.xaml b/OmagCUTDictionary.xaml
index 21e8231..c7c766a 100644
--- a/OmagCUTDictionary.xaml
+++ b/OmagCUTDictionary.xaml
@@ -172,6 +172,7 @@
     <BitmapImage x:Key="Taglio-grigliaImg" UriSource="Resources/NewIcons/Taglio-griglia.png"></BitmapImage>
     <BitmapImage x:Key="Taglio-multiploImg" UriSource="Resources/NewIcons/Taglio-multiplo.png"></BitmapImage>
     <BitmapImage x:Key="Taglio-singoloImg" UriSource="Resources/NewIcons/Taglio-singolo.png"></BitmapImage>
+    <BitmapImage x:Key="Foro-singoloImg" UriSource="Resources/NewIcons/Foro-singolo.png"></BitmapImage>
     <BitmapImage x:Key="SpianaturaImg" UriSource="Resources/NewIcons/Spianatura.png"></BitmapImage>
     <BitmapImage x:Key="Movimento-manualeImg" UriSource="Resources/NewIcons/Movimento-manuale.png"></BitmapImage>
     <BitmapImage x:Key="Copia-dimaImg" UriSource="Resources/NewIcons/Copia-dima.png"></BitmapImage>
diff --git a/Resources/NewIcons/Foro-singolo.png b/Resources/NewIcons/Foro-singolo.png
new file mode 100644
index 0000000000000000000000000000000000000000..ec39e83e59a6d2d0c160cdac7ed173383ea4b021
GIT binary patch
literal 10373
zcmeHtcT`hZ*EgVmG^I;XN)Qz#KoV-C385({y(6STC;^hti&QCsbm=G{h>eaQT?7#k
zL3%Gr@4X7VQD^3v`M&wq`ev>7`EQbSZ<2lX{++#ld+&4axhrAXx6~MDxoFAA$QU%#
zVY;MG?H|V}D$@A@)A}niGI}ddePg07+>Or(?})+Lqxpy)PG~-~I~GGm=03QTY==K5
zb2{jFgVpO~ZGE%zZbU!#;@ZxM7nMD+Kr^oPsK`j2sF9_4W*UmHPq0Xn<Gmfp<FA)g
z6E)+_b+ua7S?pfcu4VQwJk6*}kDOWA5ZE#LelX&)@x6f{w91ozciMIAxMDej&fGEb
z_Ihy#lF&DHS7%w&d#|vgMyDfGmUp^F+sAvQK-9eYc3J+;@(TCIp-0i}%<W!VW7Ato
zpHNs@H_8<wr?>0nXVwNU&+?w-T1lw0P#>Q8%*Goqp%oy@@?FHg{q}O)f~ZFg;L6U~
z31#`tjl-vX>D3le1vIiIo&y7~W<IYJM3r~&>_MVVF3Yu!E<i2rhuP;GXh&tI-5&01
z!ARF7xTB9kf%nerKd%mVaE;!@hAdUzd+|ALZ7C}?|IJdb2QQ8hvDs=pTEp9I#Ub)A
z+Gk6^h9RqVcsu#yC+)oE$9Vr2N1XSs4fU3c@YQwQGNKQ56`tNrQ1DDH7%tuEV3je;
zcmohAczl8ORT|+v6qgOajcFvrjW;iRi|UoozAl3mIafH4e^vWPWSPNyf)(nNz3R(9
zI^`j%7#^y4iVCJ?9Y^;ywq(F7E?podm_kD7DX;fa;aiQj12#b&Gy`V~yf&^4q?^_3
zE`Upw`7c~x0heXET{euM@Wl&T<$aOTfyJVPbaQf|5wY>Qw?0||L(Y{<#uG%|Ok-|b
zE>hPJOw_f-_Vkg}X=q9G>DoC&YH?qc@~v`Kwj0^$Kqh8*F6Z=(-jfoDkVZX;QR8$e
zowH8TuGfULgBR>ufsaeS#wHlvLHG1XY7fDif!CI*Tk|pH);-I`N2~j)J;N3fcdz6~
zO<VU=q--E*o)Q73kSo*K+2bZx#{<^x*kSJ9|6(^)ih13je_i%^IJ-6U6$e{HtH;2y
zNmcpBFq*lQXQ`QtM=N=0Upjp<@d~|5)&{B1;otNZZI!j2GZ4q}y%MHx>RIehRqc&1
zSo$1WXCBuD@9WE?4ADlvdW;{Utn|v!@rq0GFWc1O#(h(BK5_CX$8&==n^*bgV-`xC
z3Bc*j^<rS+#}xRRF9)A|3(^H@o{ZlfHi<~I^-4#UQM@^0tQwp8BI*qzo&i@Bz|xyi
z6lFfdQPT2UMsr`5Uc(M^?b9dcNY$jb<>;<>*7;d<5j#9m#stY{G6>t`rl?JQwYihq
z9O_xXS2`})+UGE1{-#kD5Z^I8oQ=?=d9@RLP$+<RX5@}Ha!P!g-y#xRQgzw3yD_;r
zM8W57U9=+IIfS%+WkYBiI_=#!y+p(9A+we^<$?a4@Sc49@@*S(@c^fJz|fYr&k%g0
z^z~>%BCbKV9oSi2Zftw2@=ljlF~^7s@=L_FUmur5gDsqJUG`?83D@;k@;Cd1u36+M
z#x<IH->>Wrn(HZ?;e35BedTc9yWEn)<eQBD2)sN!-%-M8Hfk&4ozqO^ObZK3gQbs@
z=-JZ|ISN+7dhm1pYpb-#!UV(io2itnAxh)f<45}Ljq2K`s43TPMloHbyizNG6TjIU
zXT^$I4Ei>7%QMk`y{*IN1ww5hw?ahMQ1zlG&hxXAZt)o^4ng05fN=sp`j%;16YiOy
zTGyqrxuVzRT^C$yRYGi4-1K6}v$%Eh5`t*=pZlC`bUpYWTB6rJ)!mk=1Zwe0eoDJv
zqj}g3sZXtq?=dRXGO!CK7V69O1FB`t^dbVml3g((FuA1+m$bpk;HT3{FD8bQs2pgN
zGPJvz<OAB`Ri7K7)o9m-^?Ix17HGLxCckd4XKXeusq0^Ieq(@!ZYa6j>@>qxL2vPe
zE+jFRpN{8#@IC%kn-ooD0YQBHz14NU^DmcTEg&&GHpa9|0?V{W9gDgu-oV&N>E2TY
zS>>g&UCaiSAwuit4yKDMWdwMN<v&E^LQ%dk1C%58KgG9@zg|sc1Q__Q9B?{a+4~y%
zh$`+SM94RUC+3`Roo=YuL?VpBe%Z#4GI04+_Ve7!MKG~i+0)Oy@_N~Qv5#$QJXs1b
zyu-x`Ef;-<=Jpu^X_Xnqm#HsPa2>1%vI<wy?noX!NWT|xZ}#Cz+OsF!X8sG<+XzlW
zFJ?_^>fAU4EI;MuSzSH$jWuD@y=uKhDu+(a`==-Lm_6y1Y?fz-ayhT%U4qm$+<9*I
zcIQj^6*J=#Cp{iiv_uR@;Mh5`p{v=SIk`Th>V44}<Q0kORyjlMptHRKU#8mAxt6P_
z^X$Zj_f=3%4`|oL@Ec9R=YWs3iYzL#Ce-K6ogadebY>b;5XwWt^$#&ou9PRNkNm6v
zT>N9rOp=O|l8h$F)mp6L2&<h2#=>fO`RlVB-wiq8AymyP&n3@uInlXC-__~r$ZTp%
z5)Q=rH(Y24jlAGRBOe=^@NStZJUJ5`@wU{%jB-*orIm}nS0mDx$>|iveaifWrSjLb
z^D`n)(?Gn>hhqK6yz!ZEmlgocy~qg#&BF&Df^kX@dx=6p5|OUGPomSKIrUYQxA`}_
z45!?=QldSDX`lA;Eykuq<A|9T9N6>DuQ=My0q3MWGvr=M%1{T?w}>xAlssUXg4%O`
zk#NAPUuDA=%V2X$J$1VTUCW=4jUd=`_1#_oBFXeVfP_9tn7&Tn^Hmg<&>jV3&ESg=
z3Etv<io6;pSz`m32|UC*<hIEs&CK^Z<XB>23_9)&#Isy%jx4oJ%ZGUznPY4@%=lq6
zii{aIUnveyhcHRr*$pM5uson>xHQOM`fV0fCassm0@8#Vg&MBUE_Vb4-80j3{<7zY
zXAQc{ZX+;2n?Yo1m1Ywr@UrAWCS4H-#n|vDhU+!MxyGRM_Z$xAvKf^_!2Ww5g3gac
zGeDEK@6jYC4t-mH)HcSxS+#P{{kFAjoE_3a7TyEZW_AAvnqInZy-Cgt{nkH}m{*f9
z2h?W9L&Qd}gXlw92@GX%F3(aC;c<rh=xEyRtmR1U7ZLd~-6yViJkvH&*1ys`$f!uM
z8G+o3t`eA#$t+rp%~QrPd75(2=1p?Ydxyv`^2^%=TsdIt{qn*MK61UNC8SXO$j&MV
zeapO}<}*?8qe>1#<idl1P5-jQi_sWs#W8u9cqWqj^-2t<CvY`vAFf;Edx`m;Pt&)1
zd3Te~Abc?6&|@D@0DxTk<J>b}Wb#Glh(mFUOwk?>3Ku6c7$tdF$#|{lJT)7?$pdE}
zOvQ|z+jgoa|I8qcUj$$p#t<vtS#Q@?$q~(=g{qHlEGF@Ml7-VDIIoN6q00>&EwTl6
z)=Ghac@yOcgt8hxir1)%lWJa9r||6ZK3wJkzipq5j)kK&CX08j!GeA^eOXF;|0=r+
zwIsXQMtBi7oU2AsjPZ&VkLrgIWYE6GJ6&F)F}`~#aZEKb8YiL3skWfc@`1W-o38nT
zdzM}&9qXs7?5A1zl4C2-&yV@;zKRftTKH<RMf;Yy-CncEe_HS@eF4?+kYDnVWkk*^
z=CPN>`$<MG(t2o#72F~BM|$BWN+u26;1UoSV)Bkhm+Eo<3qb=#dds)<XBd$h90GKU
zCX=A58nvW7TRK@NSt{cSsIzw6f6t$BTQoWBG2`gf%ZJmP@q00huII@w#fn&=<>LbO
zv{id{mLG@expcTxi^?Ae93?N^T`0RN8J|-AjMYG;vJzd|^+XKhcr-L}Lsq|6X+6<v
zf531$il@6evniEZnEDFTO|E`D&3RNy`lCE_A`idl_8jGVQLl>J!Cp3(3+LRC^nm7F
zw&^)D&Z|p&c@GyfwInJ-x0^2{t&_8N6t=i>0A5s7=c?TA09EFWIA0PHy%k{P))!8;
zbbZGwg;ktej7f<>MQO#qC|wnk>u0B03hxzt+Ul)Pps=E}Az$)HGfH84JH&0H$%8#g
zPWI?YjLf`WVqEg35co!7%r!?0n$fY8>>RWGdLescb45ndC7VIld$Jh98>)@e@^;CP
zH)Uw16P3K^M;{AV>>LY1<RoADc0?SyC88Dr!5r(RxAj(ySMIc>O|7f2Y<NC&Eyx>j
zDsX?b125b8lH9j?bOE}-HTno<Eq`;=EgSMkaHZ-?a(nE~$m}Ph8wUx$pWXa-Oo-D)
zIX+&wc^4NwpMO}H(|4CMs0O|iLCe1g6l;ClysvmpUQbloDDJ%?`^F*Tl&7Y6c3VCq
zU(JVfw~AR5Tqv;d-`jY4cr3iBP{TN$+VlNvT&+;(J2LWIGBR2*tg^DUhO+YSdkxYK
zBQ5=*o4$S@dq{hYn`dU57^{%-N(}>FjnuPF7(9v7>hg)x5b+}ZED9zS*h#kQ0RXCq
zdw?Q9c(9+<Tb^jX$BkC3IyxSZVngE8R83;y7_YUD-J_ZvIqMal-b%9Q>ccnHL}OY%
z@eDuSuTwXoBEoZ#2jujtWG6n6SrvmJ6iRaM{M6-naGRPjEW3bHeo}6YSIMLzs{?0=
ztH&BC32)DacAgCD4`^#ag;i)bJ{t(2FY-}s?A~Psy}JzBP@!fms!n1#JFr^P4!Cwd
zIsHBIzOnZ-y(^d5Cpo}qir{1@$J$wE9rnaH;8!z1uO?frv&whFbE)s)7z#f?*b>F*
zs~U~DfQxJIl!jr|tYqhe)~-G{4yQ~z=fA6qo8x@rjYGux<+pZbrw$B)XGhZ(^&co&
zu{NS|#P;kf%{)!1;u7iVzoskPR5drN%=^%bdEMKqI{hAF$u?hyJJJgCs!}fqP}rf*
z+VUwnOtAEnBa1N6ad7o6YFeRujD(P_@6`2+pP}Frnm0SBH`>Vzn-SFD`%nl0wS4|8
zIgK}d|25z!^LTDmYO`l2qG|5v@|ltJxO&!H+S#v_MV)$G!QP%2s<@_1?n95zW9M<p
zNAJXf;_4>|?pdKuU*erT!m?a9`pwCu($!|xkMvlM;r)+FrTYLnT=L|$FG0~<k0~bm
z<o&W3$(ad?r6&%*NZs|8W~{3|)f3kA=2&=ktfT?`RWL4fSLQSDLd0k0^%C}-#&+h%
z<mBoUSG38lD4v+55U@IJ?<eO(#Z!OwWPlhWr6D=HItAA6O!0O3{!`(KH2vhRfwtOo
zT#76<<d+nwr5Qy0TF0Rk<hVd;tCJCdGgeg9<Qt49;rw8jKP#VsIvv>W6F=4DDG$XX
z?Nh9jP1nO1&oC?PbzIClc_rj|CNz&`p9e~5;g_!z*db@bniAj}GWzb6X27#T@Joi&
zdis9K?Z9{A2~L1&uFrvV6H88P=4W^VhbHJ&U3Mj9DHKAinfw@;xU%kX@Y6Rk(7>`{
zP6kE2R1S~1@q`C^y)ydF<VA3Rrof6e2P>tD8fWIB&S>7$Wp-N$+w;#^4I-fdwrX3C
zaapQ5ki6SAU{e|gzt_qKj|IMj&Ds;0Dw#(@amtoTW2#ZvV^(4uT&mQ_z_s@<cr3_H
zEGOwO$?%iMCq4{4<bD%^t&qx?+Me%W7@O7oLa(Cc!kI$le&<EAb4*XeA<Z6Nvz%qk
z$@7`rSl!sAf>P_-zU8c%x?l6=%ZO}mN}S+cwb&*9F72Dar`5qP&De0NB`7lJiW1!f
z^926{TMX$|c#t_T%={}Af^AKDjn+AS_rV3_&P#7%5b8>uuAT5sk50MHtKj69TCNw>
z;wUGVCNHk5tRvUWXu^Yvf}&2EA!=Zeu&T!BMmmk^Cl8<8pS;o{+j65NF7`xhm#({z
zgOHR^Za4H9*E2occe*8=tXRmL;+*)L?p$`KQO+fFA$SnX1GZ0AN>&D+MZdp%N+s~C
zDqKfWhwF0U<!}1*1|jpxTDcFk>$11?tWjtb5d98KK-r<%KRoDQOp$C0d3fV$cKYLy
z%$h{KhlH4K9~|QBVz^^d<17Iy!tF7l4;>TgfX8?I^T#uzvkLVxl_z2VH*_pP#vrpb
zzpsK#bAsK1+c%AGh9{;O<1J|nJB?^{OtXpV&u(K4O;iSM$|!pjtgB36*;2wwZWP}L
z{%DdQWDx#5`-)MS(pK6$q*8b!IO9e^)=r0YcYJqsPmryP?V;_)JaoRbhpyYKhZoBz
z&cQ{)#l|(l1xb0HLY}gh(w4GQwrWcM>cT5I(;8F4Aasyv(5&=Y=_Qv*7jNP^F~x;v
zKGr3jXtdC~FxvTU7PP6mxxFyb5wi7aGj7vvlbYV@gx!h!x4wbbl}j^U@wXR_I`xO5
zCK2)IZhLWCO~|&Ch}g22FFXs&>`>hGq;E3rSpxPsHgN6)gcD*}LQx`8GS;@$W-=`?
zT`v5AJ%fD#2nF6T<ub+#pD`XS%QB`kb|{*Ey>H`yY%9kVWfXrY4J#S2hJ1Pq4&ca%
zxcb`0%xGxq^;3tj0h1w`#asP{7)R72#NBRR{Ik!xpF8j6AWzSq)(nA$FsW4{)4pAA
zX1XMCDOazii^ZD3`ZXbYBj|p{&Ei&2;@SM%eD6NVJ{hTN<z={;5hgd$9mJ0B8P2FF
zo*tekxgI$dxl}pp>X+5M?&&+KUI!j4n>^b(+weW{y-&M?yZKv7YXW=0`vwPcYkfO2
z2X2)0<hA5g6g(nbrti&qnNCsoP`FXb({|FBp5H`@U6j6Dad8(LYNGC|?s!>HTyoQ9
zHdU;zu(*)A)g_TG(JkcWz2+dP;C7V?wRp7%SPCpZvYID{qbYJe;=O8!nv`mL{;F}2
zSCe~$fu_!<^aSWtg5e#DoQf+hJ;}x`#+bzxX`(r7_)Eo^Pl^~hg5>BWU(4_Gt&wFR
zTWL$5@~v(=pOc<S3p*JSv>wy~3u&|n)6=-6k)Y9KE`^iWK^ME>9oEfnSbdy`5AF`_
z?iDvTH6Ikppcf79i_4GAh?7r(N9)9ciU)C9%RLZp1z+UF_&4AZJw>)d%`F<2;MCx3
zlLsaeCXOZVN^Vc9&#dD2@mqxQsaumC(>_&HW%tT*uUP``B9CTG6U$r{9=oh9RQB1u
z6g5|<eQWnFCNd~ei2LppG2mrU_ZlIDo>3-#;$A~h+nv<Z`xnA@Ro<B`mUrV+9Hwwf
zW0)d`mDjhM7QfmF<_abV^4>7X>8k}D<j$uCFVPGgw7zUTy;#3EzEn}tg`J7P&#hOl
z7g>;34PKpPYho*KYhJE3#hRE@g%qk)SU>q#_nc5LJ$l|tLI0A$SibWs?8wtn$D!Ic
zhl_{G)M;l*yRY;;?5<V#Am?8G`9*%sovPY(#%b-|%%=<!3^ilmS_fNwdtvN%_ary>
zN%apg85dJ?bF*)#wWds9;2YgVNl2+$!f}2{Q(jJfLa!<Q+_|$ncej0pcie96rq9Z^
zNDr(B_MSNyyzJ1lr0s<}&{WfHR=3ul85bJU8?o57a8TencHb=>oJ)ZeTYvn_{Fyz&
zLORh6x9$CYZ;meP?E6Y&6|Z?jwfl=p6;F?2$8xSF%86Poy3EPBHBEe+d*Nzy+X896
zP=WKQscC;+uypCgqrv@G2Se2MR8YtM(OE8YsJrV2>}-S9PHLj#-f*R_*TB--YppB8
z=O1wLylJhy<{`Q@+InEJGsA1|9_nlSU433>3YpWqrLb@~3`NM{G2K3;D;l$L)X0}b
zGj*t=b$Iov&>nUwXdc$}WN&g#sQnptyP+)i-HbJF-^y8|Im?}z4xhDmj-Ttc+F+j}
z>L%;VcWX8i8eY6B09v}WQ?<$a#%*JK^LJl03<<1otay&8RX<8<Kk_@&-qKk?_FbyG
zedcT@JNpskiKLD1)aK@CWMroYv83nJ##)+Cq@#lf9OZ~Wi?};Dk)C6dk;y8!JHe55
zXd)j1ZH>jr0amK&0DM@K9Kc9IOH9j28Eu1A_r#<1Ja6eEJ?)S(D1d@It*kqg1mJ)s
z!ui}C>~RFByBy#rE|m2BhgcNA_fv&vCkHUr(&kfk#H0DdMZ`tKfGX}-S1>@HmQNOs
z!a#Lls=q;ye#rrBh(sr-sHmHpn}{1k#1U^T3X+kL5fuZAg26zN29V%^Bf{N*ID)_r
zh+h~mGy#dnIuWssIKCg4aD<}^Q4Rngjr0BPpM#T@)*tXV!fz~)_z-o6JBfls#6%q&
zME`6-AgZ{MKz?)RZ!HM=q{scDx@dx<3m%D9aYf^Z0)K_jMgJ$J{|^X~`d<K0$Uhu#
za>3jG<O78iMcbntNOKWLZiD{fvzmsM_8%5MIJCw(IQ_IDW$Q1RL@eh2;n|OopM3l|
z5|a5JxPKeRPi2ypmKGG|h;;eko(4<~K$3`{uqdcF2qY;jqbjYetPBQ$R7fe6R#j3_
zQBjprmQa$E5&x69297|4<B;gz&9OhsB@l2)1PTGfz~LaExTKgk5FsXk0m310F)$hq
z27{5{KSA8aV@ah9xBoj&AW{e!X(?$jpg2+-1r&#)q<{#p6apwCAqmEy5om}cLhL6L
z3JFzp#5=%AHGp-1TcbstaMnKuevk~kuB{;l0E_%m{VCD5hZ8X*15)E)aVSSO!he+Y
zu?}cGBK!x3AV~;FN?IHYkrso1q$PiO{nOqMjVF)__y;OTOa%Okk{`){lENX;3I9>v
zB!J)Jgev3FaH1n#-_g-t4)6nl?}z2juHcjXl?rt%fu!N_qfvfq6+N``uV249#~%B0
zh>!1QwL{^^Uy~5vu4vTHiAZ+8hLARJoHd%XEc{kRzss?IlP(D{kQiJVg94%uAW5LO
zxC{u0kQ9>wN{Yde5?}~YQVfImD>}guLv(}V(bug>k&>bzmF>@H_%8oOrqEyY-E7c5
zm=XhnfMPO0kfc5c1O-V##ianE|NZd5(g+k%0*wG7rKP2S;ur}DptO{X1P}v~Mv}&m
z;s}KFU)}xR2oDT_N=W}6o~-DPb?*0M%8LHq>He((U}!v+luK2-qr=Zk6NscW28#Mq
zi~d@+NfJ_@IoUW89SJs$PEb-L7;!WL1q4Ze5kL?~3I&vrBvFlqqa<Wxq##lf7|5>}
ze<A)|8HkIcB@rM}Z;6RRBuHf-E(t`)h>^&W0i(eX5DEkVfqn(_E1W+q<D?}1l94VC
zq^phSAD5foviqZ+|BJ8Rn&Q7W0}1-yN&XSP|I+m@UH^!If290xb^S}%KVsk?DgRqt
z|7&#7{%6CA#*uDE-ALQfAo=|dq^&F!;-(sm?D)s~am~{>l7z-d-Go3!M#u8wASX*n
z;~)vCi5gle)KfH!G-sjQw1jRlGKwG#*mZr<AGQ+Z?DTaQ?~R!tVW+}`VVZo5rvhwZ
zl;~9Sj8B=GJ`r;b@ZnnMH_h$dr7kThEi8=o!!8N}0s^Q&d_u8p&GPII3WdWkTFaQ7
z<%4>m<tgu4Ys}{eR0QZf2lCIS+)uElIQpcAM1BQcwZ^_%!`4lbDDtHSuZq>ACvU%h
z=U`e$uV}A5T|3+w3DWMYwCD$Q5cTL~1+aVy3Tm)6P@zO_3gYpGVsm}(NFfFNdH;hm
z<Rgyf>ctDGWGPfl&v|iiw7X^nI}5xSHGLRp0kmREI$`L~Fis=(C1CeVN#tVoG3;|)
z%t9M^k8UH46<HExE!j{##A;pa<jISK+NHF+>>QWT^_2VmUiIL*WQ9<_dhgFAX&c)+
zFrFmxqt{P*LfsjLqlxC7t)YAe^f#f&%7%a}s-P!kv9AGN*_<qN4La|K=Iz*DArpQg
z2s~<|@NZfyABR<bVE`<jxGflYoIPe>1n|0Fasm6y+7@ng@moKfAhl!Q@G@Ai2VZlI
za(+z+z*E{qAvDXE8k;ZC(=c|yN7Sk9b(L7G>tOZRL_ps#_Nm{NeTeTfrlMq_n}iX0
z(~gwmB^~OrdcbKtjkQsA&%|Rxz51g7%9rJO^|b-RbM5@O7t$R={S|Z@(~D2#1-#6B
zcrXZ5<`9mfWS?qq(P(yMDvX`FgFPuc&-6@vFm|(guJ}DzRJct5Y^r_B^;YLWXg^MU
z@Zf@l2Hg{3ihOmbSv^1ILJg(-<ideor=Z4Jy4SU@XZ%$R08cNB*b}A*s08)q^LeS}
w6}~5P(mqZ$sN{g;kpBG?k^e_U3{cmR9jpiC@(06=NF_?9p>hkBuVfYQKYw4y;s5{u

literal 0
HcmV?d00001