概要:ポリライン上の2点間の周長を求め、図面に記入 使用法:ポリラインを選択し、計りたい点の左下側,右上側の順にクリックし、測定結果を書き込む場所をクリック ^C^C_COPY;\;@;@;_BREAK;L;\$M=$(getvar,EXTMIN);_BREAK;L;\$(getvar,EXTMAX);_AREA;O;L;_ERASE;L;;-MTEXT;\H;$(*,$(getvar,DIMSCALE),2.5);J;BL;R;0;W;0;点間長="$M=$(rtos,$(getvar,PERIMETER))";; 概要:閉領域の面積,周長を求め、図面に記入 使用法:閉領域をクリックし、測定結果を書き込む場所をクリック ^C^C-BOUNDARY;\;AREA;O;L;ERASE;L;;_ID;\-MTEXT;@;H;$M=$(*,$(getvar,DIMSCALE),2.5);J;BL;R;0;W;0;面積=$(rtos,$(getvar,AREA),2,0);周長=$(rtos,$(getvar,PERIMETER),2,0);;explode;l; 概要:円弧寸法 使用法:円弧を選択し、寸法位置を指定 ^C^C_ORTHOMODE;0;_LUPREC;0;PEDIT;\;;AREA;O;L;EXPLODE;L;_DIM1;ANGULAR;$M=$(getvar,LASTPOINT);\$(rtos,$(getvar,PERIMETER));;\^M;_LUPREC;3 概要:円弧上の2点間寸法を作成 使用法:寸法を測りたい1点目、2点目を指定し、対象の円弧を指定,再度寸法を測りたい1点目、2点目を指定し、寸法位置を指定 ^C^CARC;\_E;\_R;CEN;\PEDIT;L;;;AREA;O;L;ERASE;L;;_DIM1;ANGULAR;;CEN;@;\\T;$M=$(rtos,$(getvar,"PERIMETER"));\; 概要:座標値記入 使用法:UCS原点を求めたい座標の原点と合わせておいて(「ツール」「UCS移動」または「ツール」「UCS」「オブジェクト」など)座標値を出したい点を指定してから座標値を記入する位置を指定 ^C^C_id;\$M=;;_ucs;w;_leader;@;\;X=$(rtos,$(index,0,$(getvar,LASTPOINT)),2,0);Y=$(rtos,$(index,1,$(getvar,LASTPOINT)),2,0);;ucs;p; 概要:全レイヤ表示 使用法: '-layer ON * ;;; 概要:カレントレイヤのみ表示 使用法: '-layer off * ;; 概要:タッチレイヤ非表示 使用法:非表示にしたいレイヤのオブジェクトを選択 注意:先頭に*を付けると連続になるけど、コマンドウィンドウの表示が変な感じになる。実害無し。 ^C^C_$M=_ai_molc;\"$M=_-layer;OF;$(getvar,CLAYER)";Y;;_clayer;$(getvar,CLAYER); 概要:補助線を引く 使用法:補助線を引く 注意:コマンドを実行すると「DCM-OTRS-HOJO」という黄色で点線(DOT)の非印刷レイヤが作成されて、BYLAYERのLINEを引く。 ^C^C-linetype;l;DOT;;;^C-layer;m;DCM-OTRS-HOJO;c;YELLOW;;l;DOT;;lw;Default;;p;n;;;-linetype;s;BYLAYER;^C-color;BYLAYER;_line; 解説: ^C^C 継続中のコマンドがあったらキャンセル -linetype;l;DOT;;;^C DOT線種をロード(既にある場合は再ロード) -layer;m;DCM-OTRS-HOJO; 「DCM-OTRS-HOJO」レイヤを作成(レイヤコマンドは継続) c;YELLOW;; 「DCM-OTRS-HOJO」レイヤの色を黄色に(レイヤコマンドは継続) l;DOT;; 「DCM-OTRS-HOJO」レイヤの線種をDOTに(レイヤコマンドは継続) lw;Default;; 「DCM-OTRS-HOJO」レイヤの線太さを既定値に(レイヤコマンドは継続) p;n;;; 「DCM-OTRS-HOJO」レイヤを非印刷レイヤにしてレイヤコマンド終了 -linetype;s;BYLAYER;^C 書き込み線種を「BYLAYER」に -color;BYLAYER; 書き込み色を「BYLAYER」に _line; 線を引くコマンドを開始 応用編:  もとから用意されている寸法線などのコマンドにレイヤ変更マクロを追加すると、レイヤの統一ができます。 例:長さ寸法記入 1.「長さ寸法記入」アイコンを右クリックして「カスタマイズ」 2.「長さ寸法記入」アイコンを左クリック 3.「このボタンに関連づけられたマクロ」の欄には「^C^C_dimlinear 」と書いてあるはずです。 4. ^C^C_dimlinear     ↑ここのあいだにレイヤを変えるマクロを追加します。 5.追加するマクロは、「補助線」を参考に、赤色で0.18mmで印刷可能な「DCM-OTRS-DIM」レイヤとします。   -linetype;l;Continuous;;;^C-layer;m;DCM-OTRS-DIM;c;RED;;l;Continuous;;lw;0.18;;p;p;;;-linetype;s;BYLAYER;^C-color;BYLAYER; 6.結果として、マクロは ^C^C-linetype;l;Continuous;;;^C-layer;m;DCM-OTRS-DIM;c;RED;;l;Continuous;;lw;0.18;;p;p;;;-linetype;s;BYLAYER;^C-color;BYLAYER;_dimlinear  になります。 7.「適用」ボタンを押すとマクロが登録され、「閉じる」を押すとウィンドウが閉じます。 参考:レイヤ名 ○建設省CAD製図基準を参考に簡略化 一般図の外形 DCM-SLPP  白 実線 既設構造物 DCM-EXST  白 実線 現在の道路 DCM-EGRD  30 実線 盛土法面 DCM-FILL  緑 実線 切土法面 DCM-CUT   30 実線 擁壁 DCM-WALL  赤 実線 主構造 DCM-STRC  緑 実線 中心線 DCM-STRC-CNTR  赤 一点鎖線 その他構造物 DCM-OTRS  任意 任意 タイトルなど DCM-OTHR-FRAM  白 実線 等高線(計) DCM-GEO-HICN 緑 実線 等高線(主) DCM-GEO-LWCN   緑 実線 ○CAD基準外のレイヤ 補助線 DCM-OTRS-HOJO 黄 点線 ハッチング DCM-OTRS-HACH 8 実線