« 計算結果の作図 | トップページ | ソリッド図形 »

2023年8月27日 (日)

三角・四角ソリッド

2点を指定してソリッド図形を作図する外部変形

Solid

@REM 三角ソリッド
@echo off
REM #jww
REM #cd
REM #1 始点を指定してください
REM #2 対角点を指定してください
REM #hr
REM #e
jgawk '/hp1/{xs=$2;ys=$3}/hp2/{xe=$2;ye=$3}END{print "sl",xs,ys,xe,ys,xe,ye}' jwc_temp.txt>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end
※gawkm115用
:end

@REM 四角ソリッド
@echo off
REM #jww
REM #cd
REM #1 始点を指定してください
REM #2 対角点を指定してください
REM #hr
REM #e
jgawk '/hp1/{xs=$2;ys=$3}/hp2/{xe=$2;ye=$3}END{print "sl",xs,ys,xe,ys,xe,ye,xs,ye}' jwc_temp.txt>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end
※gawkm115用
:end

|

« 計算結果の作図 | トップページ | ソリッド図形 »

コメント

コメントを書く



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




« 計算結果の作図 | トップページ | ソリッド図形 »