Въртене на обекти около техния собствен център в AutoCAD
Да речем, че трябва да завъртите няколко обекта наведнъж в AutoCAD, така че те да се въртят около собствения си център, тоест те по същество остават на мястото си и се обръщат или с главата надолу на 180 °, или под всеки друг ъгъл.
Стандартният начин за завъртане на обекти в AutoCAD ви позволява да ги завъртате само около един център или ако става въпрос за блокове или текстове, можете да зададете определен ъгъл на завъртане за целия набор от обекти, докато завъртането ще се извършва около точката на вмъкване. Тази ситуация се наблюдава особено добре при работа с топографски планове, когато, да речем, работите в CREDO и след това импортирате плановете в AutoCAD. След като сте разглобили всички надписи, комуникационни етикети, релефни знаци в модела и сте започнали да разделяте чертежа на листове, се оказва, че маркировките или етикетите на контурите на дизайна са обърнати с главата надолу и когато завъртите текста през прозореца със свойства, всички етикети отново се припокриват един с друг и трябва да ги разпръснете отново или да ги оставите такива, каквито са.
Как да се излезе от такава ситуация? Всичко е много просто! Ние вземаме и инсталираме този Lisp.
Завъртете обекти около собствения им център. Инсталиране на Lisp
1. Изтеглете архива с lisp за сумиране на дължини в AutoCADтук.
2. Разопаковайте архива и запазете lisp файловете в папката, където се съхраняват всички наши приложения, а ако няма такава, например в D:\MyLisp. Архивът ще съдържа два файлаMRot.lsp иsrot.lsp, и двата Lisp работят, само вMRot.lsp опцията Point не работи и при заявкаSelect Rotation Mode (Избор на режим на въртене) натиснете Enter, като по този начин изберете метода "Център" около собствения център на обекта.
3.Стартираме AutoCAD и инсталираме всеки Lisp, който харесвате, по стандартния начин. Ако не знаем как, прочетететук.
4. Е, можете да използвате Lisp, напишетеMRot илиsrot на командния ред в съответствие с инсталирания файл и следвайте подканите (предварителната селекция работи).
5. И накрая, за да изведете командата от бутона, създайте го по стандартния начин и напишете следното в полето за макроси в съответствие с инсталирания файл:
^C^C(ако (null C:MRot)(зареди "MRot"));MRot; - за MRot.lsp.
^C^C(if (null C:srot)(зареди "srot"));srot; - за srot.lsp.
Полезно. Ако не знаете как да създадете свой собствен бутон, прочетететук.