lizhendong
级别: 家园常客
精华主题: 0
发帖数量: 609 个
工控威望: 800 点
下载积分: 1992 分
在线时间: 846(小时)
注册时间: 2016-10-12
最后登录: 2024-11-13
查看lizhendong的 主题 / 回贴
楼主  发表于: 2022-02-05 18:49
图片:
导入MHJ-PLC-Lab-Function-S71500.scl自己建立的 factory io TIA Portia 仿真模板用不了???有自己建立成功的吗??


FUNCTION "MHJ-PLC-Lab-Function-S71500" : Void
{ S7_Optimized_Access := 'TRUE' }
VERSION : 0.1
   VAR_TEMP
      Value : Byte;
      ForCounter : Int;
   END_VAR

   VAR CONSTANT
      Value_01_DW : DWord := 16#1223_5486;
      Value_02_DW : DWord := 16#A6C9_D1F5;
   END_VAR


BEGIN
    
    #Value:=PEEK(area := 16#82,
         dbNumber := 0,
         byteOffset := 511);
    #Value := #Value + 1;
    
    POKE(area := 16#82,
         dbNumber := 0,
         byteOffset := 511,
         value := #Value);
    
    POKE(area := 16#82,
         dbNumber := 0,
         byteOffset := 1016,
         value := #Value_01_DW);
    POKE(area := 16#82,
         dbNumber := 0,
         byteOffset := 1020,
         value := #Value_02_DW);
    
    FOR #ForCounter := 0 TO 63 DO
        #Value:=PEEK(area := 16#1,
             dbNumber := 0,
             byteOffset := #ForCounter);
        POKE(area := 16#81,
             dbNumber := 0,
             byteOffset := #ForCounter,
             value := #Value);
    END_FOR;
    #Value := PEEK(area := 16#1,
                   dbNumber := 0,
                   byteOffset := 512);
    POKE(area := 16#82,
         dbNumber := 0,
         byteOffset := 512,
         value := #Value);
    
        
END_FUNCTION


附件: MHJ-PLC-Lab-Function-S71500.rar (1 K) 下载次数:86
网站提示: 请不要用迅雷下载附件,容易出错
lizhendong
级别: 家园常客
精华主题: 0
发帖数量: 609 个
工控威望: 800 点
下载积分: 1992 分
在线时间: 846(小时)
注册时间: 2016-10-12
最后登录: 2024-11-13
查看lizhendong的 主题 / 回贴
1楼  发表于: 2022-02-11 16:30
有大师吗