« 制御コード解説 #10 | トップページ | 文字基点変更 »

2010年8月12日 (木)

実点作図

Jw_cad 情報交換室からですが、
曲線(円/円弧を除く)の始点/構成点に補助線色の実点を作図する外部変形です。
実点は、レイヤF に作図します。

Point

8/13 バッチファイルを拡張しました。 赤字一部修正

◇曲線(曲線属性)に一括で実点を作図
◇一括消去を追加
注)寸法端点に実点を使用している場合は、非表示にしてください。

--------------------
@REM 点作図/消去(拡張)
@echo off
goto %1
REM #jww
REM #cd
REM #hm|一括作図|範囲消去|一括消去|
REM #:1
REM #:3
REM #ht10 ブロック図形/消去・書出し除外
REM #ht30 寸法図形/消去・書出し除外 
REM #ht40 ソリッド図形/消去・書出し除外
REM #h4
REM #hr
REM #e
REM #:2
REM #ht10 ブロック図形/消去・書出し除外
REM #h1
REM #hc 範囲選択してください
REM #hr
REM #e
:1
jgawk 'BEGIN{print "lyf";print "pn9"}/^^pl/,/^^#/{if(NF==1){next}else{print "pt",$1,$2}}' jwc_temp.txt>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end
:2
:3
jgawk 'BEGIN{print "hd"}/^^#/,/NF==0/{if($1=="pt" ^|^| $1=="pn9" ^|^| $1=="lyf"){next}else{print $0}}' jwc_temp.txt>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end
:end

<前回のバッチファイル>

作図/消去とも、範囲選択から左AM12時「確定 基点(free)」です。

--------------------
@REM 実点作図/消去
@echo off
goto %1
REM #jww
REM #cd
REM #hm|作図|消去|
REM #:1
REM #:2
REM #h1
REM #hc 範囲選択してください
REM #hr
REM #e
:1
jgawk 'BEGIN{print "lyf";print "pn9"}NF==4{if($1=="ci"){next}else{print "pt",$1,$2}}' jwc_temp.txt>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end
:2
jgawk 'BEGIN{print "hd"}/^^#/,/NF==0/{if($1=="pt" ^|^| $1=="pn9" ^|^| $1=="lyf"){next}else{print $0}}' jwc_temp.txt>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end
:end

|

« 制御コード解説 #10 | トップページ | 文字基点変更 »

コメント

はじめまして。

いつも、”こそっと”頂いております。(^^ゞ
ありがとうございます。m(_ _)m

さて、「実点作図/消去」は動作するのですが、
「点作図/消去(拡張)」の”作図”を選択しても範囲選択になりません。
”範囲消去”と”一括消去”は動作します。

私の操作が間違っているのでしょうか?

投稿: toshi | 2010年8月14日 (土) 08時12分

toshi さん、はじめまして。

>いつも、”こそっと”頂いております。(^^ゞ

うれしいコメントですね。(^o^)

>「点作図/消去(拡張)」の”作図”を選択しても範囲選択になりません。

拡張版は、実点を"一括作図"するようにしたので、
範囲選択はできなくなっています。(-_-;)
作図ボタンをクリックするか、図形のないところで、
Lクリックで実点を作図するはずですが・・・・・。
もし、うまく実行しないようでしたら、
バッチファイルをメールで送ってもらえますか。

caddwg.2006@gmail.com

投稿: somem | 2010年8月14日 (土) 09時01分

先程、送付させて頂きました。
お休みの所、申し訳ないです。

宜しくお願いいたします。m(_ _)m

投稿: toshi | 2010年8月14日 (土) 09時33分


caddwg.2**6@gmail.com 宛に、
Yahoo、goo、hotmail から送らせて頂いたのですが、
何故か送れませんでした。

恐れ入りますが、下記からDLして頂けないでしょうか。
http://rapidshare.com/files/412812619/___ae______________.zip

1)上記アドレスを開く
2)「Free user」ボタンをクリック
3)青色の丸いアイコンをクリックしてDL

投稿: toshi | 2010年8月14日 (土) 10時01分

toshiさん、どうもです。

バッチファイルをダウンロードしました。
とりあえず、こちらでは動作してますが・・・・。
ちょっと用があるので、夕方もう少し検証してみます。
お待ちください。

投稿: somem | 2010年8月14日 (土) 10時11分


> こちらでは動作してますが・・・・。

xp pro sp3 のPC2台とWindows7 Ultimate のPCで確認してみましたが駄目でした。

BATファイルは以下に置いて動作確認してみました。
BATファイル名は「点作図.bat」に変更もしましたがだめでした。
C:\jww\点作図・消去.bat

jgawk.exe は、C:\windows\system32 フォルダ内に入れております。
Jww は、ver7.03 です。

1)JWWを起動
2)線コマンドで書込みレイヤ1の線色1で線を1本作図
3)外部変形コマンドで C:\jww\点作図・消去.bat を選択
4)コントロ-ルバ-の「作図」を選択
  ※ cmd.exe の画面が一瞬表示されますが、点は作図されていません。
    ”範囲消去”と”一括消去”は動作します。

盆休みですのに申し訳ないです。
急ぎませんので、お時間のと入れたときにでも宜しくお願いいたします。

投稿: toshi | 2010年8月14日 (土) 10時50分

最後の行に pause を記述して実行してみました。

下記の表示が出ました。
******************************************
1個のファイルをコピーしました。
続行するには何かキーを押してください...
******************************************
キーを押しましたが、点は作図されませんでした。

投稿: toshi | 2010年8月14日 (土) 11時11分

toshiさん、お疲れさまです。

ずいぶん、お手間をとらせてしまったようですね。m(__)m
toshiさんの"点作図・消去.bat"は、正常に動作してます。
ver7.03で確認済。

>線コマンドで書込みレイヤ1の線色1で線を1本作図

このコメントで原因がわかりました。
拡張版から、曲線属性を持たない線分は対象外としていますので、
通常の線コマンドで作図した線分には点が作図されません。

もともと、スプラインやベジェ曲線が対象の外変ですので、
範囲選択できない一括作図では、不要な点を作図しないように、
初版のスプリクトから変更しています。

ということで、曲線コマンドで作図したスプライン曲線等で
再度、お試しいただくようお願いいたします。

投稿: somem | 2010年8月14日 (土) 17時44分


> スプラインやベジェ曲線が対象の外変

大変失礼いたしました。m(_ _)m

「曲線(曲線属性)に一括で実点を作図」と記載されていましたね。
曲線も含むと勘違いしておりました。(;^_^A

> 曲線コマンドで作図したスプライン曲線等で
> 再度、お試しいただくようお願いいたします。

問題なく動作いたしました。

お騒がせ致しまして申し訳ありません。
今後とも宜しくお願い致します。m(_ _)m

投稿: toshi | 2010年8月14日 (土) 17時52分

>お騒がせ致しまして申し訳ありません。

いえいえ、コメント大歓迎なので、いつでも遊びにきてください。(^^)v

投稿: somem | 2010年8月14日 (土) 19時56分

コメントを書く



(ウェブ上には掲載しません)




トラックバック


この記事へのトラックバック一覧です: 実点作図:

« 制御コード解説 #10 | トップページ | 文字基点変更 »