新しいページ

新しいページ
登録利用者を非表示 | ボットを非表示 | リダイレクトを表示
(最新 | 最古) ( | ) (20 | 50 | 100 | 250 | 500 件) を表示
  • 2025年8月12日 (火) 09:44Acet-geom-vector-d-angle (履歴 | 編集) ‎[679バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ;構文 :(acet-geom-vector-d-angle ''v1'' ''v2'') ;機能 : 2つのベクトル v1 と v2 間の角度を返します。3次元ベクトルにも対応。 ;引数 :* v1 … ベクトル座標リスト :* v2 … ベクトル座標リスト ;戻り値 : v1 と v2 間の角度(ラジアン値) ;サンプル <pre class="brush:autolisp;"> ; XY平面からXZ平面への角度 (acet-geom-vector-d-angle '(0 0 1) '(0 1 0)) 1.5707963267949 ;90度だ…」)
  • 2025年8月12日 (火) 09:38Acet-geom-m-trans (履歴 | 編集) ‎[1,032バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ;構文 :(acet-geom-m-trans ''pointlst'' ''from'' ''to'') ;機能 : pointlst から変換された点のリストを返す; (trans point from to) を pointlst の各点に適用する。 ;引数 :* pointlst … 角度 :* fromCS … 変換元座標系の数値 :* toCS … 変換先座標系 ::* fromCS,toCS の値:0 = WCS(ワールド座標系), 1 = UCS(ユーザ座標系), 2 = DCS (ディスプレイ座標系), 3 = PDCS(ペーパー…」)
  • 2025年8月12日 (火) 09:34Acet-geom-angle-trans (履歴 | 編集) ‎[925バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ;構文 :(acet-geom-angle-trans ''angle'' ''fromCS'' ''toCS'') ;機能 : fromCS から toCS座標系に変換した角度を返す。 ;引数 :* angle… 角度 :* fromCS … 変換元座標系の数値 :* toCS … 変換先座標系 ::* fromCS,toCS の値:0 = WCS(ワールド座標系), 1 = UCS(ユーザ座標系), 2 = DCS (ディスプレイ座標系), 3 = PDCS(ペーパー空間ディスプレイ座標系) ;戻り値 : 変換…」)
  • 2025年8月12日 (火) 09:12Acet-geom-self-intersect (履歴 | 編集) ‎[1,087バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ;構文 :(acet-geom-self-intersect ''ename1'' ''ename2'' ''flags'' ) ;機能 :エンティティename1とentity2のすべての交点を返す。 ;引数 :*ename1 … エンティティ名。 :*ename2 … エンティティ名。 :*flags … ビットコードのフラグ。 ::*bit 0 (1) : エンティティ1 を仮想的に拡張する。 ::*bit 1 (2) : エンティティ2 を仮想的に拡張する。 ;戻り値 :ename1とentity2のすべて…」)
  • 2025年8月12日 (火) 08:40Acet-geom-intersectwith (履歴 | 編集) ‎[2,279バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ;構文 :(acet-geom-intersectwith ''ename1'' ''ename2'' ''flags'' ) ;機能 :エンティティename1とentity2のすべての交点を返す。 ;引数 :*ename1 … エンティティ名。 :*ename2 … エンティティ名。 :*flags … ビットコードのフラグ。 ::*bit 0 (1) : エンティティ1 を仮想的に拡張する。 ::*bit 1 (2) : エンティティ2 を仮想的に拡張する。 ;戻り値 :ename1とentity2のすべて…」) タグ: ビジュアルエディター
  • 2025年8月11日 (月) 22:33Acet-geom-pixel-unit (履歴 | 編集) ‎[635バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-geom-pixel-unit) ; 機能 : 現在の表示倍率に対するピクセルの大きさを dwg 単位で返す。 ; 引数 :* なし ; 戻り値 : 1ピクセル: dwgの長さ ===MEMO=== * ズーム状況により変わる。 ; サンプル <pre class="brush:autolisp;"> (acet-geom-pixel-unit) 1.00424480975304 ; ミリ単位の場合、1ピクセル≒1ミリの状態 </pre> ----- 関連事項 * Expresstools関数 Cat…」)
  • 2025年8月11日 (月) 20:58Acet-geom-zoom-for-select (履歴 | 編集) ‎[1,082バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-geom-zoom-for-select pntlist ) ; 機能 : 座標点リスト pntlist 内のすべての点が画面上に表示されているかどうかを確認する。 ; 引数 :* pntlist … 座標点リスト ; 戻り値 : 座標点リスト pntlist 内のすべての点が作図領域上に表示されていると NILを返す。 : 作図領域上外だと、pntlist内のすべての点が画面上に表示されるように、Zoom/Window…」)
  • 2025年8月11日 (月) 20:25Acet-geom-image-bounds (履歴 | 編集) ‎[1,054バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-geom-image-bounds ''ename'' ) ; 機能 : 画像エンティティの境界点をリストとして返す。 ; 引数 :* ename … イメージエンティティのename ; 戻り値 : 画像エンティティの境界点をリスト(左下点 右下点 右上点 左上点 左下点)。 ===MEMO=== * 左下点 が最初と最後で 2つある理由は不明。 * イメージは、参照、OLEどちらも対象にできるが…」)
  • 2025年8月11日 (月) 19:00Acet-geom-cross-product (履歴 | 編集) ‎[801バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-geom-cross-product ''v1'' ''v2'') ; 機能 : ベクトルv1とv2の積ベクトル(v1とv2で定義される平面の法線ベクトル、3つの実数リスト)を返す。 ; 引数 :* v1 … ベクトルリスト。 :* v2 … ベクトルリスト。 ; 戻り値 : v1,v2のベクトル積のリスト ; サンプル <pre class="brush:autolisp;"> ; XZ平面とYZ平面の積 (acet-geom-cross-product '(0.0 -1.0 0.0) '(-1.0 0.0…」)
  • 2025年8月11日 (月) 17:16Acet-geom-z-axis (履歴 | 編集) ‎[616バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-geom-object-z-axis) ; 機能 : 現在のUCSのZベクトルを返す((getvar "UCSXDIR")と(getvar "UCSXDIR")のクロス積)。 ; 引数 :* なし ; 戻り値 : Zベクトルのリスト ; サンプル <pre class="brush:autolisp;"> (acet-geom-z-axis ) (0.0 0.0 1.0) ; UCSがXY平面(=WCS)の場合 (0.0 -1.0 0.0) ; UCSがXZ平面の場合 (-1.0 0.0 0.0) ; UCSがYZ平面の場合 </pre> ----- 関連事項 * Expresstools関…」)
  • 2025年8月11日 (月) 17:12Acet-geom-object-z-axis (履歴 | 編集) ‎[822バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-geom-object-z-axis ''elist'') ; 機能 : entityが平面entityであれば、entity data elistで指定されたentityの法線ベクトルを返し、そうでなければ(0 0 1)ベクトルを返す。 ; 引数 :* elist … エンティティリスト ; 戻り値 : 法線ベクトル座標リスト (DXFの210番拾うのと同じ) ; サンプル <pre class="brush:autolisp;"> (acet-geom-object-z-axis (entget (car (entsel)…」)
  • 2025年8月11日 (月) 17:02Acet-geom-delta-vector (履歴 | 編集) ‎[610バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-geom-delta-vector ''p1'' ''p2'') ; 機能 : p1からp2までのベクトル(相対座標)を3つの実数のリストとして返す。 ; 引数 :* p1 … 座標点リスト。 :* p2 … 座標点リスト。 ; 戻り値 : p1からp2までのベクトル(相対座標)リスト ; サンプル <pre class="brush:autolisp;"> (acet-geom-delta-vector '(1.0 6 0) '(10.0 5.0 0)) (9.0 -1.0 0) </pre> ----- 関連事項 * Expr…」)
  • 2025年8月11日 (月) 16:35Acet-geom-unit-vector (履歴 | 編集) ‎[957バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-geom-unit-vector ''p1'' ''p2'') ; 機能 : p1からp2までのベクトルの単位ベクトル(長さは1.0)を返す。 ; 引数 :* p1 … 座標点リスト。 :* p2 … 座標点リスト。 ; 戻り値 : 単位ベクトル座標値 ; サンプル <pre class="brush:autolisp;"> (acet-geom-unit-vector (getpoint) (getpoint)) (1.0 0.0 0.0) (setq unt (acet-geom-unit-vector (getpoint) (getpoint))) ; p1->p2 が 60度だった…」)
  • 2025年8月11日 (月) 15:51Acet-geom-midpoint (履歴 | 編集) ‎[204バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-geom-midpoint ''p1'' ''p2'') ; 機能 : acet-geom-midpointを参照 ----- 関連事項 * Expresstools関数 Category:AutoLISP Category:BricsCADのLISP」)
  • 2025年8月11日 (月) 15:50Acet-geom-mid-point (履歴 | 編集) ‎[760バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-geom-mid-point ''p1'' ''p2'') ; 機能 : 与えられた点p1とp2の中点を返す。 ; 引数 :* p1 … 座標点リスト。 :* p2 … 座標点リスト。 ; 戻り値 : 中点の座標点リスト。 : p1とp2の両方が3D点である場合は3D点として、p1またはp2のどちらかが2D点のみの場合は2D点が返る。って書いてあるけど3D 点が返ってきとるで。 ; サンプル <pre class="bru…」)
  • 2025年8月11日 (月) 15:45Acet-geom-is-arc (履歴 | 編集) ‎[840バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-geom-is-arc ''p1'' ''p2'' ''p3'' ''p4'' ''fuz'' ) ; 機能 : 与えられた4点 p1 p2 p3 p4 が有効な円弧/円を定義しているかどうかを検証する。 ; 引数 :* p1 … 座標点リスト。 :* p2 … 座標点リスト。 :* p3 … 座標点リスト。 :* p4 … 座標点リスト。 :* fuz … 許容差の実数。NILの場合は許容差0.0が使用される。 ; 戻り値 : 4点が円弧/円に属する場…」)
  • 2025年8月11日 (月) 14:42Acet-geom-textbox (履歴 | 編集) ‎[1,082バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-geom-textbox ''textobject'' ''offset'') ; 機能 : textobject で指定された Text または AttributeDefinition または Attribute または MText の 4 つの境界矩形点のリストを返す。 ; 引数 :* textobject … ename または (entget) リスト。 :* offset … 境界矩形を拡張するために適用されるオフセットの実数。 ; 戻り値 : 算出された境界矩形点のリスト。 ; サン…」)
  • 2025年8月11日 (月) 03:48Acet-geom-calc-arc-error (履歴 | 編集) ‎[880バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ;構文 : (acet-geom-calc-arc-error ''param'' ) ;機能 : 入力パラメーター param に基づいて内部計算用のエラー係数を計算する。 : 「アプリケーションコードでは使用しないでください。」っていうことでテスト用だと思われるが詳細は不明。 ;引数 :*param … パラメータ ;戻り値 : T分布ベースの値? =====サンプル===== ファイル:Acet-geom-arc-bulge.png|…」)
  • 2025年8月11日 (月) 02:46Acet-geom-arc-bulge (履歴 | 編集) ‎[1,108バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ;構文 :(acet-geom-arc-bulge ''center'' ''p1'' ''deltaang'') ;機能 :指定された差角 deltaang に対する膨らみ値を返す。引数 center と p1 は(実質的に不要なので)使用されない。 :膨らみは、弧のセグメントの包含角の 1/4 の接線。弧が起点から終点に向かって時計回りに進む場合、負の値になる。 :膨らみが 0 の場合、直線セグメントを表し、膨らみが 1 の…」) タグ: ビジュアルエディター
  • 2025年8月11日 (月) 02:28Acet-geom-arc-center (履歴 | 編集) ‎[810バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ;構文 :(acet-geom-arc-center ''p1'' ''p2'' ''p3'') ;機能 :p1,p2,p3関数は、3点p1,p2,p3で指定された円弧または円の中心点座標を返す。 ;引数 :*p1 … 3D点リスト :*p2 … 3D点リスト :*p3 … 3D点リスト ;戻り値 :3点円弧の中心点座標リスト =====サンプル===== 中央|サムネイル|Acet-geom-arc-centerのサンプル <pre class="brush:autolisp;"> (s…」) タグ: ビジュアルエディター
  • 2025年8月11日 (月) 02:19Acet-geom-arc-d-angle (履歴 | 編集) ‎[931バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ;構文 :(acet-geom-arc-d-angle ''center'' ''p1'' ''p2'' ) ;機能 :中心点 center->p1 ベクトルと 中心点 center->p2 ベクトル間の角度を返す。角度の単位はラジアン。 ;引数 :*Center … 中心点の3D点リスト :*p1 … 3D点リスト :*p2 … 3D点リスト ;戻り値 : =====サンプル===== ファイル:Acet-geom-arc-d-angle.png|代替文=Acet-geom-arc-d-angle の角度取得イメージ|中央|サムネ…」) タグ: ビジュアルエディター
  • 2025年8月10日 (日) 05:07Acet-list-remove-duplicate-points (履歴 | 編集) ‎[1,634バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-list-remove-duplicates-points ''datalist'' ''fuz'' ) ; 機能 : datalist から許容差 fuz を考慮した同じ値を取り除いたリストを返す。 ; 引数 :* datalist … 評価するリスト :* fuz … 許容誤差 ; 戻り値 : 重複が取り除かれた datalist のリスト。lst が NIL の場合は NIL を返す。 ===MEMO=== * 除去はリスト値の最初から処理されるのでリスト値の順番に…」)
  • 2025年8月10日 (日) 05:06Acet-list-remove-duplicates (履歴 | 編集) ‎[1,677バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-list-remove-duplicates ''datalist'' ''fuz'' ) ; 機能 : datalist から許容差 fuz を考慮した同じ値を取り除いたリストを返す。 ; 引数 :* datalist … エンティティ名のリスト :* fuz … 許容誤差 ; 戻り値 : 重複が取り除かれた datalist のリスト。lst が NIL の場合は NIL を返す。 ===MEMO=== * 除去はリスト値の最初から処理されるのでリスト値の順…」)
  • 2025年8月10日 (日) 04:43Acet-list-remove-adjacent-dups (履歴 | 編集) ‎[1,092バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-list-remove-adjacent-dups ''datalist'' ) ; 機能 : datalist から連続した同じ値を取り除いたリストを返す。 ; 引数 :* datalist … エンティティ名のリスト ; 戻り値 : 連続した重複が取り除かれた datalist のリスト。lst が NIL の場合は NIL を返す。 ; サンプル <pre class="brush:autolisp;"> (acet-list-remove-adjacent-dups '(1 2 3 4 3 2 4 5) ) (1 2 3 4 3 2 4 5) ; 連…」)
  • 2025年8月9日 (土) 21:57Acet-list-is-dotted-pair (履歴 | 編集) ‎[799バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-list-is-dotted-pair ''item'' ) ; 機能 : item が真のドットペアリストであるかどうかを返す。 ; 引数 :* item … 評価するリスト ; 戻り値 : item が真のドットペアリストであれば T、そうでなければ NIL を返す。 ; サンプル <pre class="brush:autolisp;"> (setq lst '(1 . 5)) (acet-list-is-dotted-pair lst ) T (setq lst '(1 5)) (acet-list-is-dotted-pair lst ) nil (setq lst…」)
  • 2025年8月9日 (土) 21:37Acet-list-isort (履歴 | 編集) ‎[1,171バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-list-isort ''lst'' ''index'' ) ; 機能 : lst をインデックスで並べ替えたリストを返す。 ; 引数 :* lst … ソートするリスト。「サブリストのリスト」。 :* index … ソートする位置の整数。最初の項目は 0 ; 戻り値 : index 位置で更新されたリスト ; サンプル <pre class="brush:autolisp;"> 数値でソート (setq lst (list '(1 2 5) '(2 1 4) '(3 4 3) '(4 3 2) '(…」)
  • 2025年8月9日 (土) 20:42Acet-list-remove-nth (履歴 | 編集) ‎[768バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-list-remove-nth ''atidx'' ''datalist'' ) ; 機能 : インデックス atidx で削除された項目を持つリスト datalist を返す。 : インデックスは 0 から始まる。 ; 引数 :* atidx … インデックスの整数 :* datalist … 更新されるリスト ; 戻り値 : 更新されたリスト ; サンプル <pre class="brush:autolisp;"> (setq lst '("a" "b" "c" "消されちゃいますかー" "e" "f" "g"…」)
  • 2025年8月9日 (土) 20:38Acet-list-put-nth (履歴 | 編集) ‎[787バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-list-put-nth ''newval'' ''datalist'' ''atidx'' ) ; 機能 : インデックス atidx に対応するアイテムの値を newval に更新したリスト datalist を返す。 : インデックスは 0 から始まる。 ; 引数 :* newval … 更新する値 :* datalist … 更新されるリスト :* atidx … インデックスの整数 ; 戻り値 : 更新されたリスト ; サンプル <pre class="brush:autolisp;"> (set…」)
  • 2025年8月9日 (土) 20:33Acet-list-split (履歴 | 編集) ‎[872バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-list-split ''lst'' ''item'' ) ; 機能 : リスト lst を要素 item で分割し、2つのサブリスト(左側部分と右側部分)に分割し、両方のサブリストを格納したリストを返す。 : 分割対象の要素 item は、右側リスト部分(存在する場合)の最初の要素になる。 ; 引数 :* lst … リスト :* item … 分割に指定する要素 ; 戻り値 : item 位置で分割…」)
  • 2025年8月9日 (土) 19:33Acet-list-m-assoc (履歴 | 編集) ‎[654バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-list-m-assoc ''key'' ''lst'' ) ; 機能 : assocキーのキーでlstの全項目を含むリストを返す。 ; 引数 :* lst … リスト ; 戻り値 : lst 内の Key キーのリスト ; サンプル <pre class="brush:autolisp;"> (setq lst '((1 . "a") (10 . "b") (10 . "c") (10 . "d") )) (acet-list-m-assoc '10 lst) ((10 . "b") (10 . "c") (10 . "d")) </pre> ----- 関連事項 * Expresstools関数 * acet-list-assoc-ap…」)
  • 2025年8月9日 (土) 18:00Acet-list-group-by-assoc (履歴 | 編集) ‎[908バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-list-group-by-assoc ''lst'' ) ; 機能 : 連想キーでソート()されたリスト lst を返す。 ; 引数 :* lst … 更新・追加されるリスト ; 戻り値 : 連想キーでソートされたリスト ; サンプル <pre class="brush:autolisp;"> (setq lst '((1 . "a") (2 . "b") (3 . "c") (100 . "c") )) (acet-list-group-by-assoc lst) ((100 . "c") (3 . "c") (2 . "b") (1 . "a")) (setq lst '((a . "a") (b . "b") (c . "c…」)
  • 2025年8月9日 (土) 07:42Acet-list-to-ss (履歴 | 編集) ‎[681バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-list-to-ss ''lst'' ) ; 機能 : リスト lst 内のすべてのエンティティを含む選択セットを返す。 ; 引数 :* lst … エンティティ名のリスト ; 戻り値 : 選択セット。lst が NIL の場合は NIL を返す。 ; サンプル <pre class="brush:autolisp;"> (setq lst (list (car (entsel)) (car (entsel)) (car (entsel)) )) (<Entity name: bd2b1df0> <Entity name: 159cd9a80> <Entity name: bd296eb0>…」)
  • 2025年8月9日 (土) 06:53Acet-elist-add-defaults (履歴 | 編集) ‎[1,248バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-elist-add-defaults ''elist'' ) ; 機能 : レイヤー、色、線幅、線種のデフォルトエントリを持つ、与えられたelistを更新し、完成させる。 ; 引数 :* elist … エンティティリスト ; 戻り値 : レイヤー、色、線幅、線種のデフォルトエントリが追加されたエンティティリスト ; サンプル <pre class="brush:autolisp;"> (setq e (entget (car (entsel)))) ((…」)
  • 2025年8月9日 (土) 06:03Acet-list-assoc-remove (履歴 | 編集) ‎[631バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-list-assoc-remove ''key'' ''assoclst'' ) ; 機能 : キー key のアイテムを Assoclst から削除する。 ; 引数 :* key … 削除するキー :* assoclst … keyによって更新されるドットペアリスト。 ; 戻り値 : key が除去されたassoclst。 ; サンプル <pre class="brush:autolisp;"> (setq ) (acet-list-assoc-remove '2 '((1 . "a") (2 . "b") (3 . "c"))) ((1 . "a") (3 . "c")) </pre> ----- 関…」)
  • 2025年8月9日 (土) 05:55Acet-list-assoc-put (履歴 | 編集) ‎[756バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-list-assoc-put ''dpValue'' ''assoclst'' ) ; 機能 : dpValueによって更新されたassoclstを返す。 ; 引数 :* dpValue … ドットペアリスト :* assoclst … dpValueによって更新されるドットペアリスト。dpValue がリストに存在しない場合は、assoclst に追加される。 ; 戻り値 : dpValueによって更新されたassoclst。 ; サンプル <pre class="brush:autolisp;"> (setq )…」)
  • 2025年8月9日 (土) 05:46Acet-list-assoc-append (履歴 | 編集) ‎[669バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-list-assoc-append ''assoclst'' ''lst'' ) ; 機能 : assoclst によって更新または追加された lst を返す。 ; 引数 :* assoclst … 更新・追加するリスト :* lst … 更新・追加されるリスト ; 戻り値 : ; サンプル <pre class="brush:autolisp;"> (setq ) (acet-list-assoc-append '(1 2 3 4) '((1 5))) ((1 5 2 3)) (acet-list-assoc-append '(2 6 7 8) '((1 "a" "b" "c") (2 3 4 5))) ((1 "a" "b" "c")…」)
  • 2025年8月8日 (金) 08:22Acet-ini-get (履歴 | 編集) ‎[1,853バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-ini-get ''inifile'' ''section'' [ ''key'' [ ''default'' ]]) ; 機能 : 設定をファイルに保存(または削除)する。 ; 引数 :* inifile … 使用するファイル名(完全なパス名を含める必要がある。内部的に (findfile) 操作は使用されない。) :* section … 設定キーが格納されるセクション名;存在しない場合は作成される。 :* key … 値を保存する…」)
  • 2025年8月8日 (金) 08:17Acet-ini-set (履歴 | 編集) ‎[1,542バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-ini-set ''inifile'' ''section'' [ ''key'' [ ''value'' ]]) ; 機能 : 設定をファイルに保存(または削除)する。 ; 引数 :* inifile … 使用するファイル名(完全なパス名を含める必要がある。内部的に (findfile) 操作は使用されない。) :* section … 設定キーが格納されるセクション名;存在しない場合は作成される。 :* key … 値を保存する設…」)
  • 2025年8月8日 (金) 06:11Acet-var-getvar (履歴 | 編集) ‎[1,155バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-var-getvar ''varname'' ''savemode'' ) ; 機能 : savemodeで指定された複数の保存場所からカスタム変数をロードする。 ; 引数 :* varname … システム変数名の文字列 :* saveMode … ビットフラグの組み合わせ: 1 = 辞書 2 = レジストリ 4 = 環境 ::* saveModeがNILの場合、その値を持つ変数は辞書とレジストリからロードされる(saveMode = 3) ::* 変数が1…」)
  • 2025年8月8日 (金) 06:03Acet-var-setvar (履歴 | 編集) ‎[997バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-var-setvar ''varname'' ''varval'' ''savemode'' ) ; 機能 : 値varvalを持つカスタム変数varnameを、savemodeで指定された複数の保存場所に保存する。 ; 引数 :* varname … システム変数名の文字列 :* varname … システム変数の値 :* saveMode … ビットフラグの組み合わせ: 1 = 辞書 2 = レジストリ 4 = 環境 ::* saveModeがNILの場合、その値を持つ変数は辞…」)
  • 2025年8月8日 (金) 05:37Acet-getvar (履歴 | 編集) ‎[906バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-getvar ''varlist'' ) ; 機能 : 複数の保存場所からカスタム変数をロードする。 ; 引数 :* varlist … varlist は '(var1 saveMode var2 saveMode ...)' のリスト。 ::* saveModeは次のビットフラグの組み合わせ: 1 = 辞書 2 = レジストリ 4 = 環境 ::* saveModeがNILの場合、その値を持つ変数は辞書とレジストリからロードされる(saveMode = 3) ; 戻り値 : 常に 0…」)
  • 2025年8月8日 (金) 05:35Acet-setvar (履歴 | 編集) ‎[946バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-setvar ''varlist'' ) ; 機能 : カスタム変数とその値を複数の保存場所に保存する。 ; 引数 :* varlist … '(var1 var2 saveMode var2 val2 saveMode ...)' のリスト。 ::* saveMode は次のビットフラグの組み合わせ: 1 = 辞書 2 = レジストリ 4 = 環境; ::* saveModeがNILの場合、その値を持つ変数は辞書とレジストリに保存される(saveMode = 3)。 ; 戻り値 :…」)
  • 2025年8月8日 (金) 05:28Acet-sysvar-restore (履歴 | 編集) ‎[585バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-sysvar-restore ) ; 機能 : 先に実行された (acet-sysvar-set) で保存されたシステム変数を、以前の値に戻す。 ; 引数 :* なし ; 戻り値 : 常にvoid (princ)を返す。 ; サンプル <pre class="brush:autolisp;"> (setq oldvar (acet-sysvar-set '("cmdecho" 0 "osmode" 0 "filedia" 0))) (("FILEDIA" . 1) ("OSMODE" . 4135) ("CMDECHO" . 0)) ; 何かの処理 (acet-sysvar-restore) </pre> ----- * Expres…」)
  • 2025年8月8日 (金) 05:27Acet-sysvar-set (履歴 | 編集) ‎[788バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-sysvar-set ''varlist'' ) ; 機能 : 与えられたリスト varlist からシステム変数を設定し、それらのシステム変数の実際の値を内部スタック・リストに保存する ; 引数 :* varlist : システム変数の名前と新しい値をフラット・シーケンスとして含むリスト。 ; 戻り値 : 保存されていたシステム変数とその値のリストを返す。 ; サンプル…」)
  • 2025年8月7日 (木) 20:34Acet-plines-rebuild (履歴 | 編集) ‎[1,230バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-plines-rebuild ''pldata'' ) ; 機能 : pldata 定義データに基づいて新しいポリラインを再作成する。 ; 引数 :* pldata : (acet-plines-explode)によって返されたポリラインの定義データのリスト。 ; 戻り値 : 再作成されたポリラインを含む選択セットを返すか、ポリラインが再作成されなかった場合はNILを返す。 ; サンプル <pre class="brush:au…」)
  • 2025年8月7日 (木) 20:27Acet-plines-explode (履歴 | 編集) ‎[1,638バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-plines-explode ''ss'' ) ; 機能 : 選択セット ss に含まれるすべてのポリラインを分解し、分解された各ポリラインに対して 1 エントリの定義データのリストを返す。 ; 引数 :* ss … 選択セット ; 戻り値 : 分解された各ポリラインに対して 1エントリの定義データリスト (ExplodedData ExplodeData ...) を返す。 (ltypegen enames widthlist ucs startpt f…」)
  • 2025年8月7日 (木) 06:25Acet-truncate-2-view (履歴 | 編集) ‎[452バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-truncate-2-view pt1 pt2 a b c d) ; 機能 : 詳細不明 ; 引数 :* p1 … 座標点リスト :* p2 … 座標点リスト :* a … 実数 :* b … 実数 :* c … 実数 :* d … 実数 ; 戻り値 : 2D座標点リスト? ; サンプル <pre class="brush:autolisp;"> (acet-truncate-2-view '(0 0) '(210 297) 10.0 10.0 10.0 10.0) (0 0) </pre> ----- 関連事項 * expresstools関数 * grclear * grarc * grdraw *…」)
  • 2025年8月7日 (木) 06:12Acet-temp-segment (履歴 | 編集) ‎[1,367バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-temp-segment p1 p2 p3 highlight) ; 機能 : 実際のビューポート上に一時的な線分 [p1, p2] と [p2, p3] を描画する。 : ハイライトが NIL でない場合、線分はハイライト表示され、そうでない場合は通常通り描画される。 ; 引数 :* p1 … 座標点リスト :* p2 … 座標点リスト :* p3 … 座標点リスト :* hilight … ハイライトで描画するかをコント…」)
  • 2025年8月6日 (水) 20:58Acet-filter-match (履歴 | 編集) ‎[552バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-filter-match assoclist cons) ; 機能 : 詳細不明 ; 引数 :* assoclist … エンティティリストっぽい :* cons … 何かのリスト ; 戻り値 : ; サンプル <pre class="brush:autolisp;"> (setq e (entget (car (entsel)))) (Acet-filter-match e '(("aaa" "ccc" "ddd") . "ccc")) nil </pre> ----- 関連事項 * expresstools関数 * acet-and-match * acet-not-match * acet-or-match * acet-gc-m…」)
  • 2025年8月6日 (水) 20:47Acet-4-match (履歴 | 編集) ‎[557バイト]Gizmon (トーク | 投稿記録) (ページの作成:「{{AutoLISP}} ; 構文 : (acet-4-match cons1 str cons2) ; 機能 : 詳細不明 ; 引数 :* cons1 … 何かのコンスセル :* str … 多分評価する文字列 :* cons2 … 何かのコンスセル ; 戻り値 : 詳細不明 ; サンプル <pre class="brush:autolisp;"> (Acet-4-match '("aaa" . "bbb") "bbb" '("ccc" . "ddd")) "ddd" </pre> ----- 関連事項 * expresstools関数 * acet-and-match * acet-not-match * acet-or-match * […」)
(最新 | 最古) ( | ) (20 | 50 | 100 | 250 | 500 件) を表示