すべての公開記録
GizmoLabs - だいたい CAD LISP なサイトの取得できる記録をまとめて表示しています。 記録の種類、実行した利用者 (大文字小文字は区別)、影響を受けたページ (大文字小文字は区別) による絞り込みができます。
- 2025年7月7日 (月) 23:46 Gizmon トーク 投稿記録 がページ「Acet-str-to-list」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-str-to-list ''deli'' ''line'' ) ; 機能 : 区切り deli で line を分割した文字列トークンのリストを返す。 ; 引数 :* deli … 区切り記号の文字列 :* line … 分割する文字列 ; 戻り値 : 分割された文字列リスト ; サンプル <pre class="brush:autolisp;"> (acet-str-to-list "," "aaa,bbb,ccc") ("aaa" "bbb" "ccc") ; csvには使えないよ (acet-str-to-list "," "100,\"1,080\",910"…」)
- 2025年7月6日 (日) 23:55 Gizmon トーク 投稿記録 がページ「Acet-viewport-next-pickable」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-viewport-next-pickable) ; 機能 : ピック可能なモデル空間のビューポートをリスト(id msg)として返す。 ; 引数 :* なし ; 戻り値 : ピック可能なモデル空間のビューポートをリスト(id msg)として返す。 : ピック可能なモデル空間ビューポートがない場合、id は NIL、msg はエラーメッセージを含む。 : それ以外の場合、idは有効なビ…」)
- 2025年7月6日 (日) 21:25 Gizmon トーク 投稿記録 がページ「Acet-viewport-lock-set」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-viewport-lock-set ''vpename'' ''setlocked'' ) ; 機能 : vpenameで指定されたビューポート表示のロック状態を設定する。 ; 引数 :* vpename … ビューポートの ename ;* setlocked … ロックの設定。nil=ロック解除状態、それ以外はロック状態に設定。 ; 戻り値 : ロック状態が変更された場合は vpename を、ビューポートが既に目的のモードになって…」)
- 2025年7月6日 (日) 21:14 Gizmon トーク 投稿記録 がページ「Acet-currentviewport-ename」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-currentviewport-ename) ; 機能 : 現在のビューポートのenameを返す。 ; 引数 :* なし ; 戻り値 : 現在のビューポートの ename。モデル空間で実行すると nil。 ; サンプル <pre class="brush:autolisp;"> ; 現在のビューポートのVPフリーズ画層取得 (setq vpfreezlaylst (acet-viewport-frozen-layer-list (acet-currentviewport-ename))) ("新規画層2" "新規画層1") </pre> -----…」)
- 2025年7月6日 (日) 21:12 Gizmon トーク 投稿記録 がページ「Acet-viewport-frozen-layer-list」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-viewport-frozen-layer-list ''vpename'' ) ; 機能 : vpenameで指定されたビューポートのVPフリーズレイヤー名の文字列リストを返す。 ; 引数 :* vpename … ビューポートの ename ; 戻り値 : vpenameで指定されたビューポートのVPフリーズレイヤー名の文字列リスト。vpename がモデル空間ビューポートの名前でない場合、またはVPフリーズレイヤー…」)
- 2025年7月6日 (日) 10:22 Gizmon トーク 投稿記録 がページ「Acet-cmd-exit」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-cmd-exit) ; 機能 : (command) コールを使って実行中のコマンドをすべてキャンセルする。 :* 昔はなにか有用な理由があったのかもしれないが、(command) で良くね?っていう関数。 ; 引数 :* なし ; 戻り値 : なし ; サンプル <pre class="brush:autolisp;"> (command "_copy") (while (eq 1 (getvar "CMDACTIVE")) (command pause) ) (command) ; or (acet-cmd-exit) </pre>…」)
- 2025年7月5日 (土) 04:49 Gizmon トーク 投稿記録 がページ「Acet-ucs-to-object」を作成しました (ページの作成:「{{AutoLISP}} ;構文 : (acet-ucs-to-object ''entity'' ) ;機能 : 現在の UCS をエンティティ座標系に設定する。 ;引数 :* entity : エンティティリスト ;戻り値 : なし ;サンプル <pre class="brush:autolisp;"> ; UCSを図形に合わせる (acet-ucs-to-object (car (entsel))) </pre> ----- 関連事項 * Expresstools関数 * acet-ucs-get * acet-ucs-set * acet-dxf * acet-ucs-set-z * acet-ucs-to-object…」)
- 2025年7月5日 (土) 04:38 Gizmon トーク 投稿記録 がページ「Acet-ucs-set-z」を作成しました (ページの作成:「{{AutoLISP}} ;構文 : (acet-ucs-set-z ''zVec'' ) ;機能 : 現在の UCS を zVec (zAxis) で定義された設定にする。 ;引数 :* zVec : 設定するUCSの点リスト ;戻り値 : なし ;サンプル <pre class="brush:autolisp;"> ; UCSを図形の法線に合わせる (setq e (entget (car (entsel)))) (acet-ucs-set-z (acet-dxf 210 e)) </pre> ----- 関連事項 * Expresstools関数 * acet-ucs-get * acet-ucs-set * acet-dxf Ca…」)
- 2025年7月4日 (金) 06:36 Gizmon トーク 投稿記録 がページ「Acet-ucs-set」を作成しました (ページの作成:「{{AutoLISP}} ;構文 : (acet-ucs-set ''points'' ) ;機能 : 現在のUCSが3つの点(Origin xAxis yAxis)で定義されるように設定する。 ;引数 :* points : 設定するUCSの点リスト ;戻り値 : fromがエンティティENAMEの場合はそのエンティティの座標系、そうでない場合は[UCSORG UCSXDIR UCSYDIR]のリストを返す。 ;サンプル <pre class="brush:autolisp;"> (setq e (car (entsel))) (acet-ucs-get e) ((0.0 0.…」)
- 2025年7月4日 (金) 06:34 Gizmon トーク 投稿記録 がページ「Acet-ucs-get」を作成しました (ページの作成:「{{AutoLISP}} ;構文 : (acet-ucs-get ''from'' ) ;機能 : from で定義された座標系をリスト[Origin xAxis yAxis]として返す。 ;引数 :* from : 図形の ename または 座標系の文字列 ;戻り値 : fromがエンティティENAMEの場合はそのエンティティの座標系、そうでない場合は[UCSORG UCSXDIR UCSYDIR]のリストを返す。 ;サンプル <pre class="brush:autolisp;"> (setq e (car (entsel))) (acet-ucs-get e)…」)
- 2025年7月4日 (金) 06:28 Gizmon トーク 投稿記録 がページ「Acet-ucs-cmd」を作成しました (ページの作成:「{{AutoLISP}} ;構文 : (acet-ucs-cmd ''cmdList'' ) ;機能 : cmdList の各項目を_UCSコマンドで実行する。 ;引数 :* cmdList: ;戻り値 : 選択セットかキーワード ;サンプル <pre class="brush:autolisp;"> (acet-ucs-cmd '("_W")) ; ワールド座標に戻して作業する時 (acet-ucs-cmd '("_F")) ; UCSを面合わせ (command "_ucs" "_F" pause) ;と同じ (acet-ucs-cmd '("_PO")) ; 点群の点合わせ。 (command "_ucs" "_P…」)
- 2025年7月4日 (金) 06:12 Gizmon トーク 投稿記録 がページ「Acet-ui-polygon-select」を作成しました (ページの作成:「{{AutoLISP}} ;構文 : (acet-ui-polygon-select ''mode'' ) ;機能 : 指示した点をポリゴンを選択するのに適した座標点リストとしてを返す。 ;引数 :* mode : T または 1 の場合、ポリゴンは強調表示され、そうでない場合は通常表示される。 ;戻り値 : フェンス点のリスト。 ;サンプル <pre class="brush:autolisp;"> (setq pts (acet-ui-polygon-select T)) ((492.226331759637 137.315575545979 0…」)
- 2025年7月4日 (金) 06:12 Gizmon トーク 投稿記録 がページ「Acet-ui-fence-select」を作成しました (ページの作成:「{{AutoLISP}} ;構文 : (acet-ui-fence-select) ;機能 : 指示した点をフェンスを選択に適した2D点リストとして返す。 ;引数 :* なし ;戻り値 : フェンス点のリスト。 ;サンプル <pre class="brush:autolisp;"> (setq pts (acet-ui-fence-select)) ((434.579260908591 165.030513455135) (434.024962150408 145.075758160543) (427.373377052211 82.4399984858493) (308.753442801021 95.1888699240612) (363.074721102968 152.281642016923) (…」)
- 2025年7月4日 (金) 05:31 Gizmon トーク 投稿記録 がページ「Acet-ui-entsel」を作成しました (ページの作成:「{{AutoLISP}} ;構文 : (acet-ui-entsel ''sellst'' ) ;機能 : (entsel) のようなエンティティ選択を、より快適に提供する。 ;引数 :* sellst : エンティティ選択のリスト。以下の形式でなければならない ::* (msg flags keys useWindow filter allowLocked) :::* msg : ユーザー・プロンプト(文字列) :::* flags : (initget)関数で使用されるビット値 (integer) :::* keys : (initget)関数で使用され…」)
- 2025年7月4日 (金) 04:49 Gizmon トーク 投稿記録 がページ「Acet-ui-getcorner」を作成しました (ページの作成:「{{AutoLISP}} ;構文 :(acet-ui-getcorner ''refPoint'' ) ;機能 : (getcorner refPoint "もう一方のコーナー: ") を使ってコーナーポイントを照会し、ユーザーによって指定されたポイントを返す。 :* getcorner のメッセージ引数の不要版。 ;引数 :* refPoint : 基点として使用する座標点リスト。 ;戻り値 : 指定されたUCSの点座標、ESC で抜けるとエラーが返る。 ;サンプル <pr…」)
- 2025年6月30日 (月) 08:27 Gizmon トーク 投稿記録 がページ「Acet-ui-m-get-names」を作成しました (ページの作成:「{{AutoLISP}} ;構文 :(acet-ui-m-get-names ''argumentList'') ;機能 : (getkword)と同様の拡張ユーザー入力機能を提供するが、複数キーワードの選択が可能である。 ;引数 :* argumentListは、詳細なパラメータを提供する単一のリストです : (allowSpace prompt keywords) :** allowSpace : T/NILでスペース文字の入力を許可する((getstring)関数と同じ :** prompt : コマンドラインに表示する…」)
- 2025年6月29日 (日) 21:23 Gizmon トーク 投稿記録 がページ「Acet-ui-get-long-name」を作成しました (ページの作成:「{{AutoLISP}} ;構文 : (acet-ui-get-long-name ''msg'' ) ;機能 : (getstring T msg) のラッパー関数。ユーザーが入力した文字列を返す。 ;引数 :* msg : メッセージの文字列 ;戻り値 : 入力された文字。 ;サンプル <pre class="brush:autolisp;"> (acet-ui-get-long-name "今日のおやつは?:" ) "ありません" </pre> ----- 関連事項 *Expresstools関数 *getstring Category:AutoLISP Category:Br…」)
- 2025年6月29日 (日) 19:10 Gizmon トーク 投稿記録 がページ「Acet-ui-getfile」を作成しました (ページの作成:「{{AutoLISP}} ;構文 :(acet-ui-getfile ''title'' ''deffile'' ''defext'' ''dlgname'' ''flags'' ) ;機能 : 標準の getfiled 関数と同様に、ファイル選択ダイアログを開く。 ;引数 :* title : フォルダ選択ダイアログに表示するタイトルの文字列。 :* deffile : ファイル名の初期値 :* defext : 拡張子 :* dlgname : 「ダイアログ名」を指定する文字列で、任意の文字列、あるいは空文…」)
- 2025年6月29日 (日) 17:51 Gizmon トーク 投稿記録 がページ「Acet-ui-message」を作成しました (ページの作成:「{{AutoLISP}} ;構文 :(acet-ui-message [ ''message'' [ ''root'' [ ''title'' ]]) ;機能 :指定したオプションにカスタマイズされたメッセージボックスを表示する ;引数 :*message : messageは表示する文字列 :*title : メッセージボックスウィンドウのタイトルバー文字列です。 :*mode : 以下のオプション・フラグです。 :**Buttons :***0 = Acet:OK :***1 = Acet:OKCANCEL :***2 = Acet:ABORTRETRYIGNOR…」) タグ: ビジュアルエディター
- 2025年6月29日 (日) 17:48 Gizmon トーク 投稿記録 が ファイル:Acet-ui-messageのダイアログイメージ.png をアップロードしました
- 2025年6月29日 (日) 17:48 Gizmon トーク 投稿記録 がページ「ファイル:Acet-ui-messageのダイアログイメージ.png」を作成しました
- 2025年6月29日 (日) 09:44 Gizmon トーク 投稿記録 がページ「Acet-ui-single-select」を作成しました (ページの作成:「{{AutoLISP}} ;構文 :(acet-ui-single-select ''filter'' ''allowLocked'' ) ;機能 : (entsel) のように、いくつかのカスタマイズを加えた単一エンティティの選択を提供する。 ;引数 :* filter : (ssget ... filter)で使用されるフィルタ条件。 :* allowLocked : T なら、ロックされたレイヤー上のエンティティの選択を許可する。 ;戻り値 : filterとallowLocked の条件にマッチした図形の…」)
- 2025年6月29日 (日) 09:15 Gizmon トーク 投稿記録 がページ「Acet-ui-pickdir」を作成しました (ページの作成:「{{AutoLISP}} ;構文 :(acet-ui-pickdir [ ''message'' [ ''root'' [ ''title'' ]]) ;機能 :「フォルダ選択」ダイアログを表示し、フォルダのパスを取得する。 ;引数 :*message : フォルダ選択ダイアログに表示するヒントメッセージの文字列。 :*root : 表示する最上位フォルダ(開始フォルダ)を指定する(ユーザはこれより上位には行けない)。空文字列""は、<Computer>ツリ…」) タグ: ビジュアルエディター
- 2025年6月29日 (日) 09:12 Gizmon トーク 投稿記録 が ファイル:Acet-ui-pickdirのサンプル.png をアップロードしました
- 2025年6月29日 (日) 09:12 Gizmon トーク 投稿記録 がページ「ファイル:Acet-ui-pickdirのサンプル.png」を作成しました
- 2025年6月29日 (日) 06:25 Gizmon トーク 投稿記録 がページ「Acet-ui-status」を作成しました (ページの作成:「{{AutoLISP}} ;構文 :(acet-ui-status [ ''message'' [ ''caption'' ]]) ;機能 :メッセージとキャプションを持つモデルレスメッセージボックスを表示する。 ;引数 :*message : 表示される文字列。 :*caption : モードレス・メッセージボックス・ウィンドウのキャプションの文字列。 ;戻り値 :常に nil を返す。 ===MEMO=== 引数なしで(acet-ui-status)を呼び出すと、メッセージ…」) タグ: ビジュアルエディター
- 2025年6月29日 (日) 06:25 Gizmon トーク 投稿記録 が ファイル:Acet-ui-statusイメージ.png をアップロードしました
- 2025年6月29日 (日) 06:25 Gizmon トーク 投稿記録 がページ「ファイル:Acet-ui-statusイメージ.png」を作成しました
- 2025年6月29日 (日) 05:35 Gizmon トーク 投稿記録 がページ「Acet-table-name-list」を作成しました (ページの作成:「 {{AutoLISP}} ; 構文 : (acet-table-name-list ''tblORlist'' ) ; 機能 : テーブル・エントリ名 tblORlist のリストを返す。 ; 引数 :* tblORlist: 走査するテーブル・エントリ名の tbl または list。tblORlist がリストの場合、最初の項目としてテーブル名を含む必要があり、オプションとして、フラグ 70 の値のいずれかを持たないエントリをフィルタリングするために使…」)
- 2025年6月28日 (土) 08:53 Gizmon トーク 投稿記録 がページ「Acet-reg-prodkey」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-reg-prodkey) ; 機能 : 実行中のセッションのレジストリルートパスを返す。 :* BricsCADだとgetcfg 関数でレジストリ値を取れたりするので、そっちでもいいケースがある。 ; 引数 :* なし ; 戻り値 : パスの文字列 ; サンプル <pre class="brush:autolisp;"> (acet-reg-get "HKEY_CURRENT_USER\Test" "Test") "Software\\Bricsys\\BricsCAD\\V25x64\\ja_JP" </pre> ----- *…」)
- 2025年6月28日 (土) 07:43 Gizmon トーク 投稿記録 がページ「Acet-dict-name-list」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-dict-name-list ''dictname'' ) ; 機能 : ディクショナリ dictname の項目のリストを文字列リストとして返す。 ; 引数 :* dictname … ディクショナリの文字列またはENAME ; 戻り値 : 項目のリストを文字列リスト。見つからない場合は nil。 ; サンプル <pre class="brush:autolisp;"> (setq d (acet-dict-name-list "ACAD_VISUALSTYLE")) ("2dWireframe" "Basic" "Brighten" "Co…」)
- 2025年6月27日 (金) 08:30 Gizmon トーク 投稿記録 がページ「Acet-dict-ename」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-dict-ename ''dictname'' ''entry'' ) ; 機能 : ディクショナリ dictname(STRINGまたはENAME)の項目エントリのエンティティ名を返す。 ; 引数 :* dictname … ディクショナリ名の文字列またはename :* entry … ディクショナリ項目の文字列 ; 戻り値 : ディクショナリ項目の ename、見つからない場合は nil。 ; サンプル <pre class="brush:autolisp;"> (setq d…」)
- 2025年6月27日 (金) 08:03 Gizmon トーク 投稿記録 がページ「DICTIONARY」を作成しました (ページの作成:「{{DXF-Template}} ディクショナリ(DICTIONARY)のエンティティグループ コード {| class="wikitable" ! colspan="2" |DICTIONARY のグループ コード |- !グループ コード !意味 |- |0 |オブジェクト名(DICTIONARY) |- |5 |ハンドル |- |102 |不変リアクタ グループの開始、常に "{ACAD_REACTORS" |- |330 |オーナー ディクショナリへのソフト ポインタ ID/ハンドル |- |102 |不変リアクタ グルー…」) タグ: ビジュアルエディター: 中途切替
- 2025年6月26日 (木) 21:42 Gizmon トーク 投稿記録 がページ「Force paging」を作成しました (ページの作成:「強制ページング メモリページングを強制するシステム変数(R13 でのみ存在したらしい)」)
- 2025年6月26日 (木) 09:04 Gizmon トーク 投稿記録 がページ「Acet-get-winfont-path」を作成しました (ページの作成:「 {{AutoLISP}} ; 構文 : (acet-get-winfont-path) ; 機能 : OSの特殊フォントフォルダのパスを返す(Linux・OSXプラットフォームでも同様)。 ; 引数 :* なし ; 戻り値 : 定義されているサポートパスのリストを返す。 ; サンプル <pre class="brush:autolisp;"> (acet-get-winfont-path) "C:\\WINDOWS\\Fonts" </pre> ----- 関連事項 * expresstools関数 Category:AutoLISP」)
- 2025年6月26日 (木) 08:54 Gizmon トーク 投稿記録 がページ「Acet-pref-supportpath-list」を作成しました (ページの作成:「 {{AutoLISP}} ; 構文 : (acet-pref-supportpath-list) ; 機能 : 定義されているサポートパスのリストを返す。 ; 引数 :* なし ; 戻り値 : 定義されているサポートパスのリストを返す。 ===メモ=== ; サンプル <pre class="brush:autolisp;"> (acet-pref-supportpath-list) ("D:\\gizmotools_v60" "C:\\Users\\gizmon\\AppData\\Roaming\\Bricsys\\BricsCAD\\V25x64\\ja_JP\\Support" "C:\\Program Files\\Bricsys\\BricsCAD V25 ja…」)
- 2025年6月25日 (水) 08:30 Gizmon トーク 投稿記録 がページ「Acet::nameonly」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet::nameonly ''filename'' ) ; 機能 : 指定された filename からファイル名の文字列を返す。 ; 引数 :* filename : ファイル名の文字列 ; 戻り値 : filename のファイル名部分の文字列。 ; サンプル <pre class="brush:autolisp;"> (acet::pathonly "c:/temp/tempsub/note.txt") "c:/temp/tempsub/" (acet::pathonly "https://temp/tempsub/note.html") "https://temp/tempsub/" (acet::pathonly "note.txt…」)
- 2025年6月25日 (水) 08:29 Gizmon トーク 投稿記録 がページ「Acet::pathonly」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet::pathonly ''filename'' ) ; 機能 : 指定された filename からパスの文字列を返す。 ; 引数 :* filename : ファイル名の文字列 ; 戻り値 : filename のパス部分の文字列。 ; サンプル <pre class="brush:autolisp;"> (acet::pathonly "c:/temp/tempsub/note.txt") "c:/temp/tempsub/" (acet::pathonly "https://temp/tempsub/note.html") "https://temp/tempsub/" (acet::pathonly "note.txt") "" (acet::name…」)
- 2025年6月25日 (水) 01:09 Gizmon トーク 投稿記録 がページ「Acet-reg-del」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-reg-del ''key'' [ ''name'' ]) ; 機能 : name が指定されている場合は、レジストリキーから指定された値 name を削除する。 : そうでない場合は、デフォルト値が消去される。 * vl-registry-delete 関数を使った方がよいと思う。 ; 引数 :* key : レジストリキー :* name : レジストリの値 ; 戻り値 : 成功した場合は T、失敗なら nil を返す。…」)
- 2025年6月24日 (火) 08:18 Gizmon トーク 投稿記録 がページ「Acet-reg-put」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-reg-put ''key'' [ ''name'' [ ''value'' ]]) ; 機能 : name が存在する場合に、レジストリキー key の下にある name のレジストリ値に value を設定する。 * vl-registry-write 関数を使った方がよいと思う。 ; 引数 :* key : レジストリキー :* name : レジストリの値 :* value: 設定する値 ; 戻り値 : 成功なら value値。それ以外は nil ; サンプル <pre c…」)
- 2025年6月24日 (火) 08:11 Gizmon トーク 投稿記録 がページ「Acet-reg-get」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-reg-get ''key'' [ ''name'' ]) ; 機能 : name が存在する場合に、レジストリキー key の下にある name のレジストリ値を返す。 * vl-registry-read 関数の方を使った方がよいと思う。 ; 引数 :* key : レジストリキー :* name : レジストリの値 ; 戻り値 : name キーの値。値が無ければ nil ; サンプル <pre class="brush:autolisp;"> (acet-reg-get "HKEY_CURRENT_…」)
- 2025年6月24日 (火) 06:51 Gizmon トーク 投稿記録 がページ「Acet-ss-filter-current-ucs」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-ss-filter-current-ucs ''ss'' ''printError'') ; 機能 : 選択セット ss から現在の UCS にないすべてのエンティティを除外した新しい選択セットを作成する。 ; 引数 :* ss … 選択セット。 :* printError … エラーメッセージを出すかどうかのフラグ。nil = メッセージを表示しない。nil 以外=メッセージを表示する ; 戻り値 : 新しい選択セット…」)
- 2025年6月24日 (火) 06:14 Gizmon トーク 投稿記録 がページ「Acet-ss-filter」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-ss-filter ''ss'' ''filter'') ; 機能 : フィルター入力に基づいて新しい選択セットを作成する。 * 動いてないかも ; 引数 :* ss … フィルタによってフィルタリングされる選択セット。 :* filter … フィルターのリスト ; 戻り値 : フィルタを通過した ss のエンティティを含む、新しいセレクションセットを返す。 ; サンプル <pre class="…」)
- 2025年6月24日 (火) 05:48 Gizmon トーク 投稿記録 がページ「Acet-ss-zoom-extents」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-ss-zoom-extents ''ss'') ; 機能 : 指定された選択範囲(1.05倍)に表示をズームする。 ; 引数 :* ss … 選択セット。 ; 戻り値 : ズーム範囲のリスト (ptMin ptMax) を返す。 ; サンプル <pre class="brush:autolisp;"> (setq ss (ssget)) <Selection set: 000000007F416AE0> (acet-ss-zoom-extents ss) ((19028.9182871404 6509.34466589125 0.0) (25978.9182871404 13179.3446658913 0.0)) </pre> -----…」)
- 2025年6月23日 (月) 07:29 Gizmon トーク 投稿記録 がページ「Acet-ss-remove」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-ss-remove ''ss'' ''ssmaster'' ) ; 機能 : 選択セット ss に含まれるエンティティを 選択セット ssmaster から除外する。 : ssdel の複数図形対象版といえる。 ; 引数 :* ss … 除外する図形の選択セット。 :* ssmaster … 元になる選択セット ; 戻り値 : ss のエンティティを取り除いた ssmaster を返す。 ; サンプル <pre class="brush:autolisp;"> (setq ss…」)
- 2025年6月23日 (月) 07:15 Gizmon トーク 投稿記録 がページ「Acet-ss-entdel」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-ss-entdel ''ss'' ) ; 機能 : 選択セット ss に含まれるすべてのエンティティを消去する : すでに消去されたエンティティは、代わりに消去されない。 ; 引数 :* ss … 削除する選択セット ; 戻り値 : 処理されたエンティティの数を返す。選択セットが空の場合は 0。 ; サンプル <pre class="brush:autolisp;"> (princ (strcat (itoa (acet-ss-entdel (ssge…」)
- 2025年6月23日 (月) 06:24 Gizmon トーク 投稿記録 がページ「Acet-ss-ssget-filter」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-ss-ssget-filter ''ss'' ''filterdata'') ; 機能 : 入力選択セットssをfilterdataでフィルタリングして、新しい選択セットを作成する。 ; 引数 :* ss : 選択セット :* filterdata: 選択フィルタ のリスト。 ; 戻り値 : フィルタリングされた選択セットを返す。指定したフィルタにマッチするエンティティがない場合は nil を返す。 ===memo===…」)
- 2025年6月23日 (月) 05:43 Gizmon トーク 投稿記録 がページ「Acet-ss-flt-cspace」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-ss-flt-cspace) ; 機能 : モデル/ペーパースペース・フラグと実際のレイアウト名を含む、実際の「スペース」を指定したフィルターリストを作成する。 ; 引数 :* なし ; 戻り値 : フォーマット((410 . "<レイアウト>") (67 . 0/1))のリストを返す。 ; サンプル <pre class="brush:autolisp;"> (acet-ss-flt-cspace) ; モデル空間で実行 ((410 . "Model") (…」)
- 2025年6月22日 (日) 08:35 Gizmon トーク 投稿記録 がページ「Acet-ss-sort」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-ss-sort ''ss'' ''filter'' ) ; 機能 : 入力選択セット ss に基づいて、フィルタ入力に基づいて新しい並べ替え済み選択セットを作成する。 : vl-sort 使った方がいい。 ; 引数 :* ss … 選択セット。 :* filter : ソートの内容は (lambda (x) (cons x ((eval filter) (entget x)))) によって評価される式でなければならない。 ; 戻り値 : ソートされた…」)
- 2025年6月22日 (日) 07:03 Gizmon トーク 投稿記録 がページ「Acet-ss-mod」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-ss-new ''ss'' ''flags'' ''printit'' ) ; 機能 : フラグに基づいてフィルタリングすることにより、入力選択セットssから新しい選択セットを作成する。 ; 引数 :* ss … 選択セット :* flags … フィルターのビットコードフラグ :** Bit 0 (1) : ロックされたレイヤーからエンティティを除去する。 :** Bit 1 (2) : 他レイアウトのエンティティを除…」)