Params

Numeric  n1(10);

Numeric  n2(25);

Numeric  n3(115);                  

Vars  

Numeric aizq;

   Numeric hi;

Numeric li;

Numeric n3n;

Numeric n2n;

Numeric n2o;

Numeric n2z;

Numeric n2x;

Numeric nn1;

Series<Numeric> Ma3;  

Numeric q3;

Numeric q3r;

Series<Numeric> h3;

Series<Numeric> l3;

Series<Numeric> ma2;

Series<Numeric> a1;

Series<Numeric> a2;

Series<Numeric> n2h;

   Series<Numeric> n2l;

Series<Numeric> a1h;

Series<Numeric> a1l;

Numeric aj1;

Numeric aj2;

Numeric vj1;

Numeric vj2;

Numeric m1;

Numeric m2;

Numeric q2;

Series<Numeric> h2;

Series<Numeric> l2;

Numeric nd;

Numeric qd;

Numeric q2r;

Numeric qxn;

Series<Numeric> n1h;

   Series<Numeric> n1l;

Series<Numeric> ma1;

Series<Numeric> b1;

Series<Numeric> b2;

Numeric b3;

Numeric sz2;

Numeric sv2;

Numeric sz1;

Numeric sv1;

Series<Numeric> s1;

Series<Numeric> s2;

Events

   onBar(ArrayRef<Integer> indexs)

   {    

    n3n = RoundDown (n3*0.1, 0);

    n2n = RoundUp (n2*0.1, 0);

    hi = h[1];

    li = l[1];

    ma3 = Average( Open, n3 );

    Q3 = AvgDeviation(Open,n3);

    q3r = Average(q3,n3n);

    H3 = MA3+Q3*1.5;

       L3 = MA3-Q3*1.5;

    ma2 = Average( Open, n2);

    a1 = XAverage( Open, n2) - XAverage( Open, n3 ) ;

    a2 = xAverage( a1,n2*0.6);

    n2h = Highest(Hi, n2);

    n2l = Lowest(Li, n2);

    A1H = Highest(A1,N2/2);

       A1L = Lowest(A1,N2/2);

    aj1 = NthCon(CrossOver(a1,a2),1);

    aj2 = NthCon(CrossOver(a1,a2),2);

    vj1 = NthCon(CrossUnder(a1,a2),1);

       vj2 = NthCon(CrossUnder(a1,a2),2);

    M1 = CountIf(aizq>=15 and a1>a2 and n2l[aj1]<n2L[aj2] AND a1l[aj1]>a1l[aj2] and a2[vj1]<0 ,vj1);

       M2 = CountIf(aizq>=15 and a1<a2 and n2H[vj1]>n2H[vj2] AND a1h[vj1]<a1h[vj2] and a2[aj1]>0 ,aj1);

    Q2 = AvgDeviation(Open,n2);

    Q2r = Average(q2,n2n);//轨道线

    QXN = NthCon(Q2<Q2R,1);

    H2 = MA2+Q2*1.5;

       L2 = MA2-Q2*1.5;

    ma1 = Average( Open, n1);

    b1 = XAverage(Open, n1) - XAverage(Open, n2 ) ;

    b2 = xAverage( b1,n1*0.6);

    b3 = ma1+(b1-b2)*2;

    PlotNumeric(\"MA3\",MA3,0,White);

    PlotNumeric(\"MA1\",MA1,0,White);

    PlotNumeric(\"b3\",b3,0,Yellow);

    PlotNumeric(\"ma2\",ma2,0,Yellow);

    PlotNumeric(\"h2\",h2,0,Green);

    PlotNumeric(\"l2\",l2,0,Magenta);

    PlotNumeric(\"h3\",h3,0,DarkCyan);

    PlotNumeric(\"l3\",l3,0,Red);

    If(m1>=1 and a1>a2){PlotString(\"m\",\"m\",ma2,MAGENTA );}

    If(m2>=1 and a1<a2){PlotString(\"m\",\"m\",ma2,DarkGreen);}

    If(ma2>ma3 and a1>a2 )PlotNumeric(\"MA2\",MA2,0,Red);

    If(ma2<ma3 and a1<a2 )PlotNumeric(\"MA2\",MA2,0,Blue);

   }