先前下载的朋友请注意:
A2:=HHV(a1,N);
A3:=LLV(a1,N);
上两行请改成下二行,给大家带来不便请谅解。
A2:=HHV(h,N);
A3:=LLV(l,N);
n设成60,
可根据情况调整。现在下载的为正确,下载上面txt文件,下面那个是错误的。
{底来到2}正确源码如下,不需要下载。望再次谅解,对不起大家
BB:=EVERY(V>REF(V,1),2) AND H/L>1.06 AND V>=REF(HHV(V,N),1)*1.67 AND H/LLV(L,N)<1.25;{可设参数,参数越大信号越少,信号越少越安全}
A1:=MA(C,N);
A2:=HHV(h,N);
A3:=LLV(l,N);
ZGJ:=(A2-A1)/A1;
ZDJ:=(A1-A3)/A1;
ZP:=REF(ZGJ,1)<0.1 AND REF(ZDJ,1)<0.1;
XG:=HIGH=HHV(HIGH,N);
突破:=BB AND ZP AND XG;
VAR1:=EXPMA(C,N),COLORRED;
上升:IF(VAR1>REF(VAR1,1),VAR1,DRAWNULL)POINTDOT,COLORRED;
下降:IF(VAR1<REF(VAR1,1),VAR1,DRAWNULL)POINTDOT,COLORGREEN;
DRAWTEXT(突破,C,'-----------------------------------------底来到2');
{底来到2}
BB:=EVERY(V>REF(V,1),2) AND H/L>1.06 AND V>=REF(HHV(V,N),1)*1.67 AND H/LLV(L,N)<1.25;{可设参数,参数越大信号越少,信号越少越安全}
A1:=MA(C,N);
A2:=HHV(A1,N);
A3:=LLV(A1,N);
ZGJ:=(A2-A1)/A1;
ZDJ:=(A1-A3)/A1;
ZP:=REF(ZGJ,1)<1.1 AND REF(ZDJ,1)<1.1;
XG:=HIGH=HHV(HIGH,N);
突破:=BB AND ZP AND XG;
VAR1:=EXPMA(C,N),COLORRED;
上升:IF(VAR1>REF(VAR1,1),VAR1,DRAWNULL)POINTDOT,COLORRED;
下降:IF(VAR1<REF(VAR1,1),VAR1,DRAWNULL)POINTDOT,COLORGREEN;
DRAWTEXT(突破,C,'-----------------------------------------底来到2');