中心線の再作図

外形から、複線で円の中心線を作図する場合がよくあります。　　　　　　　　　　　　　　　　　　円を作図後、中心線を一点鎖線に再作図する外変を考えてみました。　　　　　　　　　　　　

作図方法は、矩形選択⇒左AM0時「確定 基点（free）」　　　　　　　　　　　　　　　　　　　　　　　

注）1．円だけの場合でも、中心線は作図されます。　　　　　　　　　　　　　　　　　　　　　     　2．円／中心線以外の選択図形は、実行後消去されるので注意。

---------------

@REM 中心線再作図
@echo off
goto %1

REM #jww
REM #cd
REM #hm|垂直(L)|水平(R)|

REM #:1
REM #h2 範囲を指定してください。(矩形)
REM #hr
REM #e

REM #:2
REM #h2 範囲を指定してください。(矩形）
REM #hr
REM #e

:1
:2
echo hd>temp.txt
jgawk '/^^ci/{print}' jwc_temp.txt>>temp.txt
goto %1

:1
echo lt5 線種5>>temp.txt
echo lc1 線色1>>temp.txt
jgawk '/^^ci/{S=2.5;print $2 " " $3-$4-S " " $2 " " $3+$4+S}' jwc_temp.txt>>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end

:2
echo lt5 線種5>>temp.txt
echo lc1 線色1>>temp.txt
jgawk '/^^ci/{S=2.5;print $2-$4-S " " $3 " " $2+$4+S " " $3}' jwc_temp.txt>>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end

:end

---------------

円中心線

円の中心線を作図する外部変形です。単独で円を選択することもできます。　　　　　　　　　軸角／楕円には対応していません。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　原寸以外で作図する場合は、円の外側の長さS=2.5を変更してください。

<単独で円を選択する場合>　　　　　　                                                                   読取範囲外でLクリック⇒円をLクリック

<複数の円を選択する場合>　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　読取範囲外でRクリック⇒矩形範囲を指定⇒左AM0時「確定　基点（free）」　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　

----------------

@REM 円中心線
@echo off
goto %1

REM #jww
REM #cd
REM #hm|単 (L)|範囲 (R)|

REM #:1
REM #2ci 円を選択してください。(L)
REM #hr
REM #e

REM #:2
REM #h1 範囲を指定してください。(矩形）
REM #hr
REM #e

:1
:2
echo lt5 線種5>temp.txt
echo lc1 線色1>>temp.txt
jgawk /^^ci/'{S=2.5;print $2-$4-S " " $3 " " $2+$4+S " " $3;print $2 " " $3-$4-S " " $2 " " $3+$4+S}' jwc_temp.txt>>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end

:END

---------------

スクリプトは、円データ  ci X Y R　を選択し、　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　水平線の始点／終点座標（X-R-S,Y）／（X+R+S,Y）　　　　　　　　　　　　　　　　　　　　　　　　垂直線の始点／終点座標（X,Y-R-S）／（X,Y+R+S）に変換しています。　　　　　　　　　　　　Sは、円外側の中心線長さです。

円の移動/複写

円の移動/複写が選択可能なバッチファイルを作成しました。 　　　　　　　　　　　　　　　　　　　　選択に関わる部分は、赤字で表記しています。参考にしてください。　　　　　　　　　　　　　　選択方法は、読取範囲外でLクリックが移動/Rクリックが複写になります。　　　　　　　　　　　　　　

移動量を数値で入力したい場合は、　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　円上で右AM6時「オフセット」　⇒　オフセット値入力　が可能です。　　　　　　　　　　　　　　　移動/複写の際、円をシングルクリックで選択したい方は、お試しください。　　　　　　　　　　

尚、外変については、まだまだ勉強中の身ですので、　　　　　　　　　　　　　　　　　　　　　　　　利用される場合は、自己責任でお願いします。m(__)m

--------------------                                                                               @REM 円の移動/複写
@echo off
goto %1

REM #jww
REM #cd
REM #hm |移　動 (L)|複　写 (R)|

