多轴编程培训| 车铣复合培训| 模具设计培训| 工业设计培训| 机器人编程培训| 网站SEO优化培训| 加入收藏

网站建设
联系我们

siemens300/400编程技巧3则

发布于:2014-09-01 15:50来源:未知 作者:mike12588 点击:
数据块拷贝
FUNCTION FC 100 : VOID
TITLE =
//DB BLOCK COPY
AUTHOR : AXG
NAME : DBBTODBB
VERSION : 0.1
无锡数控培训,无锡模具设计培训,无锡UG培训

VAR_INPUT
  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 =
无锡数控培训,无锡模具设计培训,无锡UG培训
      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,// 
无锡数控培训,无锡模具设计培训,无锡UG培训

------分隔线----------------------------
------分隔线----------------------------
培训咨询:
设计咨询:
编程咨询:
建站优化:
项目合作:
新区UG专业技术交流