jw_cad 外部変形 - (1537-6) jw.rbで円データの勾配を得る(cislope ci pt1 pt2 円弧角) -

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

 

cislope(ci, pt1, pt2) は 円データの円周上の位置間の円弧角を返します。
  ci は 円データ
  pt1, pt2 は 円周上の位置

 

使用例

:jw.rbで円データの勾配を得る(cislope ci pt1 pt2 円弧角)
@echo off
ruby -x %0
goto:eof

REM #jww
REM #1ci 円・円弧を指示して下さい
REM #2- 円周上の位置を指示して下さい
REM #3 円周上の位置を指示して下さい
REM #e

#!ruby -Ks -rjw
jww
plot "h#%.1f" % a = (cislope 1.ci, 2.hp, 3.hp).deg
a1 = (cislope 1.ci, 2.hp).deg
a2 = (cislope 1.ci, 3.hp).deg
ci = 1.ci.of(:x, :y, :r) + [a1, a2, 1.ci.w, 1.ci.d]
plot ci ci.c(0.5), 20
plot ch ci.c(0.5), cround(a, 1) + "゚"
plot ci ci_hpsnap(1.ci, 2.hp), 20
plot ch ci_hpsnap(1.ci, 2.hp), cround(a1, 1) + "゚"
plot ci ci_hpsnap(1.ci, 3.hp), 20
plot ch ci_hpsnap(1.ci, 3.hp), cround(a2, 1) + "゚"
__END__

 

 

円周上の2点間の円弧角を求めています。