REM #:1
REM #2ci 円を選択してください。(L)
REM #0 移動する位置を指示してください。(L)/(R)
REM #hr
REM #e

REM #:2
REM #2ci 円を選択してください。(L)
REM #0 複写する位置を指示してください。(L)/(R)
REM #hr
REM #e

#:1
echo hd>temp.txt
jgawk /^^ci/'{print $1 " " 0 " " 0 " " $4}' jwc_temp.txt>>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end

#:2
jgawk /^^ci/'{print $1 " " 0 " " 0 " " $4}' jwc_temp.txt>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end

:END　　　　　　　　　　　　　　

円の移動

円の複写に一行追加しました。選択図形が消去されるので円の移動になります。

---------------　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　@REM 円の移動
@echo off

REM #jww
REM #cd
REM #2ci 円を選択してください。(L)
REM #0 移動する位置を指示してください。(L)/(R)
REM #hr
REM #e

gawk /^^ci/'{print $1 " " 0 " " 0 " " $4}' jwc_temp.txt>temp.txt
echo hd>>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　---------------

円の複写

awkスプリクトを利用した初めての外変です。　　　　　　　　　　　　　　　　　　　　　　　　　　動作確認用ですので、実用には向いていません。

円を選択⇒任意の位置を指定すると円が複写されます。

--------------------                                                                               @REM 円の複写
@echo off

REM #jww
REM #cd
REM #2ci 円を選択してください。(L)
REM #0 複写する位置を指示してください。(L)/(R)
REM #hr
REM #e

gawk /^^ci/'{print $1 " " 0 " " 0 " " $4}' jwc_temp.txt>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt                                                                                                       ---------------                                                                                     

スクリプトは、Jwwが書出した円データ　ci X Y R　を　ci 0 0 R　に書換えています。　　　　　ci ⇒ 円　X⇒X座標　Y⇒Y座標　R⇒半径　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　

「書換え」

外部変形を利用して、十字線と円を作図するバッチファイルを作成しました。　　　　　　　　DOSコマンドを利用して、jwc_temp.ｔｘｔの内容を「書換え」ます。

---------------
@rem 外変テスト2
rem #jww

rem jwc_temp.txtの書換え
echo ci 0 0 25 #円の作図>jwc_temp.txt
echo lt5 #線種5>>jwc_temp.txt
echo lc1 #線色1>>jwc_temp.txt
echo -30 0 30 0 #中心線(水平)>>jwc_temp.txt
echo 0 -30 0 30 #中心線(垂直)>>jwc_temp.txt

type jwc_temp.txt
pause
---------------

前回と同様にして、c:\jwwに保存後、外部変形から外変テスト2を実行します。　　　　　　　　Jwwが「読込み」を行う直前のjwc_temp.ｔｘｔの内容は、次の様に書換えらます。　　

ci 0 0 25 #円の作図
lt5 #線種5
lc1 #線色1
-30 0 30 0 #中心線(水平)
0 -30 0 30 #中心線(垂直)

Jwwが入出力に使用するデータ形式の詳細については、Jwwフォルダ内のJWW_SMPL.BATに記載されています。

今回、jwc_temp.txtの「書換え」にDOSコマンドを使用しましたが、　　　　　　　　　　　　　　　　　　　　　　通常、外部変形用バッチファイルにはスプリクト言語が使用されます。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　

「書出し」/「読込み」

外変変形の動作を確認するバッチファイルを作成してみました。
バッチファイルに「rem #jww」を記述すると、
Jwwは、jwc_temp.txtの「書出し」／「読込み」を自動的に実行します。
バッチファイルは、c:\jww に保存します。

---------------
rem 外変テスト1
rem #jww
type jwc_temp.txt
pause
---------------

外部変形のファイル選択画面から、「外変テスト1」を実行します。

