AutoCAD用の60 Autolispルーチン以上

選択したシェーディングは、取得する領域のタイプを説明するレイヤー内にある必要があります。デフォルトでは、lispは次のXNUMXつのレイヤー名を読み取ります。シェーディングカット"と"シャドーフィル"

lispは、レイヤー内にあるシェーダーのすべての領域を合計します。シェーディングカット」およびレイヤーシェーディングのすべての領域「シャドーフィル」とハッチングの選択が完了すると、領域のブロックの属性が更新されます。このため、ブロックのプログレッシブ属性を最初に選択する必要があります。これは非表示の属性ですが、選択直前のlispに表示されます。その後、再び非表示にします。これは、コマンド「Attdisp「次に、切土と盛土の領域の属性が選択され、見つかった領域の値によってこれらが更新されます。

オブジェクトの選択は、セクションのプログレッシブのテキストを含むすべてのパンクチャを含むウィンドウによって行われます。

このルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 アクサ.
3. 同一のプログレッシブのテキストを含むセクションのカットと塗りつぶしのすべてのパンクチャをウィンドウで選択します。
4. プログレッシブの属性から始めて、変更するブロックの属性を1つずつ選択します。
5. カットアンドフィル属性が選択されると、コマンドは自動的に終了します。

コマンドの理解を深めるために、サンプルのCADファイルがlispに添付されています。

私たちが望むときには大きな助けとなる 私たちのイヤリングをコントロールするスロープを取得するには、線またはポリラインを選択するだけで十分です。結果は画面（コマンドライン）またはテキストを選択することで表示できます（このテキストの値は見つかったスロープの値によって変化します）。

ポリラインの場合、このコマンドは最初のセグメントの傾きのみを検出することが重要です。

このルーチンを使用するには、次のようにします。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 PND
3. 勾配を得るために線またはポリラインを選択します。
4. 希望する場合は、見つかった勾配の値を置き換えるテキストを選択することができます。そうでない場合は、 入力します 結果を画面に表示する。

あなたはルーチンを得ることができます ここで

1つのウィンドウまたは1つずつ、ラインとポリラインをすべて選択することができます。

見つかった長さの合計のデフォルトの10進数は2ですが、別の値を入力できます。

このルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 lpl
3. 長さの合計の結果の小数点以下の桁数を入力します
4. 長さを追加する線またはポリラインを選択する
5. キーを押す 入力します 選択を終了する
6. 取得した合計の値で置き換えるテキストを選択するか、または 入力します 結果をコマンドラインに表示するにはもう一度

あなたはルーチンを得ることができます ここで

このルーチンを使用するには、以下を実行する必要があります。

AutoCADでlispファイルを読み込みます。
コマンドの名前を入力します。 lc
結果は、現在の図面のすべてのレイヤーのコマンドラインのリストになります。

このルーチン 指定された行数と列数を持つテーブルを生成するAutoCAD Tableコマンドと似ていますが、Excelとデータをリンクしませんが、使用するのが軽い テーブルにあらかじめ定義された値を入力するオプションがあります これはデフォルトで「0.00」であり、後で編集するために各セルに配置されます。

このコマンドも 2つのオプションを使用してテーブルを生成することができます、最初のオプションはテーブルの定義を許可します 細胞の固定された高さと幅 その他のオプション これらの値を調整して、指定された行数と列数 ウィンドウの指定を入力します。

その他のオプションは次のとおりです。

• デフォルトテキスト： 生成された各セルにデフォルト値（「0.00」）を挿入するようにコマンドに指示できます。この値はカスタマイズでき、他の値に変更できます。
• テキストの高さ： 挿入されたテキストの高さです。デフォルトの高さの値は「0.25」です。
• 正当化： 挿入されたテキストの2つのオプションがあります： フィット （セルに合わせる）と 真ん中 （細胞の半分）。
• 色： これは、挿入されたテキストに含まれる色です。デフォルトでは、初期色は定義されている現在の色です。

このルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 タブラ
3. 選択された生成モードに従って、点が表示されるか、または2点が表示されてウィンドウが生成される

それは特別でなければならない オブジェクトがテキストの場合の注意座標をエクスポートするときに考慮される挿入点のため、 これらのテキストが持っている正当性テキストの正当性が正しいと確信している場合は、ポイントのエクスポートに問題はありません。

オブジェクトを選択することをお勧めします 1つの挿入ポイントを持つ AutoCADのブロックまたはポイントエクスポートされた座標が対応する座標であることがより安全です。

