ＩＢＩＴＳ
ＩＢＩＴＳ
書式
IBITS(I,POS,LEN)
機能
整数Iの第POSビットから第(POS+LEN-1)ビットまでを取り出し右詰めして、 残りのビットを0にする。
引数
I
：整数型
POS
：整数型（0＜POS+LEN≦BIT_SIZE(I)）
LEN
：整数型（0＜LEN)
戻り値
型、種別型パラメタは引数Iと同じである。
サンプルプログラム
WRITE(*,*) IBITS(14,1,3)
実行すると、IBITS(30,1,3)は、下図のように整数の 第1ビットから第3ビット数までを取り出し右詰めするので7になる。
ＩＢＩＴＳサンプルプログラム
