jw_cad 外部変形－ (465) rubyで線を引く－

外部変形はデータのやり取りをテキストファイルで行うのでプログラム言語は自由に選ぶことができます。図形は機能的かつシンプルなため、数多くのユーザーに受け入れられています。

rubyで線を引く

:rubyで線を引く
@echo off
ruby -x %0 jwc_temp.txt
goto:eof

REM #jww
REM #1-%d 始点を指示してください
REM #2%d 終点を指示してください
REM #e

#!ruby -Ks -an -i.bak
case $_
when /^hp1/; p1 = $F[1, 2] #始点の座標 p1 = [x1, y1] を取得
when /^hp2/; p2 = $F[1, 2] #終点の座標 p2 = [x2, y2] を取得
end
END {
puts "%s %s %s %s" % (p1 + p2) #線を引く (p1 + p2) = [x1, y1, x2, y2]
}
__END__