аЯрЁБс>ўџ ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџUserForm1џџџџpkTщЭХPЃѕХfџџџџџџџџџџџџŠoџџџџДCompObjџџџџџџџџaThisDrawingThisDrawingModul1Modul1UserForm1UserForm1ўџџџrU€€€ A i ‘ џџџџ 4Й сс џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџV`џџЈ`№Рџџџџ џ<фjxьzАџџ#ˆЖџџRoot Entryџџџџџџџџ0S щХ€NVBA_ProjectџџџџF—PЬХ0S щХVBA_Project_Version(џџџџџџџџџџџџVBAџџџџџџџџ™PЬХ™PЬХ!"§џџџ ( ўџџџ#$%&')ўџџџ*+,-./01ўџџџ3456789:ўџџџ<=>?@ABCDEFGўџџџIJKLMNOPўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўџџџП   !"#$%&'(ўџџџ*+,-./0123456789:;<ўџџџ>?ўџџџўџџџBCDEFGHIJKLMNOdQ*STUVWXYZ[\]^_`abc@efghijklmnopqrstuvwxyzўџџџџџџџџџџџџџџџџџџџџџџџacadID="{33DB7B49-7F0A-4C8A-B66D-0D728EBE632C}" Document=ThisDrawing/&H00000000 Module=Modul1 Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=UserForm1 Name="ACADProject" HelpContextID="0" VersionCompatible32="393222000" CMG="ACAEA1F8A73FAB3FAB3FAB3FAB" DPB="EFEDE2B966BFA8C0A8C0A8" GC="32303F7E837F837F7C" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisDrawing=0, 0, 0,PROJECTwmџџџџџџџџџџџџРYPROJECTџџџџThisDrawing џџџџ)Ц__SRP_2џџџџџџџџџџџџІ  0, C Modul1=44, 44, 883, 592, UserForm1=88, 88, 783, 629, , rU€€€€~~~~~u џџџџџџџџџџџџ    ЉA“K*mџџџџrU€€€~~~~~~~~~~~~~~~~~B gŽђm,кљJЃuв bЭл фџџџџƒŠe  џџџџџџЙˆa __SRP_3џџџџЄТ Modul1 џџџџџџџџH___SRP_5 џџџџRЈ__SRP_4џџџџџџџџџџџџPl_VBA_PROJECTџџџџџџџџџџџџ2’dirџџџџџџџџџџџџЊ__SRP_0 џџџџ ( __SRP_1џџџџџџџџ і9џџџџpџџџџ)џџйƒ€a љ џџџџщ ! Q  Б с џџёбщ с ThisDrawingModul1 UserForm1 ACADProjectяРF /C:\PROGRA~1\GEMEIN~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA 1џџџџ YС0тС”РЦWв…у  Ц&:C:\Programme\Autodesk Architectural Desktop 3 Deu\ACAD.TLBAutoCAD )џџџџQб@0РFC:\WINNT\system32\stdole2.tlbstdoleImageGImageB AџџџџiБPс.E р….`ŒM ДC:\WINNT\system32\FM20.DLLMSForms aa‰Щ`=§МЋСЃA р&ІВ€0* pH‚dф ACADProject8@е = t  LЊwC( J< rstdole>stdole f%\*\G{00020430-;C 0046}#2.0#0#C:\WINNT\system32\c2.tlb#OLE AutomatioFn^€MSForms>BSFEr@ms3€DD452EE1-E08F-1 01A-8-02608C4D0BB4DFM20.DLL#Mic€rosoft ‚9" €\ ObЌ Library/њ;C1€„sˆAˆ00}#0‚#G€j0Ѓ…РB1BCFD3D-C1AB-41A3-A006Р9@651367A36DOKUME~1\NANCYALOKALTemp\VBE\сT.exd <Р!€с.E р….`ŒM ДEAІBЁТzBЃThisDrawingG‚€Thik€DrawР ng 2 Ђ€HB1‚­`ђB,QB А"B+B‚БModul1GE‚БMРdu€Б17€ЙC2NЯRQЯ{Ж!Ъ @UиserŽ€Р=žeР=…ЌŠ 2“ IO Y/ƒј#()@ уb*\G{C094C1<фjxьzАџџ#ˆЖџџџџџџџџ<џџў-Y€эAC’иuСzcйuŽ!=в…Ф  Ц&‡Ъ Mі:FžœYMJŠэџџџџџџџџџџџџx‡Ъ Mі:FžœYMJŠэў-Y€эAC’иuСzcџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ6"џџџџџџN0{8E75D913-3D21-11D2-85C4-080009A0C626} џџџџ €ўџџџџџџџ(џџџџџџџџџџ%џџџџƒўџџџџџџџ`џџџџџџџџџџџџџџ %‚ џџџџўџџџџџўџџџџџџџџџџџ %џџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh8@ttџџџџџџџџџџџџџџџџџџџџџџ0LЊwC $*\Rffff*1J4377ab47пџџџџ4ўЪ€€ џџџџџџџџЭџџxџџџџpџџџџаАAttribute VB_Name = "ThisDrawingˆ" ˆBasˆ0{8E75D913-3D21-11D2-85C4-080009€A0C626} |@GlobalЮSpac’False dCreatablPredeHclaIdАTru BExposeTempla€teDeriv’BustomizD2Option /licit osoft Forms 2.0 Object Librarћќњ hЇ8+3qЕРG?,2qЯ”ЊЇLа‰Бџџџџ‰`ик:]7DЁГ<я„ИNg$c?_G–AЃ В$ б џџџџœ а ƒThisDrawin4џџЩ krawingџџАA Aˆx€йБё iй ЩёAџџџџy4Aaiбббџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8AaЩвввџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ<Aaсгггџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@Aa дддџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ D)Qеее`Щџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ H)qжжж`‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ L)‘ззз`Iџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ PБЁйиииЈ§џџ` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџT С) џџџџџџџџџџџџњџџџ` џџџџџџџџџџџџџџџџrU€€€ џџџџџџџџ$`§џџџџџџџџџџџn4AarU€€€€~|  ) Q y Ё Щ ё ё  ‘ i A А а<єыѕ<џІєыѕ<џІєыѕ<џІ4џ$ Q4џ0џ&4џєѕ0џ l4џ=§я4џ44џєы9<џM џ %0џ ˆl4џ=[џѕdџќЈ)4џџdџYџџ: џ %_ $ѕ_ T _ 4ѕdџAX ,єыѕ<џІ&4џєѕ0џ l4џ=§я4џ44џєы9<џM џ %0џ ˆl4џ=[џѕdџќЈ)4џџdџYџџ: џ %_ $ѕ_ T _ 4ѕdџAX ,єыѕ<џІ&4џєѕ0џ l4џ=§я4џ44џєы9<џM џ %0џ ˆl4џ=[џѕdџќЈ)4џџdџYџџ: џ %_ $ѕ_ T _ 4ѕdџAX ,єыѕ<џІєыѕ<џІ&4џєѕ0џ l4џ=§я 4џ44џєы9<џM џ %0џ ˆl4џ=[џѕdџќЈ)4џџdџYџџ: џ %_ $ _ 4ѕdџAX ,ќcќј0џєџч$ $  $ Д ( џ% $ў €t<€h0џdџ0џRЄ<џЄ’џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџeWW—з„Pl§œxџ$ xџ "X , " X , " X , " X ,P$ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЅAЇЈЉЊўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџОўџџџўџџџСўџџџУФХЦўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџмнопрс=џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџz8"pџtџ! Јtџ <lpџќќ№zџtџ%ќрzџќєє^ tџ! ˜tџ 0tџšѕѕlџўŽ€ќрzџќѓ€а§ј\џќlџ(Lџ€ѕllџRќрzџќѓџа§ј<џќlџ(,џџѕllџRќрzџќѓџЦ§јџќlџ( џѕllџRlџќў lџZќўќќ№zџ5ќўќрzџч" X Ttџ$ dtџ € tџpџ" X Plpџџџ  А n€8$ tџќўlџCœd;tџxџ! Єxџ <єltџфє^ pџ! ”pџ 0)xџpџxџ$ dxџ € xџА F d$ xџpџœd;tџxџ!  xџ <єєltџф^ pџ! pџ 0)xџpџxџ$ dxџ € xџА E d$ xџpџœh!єєє^ xџ! xџ 0xџ!єєє^ xџ! ”xџ 0xџ!єєє^ xџ! ˜xџ 0xџh$( xџЬŒktџxџ!  xџ <lџpџ! Єpџ <dџhџ! Јhџ <ldџфllџфltџф^ `џ! œ`џ 0)xџpџhџ`џxџ$ dxџ € xџŒ$! xџpџhџ`џPLHDT0pdateвќџџ`џџcџџdџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ 6џџџџџџџџџџфдюл zƒјџџˆЖџџџџџџџџџџџџјyЈ НOцu@бoЎ•šWЭ B@` @B@` BB@` FB@`џџџџ@ !ЊB@ЌCoЌЌ ~!’$@ B(V !ЊB@Ќ !ЊB@ЌЌ |!’Ќ$@ @(V x!Œ F(V z!’ЌЌ$@ >(V !ЊB@Ќџџџџџџџџ2ВAttribute VB_Name = "UserForm1" " €Bas€0{CD571F9A-3C20-4763-B92B- FC 26DB5}{D85BA356-C7C1-€46DA-8DE37F2E8C 98A8} dGlobal‹Spa‚coFalse ŠCreatablPredeclaIdдTru BExpose0Templat@eDeriv–C€ustomiz‹D€Option 0licit P€"€& Sub CommandButton1_Ck() Unload M€U€RHatch.DeletƒGŽBŽACC1End9@ScrollBarB€_Change„ImageB.BackColorNRGB(0, € .ValueC,ФЅ ThisDrawing.App€>aСJ.Up–d€GТ@cB$ н.кGа.Gб..G.@3ПУ.DSЬ.– џ.†Rа.ўRЮ.‡ .Ц.Ф†Щ.™ џ.Ѕ‚_InitipalizЊFЏЃF0џC-"KВ3СhЕOс(BПсhEAWЂ U?( †$ћ†A&BЃ,€Ah%+o Н)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџrU€€€ џџџџџџџџ@nџџџџ0џџ$ џџ0<8џџ< џџ<џџ<66, 66, 761, 607, C VBFrameџџџџџџџџџџџџ %UserForm1џџџџџџџџџџџџ;э__SRP_6џџџџџџџџџџџџТ__SRP_7 џџџџНBџџџџџџ<џџў-Y€эAC’иuСzcйuŽ!=в…Ф  Ц&‡Ъ Mі:FžœYMJŠэџџџџџџџџџџџџx‡Ъ Mі:FžœYMJŠэў-Y€эAC’иuСzcџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ6"џџџџџџN0{8E75D913-3D21-11D2-85C4-080009A0C626} џџџџ €ўџџџџџџџ(џџџџџџџџџџ%џџџџƒўџџџџџџџ`џџџџџџџџџџџџџџ %‚ џџџџўџџџџџўџџџџџџџџџџџ %џџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh8@ttџџџџџџџџџџџџџџџџџџџџџџ0LЊwC $*\Rffff*1J4377ab47пџџџџ4ўЪ€€ џџџџџџџџЭџџxџџџџpџџџџаАAttribute VB_Name = "ThisDrawingˆ" ˆBasˆ0{8E75D913-3D21-11D2-85C4-080009€A0C626} |@GlobalЮSpac’False dCreatablPredeHclaIdАTru BExposeTempla€teDeriv’BustomizD2Option /licit ўЪ*€€"€( `йuŽ!=в…Ф  Ц&ў-Y€эAC’иuСzcйuŽ!=в…Ф  Ц&‡Ъ Mі:FžœYMJŠэсXh—{ а‰п€_ТћК AcadDocument @…ЙЂЙ(вЖx`А‡т5 SOLIDˆ%“^чџбЖI`А‡т5Дд()“ЪбЖ`А‡т5ЂюW[šЪбЖ`А‡т5 юW[šЪбЖ`А‡т5йuŽ!=в…Ф  Ц&йuŽ!=в…Ф  Ц& A џџџџ 0C’YL&i™’ eЦљVBE6.DLL б џџџџL @УYl†ЯЋ|ЊРЯ#=џџџџXЭџџx–Hoџџh] ђ№ђђ@ђhs an a !,ѕэ 2Ќ76Ќ2 @B@:B@8  BB@8  @B@8q]ЌЌђЌЌ+2FЌЌ+2FЌЌ+2H.hэЌЖSOLIDЌ7.B>э 2Ќ76Ќ2  >B@8ЌЌ+2Ќ$B@`Ќ$B@`  FB@8 >B@:ЌЌЌ+2э 2Ќ76Ќ2%6 X B(V F FB@:outerbЌЌ+2FЌЌ+2З B@< hat Z @(V BB@:las]ЌЌђиэ 2Ќ76Ќ2Ќ$B@`эЌЖSOLIDЌ7.@<эЌЖSOLIDЌ7.>=эЌЖSOLIDЌ7.Fb \ >(VuaЌ$B@`рBlauclaрGrќnde>рRothisрACCng.џџџџаA@ЂџџџџЌ bB@ЄЌџџџџHџџџџ ВAttribute VB_Name = "Modul1" Option Explicit Pub$ RHatch As AcDad, G(B(ACC v Sub vgl() Dim dummy(0 To 0).Entity$cen(ter%2%Do-Ђe!)д0:j 12= 0With ThisDrawing.€„elSpac„( 'Blauƒ Set „p= .Ad…(0, "SOрLID",€] j@CircleЂ(L, 1 *.AppendOЯrLoop (ƒ‚Colorq`acBluTƒK.€Evaluat A…@.Dele 'АGrќnE* J5‰/„xџ:Щ:н:D Ч:G8reeF,D%;RoыРВš …8Щ:ФИџ:Щ:н:D Ч:Red…&Фe:€кEDuг=ќ 3KУŠ<ЁsПA_eI?`OКY ]A pEnd Ёt‚)uR€egen Tr`€ZoomExtРƒsBUserForm1.showс}! РŽ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ  ўџџџўџџџўџџџўџџџўџџџ !"#$%&'()л+,-./0123456789ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ<фjCЗzАџџ#ˆЖџџџџџџџџџџџџg„H1ИжНKƒrд.-њ\йuŽ!=в…Ф  Ц&к5і q=B€&. NЗџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ<џџџџџџN0{8E75D913-3D21-11D2-85C4-080009A0C626}џџџџ €ўџџџџџџџ(џџџџџџџџџџ%џџџџƒўџџџџџџџ`џџџџџџџџџџџџџџ %‚ џџџџўџџџџџўџџџџџџџџџџџ %џџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh8@ttџџџџџџџџџџџџџџџџџџџџџџ0LЊwC пўЪ€€ џџџџџџџџЭџџxџџџџpџџџџаАAttribute VB_Name = "ThisDrawingˆ" ˆBasˆ0{8E75D913-3D21-11D2-85C4-080009€A0C626} |@GlobalЮSpac’False dCreatablPredeHclaIdАTru BExposeTempla€teDeriv’BustomizD2Option /licit VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} UserForm1 Caption = "UserForm1" ClientHeight = 2685 ClientLeft = 45 ClientTop = 330 ClientWidth = 4875 StartUpPosition = 1 'Fenstermitte TypeInfoVer = 15 End ўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9Вq žž žž žž E” HџиЇHџиЇHџиЇ(€CancelGBD{u€ЅTahomaGB$ €}—!€Xˆ$х€ ImageRGBЇЇ$х€ ImageGGBEЇ$х€ ImageBGBтЇ$х€ ImageRGB'Ї(х €/ScrollBarRtoЇь (х €/ScrollBarGtoЇg (х €/ScrollBarBtoЇт,х€8CommandButton1'gЃ 2C:\DOKUME~1\NANCYE~1\LOKALE~1\Temp\VBE\MSForms.exd Љ) ЉБ( ‘  8 щЙ H`9aaЩpvgl  WќСѓоЕKЄbZŠ@ЙЧBјyЈ НOцu@бoЎ•šWЭ "џџџџ”џџџџLџџџџLџџџџš"џџџџLџџџџš џџџџLџџџџLџџџџLџџџџџџџџ џџџџLџџџџџџџџ@BFџџџџџџџџ@ўџџџџџxџџџ џџ џџџџџџџџИџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџX H   И џџџџp џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ џџџџџџџџ~@vАBџџџџ@ўџџџџџtџџџ џџ џџџџ@ўџџџџџpџџџџџ џџџџ€ўџџџџџlџџџР џџџџ@ўџа \џџџ џџ џџџџ@ўџш Lџџџ џџ ј@ўџ <џџџ џџ џџџџ@ўџ ,џџџ џџ џџџџ@ўџ0 џџџ џџ ic@ўџџџџџ џџџ џџ SO@ўџџџџџќўџџ џџ PRџџџџxЈџџџџџџџџџџџџџџџџhџџџџџџџџ0џџџџџџџџџџџџјШ`ШАџџџџџџџџџџџџџџџџџџџџџџ LЊwC $*\Rffff*2X4377aea0*\R0*#1e*\R1*#f4*\R1*#f2$*\Rffff*1J4377ab47*\R1*#5c$*\Rffff*1E4377aac9ђ*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\WINNT\system32\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#4aђ*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\WINNT\system32\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#4f*\R0*#13*\R0*#1d*\R1*#58*\R0*#14п б4в8г<д@еDжHзLиPџџџџTўЪ.€€ џџџџ"8 H X h x ˆ@€ џџџџ" €8 "x%ˆ4š@ А РјЈ€ џџџџ";€€ 0ар € џџџџ";`€ 0№а0€ џџџџ"(!А!8!а0€ џџџџ"X&k€ $Ј №џџџџЭџџx–`o–oџџ–ЈoџџHЌЌЌ$@ t(Œgb(RHa–h z!’ЌЌ$@ r(Œ4Ќ |!’Ќ$@ t(Œd–HoЌЌЌ$@ r(ŒЌЌЌ$@ v(Œ 0 oџџшA@A@ z!’ |!’ ~!’$@ x(ŒA@–Јoџџ˜ џџA@rria >B@` @B@` BB@` FB@`џџџџ@ !ЊB@ЌCo Ў B(V!’[й B!Vж !ЊB@Ќ !ЊB@Ќр*RHatch.Color = RGB(ScrollBarR.Value, 0, 0) !ЊB@Ќџџџџ]ђИ ЎЌ€ Ќ€ ЎЌџ Ќџ ЎЌџЌ$А'Ў7689 ~!’'Ў ЌЌЌ Ў$@ v(ŒџЌрACC.Color = ImageRGB.BackColori577р*GHatch.Color = RGB(0, ScrollBarG.Value, 0)џџџџшџџџџВAttribute VB_Name = "UserForm1" " €Bas€0{CD571F9A-3C20-4763-B92B- FC 26DB5}{D85BA356-C7C1-€46DA-8DE37F2E8C 98A8} dGlobal‹Spa‚coFalse ŠCreatablPredeclaIdдTru BExpose0Templat@eDeriv–C€ustomiz‹D€Option 0licit P€"€& Sub CommandButton1_Ck() Unload M€U€RHatch.DeletƒGŽBŽACC1End9@ScrollBarB€_Change„Dim inde€x As By C= G .ValСSР(ImageB.BackColorРZRGB(0<, €BC6wiР4(ƒ< 128,E255, ыC=0ƒ„;…‚BNThisDrawing.Ap pРTaa.UpdР]‚Debug.Б@bnt ЩcТAД ]LGKL‚?G‘?нFKGCKDƒ0'qŒKзж `6%/R/RŽ&~R&‡dR‰љŸ œЅ‘_Initi№alizЅUb/ЯCOџфEї3С2bUXсhBџсwAf"Р]_(‡gЦAэЦ&BУ,€'awE+ н)&№дШџџџџ  Lz{ЖџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџLџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@> џџџџ0џџ$ џџ0џџџџš"џџџџLџџџџ”џџџџLџџџџџџџџLџџџџLџџџџџџџџLџџџџPџџџџPџџџџLџџџџ*LџџџџLџџџџš"џџџџ\F@ўџ4џџџ џџ Шџџџџўџџџџџ0џџџЈ`№@%џџџџ@ўџ џџџ џџ ј „џџџџdџџџ8R „2џџџџ<џџџ ’№% ^џџџџ`џџџџџџџџџkџџџџџџџџџџ((„%@ўџџџџџџџџ џџ %@ўџџџџџџџџџџ %XЂbџџџ џџ %Њ€?џџˆ@џџџџџџџџЊ€A@џџЈ@џџџџџџџџЊ€ChџџШ@џџџџџџџџЊ€Gџџџџ џџш@џџџџџџџџџџџџџџџџџџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџpџџџџџџџџРџџџџАџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџаАџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџАџџџџpџџџџџџџџџџџџџџџџџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџАџџџџpџџџџџџџџџџџџџџџџџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџˆџџџџpџџџџxџџџџ€@ўџџџџџџџџ џџ џџџџџџџџpHџџџџ№џџџџџџџџџџџџHџџџџhџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8LЊwC $*\Rffff*1E4377aac9*\R1*#cf*\R1*#c2$*\Rffff*2X4377aea0*\R1*#f4*\R1*#10e*\R1*#f2*\R1*#6*\R1*#58*\R1*#5c*\R0*#13*\R1*#7d*\R1*#5c*\R1*#7d*\R1*#5b*\R1*#5a*\R1*#59$*\Rffff*1J4377ab47пўЪ*€€"€€ 2*А 8€ и&ш4˜x ј H€ ш8&X4(ˆ И hX€ јˆ&x4H( H xH€  Ш&˜4h ИШ˜ ш 0џџџџhЭџџx–Hoџџh] ђ№ђђ@ђhs an a !,ѕэ 2Ќ76Ќ2 @B@:B@8  BB@8  @B@8q]ЌЌђЌЌ+2FЌЌ+2FЌЌ+2H.hэЌЖSOLIDЌ7.B>э 2Ќ76Ќ2  >B@8ЌЌ+2Ќ$B@`Ќ$B@`  FB@8 >B@:ЌЌЌ+2э 2Ќ76Ќ2%6 FB@:outerbЌЌ+2FЌЌ+2З B@< hat X B(V BB@:las]ЌЌђиэ 2Ќ76Ќ2Ќ$B@`эЌЖSOLIDЌ7.@<эЌЖSOLIDЌ7.>=эЌЖSOLIDЌ7.Fb Z @(VuaЌ$B@`рBlauclaрGrќnde>рRothisрACCng.џџџџаA@ЂџџџџЌ bB@ЄЌџџџџH \ >(V$@џџџџ8џџџџˆџџџџ ВAttribute VB_Name = "Modul1" Option Explicit Pub$ RHatch As AcDad, G(B(ACC v Sub vgl() Dim dummy(0 To 0).Entity$cen(ter%2%Do-Ђe!)д0:j 12= 0With ThisDrawing.€„elSpac„( 'Blauƒ Set „p= .Ad…(0, "SOрLID",€] j@CircleЂ(L, 1 *.AppendOЯrLoop (ƒ‚Colorq`acBluTƒK.€Evaluat A…@.Dele 'АGrќnE* J5‰/„xџ:Щ:н:D Ч:G8reeF,D%;RoыРВš …8Щ:ФИџ:Щ:н:D Ч:Red…&Фe:€кEDuг=ќ 3KУŠ<ЁsПA_eI?`OКY ]A pEnd Ёt‚)uR€egen Tr`€ZoomExtРƒsBUserForm1.Showс}! РŽ