Gz:bitcode?
- 構文
- (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 (getvar "osmode")) (if (not (gz:bitcode? osm 16)) (+ osm 16))
関連事項