すべての公開記録

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

2025年8月1日 (金) 08:27 Gizmon トーク投稿記録がページ「Acet-file-mkdir」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-file-mkdir 　''directory'' ) ; 機能 : 指定されたフォルダ・ディレクトリを作成する、 ; 引数 :* directory … 作成するフォルダパスの文字列。 ; 戻り値 : 成功ならT、それ以外はnil ; サンプル <pre class="brush:autolisp;"> (acet-file-mkdir "c:\\temp\\mytemp") T </pre> ----- 関連事項 * Expresstools関数 * acet-file-cwd * acet-file-attr * vl-mkdir Categ…」)
2025年7月31日 (木) 07:52 Gizmon トーク投稿記録がページ「Acet-filename-directory」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-filename-directory ''filename'' ) ; 機能 : filename のフォルダ部分を返す。 ; 引数 :* filename … ファイルのパス文字列 ; 戻り値 : filename のフォルダ部分の文字列 ; サンプル <pre class="brush:autolisp;"> (acet-filename-directory "C:\\Users\\gizmon2025\\OneDrive\\ドキュメント\\厨房機器の属性データテスト_.csv" ) "C:\\Users\\gizmon2025\\OneDrive\\ドキュメント\\" (a…」)
2025年7月31日 (木) 07:48 Gizmon トーク投稿記録がページ「Acet-filename-extension」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-filename-extension ''filename'' ) ; 機能 : 与えられたファイル名の拡張子部分を返す。 ; 引数 :* filename … ファイルのパス文字列 ; 戻り値 : 拡張子の文字列 ; サンプル <pre class="brush:autolisp;"> (acet-filename-extension "C:\\Users\\gizmon2025\\OneDrive\\ドキュメント\\厨房機器の属性データテスト_.csv" ) ".csv" (acet-filename-extension "//FileServer/video/xxx_…」)
2025年7月31日 (木) 07:45 Gizmon トーク投稿記録がページ「Acet-filename-ext-remove」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-filename-ext-remove ''filename'' ) ; 機能 : 拡張子抜きのファイルパスを返す。 ; 引数 :* filename … ファイルのパス文字列 ; 戻り値 : 拡張子抜きのファイルパス文字列 ; サンプル <pre class="brush:autolisp;"> (acet-filename-ext-remove "C:\\Users\\gizmon2025\\OneDrive\\ドキュメント\\厨房機器の属性データテスト_.csv" ) "厨房機器の属性データテスト_" (a…」)
2025年7月31日 (木) 07:39 Gizmon トーク投稿記録がページ「Acet-filename-path-remove」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-filename-path-remove ''filename'' ) ; 機能 : パスなしでファイル名を返す。 ; 引数 :* filename … ファイルのパス文字列 ; 戻り値 : パスなしのファイル名 ; サンプル <pre class="brush:autolisp;"> (acet-filename-path-remove "C:\\Users\\gizmon2025\\OneDrive\\ドキュメント\\厨房機器の属性データテスト_.csv" ) "厨房機器の属性データテスト_.csv" (acet-filename-pa…」)
2025年7月31日 (木) 07:34 Gizmon トーク投稿記録がページ「Acet-filename-valid」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-filename-valid ''filename'' ) ; 機能 : filename で指定されたファイルパスが有効かどうかを判定する。 ; 引数 :* filename … ファイルのパス文字列 ; 戻り値 : filename で指定されたファイルパスが有効であれば T 、そうでなければ NIL を返す。 ===memo=== * ファイルの存在確認ではなくパスが有効かのチェックなので注意。 ; サンプル <pr…」)
2025年7月31日 (木) 07:30 Gizmon トーク投稿記録がページ「Acet-filename-supportpath-remove」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-filename-supportpath-remove ''filename'' ) ; 機能 : パスなしでファイル名を返す。 ; 引数 :* filename … ファイルのパス文字列 ; 戻り値 : パスなしのファイル名 ; サンプル <pre class="brush:autolisp;"> (acet-filename-supportpath-remove "C:\\Users\\gizmon2025\\OneDrive\\ドキュメント\\厨房機器の属性データテスト_.csv" ) "厨房機器の属性データテスト_.csv" (ac…」)
2025年7月31日 (木) 07:23 Gizmon トーク投稿記録がページ「Acet-filename-associated-app」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-filename-associated-app ''filename'' ) ; 機能 : 指定されたファイル名に関連付けられたアプリケーションの名前を返す。 : Windowsのレジストリ設定に基づくため、Linux/Macプラットフォームでは正しく動作しない。 ; 引数 :* filename … 検索するファイル名 ; 戻り値 : 指定されたファイル名に関連付けられたアプリケーションの名の文字…」)
2025年7月27日 (日) 11:08 Gizmon トーク投稿記録がページ「Acet-att-subscript-duplicates」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-att-subscript-duplicates ''inplist'' ) ; 機能 : 入力リストinplistのタグ名の重複を検証する。 : inplistは(タグの値)のペアのリストでなければならない。タグの検証は大文字と小文字を区別しない。 ; 引数 :* inplist : (タグ値) のペアリスト。 ; 戻り値 : 重複するタグ名があると"(<idx>) "で添え字された値が返る。 ; サンプル <pre class="br…」)
2025年7月27日 (日) 10:07 Gizmon トーク投稿記録がページ「Acet-insert-attrib-set」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-insert-attrib-set ''ename'' ''inplist'' ''suppress'' ) ; 機能 : この関数は、(acet-insert-attrib-mod)と同じ動作をするのでそちらを参照。 ----- 関連事項 * Expresstools関数 * acet-insert-attrib-get * acet-insert-attrib-mod * acet-insert-attrib-set * acet-mod-att * acet-get-att * acet-att-subscript-duplicates * acet-xdata-get * acet-xdata-set Category:AutoLISP…」)
2025年7月27日 (日) 10:05 Gizmon トーク投稿記録がページ「Acet-mod-att」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-mod-att ''ename'' ''inplist'' ) ; 機能 : この関数は、((acet-insert-attrib-mod ename inplist T)のエイリアスなので、そちらを参照。 ----- 関連事項 * Expresstools関数 * acet-insert-attrib-get * acet-insert-attrib-mod * acet-insert-attrib-set * acet-mod-att * acet-get-att * acet-att-subscript-duplicates * acet-xdata-get * acet-xdata-set Category:AutoLISP Ca…」)
2025年7月27日 (日) 10:03 Gizmon トーク投稿記録がページ「Acet-get-att」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-get-att ''inplist'' ) ; 機能 : この関数は、(acet-insert-attrib-get inplist)のエイリアスなので、そちらを参照。 ----- 関連事項 * Expresstools関数 * acet-insert-attrib-get * acet-insert-attrib-mod * acet-insert-attrib-set * acet-mod-att * acet-get-att * acet-att-subscript-duplicates * acet-xdata-get * acet-xdata-set Category:AutoLISP Category:BricsCADのLI…」)
2025年7月27日 (日) 02:35 Gizmon トーク投稿記録がページ「Acet-xdata-set」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-xdata-set ''xkeylist'' ) ; 機能 : XDataをエンティティに割り当てる ; 引数 :* xkeylist : 割り当てる拡張データのリスト。(ename AppId dataList) の形式でなければならず、dataList は、(dataKey dataVal dxfKey) の形式でなければならない； :** dataKeyはアプリケーションから提供されるキー文字列 :** dataValは、格納されるispデータの値。 :** dxfKeyは、dat…」)
2025年7月27日 (日) 02:35 Gizmon トーク投稿記録がページ「Acet-xdata-get」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-xdata-get ''xkeylist'' ) ; 機能 : エンティティにアタッチされている XData のリストを返す。 ; 引数 :* xkeylist : 取得する拡張データのリスト。(ename AppId dataKey) の形式でなければならない。 ; 戻り値 : キーの値、拡張データが無ければ nil ===MEMO=== * 動いてるかどうか不明。 ; サンプル <pre class="brush:autolisp;"> (regapp "MYAPP") (setq e (car…」)
2025年7月26日 (土) 07:20 Gizmon トーク投稿記録がページ「Acet-pline-segment-list-apply」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-pline-segment-list-apply ''entity'' ''plinedata'' ) ; 機能 : entityで指定されたポリラインにポリライン定義データ plinedata を適用する。 ; 引数 :* entity … エンティティのデータ :* plinedata … ポリラインに適用する定義データ。 (acet-pline-segment-list)が返す (vertex-list startwidth-list endwidth-list bulge-list) 型のリストでなければならない。 ; 戻り値…」)
2025年7月26日 (土) 07:11 Gizmon トーク投稿記録がページ「Acet-pline-segment-list」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-pline-segment-list ''entdata'' ) ; 機能 : entdataで指定されたポリラインの定義データを、(vertex-list startwidth-list endwidth-list bulge-list)型のリストとして返す。 ; 引数 :* entdata … エンティティのデータ ; 戻り値 : (vertex-list startwidth-list endwidth-list bulge-list)、それ以外の場合はNILを返す。 ===MEMO=== * 関数名的にポリラインのみかと思いきや…」)
2025年7月26日 (土) 06:26 Gizmon トーク投稿記録がページ「Acet-rtod」を作成しました (ページの作成:「 {{AutoLISP}} ; 構文 : (acet-dtor ''ang'' ) ; 機能 : ang のラジアン値を角度値で返す。 ; 引数 :* ang：ラジアン値 ; 戻り値 : 角度値 ; サンプル <pre class="brush:autolisp;"> (acet-rtod (getangle)) 90.0 </pre> ----- 関連事項 * expresstools関数 * acet-dtor * acet-rtod Category:AutoLISP」)
2025年7月26日 (土) 06:24 Gizmon トーク投稿記録がページ「Acet-dtor」を作成しました (ページの作成:「 {{AutoLISP}} ; 構文 : (acet-dtor ''ang'' ) ; 機能 : angの角度値をラジアン単位で返す。 ; 引数 :* ang：角度の数値 ; 戻り値 : 角度のラジアン値 ; サンプル <pre class="brush:autolisp;"> (acet-dtor 45) 0.785398163397449 (acet-rtod (acet-dtor 30)) 30.0 </pre> ----- 関連事項 * expresstools関数 * acet-dtor * acet-rtod Category:AutoLISP」)
2025年7月25日 (金) 07:34 Gizmon トーク投稿記録がページ「Acet-file-move」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-file-move ''oldfile'' ''newfile'' ) ; 機能 : oldfile のファイルを newfile に移動する。 ; 引数 :* oldfile : 移動するファイルの名前。 :* newfile : 移動先ファイルの名前。 ; 戻り値 : 成功なら T、それ以外は nil を返す。 ; サンプル <pre class="brush:autolisp;"> (acet-file-move "c:\\tmp\\old.csv" "d:\\tmp\\old.csv") T (acet-file-copy "c:\\tmp\\old.csv" "c:\\tmp\\old2.csv")…」)
2025年7月25日 (金) 07:20 Gizmon トーク投稿記録がページ「Acet-file-chdir」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-file-chdir ''directory'' ) ; 機能 : オペレーション・システムの現在の「作業ディレクトリ」を directory に設定する。 ; 引数 :* directory : 作業ディレクトリに指定するフォルダパスの文字列 ; 戻り値 : 成功なら T、それ以外は nil を返す。 ; サンプル <pre class="brush:autolisp;"> (acet-file-chdir "c:\\tmp" ) T (acet-file-chdir "%temp%" ) nil ; 環境変数…」)
2025年7月24日 (木) 06:34 Gizmon トーク投稿記録がページ「Acet-file-copy」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-file-copy ''oldfile'' ''newfile'' [ ''overwrite'' ]) ; 機能 : ファイルをコピーする。 ; 引数 :* oldfile : コピーするファイルの名前。 :* newfile : 新しいファイルの名前。 :* overwrite : nil 以外の場合、既存のファイルを強制的に上書きする。 ; 戻り値 : 成功すればTを返し、エラーの場合は nil を返す。 ===memo=== * overwrite が存在し、かつ NIL…」)
2025年7月24日 (木) 06:21 Gizmon トーク投稿記録がページ「Acet-table-purge」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-table-purge ''table'' ''entry'' ''flag'' ) ; 機能 : 指定されたシンボル・テーブル table からエントリ・オブジェクトを消去する。 :* purge コマンド使った方が安全に除去できると思う。 ; 引数 :* table ：シンボル・テーブル名 :* entry ：エントリオブジェクト名 :* flag ：なんかのフラグだったもの。無視されている。 ; 戻り値 : 消去…」)
2025年7月22日 (火) 23:25 Gizmon トーク投稿記録がページ「Acet::acos」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (Acet::acos ''num'' ) ; 機能 : num のアークコサイン（逆余弦関数）を返す。 ; 引数 :* num : 計算する数値 ; 戻り値 : num のアークコサイン値。 ; サンプル <pre class="brush:autolisp;"> (Acet::acos 0.5) 1.0471975511966 (atan 0.5) 0.463648 </pre> ----- 関連事項 * Expresstools関数 * gz:acos Category:AutoLISP Category:BricsCADのLISP」)
2025年7月22日 (火) 07:52 Gizmon トーク投稿記録がページ「Acet-util-ver」を作成しました (ページの作成:「 {{AutoLISP}} ; 構文 : (acet-util-ver) ; 機能 : ExpressTools API のバージョンを実数で返す ; 引数 :* なし ; 戻り値 : バージョンを表す実数 ; サンプル <pre class="brush:autolisp;"> (acet-util-ver) 1.38 ; BricsCAD V25.2 </pre> ----- 関連事項 * expresstools関数 * trans Category:AutoLISP」)
2025年7月22日 (火) 07:05 Gizmon トーク投稿記録がページ「Acet::pl-point-list」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (Acet::pl-point-list ''polyline'' ''bulgePoints'' ) ; 機能 : 指定されたポリラインの定義点のリストを返す。 ; 引数 :* polyline … ポリラインエンティティの ename または vla-object名 :* bulgePoints … 膨らみ区間をラスタライズするために使用する点の整数。小さいと細かくなる。 ; 戻り値 : polyline の定義点リスト。 ===MEMO=== * 円弧部分は bulgePoi…」)
2025年7月21日 (月) 12:01 Gizmon トーク投稿記録がページ「Acet::arc-point-list」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (Acet::arc-point-list ''center'' ''startpoint'' ''endpoint'' ''maxangle'' ''alt'' ) ; 機能 : 指定された円弧に沿って等距離にあるラスターポイントのリストを返す。 ; 引数 :* center … 円弧の中心点の 2d/3d 座標点リスト :* startpoint … 円弧の始点 2d/3d 座標点リスト :* endpoint … 円弧の終点 2d/3d 座標点リスト :* maxangle … スキャンする最大角度の実数…」)
2025年7月21日 (月) 10:40 Gizmon トーク投稿記録がページ「Acet-ent-curvepoints」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-ent-curvepoints ''ename'' ''resolution'' ) ; 機能 : 曲線エンティティ ename に沿った点のリストを返す。 ; 引数 :* ename … 曲線エンティティ（line, arc, circle, polyline, spline, ellipse, leader, ray, xline）のENAME :* resolution … 0.0 以上 1.0 未満の範囲の数値。曲線のスキャン点の滑らかさを制御する。 ; 戻り値 : 項目のリストを文字列リスト。見…」)
2025年7月19日 (土) 21:14 Gizmon トーク投稿記録がページ「Acet-insert-attrib-mod」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-insert-attrib-mod ''ename'' ''inplist'' ''suppress'' ) ; 機能 : inplist引数に基づいて、BlockReferenceエンティティenameの属性値を変更する。 ; 引数 :* ename : 変更する属性値の文字列。 :* inplist : (タグ値) のペアリスト。 :* suppress ： BlockReference に tag キー tag を持つ属性がないときに、ヒントメッセージを表示するかどうかを制御する。 ; 戻…」)
2025年7月19日 (土) 20:58 Gizmon トーク投稿記録がページ「Acet-insert-attrib-get」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-insert-attrib-get ''inplist'' ) ; 機能 : inplist で指定されたブロック参照の属性（タグまたは値）のリストを返す ; 引数 :* inplist : ブロック参照の属性。 ::* a) エンティティ名(ename)の場合、(タグと値)のペアのリストを返す。 ::* b) (ename mode) のリストの場合、mode引数により返されるリストの構造を定義する : :::* mode = 1 は(tag value)ペ…」)
2025年7月19日 (土) 17:47 Gizmon トーク投稿記録がページ「Acet-layer-off」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-layer-off ''layerName'') ; 機能 : 指定されたレイヤー layerName が OFF であるかどうかを返す ; 引数 :* layerName : チェックするレイヤ名。複数指定はできない。 ; 戻り値 : layerName がなら表示オフなら T、そうでないなら NIL を返す。 ; サンプル <pre class="brush: autolisp;"> (if (acet-layer-off "0") (princ "オフだね。") (princ "表示されてるね。…」)
2025年7月19日 (土) 17:39 Gizmon トーク投稿記録がページ「Acet-layer-unlock-all」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-layer-unlock-all) ; 機能 : 図面内のすべてのレイヤーのロックを解除する。 ; 引数 :* なし ; 戻り値 : 以前にロックされていたレイヤーのリスト (文字列) を返す。 ; サンプル <pre class="brush: autolisp;"> (setq lys (Acet-layer-unlock-all)) "0,myset" </pre> ----- 関連事項 * expresstools関数 * 画層状態関数 Category:AutoLISP」)
2025年7月19日 (土) 17:36 Gizmon トーク投稿記録がページ「Acet-layer-locked」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-layer-locked layerName) ; 機能 : 指定されたレイヤー layerName がロックされているかを取得する。 ; 引数 :* layerName : ロックされているかチェックするレイヤ名。複数指定はできない。 ; 戻り値 : layerName がロックされていれば T を返し、そうでなければ NIL を返す。 ; サンプル <pre class="brush: autolisp;"> (if (acet-layer-locked "0") (princ…」)
2025年7月19日 (土) 16:56 Gizmon トーク投稿記録がページ「Acet-copytolayer」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-copytolayer ''sset'' ''layer'') ; 機能 : この関数は、選択セット sset のエンティティを、指定されたレイヤ（文字列）にコピーする。 ; 引数 :* sset : 選択セット :* layer ：画層名の文字列 ; 戻り値 : コピーされたオブジェクトの選択セット ===MEMO=== * 現在図面に layer がなかったときは作成される。 ; サンプル <pre class="brush:autolisp;…」)
2025年7月8日 (火) 08:39 Gizmon トーク投稿記録がページ「Acet-spinner」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-spinner) ; 機能 : (acet-spinner)を呼び出すたびに、スピニング・ホイールが90度回転する。アプリケーションは、長時間実行されるルーチン中にこれを表示して、ユーザに視覚的なフィードバックを与えることができる。 ; 引数 :* なし ; 戻り値 : ; サンプル <pre class="brush:autolisp;"> (repeat 50 (acet-spinner) (command "delay" "100") ) : (acet-…」)
2025年7月8日 (火) 08:28 Gizmon トーク投稿記録がページ「Acet-groups-sel」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-groups-sel ''groupenames'') ; 機能 : グループ名リスト groupenames を"選択可能" なグループに設定する。 ; 引数 :* groupenames : グループのエンティティリスト ; 戻り値 : 選択不可になったグループの ename リスト ; サンプル <pre class="brush:autolisp;"> (setq x (acet-groups-unsel)) (<Entity name: 9cfa4780> <Entity name: 9d852830>) (acet-groups-sel x) </pre> ----- 関…」)
2025年7月8日 (火) 08:24 Gizmon トーク投稿記録がページ「Acet-groups-unsel」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-groups-unsel) ; 機能 : "選択可能" なグループ名を選択不可に設定する。 ; 引数 :* なし ; 戻り値 : 選択不可になったグループの ename リスト ; サンプル <pre class="brush:autolisp;"> (acet-groups-unsel) (<Entity name: 9cfa4780> <Entity name: 9d852830>) </pre> ----- 関連事項 * expresstools関数 * acet-group-make-anon * acet-groups-sel * acet-groups-unsel * gz:SST…」)
2025年7月8日 (火) 08:04 Gizmon トーク投稿記録がページ「Acet-group-make-anon」を作成しました (ページの作成:「{{AutoLISP}} ; 構文 : (acet-group-make-anon ''enamelist'' ''description'' ) ; 機能 : description が NIL でない場合、オプションの説明テキストを持つエンティティリスト enamelist を使用して、新しい匿名グループ（*Ann named）を作成する。 ; 引数 :* enamelist ：グループ化するオブジェクトの enamelist :* description ：グループの説明文字列 ; 戻り値 : グループが作成出来た…」)
2025年7月8日 (火) 07:57 Gizmon トーク投稿記録がファイル:Heron h.png をアップロードしました
2025年7月8日 (火) 07:57 Gizmon トーク投稿記録がページ「ファイル:Heron h.png」を作成しました
2025年7月8日 (火) 06:35 Gizmon トーク投稿記録がファイル:Gz qgroup32.png をアップロードしました
2025年7月8日 (火) 06:35 Gizmon トーク投稿記録がページ「ファイル:Gz qgroup32.png」を作成しました
2025年7月8日 (火) 06:11 Gizmon トーク投稿記録がファイル:プログレスバーサンプル.png をアップロードしました
2025年7月8日 (火) 06:11 Gizmon トーク投稿記録がページ「ファイル:プログレスバーサンプル.png」を作成しました
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…」)