2013年8月9日金曜日

寸法記入 / 線分系作図マクロを作る (IJCAD プルダウンメニューの作成)

今回も引き続き、IJCAD 2013 (IntelliJAPAN社製) をベースにして「寸法記入」、「線分系」のメニューを作成していきます。

IJCADでのここまでの準備については、 メニュー作成の準備 の ◆   IJCAD (LT)の準備 の項目をご参照ください。

IJCAD 2013に「寸法記入」の項目を追加していきます。
説明はIJCAD 2013 ( STD / PRO )を基準にしていますが、IJCAD LT 2013 でもほぼ同じ手順でカスタマイズできます。

◆ 「寸法記入」メニューを作る

リボンメニューの「管理」タブをクリックし、「カスタマイズ」から「ユーザインタフェース」をクリックします。
「ユーザインタフェースをカスタマイズ」のダイアログが表示されます。

前回作成した「MyTool」を右クリックし、「新規作成」>「サブメニュー」を実行します。

IJiD_Menu2

作成されたサブメニューの名前を「寸法記入」とします。

IJiD_Menu7

次に、「新規コマンド」のボタンをクリックし、新たなコマンドを作成します。

右側の「プロパティ」欄で、名前を「水平・垂直 長さ寸法直列記入」とします。

続いて、マクロ欄の右端ボタンをクリックし、新たなダイアログで下記の入力をします。

^C^C$M=$(if,$(eq,$(getvar,clayer),DIM),,-layer;M;DIM;C;1;;;)_dimlinear;\\\_dimcontinue;

