╨╧рб▒с>■  ■                                                                                                                                                                                                                                                                                                                                                                                                                                                     ME          ▀                                                                                                                                (<  <  <   <          р                                 Д Д        X└%`Д          s`Д           er. @Д"           layo`Д$          `Д&           oped                                                                                                 ▀■╩.А А А  А H(А JpА 4└А B°А @А HА `А *hА ША JаА JЁА :@А NАА >╨А PА P`А .░А рА     "БшБЁА°ААААRoot Entry        `/FтV╔#VBA_Project    @,xe╘┐`/FтV╔VBA_Project_Version(            VBA        @,xe╘┐╨╝-FтV╔¤     ■   ■   ■                                                                                                                                                                                                                                                                                                                                                                                                                               ■   ■    ■    !"#$%&'()*+,-./0123456789:;<■   >?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz■   |}~АacID="{6B5AA043-4036-11D4-B111-00105A11B3C9}" Document=ThisDrawing/&H00000000 Module=Module1 Name="ACADProject" HelpContextID="0" VersionCompatible32="393222000" CMG="FAF8823ED442D442D442D442" DPB="484A30C331C331C3" GC="9694EE4272DEC1DFC1DF3E" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisDrawing=0, 0, 0, 0, C Module1=-46, 2, 772, 757, Z ingModule1Module1PROJECTwm            Л>PROJECT    ЬThisDrawing    {хModule1         =Si▓А0*Р pHВdф ACADProject8@╒ = t  J2<( 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-02608C4D0BB4 Dindows\system32\FM20.DLL#MicАrosoft В:" А] ObБн Library/·;D1АДАtИАБAИА00}#0ВА#гА0РАrА A6D3A0D4-3E06-1B1АB111105A11B3C9РP└OP\VBE┬\ДG.exd /Ас.E ПрЕ.`МM К┤┴Щ┬Ф┬▌C┬ЦThisDrawingGА_VBA_PROJECT            ╢ dir            m__SRP_4            ■   __SRP_5            ■   @ThiА^DrawA└ng 2E АHB1┴б%Bв,B ▀C"B+BГВodule1кGДВo@еuBе1@ █┬К2O╧M(бC!H┬\PROGRAM FILES\COMM╠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{851A4561-F4EC-4631-9B0C-E7DC407512C9}#1.0#0#C:\Program Files\Common Files\Autodesk Shared\acax17enu.tlb#AutoCAD 2009 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{A6D3A0D4-3E06-11D4-B111-00105A11B3C9}#2.0#0#C:\WINDOWS\TEMP\VBE\MSForms.exd#Microsoft Forms 2.0 Object Libraryс.E ПрЕ.`МM ┤          J2<                                                             ▌CThisDrawing2?4abdd8de  ThisDrawing  ▀C%  Module12@4abdd8de  Module1  бC       8                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                        ╙*%9? FОщД>2м╠▒    +mЛXL╕^2TwK         HА H(AutoCAD"°VBAўтWin16┴~Win32Mac│▓VBA6н# ACADProjectж╘stdoleУ`MSFormsC ThisDrawing╣5 А   _Evaluate┘Module1bad_PlotToFolder▓┐ adPlotLayoutzй AcadLayoutИЕadStrMsg  adStrTitleчj adResponse% adFolderName░adResultGXLayouts╛▄Count0vMsgBoxЧRvbYesNoЭStrTitlevbYesa? ActiveLayout∙\PlotX╣ PlotToFileлв AcadDocumentZ  T                                                         $ А   _BЁ╘░    $ ▌CбC  ╢                        xА А     Б<(Б"hБРБ иА ,╕БшБББ 0Б@БXБ`БhБpА         Арр ad_PlotToFolderррB This routine plots all paperspace layouts in the current drawingрC to a specific folder. It uses the current layout plot settings.р. It was developed for AutoCAD 2000 and above.р< Demand load: -vbarun;ad_PlotToFolder.dvb!ad_PlotToFolder;      рр version 1.00    рр# Copyrightй2000-2009 ActiveDwg.com      ррC This routine is provided for demonstration purposes only and must      рC not be used for critical applications without your verificationИ─3Ир3 that this routine will perform as you intended.Й4ЙрG This routine may be freely utilized for your own personal use so longЗр8 as the entire contents of this header remain intact.Зр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.ИрЦ╔]Є@]Є`]Єx]ЄР]Єи]Є└╢Plot !(!*м ╢ Layout(s) to File?'╢Verify Create Plot File(s)'         . 0$,'"   " 2Ь    р&Reset adFolderName to an existing path    ╢ C:\Plots\'$        ■ !(У       !╢ModelЬ    (4     $ !6%8'&  k  а ╟Шk  Рo  И    А    1┤Attribute VB_Name = "Module1" ' ad_PlotToFolderXThis routine p@s all paperspa@ce layb╡el"─AВяaЙ,уПД =jЕ A╡uа8=К.Б┐@┐1@('b&Б E л