前述したように、このルーチンは点、テキスト（またはMtext）とブロックから座標をエクスポートしますが、 ソースコードを補完して、他のエンティティを考慮に入れることができます 例えば、円、線の最初の点、その他のオブジェクト そのデータベースにはコード10があります.

エクスポートされた座標は、 P、N、E、C（Point、North = Y、East = X、Cota = Z） カンマで区切られたCSVファイルにエクスポートされるとき、ファイルを開くときには、それぞれの値が別々のセルを占有します。

ルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 EPC
3. 座標をエクスポートするオブジェクトを選択します（ポイント、テキスト、ブロックを選択することに注意してください）。
4. エクスポートされた座標が生成されるCSVファイルの場所と名前を示します。

あなたはルーチンを得ることができます ここで

エクスポートされた座標は、 線の始点と終点ので、行が同じ点で結合されている場合、リスプは2と同じ座標を読み込みます。

この場合、必要に応じて 座標をソートするオプションを考慮する必要があります 重複したものを削除すると、エクスポートされた座標には フォーマットP、N、E、C（Point、North = Y、East = X、Dimension = Z） それがどのように CSVファイル （カンマで区切られています）、ファイルを開くときには、各値はセルに依存せず規則正しい方法で占有されます。

ルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 EL3
3. 始点座標と終点座標をエクスポートする行を選択します。
4. エクスポートされた座標が生成されるCSVファイルの場所と名前を示します。

あなたはルーチンを得ることができます ここで

