supermanxm
級(jí)別: 略有小成
精華主題: 0
發(fā)帖數(shù)量: 249 個(gè)
工控威望: 406 點(diǎn)
下載積分: 3591 分
在線時(shí)間: 78(小時(shí))
注冊(cè)時(shí)間: 2022-01-29
最后登錄: 2024-09-19
查看supermanxm的 主題 / 回貼
樓主  發(fā)表于: 2023-06-26 23:13
trd(SM412,D6000);
IF D6010<>D6002 THEN     D6010:=D6002;
    FOR ii:=0 TO 49 DO
        Chanliang(ii,8):=Chanliang(ii,7);
        Chanliang(ii,7):=Chanliang(ii,6);
        Chanliang(ii,6):=Chanliang(ii,5);
        Chanliang(ii,5):=Chanliang(ii,4);
        Chanliang(ii,4):=Chanliang(ii,3);
        Chanliang(ii,3):=Chanliang(ii,2);
    END_FOR ii;
END_IF;
IF M6007:=TRUE THEN
    Chengxuhao(D800,0):=D800;
    Chengxuhao(D800,1):=D801;
    Chengxuhao(D800,2):=Chengxuhao(D800,1)+1;
END_IF;
//*求和
FOR ii:=0 TO 49 DO
    FOR jj=2 TO 8 DO
        chanliang(ii,9):=chanliang(ii,9)+chanliang(ii,jj)
    END_FOR jj;
END_FOR ii;    
    
IF M401 THEN
    Z0:=Z0+1
    
    IF Z0>5 THEN    
        Z0:=4
    END_IF;    
END_IF;
IF M400 THEN
    Z0:=Z0-1;
    IF Z0<=0 THEN    
        Z0=0;
    
    END_IF;    
END_IF;    
D6008:=Z0*K10;
樂(lè)菱科技
級(jí)別: 略有小成
精華主題: 0
發(fā)帖數(shù)量: 254 個(gè)
工控威望: 356 點(diǎn)
下載積分: 56821 分
在線時(shí)間: 339(小時(shí))
注冊(cè)時(shí)間: 2015-06-30
最后登錄: 2024-09-21
查看樂(lè)菱科技的 主題 / 回貼
1樓  發(fā)表于: 2023-07-12 01:45
引用
引用第6樓冰魚(yú)兒于2023-07-10 15:03發(fā)表的  :
B站有個(gè)老師專門(mén)講這個(gè),講的很好,可以去學(xué)習(xí)一下。

叫什么啊