C : CLOSE; DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);
DEA := EMA(DIFF,9);
MACD := 2*(DIFF-DEA);
Zero := 0;
MACDM:= 2*(DIFF-DEA);
N=150;
IF(OPEN<500 AND CLOSE<500) GGhloc=1;
Nl= LLVBARS(LOW,N);
Nlb=HHVBARS(LOW,N);
Nlg=Nl+1;
DIFl=REF(DIFF,Nl);
SXLNll=0;
Nlf=Nl-1;
DEAl=REF(DEA,Nl);
MACDl=REF(MACDM,Nl);
IF(DIFl<0 AND MACDl<0) SXLNll=1;
DIFFl=DIFl;
MACVard=0;KLVaro=0;
WHILE(Nlf>=0 AND REF(MACDM,Nlf)<0)
{IF(DIFFl>REF(DIFF,Nlf))
DIFFl=REF(DIFF,Nlf);
Nlf=Nlf-1;}
Nd=LLVBARS(DIFF,N);
Nda=HHVBARS(DIFF,N);
Ndg=Nd+1;
DIFFd=REF(DIFF,Nd);
MACDd=REF(MACDM,Nd);
IF(DIFFd<0 AND DIFFd<=REF(DIFF,Ndg) AND MACDd<0 AND Nd>Nlg) MACVard=1;
MACl=COUNT(DIFF>DEA,Nlg);
MACv=COUNT(DIFF>DEA,Nl); ;
MACm=COUNT(DIFF>DEA,Nd);
MALl=(LOW-REF(LOW,1))/REF(LOW,1);
MACg=COUNT(REF(MACDM,1)<MACDM*0.9,Nlg);
MACc=COUNT(REF(CLOSE,1)<CLOSE,Nlg);
IF(MACc>0 AND MACg==1 AND MACl<MACm) KLVaro=1;
GHDIFq=0;
GHDIFh=LLV(DIFF,Nlg);
GHDIFg=HHV(DIFF,Nlg);
IF(DIFFl<=GHDIFh AND DIFFd<DIFFl) GHDIFq=1;
flagm :=GGhloc>0 AND MACVard>0 AND SXLNll>0 AND GHDIFq>0 AND KLVaro>0;
DRAWICON(flagm>0,CLOSE*0.98,"buy");
DRAWTEXT(flagm>0,CLOSE*0.93,'买');
|
