jw_cad 外部変形 - (784) rubyで2点間の距離を計算する(ptdist) -

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

 

rubyで2点間の距離を計算する(ptdist)

:rubyで2点間の距離を計算する(ptdist)
@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
BEGIN { include Math }
case $_
  when /^hp1/ then p1 = $F[1, 2].map{|x| x.to_f}
  when /^hp2/ then p2 = $F[1, 2].map{|x| x.to_f}
    x1, y1, x2, y2 = (p1 + p2)
    puts "h#2点間の距離 L = %.03f" % hypot(x2 - x1, y2 - y1)
end
__END__