通达信月K线未加密选股指标公式源码

通达信月K线未加密选股指标公式源码

源码正文：

月开盘1:O#MONTH,NODRAW{XG51};
月收盘:=C#MONTH,NODRAW{XG51};
月最高:=H#MONTH,NODRAW{XG51};
月最低:=L#MONTH,NODRAW{XG51};
TJ:=NOT(月最低=REF(月最低,1)) OR NOT(月最高=REF(月最高,1)) OR NOT(月开盘1=REF(月开盘1,1))OR NOT(月收盘=REF(月收盘,1)){XG51};
TX:=BArslAst(TJ)+1{XG51};
TX1:=BacKSET(TJ,(REF(TX,1)/2)+1.6){XG51};
ZJ:=crOSS(TX1,0.5){XG51};
K1M:=月开盘1=REF(月开盘1,1) AND 月收盘=REF(月收盘,1) AND 月最高=REF(月最高,1) AND 月最低=REF(月最低,1){XG51};
K3M:=REF(C,1)=DYNAINFO(3) AND O=DYNAINFO(4) AND C=DYNAINFO(7) AND H=DYNAINFO(5) AND L=DYNAINFO(6){XG51};
DDM:=REF(BARSLAST(K1M=0)+1,1),LINETHICK0{XG51};
DD1M:=CROSS(BACKSET((K1M=0 OR K3M) AND DDM=5,4),0.5),LINETHICK0{XG51};
DD2M:=CROSS(BACKSET((K1M=0 OR K3M) AND (DDM=4 OR DDM=3),3),0.5),LINETHICK0{XG51};
DD3M:=CROSS(BACKSET((K1M=0 OR K3M) AND DDM<=2,2),0.5),LINETHICK0{XG51};
BK1M:=DD1M OR DD2M OR DD3M{XG51};
BK2M:=CROSS(BACKSET(K1M=0,2),0.5){XG51};
BK3M:=CROSS(BACKSET(K1M=0 AND REF(K1M=0,1),2),0.5){XG51};
月开盘:IF(BARSLAST(K1M=0)=0,O,REF(O,BARSLAST(K1M=0))),LINETHICK0{XG51};
K0M:=月收盘>月开盘 OR (月收盘=月开盘 AND 月收盘>REF(月收盘,BARSLAST(K1M=0)+1)){XG51};
STICKLINE(K0M AND ZJ,月最高,月最低,1,0),COLORLICYAN{XG51};
STICKLINE(K0M AND ((K1M AND BK2M=0 AND K3M=0) OR BK3M),月开盘,月收盘,8,0),COLORLICYAN{XG51};
STICKLINE(NOT(K0M) AND ZJ,月最高,月最低,1,0),COLORLIBLUE{XG51};
STICKLINE(NOT(K0M) AND ((K1M AND BK2M=0 AND K3M=0) OR BK3M),月开盘,月收盘,8,0),COLORLIBLUE{X_G.5_1_C_N_{};

通达信寻找启爆点主图未加密选股指标公式源码

源码正文：

ZF:=C/REF(C,1)-1{XG51};
E1:=IF(C>REF(C,1),REF(C,1)*(1+ZF+0.02),LLV(L,3)){XG51};
A1:=ma(E1,2){XG51};
A2:=MA(E1,3){XG51};
A3:=MA(E1,4){XG51};
A4:=MA(E1,5){XG51};
A5:=MA(E1,6){XG51};
A6:=(A1+A2+A3+A4+A5)/5{XG51};
F1:MA(A6,5),LINETHICK3{XG51};
F2:MA(F1,20),LINETHICK3{XG51};
F3:MA(F1,60),LINETHICK3{XG51};
DRAWBAND(F1,90,F3,RGB(35,135,35)){XG51};
DRAWBAND(F1,180,F2,RGB(35,115,35)){XG51};
DRAWKLINE(H,O,L,C){XG51};
重要点:=crOSS(C,F1) OR CROSS(C,F2) OR CROSS(C,F3){XG51};
DRAWTEXT(C/F3<1.20 AND 重要点 AND CROSS(E1,REF(CLOSE,1)*1.03),REF(CLOSE,1)*1.01,'启动'),COLORLIMAGENTA{XG51};
DRAWTEXT(C/F3<1.20 AND 重要点,REF(CLOSE,1)*1.01,'启动'),COLORLIMAGENTA{XG51};
DRAWTEXT(C/F3<1.20 AND O<F1 AND C>F1,REF(CLOSE,1)*1.01,'启动'),COLORLIMAGENTA{XG51};
DRAWTEXT(C/F3<1.20 AND F1>REF(F1,1) AND L<F3 AND C>F3 AND C>REF(C,1),O,'启动'),COLORLIMAGENTA{X*G=5~1*C*N*{};