最新天堂中文在线丨午夜嘿嘿嘿影院丨亚洲国产精品高清久久久丨中文字幕人成乱码熟女app丨www91亚洲丨97成人资源丨成人中文字幕+乱码+中文字幕丨一区二区三区在线 | 日丨日韩免费大片丨亚洲欧美一区二区三区丨国产在线观看a丨亚洲成人第一区丨国内免费视频成人精品丨亚洲综合色网站丨午夜精品美女久久久久av福利丨国产午夜人做人免费视频网站丨国产又黄视频丨97se狼狼狼狼狼亚洲网丨狠狠亚洲婷婷综合色香五月丨中国一级毛片黄丨国产女人十八毛片丨国产色视频在线播放丨国产亚洲精久久久久久无码苍井空丨天天摸日日摸爽爽狠狠丨久久综合香蕉国产蜜臀av

要做串口通訊，用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發表的  :
二樓，那個程序功能塊里有CRC效驗，但加了密碼，所以需要解一下

功能塊加了密碼，

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