diff --git a/Rs.SkyLine/Flow/AlarmConstID.cs b/Rs.SkyLine/Flow/AlarmConstID.cs
index 81eadb0..bb07f17 100644
--- a/Rs.SkyLine/Flow/AlarmConstID.cs
+++ b/Rs.SkyLine/Flow/AlarmConstID.cs
@@ -416,6 +416,23 @@ namespace Rs.MotionPlat.Flow
///
public const int 离子风扇报警 = 1095;
+ ///
+ /// 料盘未放下报警
+ ///
+ public const int 料盘未放下报警 = 1096;
+
+
+
+
+
+
+
+
+
+
+
+
+
///
/// Empty1满料报警
///
@@ -469,10 +486,7 @@ namespace Rs.MotionPlat.Flow
/// 上下气缸异常报警
///
public const int UpDownCylinderExceptionAlarm = 19;
- ///
- /// 料仓满料报警
- ///
- public const int StockFullTrayAlarm = 20;
+
///
/// 料仓缺料盘报警
diff --git a/Rs.SkyLine/Flow/NormalFlow/StockTrayFlow.cs b/Rs.SkyLine/Flow/NormalFlow/StockTrayFlow.cs
index 46a1086..021e80b 100644
--- a/Rs.SkyLine/Flow/NormalFlow/StockTrayFlow.cs
+++ b/Rs.SkyLine/Flow/NormalFlow/StockTrayFlow.cs
@@ -292,9 +292,10 @@ namespace Rs.AutoDischarge.V3.Flow
logInfo = GetClassName()+ $"已运动到{GetTrayName()}料仓上料接料盘位,cz={Ops.GetCurPosition(StockZ)}";
MessageQueue.Instance.Insert(logInfo);
Ops.Off($"{(int)m_stockType}号料仓托盘气缸");
+ Thread.Sleep(GlobalVar.TrayCylinderRetractionDelay);
logInfo = GetClassName() + $"{(int)m_stockType}号料仓托盘气缸 off";
MessageQueue.Instance.Insert(logInfo);
- Thread.Sleep(500);
+
loadStep = EStockTrayLoadFlowStep.上料下降到托料盘位;
}
break;
@@ -322,7 +323,7 @@ namespace Rs.AutoDischarge.V3.Flow
logInfo = GetClassName() + $"已下降到{GetTrayName()}料仓Z托料盘位,cz:{Ops.GetCurPosition(StockZ)}";
MessageQueue.Instance.Insert(logInfo);
Ops.On($"{(int)m_stockType}号料仓托盘气缸");
- Thread.Sleep(500);
+ Thread.Sleep(GlobalVar.TrayCylinderExtensionDelay);
logInfo = GetClassName() + $"{(int)m_stockType}号料仓托盘气缸 on";
MessageQueue.Instance.Insert(logInfo);
loadStep = EStockTrayLoadFlowStep.到起始位;
@@ -578,9 +579,12 @@ namespace Rs.AutoDischarge.V3.Flow
else
{
//弹框报警,料仓已经满料,提醒人工取走,然后流程继续
- logInfo = $"{m_stockType}料仓已经满料,请先把料盘取走";
- TestCenterMessageBox.Show(AlarmConstID.StockFullTrayAlarm, logInfo, ETipButton.Ok);
- msgBox = TestCenterMessageBox.WaitResult(AlarmConstID.StockFullTrayAlarm);
+ //logInfo = $"{m_stockType}料仓已经满料,请先把料盘取走";
+ alarmEntity = AlarmCollection.Get(AlarmConstID.料仓满料报警).Transform(m_stockType);
+ MessageQueue.Instance.Warn(GetClassName() + alarmEntity.CN);
+ AlarmMessageBox.ShowDialog(alarmEntity, ETipButton.Ok, null);
+ //TestCenterMessageBox.Show(AlarmConstID.StockFullTrayAlarm, logInfo, ETipButton.Ok);
+ //msgBox = TestCenterMessageBox.WaitResult(AlarmConstID.StockFullTrayAlarm);
}
break;
case EStockTrayUnloadFlowStep.回退到异常处理位:
@@ -749,7 +753,8 @@ namespace Rs.AutoDischarge.V3.Flow
MessageQueue.Instance.Insert(logInfo);
VirtualAxisSleep();
Ops.Off($"{(int)m_stockType}号料仓托盘气缸");
- Thread.Sleep(200);
+ //Thread.Sleep(200);
+ Thread.Sleep(GlobalVar.TrayCylinderRetractionDelay);
logInfo = GetClassName() + $"{GetTrayName()}料仓{(int)m_stockType}号料仓托盘气缸 off";
MessageQueue.Instance.Insert(logInfo);
unloadStep = EStockTrayUnloadFlowStep.顶起托盘;
@@ -779,7 +784,8 @@ namespace Rs.AutoDischarge.V3.Flow
MessageQueue.Instance.Insert(logInfo);
VirtualAxisSleep();
Ops.On($"{(int)m_stockType}号料仓托盘气缸");
- Thread.Sleep(200);
+ Thread.Sleep(GlobalVar.TrayCylinderExtensionDelay);
+
logInfo = GetClassName() + $"{GetTrayName()}料仓{(int)m_stockType}号料仓托盘气缸 on";
MessageQueue.Instance.Insert(logInfo);
unloadStep = EStockTrayUnloadFlowStep.下料完成到起始位;
diff --git a/Rs.SkyLine/Flow/NormalFlow/TakeTrayFlow.cs b/Rs.SkyLine/Flow/NormalFlow/TakeTrayFlow.cs
index ad2a34c..8c8c392 100644
--- a/Rs.SkyLine/Flow/NormalFlow/TakeTrayFlow.cs
+++ b/Rs.SkyLine/Flow/NormalFlow/TakeTrayFlow.cs
@@ -584,10 +584,13 @@ namespace Rs.MotionPlat.Flow
else
{
//粘料盘
- logInfo = "检测到料盘未放下,请处理后点击确定重放";
- MessageQueue.Instance.Warn(GetClassName()+ logInfo);
- TestCenterMessageBox.Show(AlarmConstID.UpDownCylinderExceptionAlarm, logInfo, ETipButton.Ok);
- TestCenterMessageBox.WaitResult(AlarmConstID.UpDownCylinderExceptionAlarm);
+ //logInfo = "检测到料盘未放下,请处理后点击确定重放";
+ //MessageQueue.Instance.Warn(GetClassName()+ logInfo);
+ //TestCenterMessageBox.Show(AlarmConstID.UpDownCylinderExceptionAlarm, logInfo, ETipButton.Ok);
+ //TestCenterMessageBox.WaitResult(AlarmConstID.UpDownCylinderExceptionAlarm);
+ alarmEntity = AlarmCollection.Get(AlarmConstID.料盘未放下报警);
+ MessageQueue.Instance.Warn(GetClassName() + alarmEntity.CN);
+ AlarmMessageBox.ShowDialog(alarmEntity, ETipButton.Ok, null);
step = ETakeTrayFlowStep.到放料盘上方;
}
break;
diff --git a/Rs.SkyLine/Properties/AssemblyInfo.cs b/Rs.SkyLine/Properties/AssemblyInfo.cs
index ae35c17..0de8180 100644
--- a/Rs.SkyLine/Properties/AssemblyInfo.cs
+++ b/Rs.SkyLine/Properties/AssemblyInfo.cs
@@ -31,6 +31,6 @@ using System.Runtime.InteropServices;
//
//可以指定所有这些值,也可以使用“生成号”和“修订号”的默认值
//通过使用 "*",如下所示:
- [assembly: AssemblyVersion("3.20.24.29")]
+ [assembly: AssemblyVersion("3.20.24.30")]
//[assembly: AssemblyVersion("1.0.0.0")]
//[assembly: AssemblyFileVersion("1.0.0.0")]