Acet::arc-point-list

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(Acet::arc-point-list center startpoint endpoint maxangle alt )


機能
指定された円弧に沿って等距離にあるラスターポイントのリストを返す。


引数
  • center … 円弧の中心点の 2D/3D 座標点リスト
  • startpoint … 円弧の始点 2D/3D 座標点リスト
  • endpoint … 円弧の終点 2D/3D 座標点リスト
  • maxangle … スキャンする最大角度の実数。
  • alt … NIL の場合、円弧はデフォルトの9個のラスターポイントでラスタライズされ、ラジアン値の場合はその角度に依存した数になる。


戻り値
円弧に沿って等距離にあるラスターポイントのリスト


メモ

  • ラスターポイントのスキャンは、endpointまたはmaxangleに達したときに停止する。
  • 角度は ANGDIR の設定に関係なく、反時計回りで算出される。


サンプル
(Acet::arc-point-list  '(0 0)  '(10 0)  '(0 10)  0  nil)
((10.0 0.0) (7.66044443118978 6.42787609686539) (1.7364817766693 9.84807753012208) (-5.0 8.66025403784439) (-9.39692620785908 3.42020143325669) (-9.39692620785909 -3.42020143325669) (-5.0 -8.66025403784439) (1.7364817766693 -9.84807753012208) (7.66044443118978 -6.4278760968654) (10.0 0.0) (0 10))

(Acet::arc-point-list  '(0 0)  '(10 0)  '(-10 0)  (gz:deg->rad 180) 1)
((10.0 0.0) (7.07106781186548 7.07106781186548) (0.0 10.0) (-7.07106781186547 7.07106781186548) (-10.0 0.0))

(Acet::arc-point-list  '(0 0)  '(10 0)  '(-10 0)  (gz:deg->rad 180) 0.1)
((10.0 0.0) (9.602 2.79313372397385) (8.4396808 5.36393400351937) (6.60556300832 7.50776513638476) (4.24564240117773 9.05397816439392) (1.54776865890171 9.87949453051732) (-1.27330746862289 9.91860313201154) (-3.9930283216451 9.16819092419765) (-6.39490412026437 7.68799071881762) (-8.28774555091059 5.5958264522197) (-9.52088243570432 3.0582344000251) (-9.99615707861599 0.277206889588503) (-10 0))

(Acet::arc-point-list  '(0 0)  '(10 0)  '(-10 0)  (gz:deg->rad 180) 0.2)
((10.0 0.0) (9.208 3.90035075345795) (6.9574528 7.18288594756816) (3.60484507648 9.32765200758358) (-0.31877010715443 9.99491798959775) (-4.1918921058156 9.07898896205964) (-7.40101839491558 6.72494808293129) (-9.43782337026093 3.30567542746662) (-10 0))

関連事項