円の複写

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⇒半径