通达信箱体突破金手指主图选股指标公式源码

通达信箱体突破金手指主图选股指标公式源码

源码正文：

stICKLINE(L>REF(H,1) ,REF(H,1),L,9,-1),COLORFD00DF{XG51};
STICKLINE(H<REF(L,1) ,REF(L,1),H,9,-1),COLORFDFD00{XG51};
DRAWKLINE(H,O,L,C){XG51};
XA_1:=HIGH{XG51};
XA_2:=LOW{XG51};
XA_3:=REF(XA_1,10)=HHV(XA_1,2*10+1){XG51};
XA_4:=FILTER(XA_3,10){XG51};
XA_5:=BacKSET(XA_4,10+1){XG51};
XA_6:=FILTER(XA_5,10){XG51};
XA_7:=REF(XA_2,10)=LLV(XA_2,2*10+1){XG51};
XA_8:=FILTER(XA_7,10){XG51};
XA_9:=BACKSET(XA_8,10+1){XG51};
XA_10:=FILTER(XA_9,10){XG51};
前期高位:REF(HIGH,BArslAST(XA_6)),POINTDOT,COLORWHITE{XG51};
STICKLINE(HIGH,前期高位,前期高位,8,0),COLORWHITE{XG51};
前期低位:REF(LOW,BARSLAST(XA_10)),POINTDOT,COLORCYAN{XG51};
STICKLINE(LOW,前期低位,前期低位,8,0),COLORCYAN{XG51};
DRAWNUMBER(FILTER(XA_5,10),HIGH,HIGH),LINETHICK9{XG51};
DRAWNUMBER(FILTER(XA_9,10),LOW,LOW){XG51};
选股1:crOSS(CLOSE,前期高位),NODRAW{XG51};
选股2:CLOSE>REF(前期低位,1) AND CROSS(REF(前期低位,1),LOW),NODRAW{XG51};
STICKLINE(选股1,OPEN,CLOSE,1,0),COLORBLUE{XG51};
STICKLINE(选股1,HIGH,LOW,0,1),COLORBLUE{XG51};
STICKLINE(选股2,OPEN,CLOSE,1,0),COLORBLUE{XG51};
STICKLINE(选股2,HIGH,LOW,0,1),COLORBLUE{XG51};
出场1:CLOSE<REF(前期高位,1) AND CROSS(HIGH,REF(前期高位,1)),NODRAW{XG51};
STICKLINE(出场1,OPEN,CLOSE,1,0),COLORYELLOW{XG51};
出场2:CROSS(前期低位,CLOSE),NODRAW{XG51};
STICKLINE(出场2,OPEN,CLOSE,1,0),COLORYELLOW{XG51};
XA_11:=(OPEN+CLOSE)/2{XG51};
XA_12:=REF(XA_11,1){XG51};
STICKLINE(ISLASTBAR,XA_12,XA_12,10,0),COLORRED{XG51};
DRAWNUMBER(ISLASTBAR,XA_12,XA_12){XG51};
XA_13:=REF(CLOSE,1){XG51};
XA_14:=REF(CLOSE,1)*1.1-CLOSE<0.01 AND HIGH=CLOSE{XG51};
STICKLINE(XA_14,OPEN,CLOSE,1,0),COLORWHITE{XG51};
STICKLINE(XA_14,HIGH,LOW,0,0),COLORWHITE{XG51};
XA_15:=IF((XA_13-CLOSE)*100/XA_13>=10-0.01*100/XA_13 AND LOW=CLOSE,1,0){XG51};
STICKLINE(XA_15,OPEN,CLOSE,1,0),COLORCYAN{XG51};
STICKLINE(XA_15,HIGH,LOW,0,1),COLORCYAN{XG51};
ma3:=MA(CLOSE,25){XG51};
MA4:=MA(CLOSE,60){XG51};
箱底:=TROUGH(CLOSE,10,1)*1.02,COLOR008888,LINETHICK2{XG51};
价低箱底:=COUNT(L<箱底,3){XG51};
底箱:=TROUGH(CLOSE,10,1)*1.05,COLOR008888,LINETHICK1{XG51};
DRAWTEXT(价低箱底>=1 AND 箱底<MA3 AND CROSS(C,底箱),L*0.999,'●杀入'),COLOR00CCCC{XG51};
DRAWTEXT(MA3>MA4 AND 价低箱底>=1 AND 箱底<MA3 AND CROSS(C,底箱),L*0.99,'●强杀入'),COLOR00CCCC{XG51};
A1:=REF(V,1);A2:=Dvol{XG51};
A3:=A2/A1{XG51};
LNX:=A3-REF(A3,1),COLOR00CCCC,LINETHICK1{XG51};
E1:=REF(C,1);E2:=DCLOSE;E3:=(E2-E1)/E1*100{XG51};
QMX:=E3-REF(E3,1),COLOR00CCCC,LINETHICK2{XG51};
XG:=CROSS(LNX,500) AND CROSS(QMX,10){XG51};
DRAWTEXT(XG=1,L*0.985,'---金指'),COLORBLUE{XG51};
DRAWICON(XG=1,L*0.99,11){XG51};
ZF:=Abs(100*(H-L)/REF(C,1))>3{XG51};
dif:=ema(CLOSE,8)-EMA(CLOSE,13){XG51};
DEA:=EMA(DIF,6){XG51};
macd:=2*(DIF-DEA){XG51};
金叉:=CROSS(DIF,DEA); 死叉:=CROSS(DEA,DIF){XG51};
DIF下拐:=REF(DIF,3)<REF(DIF,2)AND REF(DIF,2)<REF(DIF,1)AND REF(DIF,1)>DIF=REF(DIF,1){XG51};
MACD下拐:=REF(DIF,3)<REF(DIF,2)AND REF(MACD,2)<REF(MACD,1)AND REF(MACD,1)>MACD=REF(MACD,1){XG51};
下拐:=MAX(DIF下拐,MACD下拐){XG51};
GD1:=EVERY(DIF>REF(DIF,1),BARSLASTCOUNT(DIF>DEA))AND DIF>DEA{XG51};
GD2:=EVERY(MACD>REF(MACD,1),BARSLASTCOUNT(DIF>DEA))AND DIF>DEA{XG51};
GD:=MAX(GD1,GD2){XG51};
高点1:=REF(MAX(C,O),BARSLAST(GD1)+1){XG51};
高点2:=REF(MAX(C,O),BARSLAST(GD2)+1){XG51};
高点:=IF(高点2>=高点1,高点2,高点1){XG51};
AA:=HHV(IF(C>O,C,MAX(C,O)),BARSLASTCOUNT(高点)+1)=HHV(IF(C>O,C,MAX(C,O)),BARSLASTCOUNT(bbi>REF(BBI,1)AND C>BBI)){XG51};
压力:DRAWLINE(BARSLAST(AA)=0,IF(C>O,C,MAX(C,O)),BARSNEXT(AA),REF(IF(C>O,C,MAX(C,O)),BARSLAST(AA)),1),DOTLINE,COLORBLUE{XG51};
LD1:=EVERY(DIF<REF(DIF,1),BARSLASTCOUNT(DIF<DEA))AND DIF<DEA{XG51};
LD2:=EVERY(MACD<REF(MACD,1),BARSLASTCOUNT(DIF<DEA))AND DIF<DEA{XG51};
LD:=MIN(LD1,LD2){XG51};
低点1:=REF(MIN(C,O),BARSLAST(LD1)+1){XG51};
低点2:=REF(MIN(C,O),BARSLAST(LD2)+1){XG51};
低点:=IF(低点2<=低点1,低点1,低点2){XG51};
BB:=LLV(IF(C<O,C,MIN(C,O)),BARSLASTCOUNT(LD)+1)=LLV(IF(C<O,C,MIN(C,O)),BARSLASTCOUNT(DIF<REF(DIF,1) AND BBI<REF(BBI,1) AND L<BBI)){XG51};
支撑:DRAWLINE(BARSLAST(BB)=0,IF(C<O,C,MIN(C,O)),BARSNEXT(BB),REF(IF(C<O,C,MIN(C,O)),BARSLAST(BB)),1),DOTLINE,COLORCYAN{XG51};
PP1:=BARSLAST(AA)=1{XG51};
YLX:=REF(MAX(C,O),BARSLAST(PP1)+1){XG51};
突破:CROSS(C,YLX),NODRAW,COLORRED{XG51};
STICKLINE(突破,C,O,2,0),COLORRED{XG51};
DIF突破:=REF(DIF,BARSLAST(PP1)+1){XG51};
有效突破:=突破 AND DIF>DIF突破{XG51};
STICKLINE(有效突破,C,O,2,0),COLORLICYAN{XG51};
PP2:=BARSLAST(BB)=1{XG51};
ZCX:=REF(MIN(C,O),BARSLAST(PP2)+1){XG51};
破位:CROSS(ZCX,C),NODRAW,COLORLIBLUE{XG51};
STICKLINE(破位,C,O,2,0),COLORLIBLUE{XG51};
PP7:=BARSLAST(破位)=1{XG51};
破位k线:=REF(O,BARSLAST(PP7)+1){XG51};
突破破位:CROSS(C,破位K线),NODRAW,COLORMAGENTA{XG51};
STICKLINE(突破破位 AND C>O AND MACD>REF(MACD,1),C,O,2,0),COLORMAGENTA{XG51};
实体:=(C-O)/C=HHV((C-O)/C,15){XG51};
阳15:=C>O AND VOL>=HHV(VOL,15){XG51};
单阳:=(C>REF(C,1)*1.035 OR 实体)AND C>O AND (阳15 OR VOL>REF(VOL,1)*1.9),NODRAW,COLORBLUE{XG51};
低不破价:=REF(O,BARSLAST(单阳)){XG51};
单阳不破:=CURRBARSCOUNT<100 AND BARSLAST(单阳)<11 AND LLV(C,BARSLAST(单阳))>=低不破价{XG51};
DRAWTEXT(BARSLAST(单阳)=01 AND 单阳不破,低不破价,'[1]'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=02 AND 单阳不破,低不破价,'[2]'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=03 AND 单阳不破,低不破价,'[3]'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=04 AND 单阳不破,低不破价,'[4]'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=05 AND 单阳不破,低不破价,'[5]'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=06 AND 单阳不破,低不破价,'[6]'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=07 AND 单阳不破,低不破价,'[7]'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=08 AND 单阳不破,低不破价,'[8]'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=09 AND 单阳不破,低不破价,'[9]'),COLORBLACK{XG51};
DRAWTEXT(BARSLAST(单阳)=10 AND 单阳不破,低不破价,'[10]'),COLORBLACK{X=G!5~1=C=N={};