Changeset 2

Timestamp:

Apr 29, 2008, 8:37:39 AM (16 years ago)

Author:

george

Message:

Přidáno: Omezení zákmitů transakcí.

File:

• Test.mq4 (modified) (3 diffs)

Test.mq4

@@ -14 +14 @@
 extern double MovingPeriod       = 14;
 extern double MovingShift        = 0;
+extern double MinDerivation      = 0.0002;
 
 int MathSign(double Value)
@@ -29 +30 @@
   static double LastDerivation;
   double Derivation;
+  static bool LastChangeDirection = false;
+  static int SameDirectionCount = 0;
   
   // Go trading only for first tiks of new bar
@@ -36 +39 @@
   MovingAverage = iMA(NULL, 0, MovingPeriod, MovingShift, MODE_SMA, PRICE_CLOSE, 0);
   Derivation = MovingAverage - LastMovingAverage;
-   
+  Print("Derivation: " + Derivation);  
+  Comment("SameDirectionCount: " + SameDirectionCount);  
+  if(MathSign(LastDerivation) == MathSign(Derivation)) SameDirectionCount++;
+  else {
+    LastChangeDirection = true;
+    SameDirectionCount = 0;
+  }
+
   // Sell conditions
-  if(MathSign(LastDerivation) != MathSign(Derivation))  
+  if(LastChangeDirection && (SameDirectionCount > 2))  
   {
-    Print("Derivation: " + Derivation);  
-    Comment("Derivation: " + Derivation);  
     if(MathSign(Derivation) == -1) res = OrderSend(Symbol(), OP_SELL, Lots, Bid, 3, 0, 0, "", MAGICMA, 0, Red);
     if(MathSign(Derivation) == 1) res = OrderSend(Symbol(), OP_BUY, Lots, Ask, 3, 0, 0, "", MAGICMA, 0, Blue);
+    LastChangeDirection = false;
   }
   LastMovingAverage = MovingAverage;