аЯрЁБс>ўџ ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџSLџџџџSџџџџS”џџџџ<џџџџџџN0{8E75D913-3D21-11D2-85C4-080009A0C626}џџџџ8€ўџџџџџџџ(џџџџџџџџџџ%џџџџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџпўЪџџџџџџџџxџџџџМАAttribute VB_Name = "ThisDrawingˆ" ˆBasˆ0{8E75D913-3D21-11D2-85C4-080009€A0C626} |@GlobalЮSpac’False dCreatablPredeHclaIdАTru BExposeTempla€teDeriv’BustomizD2џџџџџџџџ$$$ „/џџџџxџџџPX$ƒџџџџџџ0џџџџџџџџџџџџџџџџџџH0 „џџџџHџџџџџџ„Јƒџџџџџџ џџџџџџџџџџџџџџƒџџџџџџ(џџџџџџџџџџџџџџџџџџ >џџџџ`џџџџџџџџџџџџ|џџџџџџџџџџџџџ „џџџџаxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜џџџџаRoot EntryџџџџџџџџDтМЊыХ€ VBA_Projectџџџџ`рфђ7ѓПDтМЊыХVBA_Project_Version(џџџџџџџџџџџџVBAџџџџџџџџ`рфђ7ѓПгпМЊыХўџџџ§џџџ ўџџџ ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўџџџўџџџ ўџџџ !"#$%&'()*+,-./0123456789:;ўџџџ=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopўџџџrstuwўџџџxyz{|}~€acadID="{752D018A-5EF1-11D4-B112-00105A11B3C9}" Document=ThisDrawing/&H00000000 Module=Module1 Name="ACADProject" HelpContextID="0" VersionCompatible32="393222000" CMG="ABA9388AEA8EEA8EEA8EEA8E" DPB="6163F2F7F3F7F3F7" GC="1715841E8C6243634363BC" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisDrawing=0, 0, 0, 0, C Module1=132, 132, 807, 675, Z ngModule1Module1PROJECTwmџџџџџџџџџџџџv>PROJECTџџџџžThisDrawingџџџџqхModule1 џџџџџџџџ<+ _VBA_PROJECTџџџџџџџџџџџџS dirџџџџџџџџџџџџf__SRP_2џџџџџџџџџџџџўџџџt__SRP_3џџџџџџџџџџџџўџџџe_VBA_PROJECTџџџџџџџџџџџџўџџџdirџџџџџџџџџџџџўџџџ __SRP_0џџџџџџџџџџџџўџџџЈ__SRP_1џџџџџџџџџџџџўџџџnbВ€0* pH‚dф ACADProject8@е = t  xј|9( J< rstdole>stdole f%\*\G{00020430-;C 0046}#2.0#0#C:\WINDOWS\SYSTEM\c2.tlb#OLE AutomatioFn^€MSForms>BSFEr@ms3€DD452EE1-E08F-1 01A-8-02608C4D0BB4Dsystem32\FM20.DLL#Microsoft E‚: €] Ob­ Library/є;D1€„€tˆ€ƒˆ€00}#0‚€F#€0€r€ 89CD4EAB-50C5-11D4-B112105A110B3C9P.РOP\VBE\„G.exd /€с.E р….`PŒM ДС™Т”DТвсТ–ThisDrawi ngG€Thi€^DrawРng* 2 € HB1Ё%B,B дс"B+Bƒ‚oduPle1G„‚o@ЅuнBЅ1@ ТŠ2ODВ Oжс!HТICROSOFT SHARED\VBA\VBA332Ьamџ  фњ*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLL#Visual Basic For Applications *\G{1EFD8E85-7F3B-48E6-9341-3C8B2F60136B}#1.1#0#C:\Program Files\Common Files\Autodesk Shared\acax16enu.tlb#AutoCAD 2006 Type LibraryИ*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\SYSTEM\stdole2.tlb#OLE Automationо*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\system32\FM20.DLL#Microsoft Forms 2.0 Object Libraryф*\G{89CD4EAB-50C5-11D4-B112-00105A11B3C9}#2.0#0#C:\WINDOWS\TEMP\VBE\MSForms.exd#Microsoft Forms 2.0 Object Libraryс.E р….`ŒM Д  џџџџџџџџxј|9џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџвсThisDrawing1y44e5c9f1џџThisDrawingџџдс%џџModule11z44e5c9f1џџModule1џџжсВ џџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџœKЛТФ BИ'ѓs“[Пџџџџ|Йз›М"dL€ыžЌЧљЅИџџџџџџџџH€џ'AutoCAD"јVBAїтWin16С~Win32MacГВVBA6­# ACADProjectІдstdole“`MSFormsC ThisDrawingЙ5 €џџџ_EvaluateйModule1b ad_UnloadVBAџLPrefs€йAcadPreferencesі MenuDisplay‡! ApplicationЅ* preferences–DisplayDisplayScreenMenuЊB UnloadDVBшЃ AcadDocumentZџџTџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџ $џџџџФр всжсџџЖџџ№МдАџџџџФЌ всжсџџЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(<џџ<џџ< џџ<џџџџџџx€ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ „ „џџџџџџџџX%`„џџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџпўЪ#€ € €  € >(€ >h€ а€ .Ј€ <и€ €  € 8€ *@€ p€ Jx€ JШ€ :€ NX€ >Ј€ Pш€ P8€ .ˆ€ И€Р"Ш€а€ирј € џџџџ8€ $P€ NxШџџџџјрр ad_UnloadVBAрр7 This routine demonstrates how to unload a macro afterр7 it executes. The functional part of this routine isр' Developed for AutoCAD 2000 and above..р6 Demand load: -vbarun;ad_UnloadVBA.dvb!ad_UnloadVBA;рр version 1.00рр# CopyrightЉ2000-2006 ActiveDwg.comррC This routine is provided for demonstration purposes only and musttions рC not be used for critical applications without your verificationis rouр3 that this routine will perform as you intended.ongr рG This routine may be freely utilized for your own personal use so longouр8 as the entire contents of this header remain intact.d,рJ This routine is provided "as-is" and no declaration, written or implied,рJ is made as to its reliability for any particular task. Any use of thisр' routine is solely at your own risk.рЭџџ№–]ђ@]ђ`э ! !".џџЈ "!$!&'  !$(&  !$(&!(Ж UnloadVBA.dvbA@ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(рYou can also use 'SendCommand'@рH ThisDrawing.SendCommand "_vbaunload" & vbCr & "UnloadVBA.dvb" & vbCroџџшр the last code line.џџџџџџџџuГAttribute VB_Name = "Module1" ' ad_Un€loadVBALThis routine demonstrates how to ub a macro afterš it execъs. The functional pa€rt of t _is9t,last code l{.Developed for AutoCAD 2000 an€d above)mЭ: -v@barun;‰p.аdvb! ;1‚2vers€R 1.00… Copyr ightЉ6-6 AfveDwрg.com ˜€Рprovid„X /purposЅonly`mus t$ not be uscritic€œapplЃs withЮ your €[if „"tha"t‹Бwil@_er!Pm asA ipntenР(ƒNJ0m„ay!freeР(1€lizD$Тow8n pРKu+ sРo longФСrentire@s ts~header remaibn!act!‰Q"@as-is"‚Knbo€ЄclaЄРS,, wРH@2 Р†imБ@Ied,Ф!@m€ <РЌi€ reli€ability“ˆanyЅicu task. A?5Њ…УsoЮlСEYFCri@@  Opi ExElivSub й() СzDim €Prefs A€caderen ce@ФEMenu`Displ€dР BoРanCSetD=@кisDra@wing.A‹.Np Š = Ш.гФ хScР?nСЃ зb—`‹N W(ш уЃ“DVB "•Сx!˜You Рcan al Pa6Ф'S`ZComс€у›Ц J#Ш "_„#™" & vbCrРŒ  End @9 End @9 eatablA†Fa№ФдџџџџЫвсдсџџ#ˆЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџThisDrawingThisDrawingModule1Module1џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(