аЯрЁБс>ўџ ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ<џџџџџџN0{7AABBB95-79BE-4C0F-8024-EB6AF271231C}џџџџ8€ўџџџџџџџ(џџџџџџџџџџ%џџџџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџпўЪ€€ џџџџџџџџЭџџxџџџџpџџџџаАAttribute VB_Name = "ThisDrawingˆ" ˆBasˆ0{7AABBB95-79BE-4C0F-8024-EB6AF2€71231C} |@GlobalЮSpac’False dCreThisDrawingThisDrawingModule1Module1isatablPredeHclaIdАTru BExposeTempla€teDeriv’BustomizRoot Entryџџџџџџџџ@bлeмVЩ@"VBA_Projectџџџџ TФ•q?Р@bлeмVЩVBA_Project_Version(џџџџџџџџџџџџVBAџџџџџџџџ@ѕЫ•q?Р€зeмVЩ§џџџ ўџџџ ўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўџџџўџџџ ўџџџ !"#$%&'()*+,-./0123456789:;<=ўџџџ?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvўџџџxyz{|}~€acID="{D3D7A700-AB3C-11D4-B112-00105A11B3C9}" Document=ThisDrawing/&H00000000 Module=Module1 Name="ACADProject" HelpContextID="0" VersionCompatible32="393222000" CMG="87852EA932B7BDBBBDBBBDBBBDBB" DPB="0E0CA732A93E313F313F31" GC="95973CC7444F454F45B0" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisDrawing=0, 0, 0, 0, C Module1=-10, 50, 751, 545, Z odule1Module1PROJECTwmџџџџџџџџџџџџ†>PROJECTџџџџЅThisDrawingџџџџwModule1 џџџџџџџџ>$_VBA_PROJECTџџџџџџџџџџџџЃ dirџџџџџџџџџџџџ’џџџџџџџџџџџџўџџџџџџџџџџџџџџџўџџџgџџџџџџџџџџџџўџџџџџџџџџџџџџџџўџџџџџџџџџџџџџџџўџџџaџџџџџџџџџџџџўџџџnŽВ€0* pH‚dф ACADProject8@е = t  џDК:( 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Ї€‰€ 6F087438-4CEA-408D-BA53-9932C9F EFB0BH.DOCUME~1\WALTER~1.ARB\LOCALS@Temp\VBE\DM.exdр4Р"€с.E р….`PŒM ДŸ‚šDТƒ‚œThisDrawi ngG€Thi@dDrawРng* 2 € HB1ТІEB,B "B+BCˆoduPle1GDˆoЋuнЋ1@ ‚2ODF O!HТMICROS~1\VBA\VBA6\VBE6.DLLVBA !Ь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{6F087438-4CEA-408D-BA53-9932C9FEFB0B}#2.0#0#C:\DOCUME~1\WALTER~1.ARB\LOCALS~1\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Libraryс.E р….`ŒM Д  џџџџџџџџџDК:џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџƒThisDrawing014abdcef9џџThisDrawingџџEџџModule1024abdcef9џџModule1џџF џџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџšsјz/@ВU… †~Коџџџџ=‡Џ П‘ФD’ Ѕ№няЌџџџџџџџџH€џœ'AutoCAD"јVBAїтWin16С~Win32MacГВVBA6­# ACADProjectІдstdole“`MSFormsC ThisDrawingЙ5 €џџџ_EvaluateйModule1b ad_AddWordоR adTextObj}* AcadObjectЅholdStrќpstrLenя adBasePnt– adObjSelГ_exitsubК*Utility1J GetEntityˆ ObjectNameуФ TextString Updateвќ AcadDocumentZџџTџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџ $Microsoft Form№дАџџџџ @ ƒџџЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(<џџ<џџ< џџ<џџџџџџџџџџШ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ„ „џџџџџџџџXop%`„џџџџџџџџџџ(`„ џџџџџџџџџџstri`„"џџџџџџџџ џџas d`„$џџџџџџџџџџ 200џџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџпўЪ*€ € €  € B(€ $p€ 4˜€ 8а€ € € (€ *0€ `€ Jh€ JИ€ :€ NH€ >˜€ Pи€ P(€ .x€ Ј€А"И€Р€Ш€а€и€р€ џџџџш №22@xˆ И Ра€ирџџџџ№рр ad_AddWordрр; This routine demonstrates the insertion of new words intoр an existing text string.р. It was developed for AutoCAD 2000 and above.р2 Demand load: -vbarun;ad_AddWord.dvb!ad_AddWord;рр version 1.00џџџџрр# CopyrightЉ2001-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 that this routine will perform as you intended.р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.<џрЭџџH–]ђ@]ђ`]ђx]ђ]ђЈЌ'$ $ЌbЩ&ј  "ЖSelect Text to Update>> !(B@* !,ЖAcDbText !,Ж AcDbMTextœ !.'  !. $м' ЖNEW (.kџџ@ B@0Йџџ(Ѓ& oџџџџџџџџџџкГAttribute VB_Name = "Module1" ' ad_Ad dWordDThis routine demonstrates the insertion of@ new wts),tož Єn exis~g text ?ing.It wasWveloped for AutoCAD 2000 and abˆove0Demload: -€vbarun;Ж .dvb!;e!hversS1.00… Copyr ightЉ€41-9 ActiveDwg.comЁ‡provid„V‡‰/purp„os€Žonly^0must$€„ not be uscriticaРl applЄ@s with€З your €[ifУ „"thatОЫwill per9žm Ї€СenG€Q›Š`may!freeР(@vliz#D$ТownAson€&+ so l8ongФ~entire con*t€s€tСŠhe@ader rjibn!act!‰Q"@as-is"‚Knbo@ƒclaИРS,, wРH Р…imБ@Ied,Ф!@m€A>  ЁaI6f „$.Ѓ#Х’Ac„Db!" OršBMЃThen SС‹(=  (&.?#-B4e0Aft}r,Ф f ЉE &  "NEWE@—