玖玖玖视频-亚洲精品1卡2卡3卡-操欧美美女-真实国产乱子伦对白视频不卡-国产乱在线-大胸美女被吃奶爽死视频-久久亚洲美女精品国产精品-天堂在线www天堂在线-久久在精品线影院精品国产-国产又粗又长又大-欧美三级一区二区-超碰在线亚洲-天天cao在线-国产偷倩视频-亚洲啪

要做串口通訊，用TXD，RXD指令，哪位大佬幫一下，拜托�。�！

IF RUN THEN
    CRCPloy:= 16#A001;
    LSBNoZero:= FALSE;
    RCRC:= 16#FFFF;
    
    IF((DataLength MOD 2)<>0) THEN
        flag:= TRUE;
        DataLengthWord:= DataLength/2+1;
    ELSE
        flag:= FALSE;
        DataLengthWord:= DataLength/2;
    END_IF;
    
    FOR loop_I:= 0 TO DataLengthWord-1 DO
        HiByte:= SHR((CRCData[loop_I] AND 16#FF00),8);
        LoByte:= CRCData[loop_I] AND 16#FF;
        RCRC:= RCRC XOR HiByte;
        FOR shiftCount:= 0 TO 7 DO
            Temp:= RCRC AND 16#0001;
            IF WORD_TO_INT(Temp)<>0 THEN
                LSBNoZero:= TRUE;
            ELSE
                LSBNoZero:= FALSE;
            END_IF;
            RCRC:= SHR(RCRC,1);
            IF LSBNoZero THEN
                RCRC:= RCRC XOR CRCPloy;
            END_IF;
        END_FOR;
        IF(loop_I=(DataLengthWord-1)) AND (flag=TRUE) THEN
            CRCLo:= SHR((RCRC AND 16#FF00),8);
            CRCHi:= RCRC AND 16#FF;
            RETURN;
        END_IF;
        RCRC:= RCRC XOR LoByte;
        FOR shiftCount:= 0 TO 7 DO
            Temp:= RCRC AND 16#0001;
            IF WORD_TO_INT(Temp)<>0 THEN
                LSBNoZero:= TRUE;
            ELSE
                LSBNoZero:=FALSE;
            END_IF;
            RCRC:= SHR(RCRC,1);
            IF LSBNoZero THEN
                RCRC:= RCRC XOR CRCPloy;
            END_IF;
        END_FOR;
    END_FOR;
    CRCLo:= SHR((RCRC AND 16#FF00),8);
    CRCHi:= RCRC AND 16#FF;
END_IF;

二樓，那個程序功能塊里有CRC效驗，但加了密碼，所以需要解一下

你沒看看，附件里面的文件是沒有加密的嗎？

引用

引用第2樓redqqqq于2025-10-27 11:32發(fā)表的  :
二樓，那個程序功能塊里有CRC效驗，但加了密碼，所以需要解一下

功能塊加了密碼，

二樓，感謝�。。�
大佬已經(jīng)解開了，我開始以為你那段代碼，是用高級語言寫的CRC效驗，原來就是功能塊里的代碼！
謝謝大佬，   

加 V: AutoControl007 我?guī)湍愀愣�，歐姆龍NX、NJ系列PLC 管理員密碼，用戶身份驗證，功能塊，程序，庫文件密碼，都可以幫你搞定。