|
以下是通达信底来到二主图公式（鹏腾2009版本）源码（无源码的请下载附件导入）
通达信底来到二主图公式（鹏腾2009版本）源码
先前下载的朋友请注意：
A2:=HHV(a1,N);
A3:=LLV(a1,N);
上两行请改成下二行，给大家带来不便请谅解。
A2:=HHV(h,N);
A3:=LLV(l,N);
n设成６０，
可根据情况调整。现在下载的为正确，下载上面txt文件，下面那个是错误的。
{底来到２}正确源码如下，不需要下载。望再次谅解，对不起大家
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,'-----------------------------------------底来到２');
{底来到２}
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,'-----------------------------------------底来到２');
78355661.png
| 