ポイントをインポートするには、 インポートするポイントファイルにXLS拡張（オフィス2007より前のバージョンから）またはXLSX（バージョン2007以降）が必要です。 ファイル内で座標は次の形式でフォーマットされます。 P、N、E、C、D、 (P一緒に、 Nオルテ、 Eステ C太田 Ddescription）を参照してください。

それはあなたが読み取り座標に点オブジェクトを挿入するための方法の3種類の中から選択することを可能にします。

• XNUMXつ目は、挿入することを選択することです AutoCAD Pointエンティティ （POINTコマンドによって生成されます）、AutoCADでのポイントの表示は、DDPTYPEコマンドで定義したポイント表示のタイプによって異なります。
• 2番目のオプションは、 図面に格納されているブロックを選択する 読み取り座標に挿入されるポイントとして、デフォルトで、ルーチンは「cg-point」と呼ばれる新しいブロックを作成します。これは、図面にブロックがある場合、または図面にブロックがない場合に使用できます。
• ポイントのスタイルに関連する第3のオプションは、 ハードディスクからブロックをインポートすることができますこの場合、ブロックが作成されたディメンションは、挿入時のブロックの視覚化に影響を与えることに注意してください。
• ポイントデータ（ラベル）に関しては、iCe あなたはあなたが何を見せたいかを決めることができますポイントを表示したいだけの場合は、このオプションを選択する必要があります。これは次元のテキストまたはポイントの説明にも同じです。 3タグのデータを表示するか、表示しないかを選択できます.

また 挿入されたディメンションのテキスト内の小数点以下の桁数を制御できます、ラベルを持つスケール、インポートされたポイントの位置を基点とする同じものの回転、ポイントに対するラベルの分離など、これらのオプションを使用して名前を付けて保存することができます。あなたがインポートするポイント。

これらのオプションを使用すると、Excelファイルからポイントをすばやくインポートすることができます。ポイントのラベルのテキストがルーチンに依存しない方法を明確にすることは重要です。 図面の現在のテキストスタイルと現在のレイヤーです。

先日、ユーザーが開発したルーチンを公開しました。これはテキストファイルから座標をインポートすることを可能にしましたが、多くの制限がありますが、今回はこの新しいコマンドを通じて座標点の挿入を制御するオプションが増えます。

添付ファイルには、コマンドが不便なく座標をインポートするために必要な正しい形式のスプレッドシートとは別に、インポートできるサンプルブロックも含まれています。

ルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 ICE
3. ダイアログボックスで、ポイントのインポートに便利だと思われるオプションを指定します。

あなたはルーチンを得ることができます ここで

このコマンドは、csvファイルの最初の列にあるプログラムを読み込み、断面ファイルの右上に対応する切り抜き領域を挿入して、その同じプログレッシブのテキストを検索します。

切土および盛土領域にデフォルトで挿入される接尾辞は、「AC =」および「AR =」です。これらはコードで操作でき、小数点以下の桁数と挿入されたテキストの高さも同様です。

このルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. 挿入されるテキストを含むレイヤーを現在のレイヤーとして確立します（例：「Text-Areas」）。
3. コマンドの名前を入力します。 Arimx
4. インポートする領域を含むSCVファイルを選択します
5. 選択する あなたは挿入したい csvファイルからその対応する領域を選択したい場合は、キーを押すだけです 入力します。

このルーチンは、オプションの入力を必要としません単にコマンドを呼び出すとAutoCADのコマンドラインに表示され、リストには挿入されたイメージのパスが表示されます。

ルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 ファイル

あなたはルーチンを得ることができます ここで

これは、計画のレターヘッドをこの情報で更新するときに役立ちます。
取得されたパスには、現在のタブの名前も含まれています。モデルスペースにある場合は、ルートの最後に表示されます。モデルでなければ、現在のタブの代わりに表示されます。

このルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 ルタ
3. 一部のテキストを置き換えたくない場合は、現在の描画パスの値で置き換えるテキストを選択します。 入力します コマンドラインにパスを表示します。

あなたはルーチンを得ることができます ここで

8コマンドは、単純な日付型から長い形式の日付型までの、この日付の異なる形式の形式を提供します。現在の日付の日の名前は、AutoLispでプログラムによって取得されます。

タイプエンティティを選択することができます テキスト y 文章これらは選択された書式の現在の日付で自動的に置き換えられます。使用可能な日付書式は、図に示すものです。各書式は番号で識別され、コマンド行で要求されたときに書式を選択しますAutoCADの

このルーチンを使用するには、次のようにします。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 RF
3. 1の数字を8に、日付の出力形式を指定すると、疑問符を入力することができます（?）、使用可能な日付形式を表示する
4. 選択した書式の日付に置き換えるテキストを選択します
5. キーを押す 入力します コマンドを終了し、選択したテキストを更新する

あなたはルーチンを得ることができます ここで

各テキストに加えて、プレフィックスまたはサフィックスを追加します。たとえば、次の寸法（Y座標）にプレフィックスが示されている場合などです。 「CT =」、標高テキストが選択されている場合、コマンドは、取得された標高の値に加えて、指定されたプレフィックス（たとえば、「CT = 236.42」）で選択されたテキストを更新します。プログレッシブテキストが選択されている場合、コマンドは値で更新されます。得られたX座標と接尾辞の 「0+」、たとえば「0 +10.0」。

このコマンドには、プログレッシブと定義済みのディメンションのプレフィックスが付いています（"0 +"と "CT ="） ソースコードを変更することによってのみ変更することができます。また、必要に応じてこのコマンドを変更して、プレフィックスとサフィックスをテキストに同時に追加することができます。

このルーチンを使用するには、次のようにします。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 PC
3. プログレッシブ（X座標）と座標（Y座標）の値がどの点から始まるかを示します。
4. プログレッシブテキストを選択する
5. ディメンションテキストを選択

得られたデータでテキストの値が更新されます

Axコマンドには次のオプションがあります。

初期リクエスト：
エリアの内部ポイントを指定するか、[オブジェクトの選択/オプション] ：

ここでは、エリアを取得するための内部ポイントを指定する必要があります。その他のオプションについては後述します。

オブジェクトを選択： 空気を見つけるために内部点を指定する代わりに、閉じたポリゴンを選択して、あなたの領域を見つけることができます。

オプション： このオプションはコマンドオプションダイアログボックスをロードします。ダイアログボックスは次のようになります。

各オプションについては以下で説明します。

小数点以下の桁数： エリアの小数点以下の桁数です（デフォルトでは2）。
挿入するテキストの高さ：取得した領域のテキストを挿入する場合は、ここにテキストの高さが設定されます。

面積の変換： このオプションを使用すると、検出された面積の値を使用して操作を実行できます。各面積は、このオプションの下部に指定する必要がある係数で加算、減算、乗算、または除算されます。
このコマンドは、変換がアクティブであるかどうか、どの操作が実行されるか、およびどの値で変換が実行されるかを示します。

このオプションを使用すると、図面が異なる縮尺または他の図面単位の場合に領域をカスタマイズできます。

シェーディングを適用する： このオプションを使用すると、表示されている各領域を陰影付けして、見つかった領域をより正確に表示し、正しいかどうかを確認することができます（デフォルトで有効）。
シェーディングの名前：ここには、指定された領域に適用されるシェーディングの名前を指定する必要があります（デフォルトのソリッド）。

（シェーディング）スケール： ここでは、シェーディングのスケールファクタが示されており、このファクタは、選択されたシェーディングのタイプに従って可変である。

色（陰影）： 指定された領域にシェーディングが適用される色です。

シェーディングの終了： 以下のオプションは、コマンドアプリケーションの終了後に適用されます。

ホールド輪郭： 有効な場合、生成された輪郭は削除されません。

ホールドシェーディング： 有効にすると、生成されたシェーディングは削除されません。

最終リクエスト：
エリアの内部ポイントを指定するか、[オブジェクトの選択/エリアテキストの挿入/オプション] ：

テキスト領域を挿入する： このオプションを使用すると、テキストを選択して置き換える代わりに、取得した領域を含むテキストを挿入できます。 エリアが見つかったテキストには、デフォルトのプレフィックス「Area =」があります。このプレフィックスは、プログラムコードで変更できます。

テキストの変更： このオプションは、Enterキーが押されたとき、またはマウスの右ボタンが押されたときにアクティブになります。これにより、テキストの選択が要求されます。たとえば、「AC = 0.00m2」という内容のテキストがあり、コマンドを使用して3.25の領域が見つかった場合、コマンドはテキストを置き換え、「AC = 3.25m2」に更新します。 ご覧のとおり、AXは置換されるテキストの数値のみを置換するため、「AR = 0.00m2」、「AM = 0.00m2」、「カッティングエリア」などの異なるプレフィックスを持つエリアテキストを使用できます。 = 0.00m2」、「マイエリア= 0.00m2」など。

有効なアウトラインと無効なアウトライン：

有効なアウトライン

このルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 AX
3. 見つけたい領域に内部ポイントを表示します（見つかる領域を完全に閉じなければならないことを確認する必要があります。そうしないと、エラーメッセージが表示されます）。
4. 必要に応じて内部ポイントを何度も表示すると、コマンドは怒り、見つかったすべての空気を累積（合計）します。
5. Enterキーを押すか、右クリックしてコマンドを終了し、既存のテキストの領域を設定します。

あなたはルーチンを得ることができます ここで

前のルーチンと同様に、エンティティの選択は表示されませんが、選択されたエンティティのセットとして存在するため、選択モードを「前へ」をクリックしてオブジェクトを選択します。

このルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 SSL
3. レイヤー名を取得するオブジェクトを選択して、他のエンティティを選択します
4. 予測モードでエンティティの選択を有効にする

あなたはルーチンを得ることができます ここで

ポリラインの外にあるオブジェクトを削除する場合、特別な注意を このコマンドは、ポリライン外のすべてのオブジェクトを削除します。.

選択するポリライン は閉じたポリラインでなければなりません。そうでない場合、ルーチンはセグメントの最後の点を最初の点に結合しますポリラインを仮想線で閉じ、その線の内側または外側にあるすべてを削除します。

オプションは論理的にカットされていますが、 手動で切断できるオブジェクトでのみ機能し、 たとえば、線、円、円弧など、ブロックやその他の複合オブジェクトは、切り取ることができるこれらのオブジェクトの内側には収まりません。

リスプ サンプルファイルが添付されています 最終的なファイルでコマンドを使用する前に、対応するテストが実行されます。

ルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 PolErase
3. ポリラインを選択 オブジェクトを除去するためのエッジとして機能します。
4. 1つを選択 オブジェクトを削除するオプションオプションを選択することができます： ウィンドウ （そのウィンドウの外側または内側にあるオブジェクトだけが削除されます）。 捕獲 （ポリラインのエッジで交差しているオブジェクトも削除します）。 削除とトリミング （名前が示すように、ポリラインの内側または外側にあるオブジェクトを消去し、境界線が交差するオブジェクトをトリミングします。
5. 〜を示す どちら側のポイント （内部/外部）オブジェクトを消去またはトリミングします。

あなたはルーチンを得ることができます ここで

このルーチンは、レイヤの名前を入力するときには大文字と小文字が区別されないので、どのように入力しても、よく書き込まれるだけです。

このルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 SCA
3. 選択するオブジェクトのレイヤー名を入力します
4. エンティティの選択を有効にする 前提

あなたはルーチンを得ることができます ここで

1. コマンドラインを使用してAutoCADでlispファイルを読み込む Appload ファイルをコピーしてAutoCADに貼り付けるだけです。
2. コマンドの名前を入力します。 RT
3. 値を取得するテキストを選択します。
4. 以前に取得した値で置き換えるテキストを選択します。

ご覧のとおり、ルーチンはシンプルですが、テキスト編集に関しては非常に役に立ちます。

このルーチンで使用されている言語はAutoLispであることに注意してください。新しいエントリでは、同じコマンドを公開しますが、VisualLispで記述します。構造のサイズがさらに縮小されます。

この新しいプロパティは、[プロパティ]ダイアログボックスに表示されないため、このコマンドでのみアクセスできます。

lispでは、小数点以下の桁数を変更したり、このルーチンで先にフォーマットされたテキストの元の数を取得したりすることができます。 元々持っていた小数の数 元の値をリセットしたい場合。

それは注目に値する これらの元の値は残ります ファイルまたはAutoCADが閉じられているにもかかわらず、元のデータである あなたの価値は常にそこにありますたとえ元の値をテキストに戻したにもかかわらず、

この新しいコマンドは、 Excelの小数を変更するしかし、唯一の観察は、このプロパティは内部的であり、以前のように プロパティウィンドウは準備ができていません エンティティの拡張日付を表示します。

特別な配慮が必要です 選択されたテキストは数値テキスト、つまり、数値のみが含まれます。それ以外の場合、値は「0.00"

ルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 AREDE
3. 実行するオプションの1つを選択してください
4. 操作を実行する（数字の）テキストを選択します

あなたはルーチンを得ることができます ここで

このプログラムでは、テキストを縦（列）または横（行）に整列させることができます。これは、最初のものを選択するだけで、他のテキストを整列するための基礎となります。
なお、テキストの整列の基準となる点は挿入点であり、すべてのテキストが挿入点として「左」の位置合わせを持っている場合、すべてのテキストがこの点に対して整列され、均一な配置。 テキストの位置合わせが異なる場合、それらはすべて挿入ポイントに対して位置合わせされ、テキストの位置合わせに一貫性がなくなります。

このルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 アリット
3. 軸合わせが得られるのハイライトテキストベース

4. 整列するテキストを選択する

5. 完了したテキストは、最初に選択した

あなたはルーチンを得ることができます ここで

つまり、ブロックの属性を更新する場合は、既存のテキストに対して、最初にテキストを選択してから属性を選択するだけで、選択したテキストの値に応じて更新されます。

このルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 CTA
3. コピーする値を含むテキストを選択します。

4. 最後に属性を選択してメジャーを変更します

5. 結果を以下に示します。

このコマンドは、特定のテキストから属性の値を更新する場合に非常に便利です。

たとえば、高さが0.5で、高さが1.00で、パーセントが1.5である2つのテキストがある場合、テキストの高さはそれぞれ0.75と1.5によって変更されます。

このルーチンは、高さの異なる多くのテキストの高さを変更する必要がある場合に非常に便利です。

このルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 ch
3. テキストの高さを変更する割合を入力します。たとえば、0.5と入力するとすべてのテキストが半分になります.2と入力すると、すべてのテキストが2倍になります
4. 変更するテキストを選択します。

あなたはルーチンを得ることができます ここで

挿入される寸法は属性を持つブロックであり、これらのブロックは ミリメートル。 このLispを問題なく使用できるようにするには、次のコマンドを使用する必要があります。単位」（単位）は、「に挿入するコンテンツの単位を定義しますミリ」（ミリメートル）。

このルーチンで輪郭線に正しい標高を挿入するには、標高が輪郭曲線に示されている点から取得されるため、標高（座標z> 0）が必要であることを明確にする価値があります。輪郭線の標高が0（座標z = 0）の場合、つまり標高がない場合、ルーチンはその値のテキストを挿入します。

ルーチンによって要求される縮尺は、図面がプロットされる縮尺を参照します。これは、挿入される寸法のテキストサイズの参照値です。寸法を使用して寸法が挿入されるまで、この値を増減できます。あなたが望むテキストのサイズ。

このルーチンには2の添付ファイルがあります： EL_TAG.dwg y EL_TAG2.dwg上で説明した属性を持つブロックですが、これらのファイルはどこにでもコピーできますが、ルーチンと同じフォルダに置くことをお勧めします。

AutoCADでこれらのファイルをロードするには、ダイアログボックスでAutoCADの場所のパスを定義する必要があります オプション->サポートファイルの検索パス。

このルーチンを使用するには、以下を実行する必要があります。

1. AutoCADでlispファイルを読み込みます。
2. コマンドの名前を入力します。 CPE
3. レベルカーブの線の上の点で、寸法を挿入する場所を示します
4. 挿入する寸法を持つ回転を定義する別の点を示します
5. 挿入ポイントに示された他のディメンションを挿入し続けることができます。ディメンションを挿入したくない場合は、Enterキーを押してコマンドを終了します

あなたはルーチンを得ることができます ここで