Список проголосовавших за комментарий " это же просто:<br/> <br/> //---- input parameters<br/> extern int BarLenght=40;<br/> extern int MinBarBodyRatio=10;<br/> extern int MaxBarBodyRatio=35;<br/> extern int MinBarTailRatio=40;<br/> extern int MaxBarTailRatio=80;<br/> extern int MinBarShootRatio=0;<br/> extern int MaxBarShootRatio=15;<br/> extern double LotSize=0.1;<br/> extern int TP_Pips=20;<br/> extern int SL_Pips=500;<br/> extern int OpenDeviation_Pips=3;<br/> double Lenght;<br/> double Body;<br/> double UpTail;<br/> double DownTail;<br/> string Direction;<br/> extern double MinQualityPoint=3.5;<br/> double QualityPoint;<br/> extern double LenghtQualityPoint=1.5;<br/> extern double BodyQualityPoint=1.0;<br/> extern double TailQualityPoint=1.0;<br/> extern double ShootQualityPoint=0.5;<br/> extern double DirectionQualityPoint=0.5;<br/> <br/> double LenghtPoint=0.0;<br/> double BodyPoint=0.0;<br/> double TailPoint=0.0;<br/> double ShootPoint=0.0;<br/> double DirectionPoint=0.0;<br/> <br/> <br/> datetime OldBarTime;<br/> datetime NewBarTime;<br/> //+------------------------------------------------------------------+<br/> //| expert initialization function |<br/> //+------------------------------------------------------------------+<br/> int init()<br/> {<br/> //---<br/> <br/> OldBarTime=iTime(NULL,0,0); //при перезапуске отсекаем формирующуюся свечу<br/> <br/> LenghtPoint=0.0;<br/> BodyPoint=0.0;<br/> TailPoint=0.0;<br/> ShootPoint=0.0;<br/> DirectionPoint=0.0;<br/> <br/> <br/> <br/> <br/> //----<br/> return(0);<br/> }<br/> //+------------------------------------------------------------------+<br/> //| expert deinitialization function |<br/> //+------------------------------------------------------------------+<br/> int deinit()<br/> {<br/> //----<br/> <br/> <br/> <br/> <br/> <br/> <br/> //----<br/> return(0);<br/> }<br/> //+------------------------------------------------------------------+<br/> //| expert start function |<br/> //+------------------------------------------------------------------+<br/> int start()<br/> {<br/> //----<br/> RefreshRates();<br/> NewBarTime=iTime(NULL, 0, 0); //задаем время новой свечи<br/> <br/> if (OldBarTime!=NewBarTime) //если сменился бар<br/> {<br/> Lenght=MathAbs((iHigh(NULL,0,1)-iLow(NULL, 0, 1))/Point); //длина <br/> Body=MathAbs((iOpen(NULL, 0,1)-iClose(NULL, 0,1))/Point); //тело<br/> UpTail=MathAbs(iHigh(NULL, 0, 1)-MathMax(iClose(NULL, 0, 1), iOpen(NULL, 0, 1)))/Point; //верхний хвост<br/> DownTail=MathAbs(iLow(NULL, 0, 1)-MathMin(iClose(NULL, 0, 1), iOpen(NULL, 0, 1)))/Point; //нижний хвост<br/> if (iOpen(NULL, 0,1)<iClose(NULL, 0,1)) //определяем тип свечи<br/> { Direction=«up»;<br/> }else Direction=«down»;<br/> //Alert («Длина », Lenght);<br/> //Alert («Тело », Body);<br/> //Alert («Хвост верх », UpTail);<br/> //Alert («Хвост низ », DownTail);<br/> //Alert («Тип », Direction);<br/> <br/> if (UpTail>DownTail) //если хвост сверху<br/> {<br/> if (Lenght>=BarLenght) LenghtPoint=LenghtQualityPoint;<br/> if (((Body/Lenght*100)>=MinBarBodyRatio)&&((Body/Lenght*100)<=MaxBarBodyRatio)) BodyPoint=BodyQualityPoint;<br/> if (((UpTail/Lenght*100)>=MinBarTailRatio)&&((UpTail/Lenght*100)<=MaxBarTailRatio)) TailPoint=TailQualityPoint;<br/> if (((DownTail/Lenght*100)>=MinBarShootRatio)&&((DownTail/Lenght*100)<=MaxBarShootRatio)) ShootPoint=ShootQualityPoint;<br/> if (Direction==«up») DirectionPoint=DirectionQualityPoint;<br/> QualityPoint=LenghtPoint+BodyPoint+TailPoint+ShootPoint+DirectionPoint;<br/> <br/> Print (Symbol(), ": ",Hour(), ":", Minute(), ": Длина-",Lenght ,"(", LenghtPoint,"), Тело-", Body,"(",BodyPoint ,"), Верх-", UpTail,"(",TailPoint ,"), Низ-", DownTail,"(",ShootPoint ,"), Направление-",Direction ,"(",DirectionPoint ,"), Всего=",QualityPoint); <br/> if (QualityPoint>=MinQualityPoint)<br/> OrderSend(Symbol(),OP_SELL, LotSize, Bid, OpenDeviation_Pips, (Bid+SL_Pips*Point), (Bid-TP_Pips*Point));<br/> <br/> LenghtPoint=0.0;<br/> BodyPoint=0.0;<br/> TailPoint=0.0;<br/> ShootPoint=0.0;<br/> DirectionPoint=0.0;<br/> OldBarTime=iTime(NULL, 0, 0);<br/> }else<br/> {<br/> if (Lenght>=BarLenght) LenghtPoint=LenghtQualityPoint;<br/> if (((Body/Lenght*100)>=MinBarBodyRatio)&&((Body/Lenght*100)<=MaxBarBodyRatio)) BodyPoint=BodyQualityPoint;<br/> if (((UpTail/Lenght*100)>=MinBarShootRatio)&&((UpTail/Lenght*100)<=MaxBarShootRatio)) ShootPoint=ShootQualityPoint;<br/> if (((DownTail/Lenght*100)>=MinBarTailRatio)&&((DownTail/Lenght*100)<=MaxBarTailRatio)) TailPoint=TailQualityPoint;<br/> if (Direction==«down») DirectionPoint=DirectionQualityPoint;<br/> QualityPoint=LenghtPoint+BodyPoint+TailPoint+ShootPoint+DirectionPoint;<br/> <br/> Print (Symbol(), ": ",Hour(), ":", Minute(), ": Длина-",Lenght ,"(", LenghtPoint,"), Тело-", Body,"(",BodyPoint ,"), Верх-", UpTail,"(",TailPoint ,"), Низ-", DownTail,"(",ShootPoint ,"), Направление-",Direction ,"(",DirectionPoint ,"), Всего=",QualityPoint); <br/> if (QualityPoint>=MinQualityPoint)<br/> OrderSend(Symbol(),OP_BUY, LotSize, Ask, OpenDeviation_Pips, (Ask-SL_Pips*Point), (Ask+TP_Pips*Point));<br/> <br/> LenghtPoint=0.0;<br/> BodyPoint=0.0;<br/> TailPoint=0.0;<br/> ShootPoint=0.0;<br/> DirectionPoint=0.0;<br/> OldBarTime=iTime(NULL, 0, 0);<br/> } <br/> }<br/> //----<br/> return(0);<br/> }<br/> //+--------------------"