男女午夜激情_www.天堂av.com_亚洲综合小说区_亚洲欧美自拍视频_成年精品_久久www免费人成—看片_激情综合五月天_久久高潮视频_最新国产成人ab网站_国产精品卡一

VAR_bbbbb
  SOU_DB : INT ; //SOURCE DB NUMBER
  LENG : INT ; //HOW MANY TO COPY
  DES_DB : INT ; //DESTINATION DB NUMBER
END_VAR
VAR_TEMP
  SOURCE : ANY ; 
  DEST : ANY ; 
END_VAR
BEGIN
NETWORK
TITLE =

      LAR1  P##SOURCE; // Load the start address of the ANY pointers in AR1.
      L     B#16#10; // Load the syntax ID and
      T     LB [AR1,P#0.0]; // transfer it to the ANY pointer. 
      L     B#16#4; // Load data type WORD and
      T     LB [AR1,P#1.0]; // transfer it to the ANY pointer. 
      L     #LENG; // Load HOW MANY WORDS and
      T     LW [AR1,P#2.0]; // transfer them to the ANY pointer
      L     #SOU_DB; // Source is DB[?], DBB0.0
      T     LW [AR1,P#4.0]; // 
      L     P#DBX 0.0; // 
      T     LD [AR1,P#6.0]; // 
      LAR1  P##DEST; //Load the DESTINATION address of the ANY pointer in AR1. 
      L     B#16#10; //Load the syntax ID and 
      T     LB [AR1,P#0.0]; //transfer it to the ANY pointer. 
      L     B#16#4; //Load data type WORD and 
      T     LB [AR1,P#1.0]; //transfer it to the ANY pointer.  
     L     #LENG; //Load HOW MANY WORDS and 
      T     LW [AR1,P#2.0]; //transfer them to the ANY pointer.
L     #DES_DB; //Destination is DB{?}, DBB0.0 
      T     LW [AR1,P#4.0]; 
      L     P#DBX 0.0; // 
      T     LD [AR1,P#6.0]; // 
      CALL "BLKMOV" (//Call the block move system function 
           SRCBLK                   := #SOURCE,// 
           RET_VAL                  := MW   210,//bbbbuate the BR bit and MW 210 
           DSTBLK                   := #DEST);// 

END_FUNCTION

使用說明：可直接調用，#SOURCE---源數據塊號
                      #DEST------目標數據塊號
                       #LENG----要拷貝數據的長度

S7 300/400 的一些功能和技巧2

單鍵翻轉
FUNCTION FC 11 : VOID
TITLE =
//
AUTHOR : AXG
FAMILY : ESU
NAME : SDZF
VERSION : 0.0

BEGIN
NETWORK
TITLE =
A     M     0.0; 

      A     M     0.1; 
      =     M     58.0; 
NETWORK
TITLE =

      A     M     58.0; 
      AN    M     58.1; 
      =     M     58.2; 
NETWORK
TITLE =

      A     M     58.2; 
      S     M     58.1; 
      ON    M     58.0; 
      ON    M     0.0; 
      R     M     58.1; 
 NOP   0; 
NETWORK
TITLE =

      A     M     58.2; 
      A     M     58.4; 
      =     M     58.3; 
NETWORK
TITLE =

      A     M     58.2; 
      AN    M     58.3; 
      AN    M     58.4; 
      S     M     58.4; 
      O     M     58.3; 
      ON    M     0.0; 
      R     M     58.4;  
      NOP   0; 

END_FUNCTION

使用說明：M0.0----使能
          M0.1----單鍵使M58.4翻轉 

S7 300/400 的一些功能和技巧3

循環讀模擬量入DB塊
      L     #DB_NO
      T     LW     0
      OPN   DB [LW 0]
      L     #PIW_ADDR
      SLD   3
      T     LD     4
      L     #DBD_ADDR
      SLD   3
      T     LD     8
      L     #CH_LEN

NEXT: T     LW     0
      L     LD     4
      LAR1  
      L     PIW [AR1,P#0.0]
      T     LW     2

     { CALL  "Read Analog Value 464-2"
       IN     :=LW2
       HI_LIM :=5.000000e+002
       LO_LIM :=-1.000000e+001      將模擬量轉換成工程量
BIPOLAR:=TRUE
       RET_VAL:=LW10
OUT    :=LD12   }
   L     LD     8 
      LAR1  
      L     LD     2
      T     DBD [AR1,P#0.0]
      L     LD     4
      +     L#16
      T     LD     4
      L     LD     8
      +     L#32
      T     LD     8
      L     LW     0
      LOOP  NEXT

PIW_Addr ：模擬塊通道起始地址
CHI_LEN ：要讀入的 通道數
DB_NO ：存儲數據塊
DBW_Addr ：存儲在數據塊中的字地址