「$M=$(」で始まる式がDIESELといわれる言語の式です。
以前に解説した「DIESEL式のマクロ(縮尺・用紙サイズ設定)」「DIESEL式のマクロ(寸法記入 / 線分系作図)」 の回などを参考にして下さい。

「\」は、入力を待ちます。

説明欄は、「長さ寸法を水平または垂直に記入し、連続して直列寸法を記入」とします。

左下「コマンド」欄の「長さ寸法直列記入」を右クリックし、「コピー」を実行します。

次に、左上の「部分CUIファイル」>「MYTOOL」>「メニュー」>「MyTool」>「寸法記入」 の位置に貼付けます。

IJiD_Menu8

更に、「新規コマンド」のボタンをクリックし、新たなコマンドを作成します。

右側の「プロパティ」欄で、名前を「平行寸法直列記入」とします。
続いて、マクロ欄の右端ボタンをクリックし、新たなダイアログで下記の入力をします。

^C^C$M=$(if,$(eq,$(getvar,clayer),DIM),,-layer;M;DIM;C;1;;;)_dimaligned;\\\_dimcontinue;

説明欄は、「寸法を指示2点間に対し平行に記入し、連続して直列寸法を記入」としましょう。

左下「コマンド」欄の「平行寸法直列記入」を右クリックし、「コピー」を実行します。
前記と同様に、「寸法記入」 の位置に貼付けます。

IJiD_Menu8_2

 

◆ 「線分系」メニューを作る

続いては、線分系のコマンドを定義してみましょう。

「MyTool」を右クリックし、「新規作成」>「サブメニュー」を実行して、作成されたサブメニューの名前を「線分系」とします。

IJiD_Menu2 IJiD_Menu9

「新規コマンド」のボタンをクリックし、新たなコマンドを作成します。

右側の「プロパティ」欄で、名前を「振分線分」とします。
マクロ欄の右端ボタンをクリックし、新たなダイアログで下記の入力をします。

^C^C_setvar;ucsicon;0;_offsetdist;\select;single;\dist;_none;@;_per;@;ucs;3;_none;$M=$(getvar,lastpoint);_per;@;;_pickbox;1;_offset;;$(getvar,distance),0;_none;0,0;;_chprop;L;;la;$M=$(getvar,clayer);;_erase;_l;;_offset;;$(getvar,distance),0;_none;$(*,2,$(getvar,distance)),0;;_chprop;L;;la;$M=$(getvar,clayer);;_oops;_pickbox;$(getvar,pickbox);_ucs;_p;

説明欄は、「指示線分の両サイドに振分線分を作成」とします。

次に、左下の「コマンドリスト」に作成された「振分線分」をコピーし、左上の「部分CUIファイル」>「MYTOOL」>「メニュー」>「MyTool」>「線分系」の位置に貼付けます。

IJiD_Menu10

更に、「新規コマンド」のボタンから新たなコマンドを作成し、名前を「中間点通過線分」とします。
マクロ欄の右端ボタンをクリックし、新たなダイアログで下記の入力をします。

^C^C_snapbase;\_line;$M=$(getvar,snapbase);_per;\;_osmode;640;__dist;$M=$(getvar,snapbase);"$M=$(getvar,lastpoint)";_erase;L;;_offset;"""""""$M=$(/,$(getvar,distance),2.0)""""""";"""$M=$(getvar,snapbase)""";"""""$M=$(getvar,lastpoint)""""";;_osmode;$(getvar,osmode);

このマクロで、指示2点間の中点に、最初の点上にある線分を複写します。

説明欄は、「最初の指示点上にある線分を、次の指示平行線分上の点との中間に複写」とします。

上記と同様に、「中間点通過線分」をコピーし、「線分系」の位置へ貼付けます。

更に、「新規コマンド」のボタンから新たなコマンドを作成し、名前を「矢印線分」とします。
マクロ欄の右端ボタンをクリックし、新たなダイアログで下記の入力をします。

^C^C_snapbase;\_line;$M=$(getvar,snapbase);\;-insert;ARROWHED;"$M=$(getvar,snapbase)";"$M=$(getvar,userr1)";;"$M=$(getvar,lastpoint)";

説明欄は、「矢印付の線分を作成」とします。

同様に、「矢印線分」をコピーし、「線分系」の位置へ貼付けます。
但し、ARROWHED.DWGというブロックがパス設定フォルダ上に存在することが条件です。

PdMenu_Line_IJ

ここで、カスタマイズを保存しましょう。

まず、[適用]ボタンをクリックし、カスタマイズ実行を待ちます。
引き続き、[OK]ボタンをクリックし、ダイアログボックスを閉じます。

IJCAD 作図画面右上の「スタイル」のプルダウンで「メインメニューとリボン表示」または「クラシックインターフェース」に設定します。
プルダウンメニューの右端に「MyTool」が追加されていることが確認できるでしょう。

PdMenu_Show1_IJ

プルダウンメニューの「MyTool」からサブメニューをクリックして、それぞれのコマンドを実行することになります。

PdMenu_Show2_IJ

「MyTool」をクリックし、「初期設定」の「初期設定 A2-S100」をクリックすると、必要なシステム変数を所定の値に設定すると共に用紙の領域がポリラインで作成されます。

「初期設定」の各サブメニューからも同様の処理が実行できます。

また同様に、「MyTool」をクリックし、「寸法記入」のフライアウトから「水平・垂直 長さ寸法直列記入」をクリックすると、指示2点間に水平または垂直の長さ寸法を記入し、更に次の点を指示する都度連続して直列の寸法を記入します。
更に、「平行寸法直列記入」も同様に、連続して直列の寸法が作成できます。

「線分系」のフライアウトから「振分線分」をクリックすると、振り分ける幅の入力を待ち、次に指示する線分を両側に振り分けた位置に複写します。
「中間点通過線分」は、指示2点間の中点に、最初の点上にある線分を複写します。
「矢印線分」は、指示2点間に線分を作成し、最初の点上に矢印のブロックを挿入します。

新規に作成されたプルダウンメニュー「MyTool」がどのように表示され、どのように活用できるかご理解いただけたでしょうか。

* * * * * * * * *

本ブログはお盆休みの為一週間のお休みを頂き、次回更新は8月23日(金)を予定しています。


* * * * * * * * *

メニューカスタマイズのノウハウを駆使して開発した「AutoCAD LT」 対応の建築・設備設計支援ツール『CustomARCH LT』がAutoCAD LT 2014に対応致しました。
製品詳細については下記でご紹介しています。

CustomARCH LT 建築

CustomARCH LT 電気設備

0 件のコメント:

コメントを投稿