« 2013年9月 | トップページ | 2013年11月 »

2013年10月29日 (火)

取消し線

Jw_cad相談室での質問ですが・・・・・
文字に取消し線を作図する外部変形を作ってみました。m(__)m

--------------------
@REM 取消し線
@echo off
REM #jww
REM #cd
REM #h3    文字選択
REM #hc    文字(水平横文字)を選択してください
REM #e
jgawk '/hs/{for(i=0;i^<=9;i++)S[i]=$(i+2);S["a"]=$12;S["b"]=$13;S["c"]=$14;S["d"]=$15;S["e"]=$16;S["f"]=$17}/lg/{lg=substr($1,3);sc=S[lg]}/hch/{for(i=0;i^<=9;i++)ch[i+1]=$(i+2)}/cn/{if($1=="cn0"){cwh=$2;cht=sc*$3}else if(substr($1,4,1)=="$"){}else{h=substr($1,3);cht=sc*ch[h]}}/^^ch/{x0=$2;y0=$3;lth=$4;dh=int(100*cht/3)/100;xe=x0+lth;y1=y0+dh;y2=y1+dh;print x0,y1,xe,y1;print x0,y2,xe,y2}' jwc_temp.txt>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end
# 水平横文字のみ適用
# 書込み線色・線種で作図
# 2013.10.29 by somem
:end

| | コメント (0) | トラックバック (0)

2013年10月26日 (土)

断面指示線

断面指示線を作図する外部変形です。   download

◇線選択:強調線(ソリッド図形)を作図
1. 断面を示す線を左から右(左下⇒右上 or 左上⇒右下)
  または、上から下に順に選択
2. 視点方向を任意の線上で(L)クリック ⇒ 左AM0時「点指示終了」を実行
3. 文字記号を入力、スキップすると前回値を作図
◇点指示:切断線と強調線(ソリッド図形)を作図
1. 断面を示す点を左から右(左下⇒右上 or 左上⇒右下)
  または、上から下に順に指定
2. 視点方向を示す点を(L)クリック ⇒、左AM0時「点指示終了」を実行
3. 文字記号を入力、スキップすると前回値を作図
※設定ボタンから、記号サイズ、線色等、各種ユーザー設定が可能です。

Section

| | コメント (0) | トラックバック (0)

2013年10月14日 (月)

引出線&バルーン v1.3

外部変形 "引出線&バルーン" をバージョンアップしました。  download

注) Jwwの最新バージョンで使用する場合は、
"leader.bat"をメモ帳等で開き、
13行目最後のダブルコーテーションを削除してください。
修正すると、注記内の半角/全角スペースは対応できなくなります。

※v8.10bでは正常に動作します。


@REM 引出線&バルーン v1.3
@echo off
goto %1
REM #jww
REM #cd
REM #hm|引出線|バルーン|追加/引出線|追加/バルーン|位置修正|注記複写|点/矢印 切替|MEMO|設定|
REM #:1 # 引出線
REM #1/ 始点を指定してください (L)free (R)Read
REM REM #1- 始点を指定してください (L)free (R)Read
REM #2 終点を指定してください (L)free (R)Read
REM #3 方向を指定してください (L)free
REM v6.0~
REM #f 注記を入力してください | 前回文字/スキップ | /_$1
REM #hr
REM #e

<主な仕様>
◇3行以上の注記作図可
◇点作図は、設定ボタンから実点/点マーカ/点なしの選択可
◇線色/文字種の指定可
※設定ボタンよりAWKファイルを編集
※初期設定は、書込線色/書込文字種
◇注記複写を追加
※引出線位置を変更して、注記を複写
◇半角スペース対応
※前回値に半角スペースがある場合の不具合に対応
※連続する半角スペースの作図に対応
注)アンダーバーは、半角スペースに置換されます。
◇ユーザー設定を追加
※設定ボタンから、線色・文字種・文字位置・引出線長等を変更可

詳細は、同梱の "readme.txt"、"leader.jww" を参照してください。

Leader

| | コメント (4) | トラックバック (0)

« 2013年9月 | トップページ | 2013年11月 »