すべての公開記録

GizmoLabs - だいたい CAD LISP なサイトの取得できる記録をまとめて表示しています。記録の種類、実行した利用者 (大文字小文字は区別)、影響を受けたページ (大文字小文字は区別) による絞り込みができます。

2025年8月7日 (木) 06:40 Gizmon トーク投稿記録がページ「ロード」を削除しました (内容:「Gz-Libのページである。中身はまだない。 Category:Gz-Lib」、投稿者は「Gizmon」のみ (トーク))
2025年8月7日 (木) 06:40 Gizmon トーク投稿記録がページ「レイヤー状態」を削除しました (内容:「Gz-Libのページである。中身はまだない。 Category:Gz-Lib」、投稿者は「Gizmon」のみ (トーク))
2025年8月7日 (木) 06:40 Gizmon トーク投稿記録がページ「メモリ」を削除しました (内容:「Gz-Libのページである。中身はまだない。 Category:Gz-Lib」、投稿者は「Gizmon」のみ (トーク))
2025年8月7日 (木) 06:38 Gizmon トーク投稿記録がページ「ディクショナリ」を削除しました (内容:「Gz-Libのページである。中身はまだない。 Category:Gz-Lib」、投稿者は「Gizmon」のみ (トーク))
2025年8月7日 (木) 06:38 Gizmon トーク投稿記録がページ「構成」を削除しました (内容:「Gz-Libのページである。中身はまだない。 Category:Gz-Lib」、投稿者は「Gizmon」のみ (トーク))
2025年8月7日 (木) 06:35 Gizmon トーク投稿記録がページ「選択セット」を削除しました (内容:「Gz-Libのページである。中身はまだない。 Category:Gz-Lib」、投稿者は「Gizmon」のみ (トーク))
2025年8月7日 (木) 06:35 Gizmon トーク投稿記録がページ「論理-ロジカル」を削除しました (内容:「Gz-Libのページである。中身はまだない。 Category:Gz-Lib」、投稿者は「Gizmon」のみ (トーク))
2025年8月7日 (木) 06:35 Gizmon トーク投稿記録がページ「ファイルシステム」を削除しました (内容:「Gz-Libのページである。中身はまだない。 Category:Gz-Lib」、投稿者は「Gizmon」のみ (トーク))
2025年8月7日 (木) 06:34 Gizmon トーク投稿記録がページ「ヘルプ」を削除しました (内容:「Gz-Libのページである。中身はまだない。 Category:Gz-Lib」、投稿者は「Gizmon」のみ (トーク))
2025年8月7日 (木) 06:34 Gizmon トーク投稿記録がページ「その他の関数」を削除しました (内容:「Gz-Libのページである。中身はまだない。 Category:Gz-Lib」、投稿者は「Gizmon」のみ (トーク))
2025年8月7日 (木) 06:33 Gizmon トーク投稿記録がページ「描画」を削除しました (内容:「Gz-Libのページである。中身はまだない。 Category:Gz-Lib<source lang="html4strict"></source>」、投稿者は「Gizmon」のみ (トーク))
2025年8月7日 (木) 06:25 Gizmon トーク投稿記録がページ「Acet-truncate-2-view」を作成しました (ページの作成:「{{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:12 Gizmon トーク投稿記録がページ「Acet-temp-segment」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-temp-segment p1 p2 p3 highlight) ; 機能 : 実際のビューポート上に一時的な線分 [p1, p2] と [p2, p3] を描画する。 : ハイライトが NIL でない場合、線分はハイライト表示され、そうでない場合は通常通り描画される。 ; 引数 :* p1 … 座標点リスト :* p2 … 座標点リスト :* p3 … 座標点リスト :* hilight … ハイライトで描画するかをコント…」)
2025年8月6日 (水) 20:58 Gizmon トーク投稿記録がページ「Acet-filter-match」を作成しました (ページの作成:「{{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:47 Gizmon トーク投稿記録がページ「Acet-4-match」を作成しました (ページの作成:「{{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 *　[…」)
2025年8月6日 (水) 07:50 Gizmon トーク投稿記録がページ「Acet-str-esc-wildcards」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-str-esc-wildcards　''string'' ) ; 機能 : 文字列内に含まれるすべてのワイルドカード文字を ` 文字でエスケープした文字列を返す。 ; 引数 :* string… 評価する文字列 ; 戻り値 : ワイルドカード文字を ` 文字でエスケープした文字列。 ; サンプル <pre class="brush:autolisp;"> (acet-str-esc-wildcards　"あかまきがみあおまき*がみきまきまみ" ) ;…」)
2025年8月6日 (水) 07:31 Gizmon トーク投稿記録がページ「Acet-str-m-find」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-str-m-find ''what'' ''string'' ) ; 機能 : what が出現する文字列を返し、見つかったすべての位置リストを返す。 ; 引数 :* what… 検索する文字列 :* string… 評価する文字列 ; 戻り値 : 文字列内から見つかった位置のリスト。見つからない場合は nil。 ; サンプル <pre class="brush:autolisp;"> (setq text "This is a Pen. This is a Apple. Un! penpainappleapplep…」)
2025年8月6日 (水) 06:43 Gizmon トーク投稿記録がページ「Acet-str-wcmatch」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-str-wcmatch ''string'' ''pattern'' [ ''caseInsensitive'']) ; 機能 : 文字列 string がパターン pattern と一致する場合、T を返す。 ; 引数 :* String … 評価する文字列 :* pattern … 比較するパターン :* caseInsensitive … nil でない場合、wcmatch 操作は大文字小文字を区別するモードで実行される。 ; 戻り値 : パターンを一致すれば T、それ以外は nil…」)
2025年8月6日 (水) 05:11 Gizmon トーク投稿記録がページ「Acet-str-replace」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-str-replace ''find'' ''replace'' ''inString'' [ ''caseInsensitive'' [ ''useRegExp'' [ ''count'' ]]]) ; 機能 : 文字列inString内の文字列 find を文字列 replace に置き換えた結果の文字列を返す。 ; 引数 :* find … inString内の置換前文字列 :* replace … oldstrを置換する文字列 :* inString … 評価する文字列 :* caseInsensitive … nil でない場合、大文字小文字を区別…」)
2025年8月5日 (火) 21:46 Gizmon トーク投稿記録がページ「Acet-str-lr-trim」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-str-space-trim ''trimchars'' ''string'' ) ; 機能 : trimcharsに含まれる任意の文字を左右トリミングした文字列を返す。 ; 引数 :* trimchars … トリムする文字列 :* str … 評価する文字列 ; 戻り値 : 空白がトリミングされた文字列 ; サンプル <pre class="brush:autolisp;"> (acet-str-lr-trim "0" "00123456") "123456" (acet-str-lr-trim "\"" "\"裏飯屋\"") "裏飯屋" </pr…」)
2025年8月5日 (火) 21:41 Gizmon トーク投稿記録がページ「Acet-str-space-trim」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-str-space-trim ''str'' ) ; 機能 : 前後の空白をトリミングした文字列を返す。 ; 引数 :* str … 評価する文字列 ; 戻り値 : 空白がトリミングされた文字列 ; サンプル <pre class="brush:autolisp;"> (acet-str-space-trim " マットレス ") "マットレス" (acet-str-space-trim "　マ　ッ　ト　レ　ス　　")　 "　マ　ッ　ト　レ　ス　　" ; 全角スペー…」)
2025年8月5日 (火) 20:23 Gizmon トーク投稿記録がページ「Acet-str-format」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-str-format ''format'' [ ''arg1'' ''arg2 '' ''argN'' ] ) ; 機能 : 引数arg1、arg2などを使って、フォーマット format に基づいた文字列を返す。 ; 引数 :* format-string … 引数のプレースホルダーとして「%1」と「%2」を含む通常の文字列。使用できる引数はINT、REAL、STR型のみ。 :* arg1 … format 内の書式指定子に対応する引数。 %1 :* arg2 … format 内…」)
2025年8月5日 (火) 07:49 Gizmon トーク投稿記録がページ「Acet-str-find」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-str-find ''searchFor'' ''inString'' [ ''caseInsensitive'' [ ''wildcardMatch'' ]]) ; 機能 : 文字列 inString 内から文字列 searchFor 位置のインデックスを返す。 : caseInsensitive が指定され、かつ NIL でない場合、検索は大文字小文字を区別しない； : wildcardMatchが指定され、NILでない場合、検索は正規表現モードで実行される。 ; 引数 :* searchFor … 検索…」)
2025年8月5日 (火) 07:30 Gizmon トーク投稿記録がページ「Acet-str-equal」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-str-equal ''leftString'' ''rightString'' [''CaseSensitive'' ]) ) ; 機能 : ( acet-str-collate )と同じだが返り値が違う。 ; 引数 :* leftString … 評価する文字列 :* rightString … 評価する文字列 :* CaseSensitive … 大文字と小文字を区別するかどうかを指定する整数。T=大文字と小文字を区別する。nil= 大文字と小文字を区別しない。初期値は nil。 ;…」)
2025年8月5日 (火) 07:28 Gizmon トーク投稿記録がページ「Acet-str-collate」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-str-collate ''leftString'' ''rightString'' [''CaseSensitive'' ]) ) ; 機能 : 2つの文字列を大文字小文字を区別せずに比較する。文字列の比較は、現在のコードページに基づいて行われる。 ; 引数 :* leftString … 評価する文字列 :* rightString … 評価する文字列 :* CaseSensitive … 大文字と小文字を区別するかどうかを指定する整数。T=大文字と小文…」)
2025年8月5日 (火) 06:55 Gizmon トーク投稿記録がページ「Acet-bs-strip」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-bs-strip ''string'' ) ; 機能 : 文字列 string からバックスペース文字 (0x08) を取り除く。 ; 引数 :* string … 評価する ; 戻り値 : バックスペース文字 (0x08) が取り除かれた文字列。 ; サンプル <pre class="brush:autolisp;"> (setq str "今日のおやつは\bなんですか？\n") (acet-bs-strip str) "今日のおやつはなんですか？\n" </pre> ----- 関連事項 * Expre…」)
2025年8月5日 (火) 06:02 Gizmon トーク投稿記録がページ「Acet-set-cmdecho」を作成しました (ページの作成:「 {{AutoLISP}} ; 構文 : (acet-set-cmdecho ''new-value'' ) ; 機能 : CADのシステム変数 CMDECHO の値を設定する。 : (setvar "cmdecho" n) と似ているが、直前の cmdecho値を返す点が異なり、値の「取得」と「設定」が一行で完結するため、コードがよりシンプルで読みやすくなる。 ; 引数 :* new-value : CMDECHO に設定したい新しい整数値。0（非表示）または 1（表示）です。 ;…」)
2025年8月5日 (火) 05:48 Gizmon トーク投稿記録がページ「Acet-safe-command」を作成しました (ページの作成:「 {{AutoLISP}} ; 構文 : (acet-safe-command cmdlist) ; 機能 : (command) 関数をより安全に実行するためのラッパー（包む）関数。 : 主な目的は、command 関数の実行中にユーザーが [Esc] キーを押してキャンセルしたり、コマンド自体がエラーで失敗したりしても、LISPプログラム全体がエラーで停止してしまうのを防ぐ用途。 ; 引数 :* cmdlist ：コマンドとオプション…」)
2025年8月5日 (火) 05:32 Gizmon トーク投稿記録がページ「Acet-undo-end」を作成しました (ページの作成:「 {{AutoLISP}} ; 構文 : (acet-undo-end) ; 機能 : (command "_undo" "_end") を実行する関数。(acet-undo-begin) とセットで使う。 ; 引数 :* なし ; 戻り値 : なし ; サンプル <pre class="brush:autolisp;"> (acet-undo-begin) ; 何かの処理 (acet-undo-end) </pre> ----- 関連事項 * expresstools関数 * acet-undo-begin * acet-undo-end * vl-local-undo-push * vl-local-undo-pop * vl-local-undo-steps * vl-loc…」)
2025年8月5日 (火) 05:19 Gizmon トーク投稿記録がページ「Acet-undo-begin」を作成しました (ページの作成:「 {{AutoLISP}} ; 構文 : (acet-undo-begin) ; 機能 : (command "_undo" "_begin") を実行する関数。(acet-undo-end) とセットで使う。 ; 引数 :* なし ; 戻り値 : なし ; サンプル <pre class="brush:autolisp;"> (acet-undo-begin) ; 何かの処理 (acet-undo-end) </pre> ----- 関連事項 * expresstools関数 * acet-undo-begin * acet-undo-end * vl-local-undo-push * vl-local-undo-pop * vl-local-undo-steps * vl-l…」)
2025年8月3日 (日) 22:47 Gizmon トーク投稿記録がページ「Acet-gc-match」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-gc-match ''dxf-code'' ''value''　''elist'' ) ; 機能 : 単一のDXFグループコードと値のペアが、エンティティリスト内に存在するかをテストするっぽい。 : (acet-and-match elist (list (cons dxf-code value))) と等価。 ; 引数 :* dxf-code : 整数で表されるDXFグループコード。 :* value : dxf-code に対応する値。 :* elist : テスト対象のエンティティデータリス…」)
2025年8月3日 (日) 22:43 Gizmon トーク投稿記録がページ「Acet-or-match」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-or-match ''elist'' ''matchlist'' ) ; 機能 : matchlist に含まれる条件のうち、少なくとも1つに elist が一致するかどうかをテストするっぽい。 ; 引数 :* elist : テスト対象のエンティティデータリスト。 :* matchlist : 条件として使用するDXFグループコードと値のペアのリストだと思ったが違うっぽい。 ; 戻り値 : よくわからないがリスト…」)
2025年8月3日 (日) 22:42 Gizmon トーク投稿記録がページ「Acet-and-match」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-and-match ''elist'' ''matchlist'' ) ; 機能 : 指定されたエンティティリスト (elist) の各要素が、matchlist に含まれる全ての条件を満たすかどうかをテストするっぽい。 ; 引数 :* elist : テスト対象のエンティティデータリスト。 :* matchlist : 条件として使用するDXFグループコードと値のペアのリストだと思ったが違うっぽい。 ; 戻り値 :…」)
2025年8月3日 (日) 22:41 Gizmon トーク投稿記録がページ「Acet-not-match」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-not-match ''elist'' ''matchlist'' ) ; 機能 : matchlist 内の条件が、elist に含まれていないことをテストする。acet-and-match の逆の動作をするっぽい。 ; 引数 :* elist : テスト対象のエンティティデータリスト。 :* matchlist : 条件として使用するDXFグループコードと値のペアのリストだと思ったが違うっぽい。 ; 戻り値 : よくわからない…」)
2025年8月3日 (日) 11:58 Gizmon トーク投稿記録がページ「Acet-tbl-match」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-tbl-match ''tablename'' ''filter'' ) ; 機能 : 指定されたテーブルtablename内のすべてのエントリを返す。 ; 引数 :* tablename：シンボル・テーブル名 :* filter：フィルタの文字列かリストか ; 戻り値 : 検出されたすべてのエントリのリスト ; サンプル <pre class="brush:autolisp;"> (acet-tbl-match　"block") ? </pre> ----- 関連事項 * expresstools関数…」)
2025年8月3日 (日) 09:08 Gizmon トーク投稿記録がページ「Acet-error-restore」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-error-restore ) ; 機能 : エラーハンドラを、(acet-error-init)の直前の呼び出し時にアクティブであった元のエラーハンドラにリセットし、また、保存されたシステム変数(もしあれば)をリストアする。 ; 引数 :* なし ; 戻り値 : なし ===memo=== (acet-error-init)と(acet-error-restore)関数は、ネストされた関数呼び出しで使用することができ…」)
2025年8月3日 (日) 09:06 Gizmon トーク投稿記録がページ「Acet-error-init」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-error-init ''initdata'' ) ; 機能 : initdataリストに含まれる引数によってエラー・ハンドラを初期化する。 : initdataは、最大3つの項目のリスト、またはNIL。 : AutoLISPプログラムのための堅牢なエラー処理メカニズムを初期化し、設定するために使用される。*error* ハンドラを独自に定義するよりも簡単で高機能な方法を提供します。 :…」)
2025年8月3日 (日) 08:19 Gizmon トーク投稿記録がページ「Acet-init-fas-lib」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-init-fas-lib ''flag1'' ''flag2'' ) ; 機能 : 後方互換性のために提供され、実装は何もしない（何も操作しない）。引数flagsとflag2は無視される。 ; 引数 :* flag1：何かのフラグ :* flag2：何かのフラグ ; 戻り値 : なし ; サンプル <pre class="brush:autolisp;"> (acet-init-fas-lib t t) </pre> ----- 関連事項 * expresstools関数 Category:AutoLISP」)
2025年8月3日 (日) 07:51 Gizmon トーク投稿記録がページ「Acet-clear-temp-graphics」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-clear-temp-graphics) ; 機能 : ドラッグ＋ジガー操作、(grdraw)、(grvecs)、および同様の関数によって生成された一時的なグラフィックをスクリーンから削除し、視覚的なアーティファクトを除去する。 ; 引数 :* なし ; 戻り値 : nil ; サンプル <pre class="brush:autolisp;"> (grdraw (getpoint) (getpoint) 1) (command "delay" "3000" "") (acet-clear-temp-graphics) </…」)
2025年8月3日 (日) 07:18 Gizmon トーク投稿記録がページ「Acet-blktbl-match」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-blktbl-match ''filter'') ; 機能 : 指定されたフィルタ filter による BlockTable 内のエンティティのリストを返す。 ; 引数 :* filter … 何かのフィルタ ; 戻り値 : フィルタにマッチするエンティティのリスト？ ; サンプル <pre class="brush:autolisp;"> (acet-blktbl-match ❓) ; consセルのリストっぽいけどわからん </pre> ----- 関連事項 * Expresstools…」)
2025年8月3日 (日) 07:09 Gizmon トーク投稿記録がページ「Acet-blk-match」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-block-match ''blkname'' ''filter '' ''lst'' ''flag'' ) ; 機能 : 指定されたフィルタ filter による BlockTable 内のエンティティのリストを返す。 ; 引数 :* blkname … 検索するグロック名？ :* filter … 何かのフィルタ :* lst … 何のリストかわからん :* flag … 何のフラグかわからん？ ; 戻り値 : フィルタにマッチするエンティティのリスト？…」)
2025年8月2日 (土) 21:19 Gizmon トーク投稿記録がページ「Acet-arxload-or-bust」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-arxload-or-bust ''filename'' ) ; 機能 : ARX/BRXのファイルをロードする。　* (arxload filename) と同じなのでそっちを使うと良い。 ; 引数 :* filename … ロードする ARX/BRXのファイル名 ; 戻り値 : ロード成功なら ARX/BRXのファイル名、失敗ならエラーを返す。 ; サンプル <pre class="brush:autolisp;"> (acet-arxload-or-bust "lispex.dll") "lispex.dll" (arxload…」)
2025年8月2日 (土) 19:53 Gizmon トーク投稿記録がページ「Acet-autoloadarx」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-autoload2 ''loadlist'' ) ; 機能 : ( acet-autoload2 ) 関数に似ているが、主にARX/BRXモジュールをロードするためのものである。 ; 引数 :* loadlist … loadlist引数は、ARX/BRXモジュールがロードされた後に実行される専用コマンド関数呼び出しである第3引数を持つことができる。 ::* 最初のエントリは読み込むアプリケーションファイル（ar…」)
2025年8月2日 (土) 19:47 Gizmon トーク投稿記録がページ「Acet-autoload2」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-autoload2 ''loadlist'' ) ; 機能 : ( acet-autoload ) と同様、 loadlist は 1 つ以上の引数を取ることができる。2 番目の引数は文字列または Lisp 関数定義。 : 対応ファイル形式 : .lsp, .arx, .brx ; 引数 :* loadlist … loadlist には次の 2 つのエントリがある :** 最初のエントリは読み込むアプリケーションファイル（.lsp、.arx、.brx） :** 2 番目の項…」)
2025年8月2日 (土) 19:40 Gizmon トーク投稿記録がページ「Acet-autoload」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-autoload ''loadlist'' ) ; 機能 : AutoLoader コマンドと関数を、loadlist に定義された内容に基づいて定義する。 ; 引数 :* loadlist … loadlist には次の 2 つのエントリがある :** 最初のエントリは読み込むアプリケーションファイル（.lsp、.arx、.brx） :** 2 番目の項目はコマンド名の文字列？ ; 戻り値 : なし？ ; サンプル <pre class="brush:autol…」)
2025年8月2日 (土) 18:49 Gizmon トーク投稿記録がページ「Acet-appid-delete」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-annotation-ss ''appid'') ; 機能 : 現在の図面のアプリケーションID（APPID）テーブルから、登録されているアプリケーションIDを削除する。 ; 引数 :* appid … 削除するアプリケーションIDの名前。 ; 戻り値 : 正常に削除された場合は T、APPID が存在しないか削除に失敗した場合は nil。 ; サンプル <pre class="brush:autolisp;"> (defun c:PurgeAppID…」)
2025年8月2日 (土) 18:46 Gizmon トーク投稿記録がページ「Acet-annotation-ss」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-annotation-ss) ; 機能 : 現在のスペースにあるすべての注釈オブジェクト（寸法、文字、引出線など）の選択セットを作成する。 ; 引数 :* なし ; 戻り値 : 選択セット、注釈オブジェクトがない場合は nil ; サンプル <pre class="brush:autolisp;"> (defun SelectAnno () (if-let (ss (acet-annotation-ss)) (progn (command "._CHPROP" ss "" "C" "1" "") ; 注釈…」)
2025年8月2日 (土) 18:42 Gizmon トーク投稿記録がページ「Acet-angle-format」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-angle-format ''angle'' [ ''units'' ''precision'' ]) ; 機能 : 角度（ラジアン単位）を、現在の CADの単位設定（AUNITS、AUPREC）に基づいて文字列にフォーマットする。 ; 引数 :* angle … フォーマットする角度（ラジアン）。 :* units … AUNITS の設定を上書きします。 :* precision … AUPREC の設定を上書きします。 ; 戻り値 : フォーマットされた…」)
2025年8月2日 (土) 18:38 Gizmon トーク投稿記録がページ「Acet-angle-equal」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-angle-equal angle1 angle2 [tolerance]) ; 機能 : 2つの角度（ラジアン単位）が、指定した許容誤差の範囲内で等しいかどうかを比較する。 ; 引数 :* angle1 … 比較する最初の角度（ラジアン）。 :* angle2 … 比較する2番目の角度（ラジアン）。 :* tolerance … 許容誤差（ラジアン）。デフォルトは 1.0e-10 ; 戻り値 : 角度が許容誤差内で等し…」)
2025年8月2日 (土) 18:34 Gizmon トーク投稿記録がページ「Acet-acad-refresh」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-acad-refresh) ; 機能 : CADのアプリケーションウィンドウを強制的に再描画・更新する。 :* redraw, regen コマンドとの違いは不明 ; 引数 :* なし ; 戻り値 : T ; サンプル <pre class="brush:autolisp;"> ; 時間のかかる処理の後に画面をリフレッシュする (defun c:CleanScreen () (command "._redraw") (acet-acad-refresh) (princ "\n画面をリフレッシュしまし…」)