流程 程序

winzhi

"A10_移栽机2工位".移栽机流程.UDT.I_等待允许初始化 := 1;
"A10_移栽机2工位".移栽机流程.UDT.I_等待前站已经放行 := "A10_OP160工位".工位1小车流转流程.UDT.O_告知后站已经放行;
"A10_移栽机2工位".移栽机流程.UDT.I_等待后站允许放行 := "A10_OP010工位".工位1小车流转流程.UDT.O_告知前站允许放行;

"EM251_移栽机流程"(UDT_系统控制 := "A10_移栽机2工位".系统控制,
              X_小车位置检测 := "A10_PLC_I/O".PLC.输入.分柜3."610.0-611.7"[0],
              X_小车到位检测 := "A10_PLC_I/O".PLC.输入.分柜3."610.0-611.7"[1],
              X_阻挡缸阻挡到位 := "A11_HMI交互".气缸[21].操作[1].原点到达,
              X_阻挡缸放行到位 := "A11_HMI交互".气缸[21].操作[1].动点到达,
              X_移栽轴回零完成 := "A11_HMI交互".伺服[17].显示.O_原点完成标志,
              X_移栽轴定位完成 := "A11_HMI交互".伺服[17].显示.O_伺服定位完成,
              X_移栽轴执行反馈 := "A10_移栽机2工位".伺服.伺服[1]."O_回零/定位执行反馈",
              X_移栽机进出口安全检测 := "A10_PLC_I/O".PLC.输入.分柜3."610.0-611.7"[4],
              X_移栽机对接进口安全检测 := "A10_PLC_I/O".PLC.输入.分柜3."604.0-605.7"[7],
              X_移栽机对接出口安全检测 := "A10_PLC_I/O".PLC.输入."分柜1-1"."240.0-241.7"[7],
              B_阻挡缸阻挡控制 => "A10_移栽机2工位".移栽机流程.阻挡气缸阻挡控制,
              B_阻挡缸放行控制 => "A10_移栽机2工位".移栽机流程.阻挡气缸放行控制,
              X_移栽轴初始回零 => "A10_移栽机2工位".伺服.伺服[1].I_初始回零,
              X_移栽轴初始定位 => "A10_移栽机2工位".伺服.伺服[1].I_初始定位,
              X_移栽轴自动定位 => "A10_移栽机2工位".伺服.伺服[1].I_自动定位,
              X_倍速链正转 => "A10_移栽机2工位".移栽机流程.倍速链正转,
              X_倍速链反转 => "A10_移栽机2工位".移栽机流程.倍速链反转,
              I_流程号 := "A11_HMI交互".移栽机2.流程号.移栽机,
              UI_移栽轴点位号 := "A11_HMI交互".伺服[17].操作.I_坐标编号,
              UDT_工位 := "A10_移栽机2工位".移栽机流程.UDT);

IF "A10_移栽机2工位".移栽机流程.UDT.IO_数据初始化 THEN
    "A10_移栽机2工位".移栽机流程.UDT.IO_数据初始化 := 0;
END_IF;

IF "A10_移栽机2工位".移栽机流程.UDT.IO_数据重置 THEN
    "A10_移栽机2工位".移栽机流程.UDT.IO_数据重置 := 0;
END_IF;

IF "A10_移栽机2工位".移栽机流程.UDT.IO_数据处理 THEN
    "A10_移栽机2工位".移栽机流程.UDT.IO_数据处理 := 0;
END_IF;