三角・四角ソリッド
2点を指定してソリッド図形を作図する外部変形
@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
| 固定リンク
コメント