博途之有意思的字到布尔的互相变换

最新推荐文章于 2025-05-03 12:19:40 发布

Amos_ FAT

最新推荐文章于 2025-05-03 12:19:40 发布

阅读量413

点赞数 8

分类专栏：博途 TIA Portal 文章标签：经验分享

本文链接：https://blog.csdn.net/weixin_42946146/article/details/147152512

版权

博途 TIA Portal 专栏收录该内容

17 篇文章

订阅专栏

今天分享一个字到布尔数组的变换，再分享一个布尔数组到字的变换。软件为博途，当然在汇川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;