2015-04-15 18:32:56 +00:00
///
2017-01-24 17:55:36 +00:00
/// Copyright (c) 2013-2017 Sensus Metering Systems
2015-04-15 18:32:56 +00:00
///
using System ;
2014-07-28 07:54:35 +00:00
using System.Collections.Generic ;
using System.Text ;
using log4net ;
using TBF.BenchControl ;
using TBF.Resources ;
2014-07-31 15:04:09 +00:00
using TBF.UiBridge ;
2014-07-28 07:54:35 +00:00
namespace TBF.BenchControl.TestMethods.CombinedWithDetection
{
public class CombinedWithDetectionSeq : Sequences . SequenceBase
{
private static readonly ILog log = LogManager . GetLogger ( typeof ( CombinedWithDetectionSeq ) ) ;
const int DetectionBufferSize = 9 ;
const int DetectionKernelSize = 5 ;
2017-12-02 16:54:38 +00:00
public IList < Event > Execute ( Config . Entities . Test test , int repetitionNr , bool isLastRepetition ,
2016-10-11 07:59:59 +00:00
CombinedWithDetTestParams testParams ,
Config . Entities . DebugMode debugLevel )
2014-07-28 07:54:35 +00:00
{
2016-10-11 07:59:59 +00:00
IList < Event > e = new List < Event > ( ) ; /// Events from currently running operations
checkUiOp = new Operations . CheckUIOp ( true ) ; /// Runs in more then one state
2017-09-28 10:51:41 +00:00
float switchTimeStart = 0.001f ; /// in seconds, original vale is 1 ms
float switchTimeEnd = 0.001f ; /// in seconds, original vale is 1 ms
2017-09-21 12:04:31 +00:00
2015-12-04 16:17:20 +00:00
if ( test . Part < 1 | | test . Part > Config . Data . CompoundWMsCount )
2015-02-02 22:18:28 +00:00
{
2015-12-04 16:17:20 +00:00
UiBridge . Bridge . OnError ( this , string . Format ( "Test 'Part' should be 1 .. {0}" , Config . Data . CompoundWMsCount ) ) ;
2015-02-02 22:18:28 +00:00
IList < Event > retval = new List < Event > ( 1 ) ;
retval . Add ( Event . ConfigurationError ) ;
return retval ;
}
2016-10-11 07:59:59 +00:00
if ( debugLevel = = Config . Entities . DebugMode . Simulate )
{
///
/// Test method simulation
///
2017-12-08 10:45:37 +00:00
Bridge . OnTestProgress ( this , new TestProgressEventArgs ( test , repetitionNr , Config . Entities . Progress . FlowSetting ) ) ;
2016-10-11 07:59:59 +00:00
if ( test . Name . ToLower ( ) . Contains ( "rise" ) | | test . Name . ToLower ( ) . Contains ( "steig" ) )
{
2018-02-26 11:18:04 +00:00
MakeSimulatedCompound ( test , 1 , 0 , 0.7f , 0.0f ) ;
2016-10-11 07:59:59 +00:00
}
else
{
2018-02-26 11:18:04 +00:00
MakeSimulatedCompound ( test , 1 , 0 , 0.7f , 0.9f ) ;
2016-10-11 07:59:59 +00:00
}
2017-12-08 10:45:37 +00:00
Bridge . OnTestProgress ( this , new TestProgressEventArgs ( test , repetitionNr , Config . Entities . Progress . Completed ) ) ;
2016-10-11 07:59:59 +00:00
Bridge . OnTestCompleted ( this , new TestCompletedEventArgs ( test . Name , BatchRslts . GetTestRslt ( Results . Utils . GetTestName ( test . Name , 1 , 1 ) , 0 ) ) ) ;
allResults . Info ( TestResult2CsvLine ( test . Name , 0 ) ) ; /// Append the results to the CSV-file
for ( int i = 0 ; i < Config . Data . WMsCount ; i + + )
{
2017-05-31 12:51:26 +00:00
TestMethods . iPerlCommunication . iPerlHead . IperlHead iPerl = ( ( sensPath . RegisterReaders ! = null ) & & ( i < sensPath . RegisterReaders . Length ) )
? ( sensPath . RegisterReaders [ i ] as TestMethods . iPerlCommunication . iPerlHead . IperlHead )
: null ;
2016-10-11 07:59:59 +00:00
if ( iPerl ! = null )
{
/// TODO: Reimplement
//iPerl.LastTestResult = meterRslt; /// Save this water meter test result to iPerl WM
2017-05-31 12:51:26 +00:00
iPerl . NominalTestFlowLph = 500.0 * ( double ) ( test . Qfrom + test . Qto ) ; /// Ave. + convert to liter/hour
2016-10-11 07:59:59 +00:00
}
}
//------------------------------------------------
Bridge . OnActivity ( this , string . Format ( "Simulating {0}" , test . Name ) ) ;
//------------------------------------------------
State . Create ( string . Format ( "CombinedWithDetection : Simulating {0}" , test . Name ) )
. AddOperation ( checkUiOp )
. EnterState ( ) ;
e = StateMachine . WaitRunDevsRunOps ( ) ;
Event retVal = Event . Done ;
if ( TestAndLogUiCmdStop ( test , e ) ) retVal = Event . UiCmdStop ;
/// Create a list with one item 'retVal' (default is Event.Done) and return it
IList < Event > retListSim = new List < Event > ( 1 ) ;
retListSim . Add ( retVal ) ;
return retListSim ;
}
2014-07-28 07:54:35 +00:00
Elde . ControlBoardDev cBrd = StateMachine . ControlBoard ;
/// Specific for combined meters
2015-12-04 16:17:20 +00:00
int [ ] lastWMPulses = new int [ 2 * Config . Data . CompoundWMsCount ] ;
2014-07-28 07:54:35 +00:00
//--------------------------------
2015-04-28 13:27:47 +00:00
State . Create ( "CombinedWithDetection : stopTest diverter gate etc" )
2014-07-28 07:54:35 +00:00
. AddOperation ( checkUiOp )
. AddOperation ( cBrd . StopPreviousOp ( ) )
. EnterState ( ) ;
do
{
e = StateMachine . WaitRunDevsRunOps ( ) ;
2016-04-14 07:16:20 +00:00
if ( TestAndLogUiCmdStop ( test , e ) ) goto stopTest ;
2014-07-28 07:54:35 +00:00
}
while ( ! e . Contains ( Event . PreviousStopped ) ) ;
2016-02-10 18:24:10 +00:00
LtrPerRefPulse = outPath . FlowMeter . LtrPerPulse ; /// [ltr/pulse], nominal flow in [m3/h]
2014-09-12 05:17:30 +00:00
/// Notes:
/// float timeHr = volumeLtr / (1000.0f * targetFlow);
/// float timeSec = 3600.0f * timeHr;
/// int refPulses = (int)(timeSec * (2000.0f * targetFlow / pOut.FlowMeter.NominalFlow));
2016-02-10 18:24:10 +00:00
int totalPulses = ( int ) ( test . Volume / LtrPerRefPulse + 0.5f ) ;
2014-09-12 05:17:30 +00:00
2016-10-18 09:49:32 +00:00
processDataLoggingOp = new TBF . BenchControl . Operations . ProcessDataLoggingOp ( processDataLogger , this , false ) ;
2014-09-09 14:18:23 +00:00
/// Meters path is required for the following:
2016-02-13 15:47:15 +00:00
readRegistersOp = new Operations . ReadMoreRegistersOp ( sensPath . RegisterReaders ) ;
2014-07-28 07:54:35 +00:00
//====================================
loop :
/// Start the test, initialize test results
Bridge . OnTestSelected ( this , new TestSelectedEventArgs ( test , repetitionNr , inPath , benchPath , outPath , sensPath , ( int ) totalPulses ) ) ;
2016-01-03 01:05:35 +00:00
string testName = Results . Utils . GetTestName ( test . Name , test . Repeats , repetitionNr ) ;
TestStartTime = DateTime . Now ;
2017-12-02 16:54:38 +00:00
Bridge . OnTestProgress ( this , new TestProgressEventArgs ( test , repetitionNr , Config . Entities . Progress . FlowSetting ) ) ;
2014-07-28 07:54:35 +00:00
2016-01-03 01:05:35 +00:00
Qrise = 0 ;
Qfall = 0 ;
2014-07-28 07:54:35 +00:00
2017-06-08 13:42:47 +00:00
if ( ! test . DoDraining ) /// Do not skip emptying if test.Emptying==true
2014-07-28 07:54:35 +00:00
{
//--------------------------------
2017-04-24 07:44:11 +00:00
State . Create ( "CombinedWithDetection : Mesuring mass of water in the tank" )
2014-07-28 07:54:35 +00:00
. AddOperation ( checkUiOp )
2017-03-28 21:47:32 +00:00
. AddOperation ( outPath . Scale . ReadMassOp ( ref Mass ) )
2014-07-28 07:54:35 +00:00
. EnterState ( ) ;
do
{
e = StateMachine . WaitRunDevsRunOps ( ) ;
if ( e . Contains ( Event . Error ) ) goto error ;
2016-04-14 07:16:20 +00:00
if ( TestAndLogUiCmdStop ( test , e ) ) goto stopTest ;
2014-07-28 07:54:35 +00:00
}
while ( ! e . Contains ( Event . BalanceDone ) ) ;
2016-10-07 12:06:54 +00:00
double estimatedEndMass = Mass . Val + test . Volume ;
2017-03-28 21:47:32 +00:00
if ( estimatedEndMass < outPath . Scale . Capacity * Constants . TankFullFactor )
2014-07-28 07:54:35 +00:00
{
goto switching_flow_detection ; /// Enough room in the tank -> skip emptying
}
}
// Empty the water tank
2017-03-29 07:22:39 +00:00
switch ( DrainTheTank ( outPath . Scale . DrainValve , outPath . Scale ) )
2014-07-28 07:54:35 +00:00
{
case Event . Error : goto error ;
2015-04-28 13:27:47 +00:00
case Event . UiCmdStop : goto stopTest ;
2014-07-28 07:54:35 +00:00
}
switching_flow_detection :
2016-01-03 01:05:35 +00:00
int flowDetectTime0 = StateMachine . Time ;
int flowDetectTime = 0 ;
2014-08-01 06:36:17 +00:00
float estFlowSetTime = 100.0f ;
2017-01-22 19:39:14 +00:00
///
/// Prepare cameras, ROI-s and measurementOperations
///
/// Find ROI-s
IList < GenericDevices . IRoi > rois = new List < GenericDevices . IRoi > ( ) ;
foreach ( var rr in sensPath . RegisterReaders )
{
2017-04-06 16:55:01 +00:00
GenericDevices . IRoi roi = rr as GenericDevices . IRoi ;
if ( roi ! = null & & roi . Detected )
{
rois . Add ( roi ) ;
}
2017-01-22 19:39:14 +00:00
}
/// Find cameras
IList < GenericDevices . ICamera > cameras = new List < GenericDevices . ICamera > ( ) ;
foreach ( var roi in rois )
{
2017-01-24 17:55:36 +00:00
if ( roi . Camera ! = null & & ! cameras . Contains ( roi . Camera ) )
2017-01-22 19:39:14 +00:00
{
2017-04-06 16:55:01 +00:00
roi . Camera . ClearRoiParams ( ) ;
2017-01-22 19:39:14 +00:00
cameras . Add ( roi . Camera ) ;
}
}
/// Register ROI-parameters to cameras
2017-01-24 09:50:53 +00:00
foreach ( var roi in rois ) roi . RegisterRoiToCamera ( ) ;
2017-01-22 19:39:14 +00:00
/// Prepare measurementOperations
IList < IOperation > measureOperations = new List < IOperation > ( ) ;
2017-01-24 09:50:53 +00:00
foreach ( var camera in cameras ) measureOperations . Add ( camera . MeasurementOp ( ) ) ;
2017-01-24 17:55:36 +00:00
2017-01-22 19:39:14 +00:00
2014-07-28 07:54:35 +00:00
//------------------------------------------------
Bridge . OnActivity ( this , Strings . Switching_flow_detection ) ;
//------------------------------------------------
State . Create ( "CombinedWithDetection : Start the pump" )
. AddOperation ( checkUiOp )
. AddOperations ( measureOperations )
2015-01-17 03:52:42 +00:00
. AddOperation ( ( inPath . Pump is GenericDevices . IPumpFM ) ? ( inPath . Pump as GenericDevices . IPumpFM ) . TurnOnOp ( test . PumpPower ) : null )
2014-07-28 07:54:35 +00:00
. AddOperation ( cBrd . SetValvesOp ( inPath . Pump , null ) )
. EnterState ( ) ;
do
{
e = StateMachine . WaitRunDevsRunOps ( ) ;
2016-01-08 18:18:45 +00:00
Bridge . OnTestProgress ( this , new TestProgressEventArgs ( test , repetitionNr , Config . Entities . Progress . SwitchingFlowDetection ) ) ;
2014-08-01 06:36:17 +00:00
2016-04-14 07:16:20 +00:00
if ( TestAndLogUiCmdStop ( test , e ) ) goto stopTest ;
2014-07-28 07:54:35 +00:00
}
while ( ! e . Contains ( Event . ValvesSet ) ) ;
//--------------------------------
State . Create ( "CombinedWithDetection : Set the initial flow" )
. AddOperation ( checkUiOp )
. AddOperations ( measureOperations )
2015-12-20 19:48:50 +00:00
. AddOperation ( outPath . RegulValve . SetFlowAndMeasureOp ( outPath . FlowMeter , test . Qfrom , test . Qto , outPath . PidCoef , RefFlow , 600 , ( float ) test . TolerRed ) ) /// timeout = 10 min.
2014-07-28 07:54:35 +00:00
. EnterState ( ) ;
do
{
e = StateMachine . WaitRunDevsRunOps ( ) ;
2016-01-08 18:18:45 +00:00
Bridge . OnTestProgress ( this , new TestProgressEventArgs ( test , repetitionNr , Config . Entities . Progress . SwitchingFlowDetection ) ) ;
2014-08-01 06:36:17 +00:00
2016-04-14 07:16:20 +00:00
if ( TestAndLogUiCmdStop ( test , e ) ) goto stopTest ;
2015-01-12 04:56:19 +00:00
if ( e . Contains ( Event . RegulValveTimeOut ) )
{
2018-06-05 09:16:13 +00:00
Bridge . OnError ( this , Strings . Flow_adjustment_failed ) ;
2015-01-12 04:56:19 +00:00
goto error ;
}
2014-07-28 07:54:35 +00:00
}
while ( ! e . Contains ( Event . FlowReached ) ) ;
//--------------------------------
switch ( ReadRegistersTempPressAmbient ( measureOperations , false ) )
{
case Event . Error : goto error ;
2015-04-28 13:27:47 +00:00
case Event . UiCmdStop : goto stopTest ;
2014-07-28 07:54:35 +00:00
}
//====================================
// Find the switching flow
//====================================
/// Allocate detection buffers
2016-10-07 14:22:36 +00:00
double [ ] flowsForDetection = new double [ DetectionBufferSize ] ;
double [ ] pulseFreqsForDetection = new double [ DetectionBufferSize ] ;
2014-07-28 07:54:35 +00:00
/// Current values
2015-12-20 19:48:50 +00:00
flowsForDetection [ 0 ] = RefFlow . Val ;
2014-07-28 07:54:35 +00:00
pulseFreqsForDetection [ 0 ] = 0.0f ;
2014-08-01 06:36:17 +00:00
int startTime = StateMachine . Time ;
int lastTime = StateMachine . Time ;
2014-07-28 07:54:35 +00:00
/// Detection parameters
float rvPulse = ( testParams . TargetQ > ( test . Qfrom + test . Qto ) / 2.0f ) ? 0.05f : - 0.05f ; // rise or fall?
rvPulse * = ( 100.0f * testParams . RateOfChange ) ;
bool detected = false ;
bool targetReached = false ;
2016-10-07 14:22:36 +00:00
double detectedFlow = 0 ;
2014-07-28 07:54:35 +00:00
2014-08-01 08:54:38 +00:00
int detectionStartTime = StateMachine . Time ;
2016-01-08 18:18:45 +00:00
Bridge . OnTestProgress ( this , new TestProgressEventArgs ( test , repetitionNr , Config . Entities . Progress . SwitchingFlowDetection ) ) ;
2014-08-01 08:54:38 +00:00
2014-07-28 07:54:35 +00:00
do
{
//--------------------------------
State . Create ( "CombinedWithDetection : Change the RV position" )
. AddOperation ( checkUiOp )
. AddOperations ( measureOperations )
. AddOperation ( outPath . RegulValve . ChangeRegulValvePositionOp ( rvPulse ) )
. EnterState ( ) ;
do
{
e = StateMachine . WaitRunDevsRunOps ( ) ;
2016-01-08 18:18:45 +00:00
Bridge . OnTestProgress ( this , new TestProgressEventArgs ( test , repetitionNr , Config . Entities . Progress . SwitchingFlowDetection ) ) ;
2014-08-01 06:36:17 +00:00
2016-04-14 07:16:20 +00:00
if ( TestAndLogUiCmdStop ( test , e ) ) goto stopTest ;
2014-07-28 07:54:35 +00:00
}
while ( ! e . Contains ( Event . PositionReached ) ) ;
// Last pulses are kept to calculate differences
2016-02-13 15:47:15 +00:00
for ( int i = 0 ; i < 2 * Config . Data . CompoundWMsCount ; i + + ) lastWMPulses [ i ] = RegisterReaders [ i ] . WMPulses ;
2014-07-28 07:54:35 +00:00
// Shift data in the detection buffers
for ( int i = DetectionBufferSize - 2 ; i > = 0 ; i - - )
{
flowsForDetection [ i + 1 ] = flowsForDetection [ i ] ;
pulseFreqsForDetection [ i + 1 ] = pulseFreqsForDetection [ i ] ;
}
switch ( ReadRegistersTempPressAmbient ( measureOperations , false ) )
{
case Event . Error : goto error ;
2015-04-28 13:27:47 +00:00
case Event . UiCmdStop : goto stopTest ;
2014-07-28 07:54:35 +00:00
}
2014-08-01 06:36:17 +00:00
int time = StateMachine . Time ;
2016-02-13 15:47:15 +00:00
int diff = RegisterReaders [ ( test . Part - 1 ) * 2 + 1 ] . WMPulses - lastWMPulses [ ( test . Part - 1 ) * 2 + 1 ] ;
2014-07-28 07:54:35 +00:00
flowsForDetection [ 0 ] = cBrd . ReferenceFreq * outPath . FlowMeter . NominalFlow / 2000.0f ;
pulseFreqsForDetection [ 0 ] = ( float ) diff / ( float ) ( time - lastTime ) ;
2014-08-01 06:36:17 +00:00
lastTime = StateMachine . Time ;
2014-07-28 07:54:35 +00:00
2014-08-01 08:54:38 +00:00
if ( StateMachine . Time - detectionStartTime > 15 )
{
if ( ( flowsForDetection [ 0 ] > 0 ) & & ( flowsForDetection [ DetectionBufferSize - 1 ] > 0 ) )
{
2016-10-07 14:22:36 +00:00
double [ ] flowBefore = new double [ DetectionKernelSize ] ;
double [ ] flowAfter = new double [ DetectionKernelSize ] ;
double [ ] freqBefore = new double [ DetectionKernelSize ] ;
double [ ] freqAfter = new double [ DetectionKernelSize ] ;
2014-08-01 08:54:38 +00:00
for ( int i = 0 ; i < DetectionKernelSize ; i + + )
{
flowBefore [ i ] = flowsForDetection [ DetectionBufferSize - DetectionKernelSize + i ] ;
freqBefore [ i ] = pulseFreqsForDetection [ DetectionBufferSize - DetectionKernelSize + i ] ;
flowAfter [ i ] = flowsForDetection [ i ] ;
freqAfter [ i ] = pulseFreqsForDetection [ i ] ;
}
Array . Sort ( flowBefore ) ;
Array . Sort ( flowAfter ) ;
Array . Sort ( freqBefore ) ;
Array . Sort ( freqAfter ) ;
flowBefore [ 0 ] = 0 ;
flowAfter [ 0 ] = 0 ;
//freqBefore[0] = 0;
//freqAfter[0] = 0;
flowBefore [ DetectionKernelSize - 1 ] = 0 ;
flowAfter [ DetectionKernelSize - 1 ] = 0 ;
//freqBefore[DetectionKernelSize - 1] = 0;
//freqAfter[DetectionKernelSize - 1] = 0;
2016-10-07 14:22:36 +00:00
double aveFlowBefore = 0 ;
double aveFlowAfter = 0 ;
double aveFreqBefore = 0 ;
double aveFreqAfter = 0 ;
2014-08-01 08:54:38 +00:00
foreach ( var f in flowBefore ) aveFlowBefore + = f ;
foreach ( var f in flowAfter ) aveFlowAfter + = f ;
foreach ( var f in freqBefore ) aveFreqBefore + = f ;
foreach ( var f in freqAfter ) aveFreqAfter + = f ;
2016-10-07 14:22:36 +00:00
aveFlowBefore / = ( double ) ( DetectionKernelSize - 2 ) ;
aveFlowAfter / = ( double ) ( DetectionKernelSize - 2 ) ;
aveFreqBefore / = ( double ) ( DetectionKernelSize ) ;
aveFreqAfter / = ( double ) ( DetectionKernelSize ) ;
2014-08-01 08:54:38 +00:00
UiBridge . Bridge . OnLog ( this , string . Format ( "time={0}, flow{1}, aveFlowB={2}, aveFlowA={3}, pulseFreq={4}, aveFreqB={5}, aveFreqA={6}\r\n" ,
time - startTime ,
flowsForDetection [ 0 ] . ToString ( "F2" ) ,
aveFlowBefore . ToString ( "F2" ) ,
aveFlowAfter . ToString ( "F2" ) ,
pulseFreqsForDetection [ 0 ] . ToString ( "F2" ) ,
aveFreqBefore . ToString ( "F2" ) ,
aveFreqAfter . ToString ( "F2" ) ) ) ;
//detectedFlow = (aveFlowBefore + aveFlowAfter) / 2.0f;
detectedFlow = aveFlowBefore ;
if ( rvPulse > 0 )
{
detected = ( aveFreqAfter < aveFreqBefore * ( 1.0f - testParams . DetectionThreshold ) ) ;
targetReached = ( ( aveFlowAfter + aveFlowBefore ) / 2.0f ) > testParams . TargetQ ;
}
else
{
detected = ( aveFreqAfter > aveFreqBefore * ( 1.0f + testParams . DetectionThreshold ) ) ;
targetReached = ( ( aveFlowAfter + aveFlowBefore ) / 2.0f ) < testParams . TargetQ ;
}
}
}
2014-07-28 07:54:35 +00:00
}
while ( ! detected & & ! targetReached ) ;
if ( rvPulse > 0 )
{
Qrise = detectedFlow ;
}
else
{
Qfall = detectedFlow ;
}
UiBridge . Bridge . OnLog ( this , string . Format ( "detected flow={0}\r\n" , detectedFlow . ToString ( "F2" ) ) ) ;
2016-10-07 14:22:36 +00:00
float qfrom_detected = ( float ) ( detectedFlow + testParams . RelativeQfrom ) ;
float qto_detected = ( float ) ( detectedFlow + testParams . RelativeQto ) ;
2014-07-28 07:54:35 +00:00
/// Update test results with the test flow determined from the detected switching flow
2016-01-03 01:05:35 +00:00
float Qave_lps = ( qfrom_detected + qto_detected ) / 7.2f ;
float testTimeFromDetectedFlow = test . Volume / Qave_lps ; /// Test volume wont be changed
2014-07-28 07:54:35 +00:00
2014-08-01 06:36:17 +00:00
float relativeQave = ( testParams . RelativeQfrom + testParams . RelativeQto ) / 2.0f ;
bool goBackToInitFlow = ( ( rvPulse > 0 ) & & ( relativeQave < 0 ) ) | |
( ( rvPulse < 0 ) & & ( relativeQave > 0 ) ) ;
2014-07-28 07:54:35 +00:00
2016-02-10 18:24:10 +00:00
Bridge . OnProcessData ( this , new ProcessDataEventArgs ( test , repetitionNr , Config . Entities . Progress . FlowSetting ) ) ;
2016-01-08 18:18:45 +00:00
Bridge . OnTestProgress ( this , new TestProgressEventArgs ( test , repetitionNr , Config . Entities . Progress . FlowSetting ) ) ;
2016-01-03 01:05:35 +00:00
int flowSetTime0 = StateMachine . Time ;
if ( goBackToInitFlow )
2014-08-01 06:36:17 +00:00
{
//--------------------------------
State . Create ( "CombinedWithDetection : Switching flow detected, going back" )
. AddOperation ( checkUiOp )
. AddOperations ( measureOperations )
2015-12-20 19:48:50 +00:00
. AddOperation ( outPath . RegulValve . SetFlowOp ( outPath . FlowMeter , test . Qfrom , test . Qto , outPath . PidCoef , RefFlow , 600 ) ) /// timeout = 10 min.
2014-08-01 06:36:17 +00:00
. EnterState ( ) ;
do
{
e = StateMachine . WaitRunDevsRunOps ( ) ;
2016-02-10 18:24:10 +00:00
Bridge . OnProcessData ( this , new ProcessDataEventArgs ( test , repetitionNr , Config . Entities . Progress . FlowSetting ) ) ;
2016-01-08 18:18:45 +00:00
Bridge . OnTestProgress ( this , new TestProgressEventArgs ( test , repetitionNr , Config . Entities . Progress . FlowSetting ) ) ;
2014-08-01 06:36:17 +00:00
2016-04-14 07:16:20 +00:00
if ( TestAndLogUiCmdStop ( test , e ) ) goto stopTest ;
2015-01-12 04:56:19 +00:00
if ( e . Contains ( Event . RegulValveTimeOut ) )
{
2018-06-05 09:16:13 +00:00
Bridge . OnError ( this , Strings . Flow_adjustment_failed ) ;
2015-01-12 04:56:19 +00:00
goto error ;
}
}
2014-08-01 06:36:17 +00:00
while ( ! e . Contains ( Event . FlowReached ) ) ;
}
2014-07-28 07:54:35 +00:00
//--------------------------------
State . Create ( "CombinedWithDetection : Going to the test flow" )
//State.Create("set_RV_position",
. AddOperation ( checkUiOp )
. AddOperations ( measureOperations )
2016-01-03 01:05:35 +00:00
. AddOperation ( outPath . RegulValve . SetFlowOp ( outPath . FlowMeter , qfrom_detected , qto_detected , outPath . PidCoef , RefFlow , 600 ) ) /// timeout = 10 sec.
2014-07-28 07:54:35 +00:00
//.AddOp(pOut.RegulValve.SetPositionOp(35.0f, 38.0f, uint.MaxValue))
. EnterState ( ) ;
do
{
e = StateMachine . WaitRunDevsRunOps ( ) ;
2016-02-10 18:24:10 +00:00
Bridge . OnProcessData ( this , new ProcessDataEventArgs ( test , repetitionNr , Config . Entities . Progress . FlowSetting ) ) ;
2016-01-08 18:18:45 +00:00
Bridge . OnTestProgress ( this , new TestProgressEventArgs ( test , repetitionNr , Config . Entities . Progress . FlowSetting ) ) ;
2014-08-01 06:36:17 +00:00
2016-04-14 07:16:20 +00:00
if ( TestAndLogUiCmdStop ( test , e ) ) goto stopTest ;
2014-07-28 07:54:35 +00:00
//if (e.Contains(Event.FlowTimeOut)) goto do_detection;
}
while ( ! e . Contains ( Event . FlowReached ) ) ;
2016-01-08 18:18:45 +00:00
int flowSetTime = StateMachine . Time - flowDetectTime0 ;
2014-07-28 07:54:35 +00:00
2014-12-31 12:44:47 +00:00
//start_measurement:
2014-07-28 07:54:35 +00:00
//------------------------------------------------
Bridge . OnActivity ( this , Strings . Measuring_the_weight ) ;
//------------------------------------------------
State . Create ( Strings . Measure_the_mass )
. AddOperation ( checkUiOp )
. AddOperations ( measureOperations )
2017-03-28 21:47:32 +00:00
. AddOperation ( outPath . Scale . ReadStableMassOp ( ref StartMass , test . MassRepeats , test . MassSpread , test . MassMethod ) )
2014-07-28 07:54:35 +00:00
. EnterState ( ) ;
do
{
e = StateMachine . WaitRunDevsRunOps ( ) ;
if ( e . Contains ( Event . Error ) ) goto error ;
2016-04-14 07:16:20 +00:00
if ( TestAndLogUiCmdStop ( test , e ) ) goto stopTest ;
2014-07-28 07:54:35 +00:00
}
while ( ! e . Contains ( Event . BalanceDone ) ) ;
2016-02-10 18:24:10 +00:00
Mass . Val = StartMass . Val ;
2014-07-28 07:54:35 +00:00
//------------------------------------------------
Bridge . OnActivity ( this , Strings . Test_in_progress ) ;
//------------------------------------------------
State . Create ( Strings . Start_the_test )
. AddOperation ( checkUiOp )
. AddOperations ( measureOperations )
2015-09-22 14:59:17 +00:00
. AddOperation ( cBrd . StartMeasurementOp ( outPath , Elde . TestMethods . Diverter | Elde . TestMethods . Synchro ,
2016-01-03 01:05:35 +00:00
qfrom_detected , qto_detected , totalPulses , ( float ) test . TolerRed ) )
2014-07-28 07:54:35 +00:00
. EnterState ( ) ;
do
{
e = StateMachine . WaitRunDevsRunOps ( ) ;
if ( e . Contains ( Event . Error ) ) goto error ;
2016-04-14 07:16:20 +00:00
if ( TestAndLogUiCmdStop ( test , e ) ) goto stopTest ;
2014-07-28 07:54:35 +00:00
}
while ( ! e . Contains ( Event . MeasurementStarted ) ) ;
///
/// Measurement loop - preparation
///
queryEnd1 = cBrd . QueryMeasurementEndOp ( ) ;
queryEnd2 = cBrd . QueryMeasurementEndOp ( ) ;
2018-02-11 15:31:25 +00:00
StartNewStatistics ( StateMachine . Time , BatchRslts . Batch . BatchNr , test . Name , repetitionNr ) ;
2016-01-03 01:05:35 +00:00
int estimtdEndTime = StateMachine . Time + ( int ) test . TstTime ;
2014-07-28 07:54:35 +00:00
2017-09-21 12:04:31 +00:00
/// Read the diverter switch time
2017-10-16 13:48:34 +00:00
switchTimeStart = 0.001f * ( float ) cBrd . DivTime ( 0 ) ;
log . WarnFormat ( "Diverter switch time on test start = {0} ms" , cBrd . DivTime ( 0 ) ) ;
2017-09-21 12:04:31 +00:00
2014-07-28 07:54:35 +00:00
/// Measurement loop - begin
while ( true )
{
//--------------------------------
switch ( ReadRegistersTempPressAmbient ( measureOperations , true ) )
{
2016-06-15 15:04:25 +00:00
case Event . Error : goto error ;
case Event . UiCmdStop : goto stopTest ;
case Event . MeasurementCompleted : goto measurement_completed ;
2014-07-28 07:54:35 +00:00
}
2015-02-20 12:38:07 +00:00
int remainingTime = Math . Max ( estimtdEndTime - StateMachine . Time , 0 ) ;
2015-09-22 09:29:20 +00:00
if ( remainingTime > 60 )
{
2015-10-14 13:45:51 +00:00
Bridge . OnActivity ( this , string . Format ( "{0} ... {1} {2} {3} {4}" , Strings . Test_in_progress , remainingTime / 60 , "min" , remainingTime % 60 , Strings . sec ) ) ;
2015-09-22 09:29:20 +00:00
}
else
{
Bridge . OnActivity ( this , string . Format ( "{0} ... {1} s" , Strings . Test_in_progress , remainingTime ) ) ;
}
2015-02-20 12:38:07 +00:00
2017-05-18 11:22:11 +00:00
UpdateAllStatistics ( StateMachine . Time ) ;
2014-07-28 07:54:35 +00:00
2016-01-03 01:05:35 +00:00
/// TODO: Reimplement
//for (int i = 0; i < Config.Data.CompoundWMsCount; i++)
//{
// data.TestResult.CombinedMeters[i].VolumeMeter = data.TestResult.Meters[2 * i].VolumeMeter
// + data.TestResult.Meters[2 * i + 1].VolumeMeter;
// if (data.Volume.Valid)
// {
// data.TestResult.CombinedMeters[i].VolumeErrorPct =
// Formulas.ErrorFromVolumes(data.TestResult.CombinedMeters[i].VolumeMeter, data.Volume.Val);
// }
//}
2016-02-10 18:24:10 +00:00
Bridge . OnProcessData ( this , new ProcessDataEventArgs ( test , repetitionNr , Config . Entities . Progress . Test ) ) ;
2016-01-08 18:18:45 +00:00
Bridge . OnTestProgress ( this , new TestProgressEventArgs ( test , repetitionNr , Config . Entities . Progress . Test ) ) ;
2014-07-28 07:54:35 +00:00
}
/// Measurement loop - end
measurement_completed :
2016-01-08 18:18:45 +00:00
//------------------------------------------------
2014-07-28 07:54:35 +00:00
Bridge . OnActivity ( this , Strings . Measuring_the_weight ) ;
//------------------------------------------------
State . Create ( Strings . Measure_the_mass )
. AddOperation ( checkUiOp )
2017-03-28 21:47:32 +00:00
. AddOperation ( outPath . Scale . ReadStableMassOp ( ref EndMass , test . MassRepeats , test . MassSpread , test . MassMethod ) )
2014-07-28 07:54:35 +00:00
. EnterState ( ) ;
do
{
e = StateMachine . WaitRunDevsRunOps ( ) ;
if ( e . Contains ( Event . Error ) ) goto error ;
2016-04-14 07:16:20 +00:00
if ( TestAndLogUiCmdStop ( test , e ) ) goto stopTest ;
2014-07-28 07:54:35 +00:00
}
while ( ! e . Contains ( Event . BalanceDone ) ) ;
///
2016-01-03 01:05:35 +00:00
TestEndTime = DateTime . Now ;
2014-07-28 07:54:35 +00:00
2017-09-21 12:04:31 +00:00
/// Read the diverter switch time
2017-10-16 13:48:34 +00:00
switchTimeEnd = 0.001f * ( float ) cBrd . DivTime ( 0 ) ;
log . WarnFormat ( "Diverter switch time on test end = {0} ms" , cBrd . DivTime ( 0 ) ) ;
2017-09-21 12:04:31 +00:00
2014-07-28 07:54:35 +00:00
//------------------------------------------------
Bridge . OnActivity ( this , Strings . Test_completed ) ;
//------------------------------------------------
State . Create ( Strings . Stop_the_pump )
. AddOperation ( checkUiOp )
2014-09-08 11:16:31 +00:00
. AddOperation ( ( inPath ! = null & & inPath . Pump is GenericDevices . IPumpFM ) ? ( inPath . Pump as GenericDevices . IPumpFM ) . TurnOffOp ( ) : null )
2014-07-28 07:54:35 +00:00
. AddOperation ( cBrd . SetValvesOp ( null , inPath . Pump ) )
. AddOperation ( cBrd . UpdateTankWeightOp ( ) )
. EnterState ( ) ;
do
{
e = StateMachine . WaitRunDevsRunOps ( ) ;
2016-04-14 07:16:20 +00:00
if ( TestAndLogUiCmdStop ( test , e ) ) goto stopTest ;
2014-07-28 07:54:35 +00:00
}
while ( ! e . Contains ( Event . ValvesSet ) ) ;
//--------------------------------
State . Create ( "stop_diverter_gate_etc" )
. AddOperation ( checkUiOp )
. AddOperation ( cBrd . StopPreviousOp ( ) )
. EnterState ( ) ;
do
{
e = StateMachine . WaitRunDevsRunOps ( ) ;
2016-04-14 07:16:20 +00:00
if ( TestAndLogUiCmdStop ( test , e ) ) goto stopTest ;
2014-07-28 07:54:35 +00:00
}
while ( ! e . Contains ( Event . PreviousStopped ) ) ;
2016-01-03 01:05:35 +00:00
/// Make sure the CycleBeginForm is closed so that water meter data (s/n) can be copied into results
2015-06-25 02:45:04 +00:00
if ( UIFlowControl . Stop = = WaitBeginFormClosed ( ) ) goto stopTest ;
2015-01-15 05:34:36 +00:00
2014-07-28 07:54:35 +00:00
///
2015-01-15 05:34:36 +00:00
/// Populate TestResult data entity with data
2014-07-28 07:54:35 +00:00
///
2016-01-03 01:05:35 +00:00
Results . Entities . TestRslt tstRslt = BatchRslts . GetTestRslt ( testName , test . Part ) ;
2015-02-02 17:09:05 +00:00
2016-01-03 01:05:35 +00:00
if ( tstRslt ! = null )
2014-07-28 07:54:35 +00:00
{
2017-05-10 08:43:33 +00:00
UpdateTempPressDensAmb ( tstRslt ) ;
2016-01-03 01:05:35 +00:00
/// Main results
2018-02-26 11:18:04 +00:00
tstRslt . MethodClass = TbfComponents . FindComponent ( test . Method ) . ClassName ;
tstRslt . StartTime = TestStartTime ;
2016-01-03 01:05:35 +00:00
tstRslt . EndTime = TestEndTime ;
tstRslt . FlowSetTime = flowSetTime ;
tstRslt . TestTime = cBrd . TTime ; /// [s] measurement time
2016-12-16 12:07:54 +00:00
tstRslt . PulsesMaster = Convert . ToDouble ( cBrd . EtPulses ( 0 ) ) ; /// Pulses of the master flow meter (test total)
tstRslt . MassStartRaw = StartMass . Val ;
2018-04-10 14:10:44 +00:00
tstRslt . MassStart = Config . Formulas . CorrectedValue ( tstRslt . MassStartRaw , outPath . Scale . Corrections ) ;
2016-02-10 18:24:10 +00:00
tstRslt . MassEndRaw = EndMass . Val ;
2018-04-10 14:10:44 +00:00
tstRslt . MassEnd = Config . Formulas . CorrectedValue ( tstRslt . MassEndRaw , outPath . Scale . Corrections ) ;
2017-10-19 16:52:58 +00:00
tstRslt . FlowMass = 3600.0 * ( tstRslt . MassEnd - tstRslt . MassStart ) / tstRslt . TestTime ; /// [kg/h]
tstRslt . FlowVolume = 3.6 * LtrPerRefPulse * cBrd . EtPulses ( 0 ) / tstRslt . TestTime ; /// [m3/h]
2018-04-10 14:10:44 +00:00
tstRslt . Buoyancy = Config . Formulas . Buoyancy ( ) ;
double density = Config . Formulas . WaterDensityFromTemp ( ( tstRslt . TempUpMean + tstRslt . TempDownMean ) / 2.0 , Program . LocalSettings . RealDensity , Program . LocalSettings . AtTemperature ) ;
2017-10-19 16:52:58 +00:00
tstRslt . VolumeCTV = 1000.0 * tstRslt . Buoyancy * ( tstRslt . MassEnd - tstRslt . MassStart ) / density ; /// [l] 1000.0f is because density is in [kg/m3]
tstRslt . VolumeMaster = LtrPerRefPulse * tstRslt . PulsesMaster ; /// [l] volume from the master flow meter
2018-04-27 09:00:05 +00:00
tstRslt . ConstMasterRaw = outPath . FlowMeter . LtrPerPulse ; /// Uncorrected master flowmeter coefficient
tstRslt . ConstMaster = LtrPerRefPulse * tstRslt . VolumeCTV / tstRslt . VolumeMaster ; /// Corrected master pulses per liter
2018-04-10 14:10:44 +00:00
tstRslt . ErrorMaster = Config . Formulas . ErrorFromVolumes ( tstRslt . VolumeMaster , tstRslt . VolumeCTV ) ;
2016-01-03 01:05:35 +00:00
2017-05-18 11:22:11 +00:00
tstRslt . FlowMean = ( float ) RefFlowStat . Average ;
2017-09-13 13:48:31 +00:00
tstRslt . FlowStart = ( float ) RefFlowStat . First ;
tstRslt . FlowEnd = ( float ) RefFlowStat . Last ;
tstRslt . FlowMin = ( float ) RefFlowStat . Min ;
2017-05-25 12:06:05 +00:00
tstRslt . FlowMax = ( float ) RefFlowStat . Max ;
2016-08-02 12:48:18 +00:00
2017-09-27 21:04:30 +00:00
tstRslt . DiverterStart = switchTimeStart ;
tstRslt . DiverterEnd = switchTimeEnd ;
tstRslt . ErrorFlagsMd = ( ErrorFlagsComp ! = null ) ? ( sbyte ) ErrorFlagsComp . Mode : ( sbyte ) 0 ;
2017-09-21 12:04:31 +00:00
tstRslt . ErrorFlags = ( ErrorFlagsComp ! = null ) ? ErrorFlagsComp . GetErrorFlags ( tstRslt , true , false , switchTimeStart , switchTimeEnd ) : 0 ;
2017-08-19 10:07:57 +00:00
2016-06-30 12:02:25 +00:00
for ( int i = 0 ; i < BatchRslts . WMPositionsCount ; i + + )
{
if ( test . Part ! = 0 & & test . Part ! = Utils . PartNr ( i + 1 , BatchRslts . Batch . Compound ) ) continue ;
Results . Entities . MeterTestRslt mainMeterRslt = BatchRslts . GetMeterTestRslt ( testName , i , Config . Entities . CompoundMeterId . CompoundMain ) ;
2016-01-03 01:05:35 +00:00
Results . Entities . MeterTestRslt auxMeterRslt = BatchRslts . GetMeterTestRslt ( testName , i , Config . Entities . CompoundMeterId . CompoundAux ) ;
for ( int isAux = 0 ; isAux < = 1 ; isAux + + ) /// 0=main, 1=aux
2014-07-28 07:54:35 +00:00
{
2016-01-03 01:05:35 +00:00
GenericDevices . IRegisterReader regReader = sensPath . RegisterReaders [ 2 * i + isAux ] ;
Results . Entities . MeterTestRslt meterRslt = ( isAux = = 0 ) ? mainMeterRslt : auxMeterRslt ;
if ( meterRslt ! = null & & regReader ! = null )
{
2018-04-10 14:10:44 +00:00
meterRslt . RegReaderType = ( int ) regReader . RegisterReaderType ;
2018-02-26 11:18:04 +00:00
meterRslt . PulsesPerLiter = regReader . PulsesPerLtr ;
2014-07-28 07:54:35 +00:00
2016-01-03 01:05:35 +00:00
/// Optionally supress pulses from the large water meter
2016-02-13 15:47:15 +00:00
meterRslt . PulsesMeter = ( isAux = = 0 & & testParams . SupressTrills ) ? 0 : Convert . ToDouble ( regReader . WMPulses ) ;
meterRslt . PulsesMaster = Convert . ToDouble ( regReader . WMRefPulses ) ;
2016-02-13 07:18:49 +00:00
meterRslt . TestTime = cBrd . TTime ;
meterRslt . VolumeStart = 0 ;
meterRslt . VolumeEnd = 0 ;
meterRslt . VolumeRef = tstRslt . VolumeCTV ;
meterRslt . VolumeMeter = meterRslt . PulsesMeter * regReader . LtrsPerPulse ; /// liter
///
2016-01-03 01:05:35 +00:00
if ( meterRslt . PulsesMaster ! = 0 )
{
meterRslt . VolumeMeter * = ( tstRslt . PulsesMaster / meterRslt . PulsesMaster ) ;
}
2018-04-10 14:10:44 +00:00
meterRslt . Error = Config . Formulas . ErrorFromVolumes ( meterRslt . VolumeMeter , tstRslt . VolumeCTV ) ; /// Main/Aux meter error is not usedfor evaluation
2016-01-03 01:05:35 +00:00
}
}
Results . Entities . MeterTestRslt compoundMeterRslt = BatchRslts . GetMeterTestRslt ( testName , i , Config . Entities . CompoundMeterId . Compound ) ;
if ( compoundMeterRslt ! = null & & mainMeterRslt ! = null & & auxMeterRslt ! = null )
{
compoundMeterRslt . VolumeRef = tstRslt . VolumeCTV ;
compoundMeterRslt . VolumeMeter = mainMeterRslt . VolumeMeter + auxMeterRslt . VolumeMeter ;
compoundMeterRslt . PulsesMaster = tstRslt . PulsesMaster ;
compoundMeterRslt . TestTime = tstRslt . TestTime ;
2018-04-10 14:10:44 +00:00
compoundMeterRslt . Error = Config . Formulas . ErrorFromVolumes ( compoundMeterRslt . VolumeMeter , compoundMeterRslt . VolumeRef ) ;
2017-10-17 22:30:26 +00:00
compoundMeterRslt . Passed = ( compoundMeterRslt . Error > = test . GetErrLimLo ( tstRslt . FlowMean ) + test . Uncertainty )
& & ( compoundMeterRslt . Error < = test . GetErrLimHi ( tstRslt . FlowMean ) - test . Uncertainty )
2017-08-19 10:07:57 +00:00
& & ( tstRslt . ErrorFlags = = 0 | | tstRslt . ErrorFlagsMode ( ) ! = Config . Entities . ErrorFlagsMode . On ) ;
2016-01-03 01:05:35 +00:00
mainMeterRslt . Passed = auxMeterRslt . Passed = compoundMeterRslt . Passed ;
mainMeterRslt . TestDone = auxMeterRslt . TestDone = compoundMeterRslt . TestDone = true ;
2017-07-04 09:19:05 +00:00
tstRslt . TestDone = true ;
2016-01-03 01:05:35 +00:00
if ( Qrise ! = 0 ) BatchRslts . WaterMeters [ i ] . QRise = Qrise ;
if ( Qfall ! = 0 ) BatchRslts . WaterMeters [ i ] . QFall = Qfall ;
}
}
2016-01-08 18:18:45 +00:00
tstRslt . Components = Results . Entities . Components
. UpdateList ( BatchRslts . ComponentsList ,
2016-02-15 21:48:44 +00:00
new Results . Entities . Components ( ( BenchInfo ! = null ) ? BenchInfo . TestBenchId : 1 ,
( BenchInfo ! = null ) ? BenchInfo . TestBenchName : "testbench" ,
2016-01-08 18:18:45 +00:00
inPath . Pump ! = null ? inPath . Pump . Name : string . Empty ,
outPath . FlowMeter ! = null ? outPath . FlowMeter . Name : string . Empty ,
2017-03-28 21:47:32 +00:00
outPath . Scale ! = null ? outPath . Scale . Name : string . Empty ,
2016-01-08 18:18:45 +00:00
outPath . RegulValve ! = null ? outPath . RegulValve . Name : string . Empty ,
outPath . Diverter ! = null ? outPath . Diverter . Name : string . Empty ) ) ;
2014-07-28 07:54:35 +00:00
2017-09-27 21:04:30 +00:00
/// Update water meter error flags
2017-10-04 11:07:56 +00:00
if ( ErrorFlagsComp ! = null )
2017-09-27 21:04:30 +00:00
{
2017-10-04 11:07:56 +00:00
for ( int i = 0 ; i < BatchRslts . WMPositionsCount ; i + + )
2017-09-27 21:04:30 +00:00
{
2017-10-04 11:07:56 +00:00
if ( BatchRslts . WaterMeters [ i ] ! = null )
{
BatchRslts . WaterMeters [ i ] . ErrorFlags = ErrorFlagsComp . GetWMtrErrorFlags ( BatchRslts . WaterMeters [ i ] . MeterTestRslts ) ;
}
2017-09-27 21:04:30 +00:00
}
}
/// Update results
2016-02-13 18:25:43 +00:00
Bridge . OnTestCompleted ( this , new TestCompletedEventArgs ( testName , tstRslt ) ) ;
}
2016-01-08 18:18:45 +00:00
Bridge . OnTestProgress ( this , new TestProgressEventArgs ( test , repetitionNr , Config . Entities . Progress . TransitionAfter ) ) ;
2014-07-28 07:54:35 +00:00
/// Append the results to the CSV-file
2016-01-03 01:05:35 +00:00
allResults . Info ( TestResult2CsvLine ( testName , test . Part ) ) ;
2014-07-28 07:54:35 +00:00
///----------------------///
/// Quit this sequence ///
///----------------------///
2017-12-02 16:54:38 +00:00
if ( isLastRepetition )
2014-07-28 07:54:35 +00:00
{
2017-12-02 16:54:38 +00:00
/// Stop the pump
State . Create ( "CombinedWithDetection : Test(s) completed -> Stopping the pump" )
. AddOperation ( checkUiOp )
. AddOperation ( cBrd . SetValvesOp ( null , inPath . Pump ) )
. AddOperation ( ( inPath ! = null & & inPath . Pump is GenericDevices . IPumpFM ) ? ( inPath . Pump as GenericDevices . IPumpFM ) . TurnOffOp ( ) : null )
. EnterState ( ) ;
do
{
e = StateMachine . WaitRunDevsRunOps ( ) ;
if ( e . Contains ( Event . Error ) ) goto error ;
}
while ( ! e . Contains ( Event . ValvesSet ) | | ( ( inPath . Pump is GenericDevices . IPumpFM ) & & ! e . Contains ( Event . TurnPumpOnOffDone ) ) ) ;
2014-07-28 07:54:35 +00:00
}
/// Create the return value - a list with one event Event.Done - and return
2015-02-02 22:18:28 +00:00
IList < Event > retval1 = new List < Event > ( 1 ) ;
retval1 . Add ( Event . Done ) ;
return retval1 ;
2014-07-28 07:54:35 +00:00
//====================================
2015-04-28 13:27:47 +00:00
stopTest :
2014-07-28 07:54:35 +00:00
State . Create ( "CombinedWithDetection : User selected STOP -> Closing the valves" )
. AddOperation ( checkUiOp )
2014-09-08 11:16:31 +00:00
. AddOperation ( ( inPath ! = null & & inPath . Pump is GenericDevices . IPumpFM ) ? ( inPath . Pump as GenericDevices . IPumpFM ) . TurnOffOp ( ) : null )
2014-07-28 07:54:35 +00:00
. AddOperation ( cBrd . SetValvesOp ( StateMachine . DefaultValvesOpen , StateMachine . DefaultValvesClose ) )
. EnterState ( ) ;
do
{
e = StateMachine . WaitRunDevsRunOps ( ) ;
if ( e . Contains ( Event . Error ) ) goto error ;
}
while ( ! e . Contains ( Event . ValvesSet ) ) ;
2015-02-02 22:18:28 +00:00
IList < Event > retval2 = new List < Event > ( 1 ) ;
2014-07-28 07:54:35 +00:00
retval2 . Add ( Event . UiCmdStop ) ;
return retval2 ;
//====================================
error :
State . Create ( "close_before_error" )
. AddOperation ( checkUiOp )
2014-09-08 11:16:31 +00:00
. AddOperation ( ( inPath ! = null & & inPath . Pump is GenericDevices . IPumpFM ) ? ( inPath . Pump as GenericDevices . IPumpFM ) . TurnOffOp ( ) : null )
2014-07-28 07:54:35 +00:00
. AddOperation ( cBrd . SetValvesOp ( StateMachine . DefaultValvesOpen , StateMachine . DefaultValvesClose ) )
. EnterState ( ) ;
do
{
e = StateMachine . WaitRunDevsRunOps ( ) ;
2017-12-02 16:54:38 +00:00
if ( e . Contains ( Event . Error ) ) break ;
2014-07-28 07:54:35 +00:00
}
while ( ! e . Contains ( Event . ValvesSet ) ) ;
2015-02-02 22:18:28 +00:00
IList < Event > retval3 = new List < Event > ( 1 ) ;
2014-07-28 07:54:35 +00:00
retval3 . Add ( Event . Error ) ;
return retval3 ;
}
}
}