合肥网站建设技术托管北京正规做网站公司

今天分享一个字到布尔数组的变换，再分享一个布尔数组到字的变换。软件为博途，当然在汇川EASY系列有bitw(BITDW)、wbit(DWBIT)这样的指令，但并不是所有的PLC都有类似的指令。

本文将写出此种方法。

1、将一个字（双字）转化为布尔的数组；

程序中的声明

diSendData  : Array[0..2] OF DWord;
iIndex : Array[0..10] OF Int;                         //程序中使用的所有索引值都从此数组中引用；
diRcvData : DWord; 
arrMiddleBoolR : Array[1..50] OF Bool := [50 (())];

FOR #iIndex[0] := 1 TO 32 DO        //本段for指令来源于DEEPSEEK；#arrMiddleBool[#iIndex[0]] := DWORD_TO_BOOL(#diSendData[1] AND 16#1);#diSendData[1] := SHR(IN := #diSendData[1], N := 1); //右移1位
END_FOR;

2、将一个BOOL数组转换为字的程序

FOR #iIndex[3] := 32 TO 1 BY -1 DO#diRcvData := #diRcvData OR BOOL_TO_DWORD(#arrMiddleBoolR[#iIndex[3]]);IF #iIndex[3] > 1 THEN#diRcvData := SHR(IN := #diRcvData, N := 1);END_IF;
END_FOR;