在CSDN上找到的写法：
procedure TForm1.Button2Click(Sender: TObject);
var
x: byte;
b: array[0..7] of boolean;
i: integer;
begin
x:=$f1;
for i:=0 to 7 do
begin
b[i]:=(x and (1 shl i)) <> 0;
memo1.Lines.Add(booltostr(b[i]));//b[i]保存得是各个位得值，从低到高
end;
end;

按上面的代码，
Bit 6
开机状态： 1：仪表上电
0：正常工作

这里的Bit6就是指上面的b[6]吗？

手边没有那个设备，现在只能在这里猜了。