lp_entry.mq5

#property indicator_chart_window
#property strict
#property indicator_buffers 3
#property indicator_color1 Yellow
#property indicator_color2 Aqua
#property  indicator_width1  0 
#property  indicator_width2  0

#define VERSION "1.0"

#define RANGE_FACTOR 4.6
#define ALT_PERIOD 4
#define HIGH_LEVEL 67
#define LOW_LEVEL 33

int Risk, BarCount;

double dn_sig[];
double up_sig[];
double signal[];

int init() {
      // код доступен только после оплаты
   }

int start() {
      // код доступен только после оплаты
   }
  int i,shift,counted_bars, min_bars, wpr_period;
  double wpr_value, avg_range, high_level,low_level,filter;

  high_level=HIGH_LEVEL+Risk;
  low_level=LOW_LEVEL-Risk;

  min_bars=3+Risk*2+1;
  if(Bars<=min_bars) 
    return(0);

  counted_bars=IndicatorCounted();
  if(counted_bars<0) 
    return (-1); 
  if(counted_bars>0) 
    counted_bars--;
  shift=Bars-counted_bars;
  if (BarCount>0 && shift>BarCount)
    shift=BarCount;
  if (shift>Bars-min_bars)
    shift=Bars-min_bars;  

  while(shift>=0) { 

    i=shift;
    avg_range=0.0;
    for (i=shift; i<shift+10; i++) {
      if (i>=Bars) break;
      avg_range=avg_range+MathAbs(High[i]-Low[i]);
    }
    avg_range=avg_range/10.0;

    wpr_period=3+Risk*2;

    i=shift;
    while (i<shift+6) {
      if (i>=Bars-3) break;
      if (MathAbs(Close[i+3]-Close[i])>=avg_range*RANGE_FACTOR) {
        wpr_period=ALT_PERIOD;
        break;
      }
      i++;
    }      

    wpr_value=100-MathAbs(iWPR(NULL,0,wpr_period,shift)); 
    filter = (iWPR(NULL,0,4,shift)+100 + iRSI(Symbol(),0,2,0,shift))/2;

    if (wpr_value>=high_level) 
      signal[shift] = 1;
    else if (wpr_value<=low_level) 
      signal[shift] = -1; 

Показано первые 50% кода (символов: 3472)