Gz:bitcode?

提供：GizmoLabs - だいたい CAD LISP なサイト
2023年9月2日 (土) 20:37時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{GZLIB}} ; 構文 : (gz:bitcode? ''bit'' ''num'') ; 機能 : num に bit のビットコードが含まれているかをチェックする。 ; 引数 :* bit = 含まれているかチェックする bit値の整数 ;* num = ビットコード和の整数 ; 戻り値 : ビットコード和(num) に bit が含まれていれば T、それ以外は nil ; サンプル <pre class="brush:autolisp;"> (setq n (+ 1 2 4 8 128)) (gz:bitcode? n 16) nil (setq n (+…」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
Gz-Lib Home - Gz-Lib 目次 - AutoLISP Home - CAD&CGブログ - オンラインショップ- GizmoTools ヘルプセンター
構文
(gz:bitcode? bit num)


機能
num に bit のビットコードが含まれているかをチェックする。


引数
  • bit = 含まれているかチェックする bit値の整数
  • num = ビットコード和の整数


戻り値
ビットコード和(num) に bit が含まれていれば T、それ以外は nil


サンプル
(setq n (+ 1 2 4 8 128))
(gz:bitcode? n 16)
nil

(setq n (+ 1 2 4 8 16 128))
(gz:bitcode? n 16)
T

; Oスナップで四半円点がオフだったらオンにする
(setq osm (getver "osmode"))
(if (not (gz:bitcode? osm 16)) (+ osm 16))

関連事項

「https://wiki.gz-labs.net/index.php?title=Gz:bitcode%3F&oldid=11320」から取得