FlipTradeInChannel

//+------------------------------------------------------------------+
//|                                           FlipTradeInChannel.mq4 |
//|                                   Copyright © 2010, Korvin ® Co. |
//|                                         http://alecask.narod.ru/ |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2010, Korvin ® Co."
#property link      "http://alecask.narod.ru/"
//+------------------------------------------------------------------+
//| script program start function                                    |
//+------------------------------------------------------------------+
int start()
  {
// îïðåäåëèì ïåðåìåííûå
bool   trend,potrendu;
double TP,TPbak;
string varName; 
// Ïîëó÷èì óñòàíîâëåííûå ïàðàìåòðû öåíû äëÿ íàðèñîâàííîãî "TradeChannel"
double p1    = ObjectGet("TradeChannel",OBJPROP_PRICE1);
double p2    = ObjectGet("TradeChannel",OBJPROP_PRICE2);
double p3    = ObjectGet("TradeChannel",OBJPROP_PRICE3);
double t1    = ObjectGet("TradeChannel",OBJPROP_TIME1);
double t2    = ObjectGet("TradeChannel",OBJPROP_TIME2);
double t3    = ObjectGet("TradeChannel",OBJPROP_TIME3);
// Ïîëó÷èì çíà÷åíèÿ ñìåùåíèé äëÿ öåí p1, p2 è p3
  bool exact = false;                             // íóæíà îñîáàÿ òî÷íîñòü?
   int s1    = iBarShift( NULL, 0, t1, exact);    // ñìåùåíèå áàðà öåíû p1
   int s2    = iBarShift( NULL, 0, t2, exact);    // ñìåùåíèå áàðà öåíû p2
   int s3    = iBarShift( NULL, 0, t3, exact);    // ñìåùåíèå áàðà öåíû p3
// Âû÷èñëèì øèðèíó òîðãîâîãî êàíàëà d è åãî çíàê
double d     = (p3-p1) - (p2-p1)*(s1-s3)/(s1-s2); // 
   int sign  = MathRound(d/MathAbs(d));           // 
// ðàçáåð¸ìñÿ êàê çàäàíà òîðãîâëÿ
if (p2>=p1)  trend=true;                          // òðåíä âîñõîäÿùèé ...
else trend=false;                                 // èëè íèñõîäÿùèé ?
if ((trend && sign>=0)||
    (!trend && sign<0)) potrendu=true;            // òîðãîâëÿ ïî òðåíäó ...
else  potrendu=false;                             // èëè ïðîòèâ òðåíäà ?
// Ïðèñâîèì íîâûå çíà÷åíèÿ öåí p1, p2 è p3 äëÿ "TradeChannel"
       p1    = p1+d;
       p2    = p2+d;
       p3    = p3-d;
// Ïåðåäàäèì ýòè çíà÷åíèÿ â îáúåêò "TradeChannel"
       while (!exact) exact = ObjectSet("TradeChannel",OBJPROP_PRICE1,p1);
       exact = false;
       while (!exact) exact = ObjectSet("TradeChannel",OBJPROP_PRICE2,p2);
       exact = false;
       while (!exact) exact = ObjectSet("TradeChannel",OBJPROP_PRICE3,p3);
   return(0);
  }
//+------------------------------------------------------------------+