「Tinvs:createby2surfacesandentity」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
編集の要約なし
編集の要約なし
 
46行目: 46行目:


[[Category:AutoLISP]]
[[Category:AutoLISP]]
[[Category:BricsCADのLISP]]

2023年1月28日 (土) 08:52時点における最新版

構文
(Tinvs:createby2surfacesandentity tinEname1 tinEname2 clipEnt midOrdinateDist )


機能
tinEname1 と tinEname2 の TinSurface エンティティ、および clipEnt クリッピングエンティティから TinVolumeSurface を作成し、 midOrdinateDist 平滑化によってラスタライズする。


引数
  • tinEname1 : 最初の TinSurface エンティティのename または VLAオブジェクト。
  • tinEname2  : 2つ目の TinSurface エンティティのename または VLAオブジェクト。
  • clipEnt : クリッピング エンティティの ename または VLAオブジェクト。
  • midOrdinateDist : 滑らかさの実数。


戻り値
TinVolumeSurface エンティティの ename または nil



サンプル
(vl-load-tin)
(setq tin1 (tin:createTin '(0 0 0) '(100 100 100) 1000))
(tin:addpoints tin1 '((10 80 5) (50 50 10) (10 10 2) (80 20 7) (70 60 3) (40 70 10) (25 25 6) (55 55 2) (75 45 5) ))
(setq tin2 (tin:createTin '(100 100) '(200 100 100) 1000))
(tin:addpoints tin2 '((10 80 25) (50 50 30) (10 10 22) (80 20 27) (70 60 23) (40 70 40) ))

; 適当にクリッピング用のエンティティを作ってから
(tinvs:createby2surfacesandentity   tin1  tin2  (entlast)  0.2)
<Entity name: 492fb560>
 

関連事項