コマンドプロンプトが起動し、jwc_temp.txtの内容が表示されます。　　　　　　　　　　　　　　　Jwwが、jwc_temp.ｔｘｔを書出した結果です。　　　　　　　　　　　　　　　　　　　　　　　　　　　すでに、Jwwフォルダ内にjwc_temp.ｔｘｔがある場合は、「上書き」します。　　　　　　　　　　　　　　　　　　　　　　　　　　　

任意のキーを押すと、Jwwの画面左上に「未実行」が表示されます。　　　　　　　　　jwc_temp.ｔｘｔの先頭行に「hq」が記述されていると、Jwwは「読込み」を中止します。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　

バッチファイル

DOSコマンドは、バッチファイルにすると、操作を連続して実行することが可能。

----------　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　REM バッチファイル
md sample
cd sample

REM ファイルの新規作成
echo testfile>test.txt
echo test>>test.txt
echo test/test>>test.txt

REM 一行追記
echo test/test/test>>test.txt

REM ファイルのコピー
copy test.txt temp.txt

REM ファイルの削除
del test.txt　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　----------

「copy con」は、キーボード入力が必要なので
新規ファイルの作成には「echo」を使用します。

バッチファイルは、メモ帳で編集⇒拡張子 batで保存　　例）test.bat

例）「マイドキュメント」フォルダにバッチファイルを保存して実行する場合　　　　　　　　　　　

注）「上書き」されない様に、フォルダ名／ファイル名には注意！　　　　　　　

DOSコマンド

外変のバッチファイルを作成するには、DOSコマンドを知っておいた方が良いようです。　　MS-DOS時代を振り返って、ちょっとコマンドの使い方を復習してみます。

コマンドプロンプトの起動は、
スタート⇒ファイル名を指定して実行（R)⇒cmd　↓　　　　　　　　　　　　　　　　　　　　　　　　（住職さんよりアドバイスいただきました） 　

スタート⇒すべてのプログラム⇒アクセサリ⇒コマンドプロンプトでもOKです　　　　　　　　　　　　　

注）DOSコマンド を実行する場合、「上書き」の注意メッセージは表示されません。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（オプションが指定できるコマンドを除く）　　　　　　　　　　　　　　　　　　　　　　　　　　　　　試される場合は、フォルダ名／ファイル名に注意してください。　　　　　　　　　　　　　    　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　

注）"username"には、PCに登録しているユーザー名が表示されます。

それでは、いくつかのコマンドを実行してみます。　　　　　　

cd (chdir) コマンドを使って、ディレクトリをマイドキュメントに移動　　　　　　                >cd my documents  ↓(Enter)

dirコマンドを使ってディレクトリの内容を確認                                                           > dir　↓

md (mkdir) コマンドで新規ディレクトリ(フォルダ）sample を作成
>md sample

マイドキュメントのフォルダに sampleフォルダが追加されます。

cdコマンドでディレクトリをsampleフォルダに移動　　　　　　　　　　　　　　　　　　　　　　　　　　>cd sample

フォルダ内をウインドウで確認

copyコマンドでsampleフォルダtest.txtを新規作成⇒テキストを記入　　　　　　　　　　　　　　　　　　　　　　>copy con test.txt ↓　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　textfile                                                                                                       test                                                                                                     test/test

Ctrl+Zでコマンドを終了　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　^Z　↓

typeコマンドでファイル内容を確認
>type test.txt

echoコマンドでテキストを追記します。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　>echo test/test/test >>test.txt

copyコマンドで別名ファイルにコピー　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　>copy test.txt temp.txt

del コマンドでtest.ｔｘｔを削除　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　>del test.txt

ちょっとお休み

新しい線記号が思い浮かばないので、線記号変形の公開はしばらくお休します。

今度は、外部変形に挑んでみようと思っているんですが・・・・・・・。　　　　　　　　　　　　　　　　　山登りにたとえると、麓で準備を開始したばかり。　　　　　　　　　　　　　　　　　　　　　　　どんな荷物が必要で、どこから登り始めたら良いかもわかってないです。　　　　　　　　　　　　　　　　　　　　　　　とりあえず、ガイドブック探しからスタートです。