查看完整版本: 最好用的MACD

最好用的MACD

[code]　　//DZBUY

　　Left=-10000; Right=10000;count=0;j=0;j1=0;Prob=0;eps=0.001;yval=0;k=0;delt=0;

　　BNumb=35775;BNumb1=30208;InitVal=0.12;N=70;value1=0;

　　for (bar=1; bar< BarCount;bar++)

　　{value5=ml[bar];

　　BarNumber=bar;

　　if (BarNumber>N)

　　{

　　for (k=0;k<N-1;k++)

　　{

　　return1[k]=return1[k+1];

　　}

　　return1[N-1]=value5;

　　}

　　else

　　{

　　j=BarNumber-1;

　　return1[j]=value5;

　　}

　　if (BarNumber>=N)

　　{

　　yval=(left+right)/2;

　　delt=yval-left;

　　while((delt>0.005) AND (value1<50))

　　{

　　value1=value1+1;

　　for (j1=0; j1<N;j1++)

　　{

　　if (return1[j1]<yval)

　　{

　　count=count+1;

　　}

　　}

　　Prob=count/N;

　　if (Prob>InitVal+eps)

　　{

　　right=yval;

　　yval=(yval+left)/2;

　　}

　　if (Prob<InitVal-eps)

　　{

　　left=yval;

　　yval=(yval+right)/2;

　　}

　　if ((Prob<InitVal+eps) AND (Prob>InitVal-eps))

　　{

　　right=yval;

　　yval=(yval+left)/2;

　　}

　　delt=yval-left;

　　count=0;

　　}

　　if (value1!=500 )

　　{

　　value1=0;

　　}

　　DZBuy[bar]=yval;

　　Right=10000;

　　Left=-10000;

　　Prob=0;

　　}

　　}

　　DZb=DZBUY;

　　Plot(DZB," DZB",colorGreen, 8);//

　　//DZSELL

　　Left=-10000; Right=10000;count=0;j=0;j1=0;Prob=0;eps=0.001;yval=0;k=0;delt=0;

　　BNumb=35775;BNumb1=30208;InitVal=0.12;N=70;value1=0;

　　for (bar=1; bar< BarCount;bar++)

　　{value5=ml[bar];

　　BarNumber=bar;

　　if (BarNumber>N)

　　{

　　for (k=0;k<N-1;k++)

　　{

　　return1[k]=return1[k+1];

　　}

　　return1[N-1]=value5;

　　}

　　else

　　{

　　j=BarNumber-1;

　　return1[j]=value5;

　　}

　　if (BarNumber>=N)

　　{

　　yval=(left+right)/2;

　　delt=right-yval;

　　while((delt>0.005) AND (value1<50))

　　{

　　value1=value1+1;

　　for (j1=0; j1<N;j1++)

　　{

　　if (return1[j1]>yval)

　　{

　　count=count+1;

　　}

　　}

　　Prob=count/N;

　　if (Prob>InitVal+eps)

　　{

　　left=yval;

　　yval=(yval+right)/2;

　　}

　　if (Prob<InitVal-eps)

　　{

　　right=yval;

　　yval=(yval+left)/2;

　　}

　　if ((Prob<InitVal+eps) AND (Prob>InitVal-eps))

　　{

　　left=yval;

　　yval=(yval+right)/2;

　　}

　　delt=right-yval;

　　count=0;

　　}

　　if (value1!=500 )

　　{

　　value1=0;

　　}

　　DZSELL[bar]=yval;

　　Right=10000;

　　Left=-10000;

　　Prob=0;

　　}

　　}

　　Plot(DZSELL,"DZSELL",colorRed, 8);//

　　Buy=Cross(ml,dzsell);

　　PlotShapes(Buy*shapeHollowUpArrow,colorBlue,0,Graph0);[/code][attach]14442[/attach]