通达信黄金支解主图未加密选股指标公式源码

源码正文：

N:=88;DQ:=5;CQ:=14; P:=10{XG51};
P1:=(crOSS(ma(CLOSE,3),MA(CLOSE,13))&&MA(CLOSE,13)>REF(MA(CLOSE,13),1)){XG51};
启动本钱:=REF(LOW,P1),COLORLIMAGENTA{XG51};
VAR1:=LLV(LOW,0){XG51};
VAR2:=HHV(HIGH,0){XG51};
VAR3:=VAR2-VAR1{XG51};
低:= VAR1{XG51};
H1:= VAR3*0.191+VAR1{XG51};
H2:= VAR3*0.382+VAR1{XG51};
H3:= VAR3*0.5+VAR1{XG51};
H4:= VAR3*0.618+VAR1{XG51};
H5:= VAR3*0.809+VAR1{XG51};
高:= VAR2{XG51};
极点:REFDATE(高,DATE),COLORRED,LINETHICK1,POINTDOT{XG51};
一:REFDATE(H1,DATE),COLOR00F662,LINETHICK1,POINTDOT{XG51};
二:REFDATE(H2,DATE),COLORFF00FF,LINETHICK1,POINTDOT{XG51};
三:REFDATE(H3,DATE),,COLORBLUE,LINETHICK1,POINTDOT{XG51};
四:REFDATE(H4,DATE),,COLORFF00FF,LINETHICK1,POINTDOT{XG51};
五:REFDATE(H5,DATE),,COLOR00F662,LINETHICK1,POINTDOT{XG51};
低点:REFDATE(低,DATE),COLORRED,LINETHICK1,POINTDOT{XG51};
TT3:=(CURRBARSCOUNT=P){XG51};
TT4:=(CURRBARSCOUNT=P+5){XG51};
DRAWNUMBER(ISLAstBAR,极点,极点),COLOR999900{XG51};
DRAWTEXT(TT4 AND 极点,极点,'极点:'),COLOR208FFF{XG51};
DRAWNUMBER(ISLASTBAR,一,CONST(一)),COLOR999999{XG51};
DRAWTEXT(TT4 AND 一,一,'191:'),COLOR208FFF{XG51};
DRAWNUMBER(ISLASTBAR,二,CONST(二)),COLORFF00FF{XG51};
DRAWTEXT(TT4 AND 二,二,'382:'),COLORFF00FF{XG51};
DRAWNUMBER(ISLASTBAR,三,CONST(三)),COLORBLUE{XG51};
DRAWTEXT(TT4 AND 三,三,'1/2:'),COLORBLUE{XG51};
DRAWNUMBER(ISLASTBAR,四,CONST(四)),COLORFF00FF{XG51};
DRAWTEXT(TT4 AND 四,四,'618:'),COLORFF00FF{XG51};
DRAWNUMBER(ISLASTBAR,五,CONST(五)),COLOR999999{XG51};
DRAWTEXT(TT4 AND 五,五,'809:'),COLOR208FFF{XG51};
DRAWNUMBER(ISLASTBAR,低点*1.015,CONST(低点)),COLOR999900{XG51};
DRAWTEXT(TT4 AND 低点,低点*1.015,'低点:'),COLOR208FFF{XG51};
A1:=REF(H,DQ)=HHV(H,2*DQ+1){XG51};
B1:=FILTER(A1,DQ){XG51};
C1:=BacKSET(B1,DQ+1){XG51};
D1:=FILTER(C1,DQ){XG51};
E1:=BACKSET(ISLASTBAR,BArslAST(D1)+1){XG51};
F1:=E1>REF(E1,1){XG51};
短压:DRAWLINE(D1,H,F1,H,1),COLORGREEN{XG51};
A2:=REF(L,DQ)=LLV(L,2*DQ+1){XG51};
B2:=FILTER(A2,DQ){XG51};
C2:=BACKSET(B2,DQ+1){XG51};
D2:=FILTER(C2,DQ){XG51};
E2:=BACKSET(ISLASTBAR,BARSLAST(D2)+1){XG51};
F2:=E2>REF(E2,1){XG51};
短支:DRAWLINE(D2,L,F2,L,1),COLORLICYAN{XG51};
AA1:=REF(H,CQ)=HHV(H,2*CQ+1){XG51};
BB1:=FILTER(AA1,CQ){XG51};
CC1:=BACKSET(BB1,CQ+1){XG51};
DD1:=FILTER(CC1,CQ){XG51};
EE1:=BACKSET(ISLASTBAR,BARSLAST(DD1)+1){XG51};
FF1:=EE1>REF(EE1,1){XG51};
长压:DRAWLINE(DD1,H,FF1,H,1),COLORYELLOW, LINETHICK2{XG51};
AA2:=REF(L,CQ)=LLV(L,2*CQ+1){XG51};
BB2:=FILTER(AA2,CQ){XG51};
CC2:=BACKSET(BB2,CQ+1){XG51};
DD2:=FILTER(CC2,CQ){XG51};
EE2:=BACKSET(ISLASTBAR,BARSLAST(DD2)+1){XG51};
FF2:=EE2>REF(EE2,1){XG51};
长支:DRAWLINE(DD2,L,FF2,L,1),COLORGREEN, LINETHICK2{X+G*5*1+C+N+{};

源码正文：

difF9:=(ema(CLOSE,12)-Ema(CLOSE,26))*100/EMA(CLOSE,26),COLORWHITE{XG51};
DEA9:=EMA(DIFF9,9),COLORWHITE,LINETHICK1{XG51};
macd:2*(DIFF9-DEA9), COLORstICK,LINETHICK1{XG51};
A1:=BArslAST(REF(crOSS(DIFF9,DEA9),1)){XG51};
STICKLINE(MacD<REF(MACD,1)AND MACD>0,0,MACD,0.5,0),COLORFF99AA{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD<0,0,MACD,0.5,0),COLORYELLOW{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD,0,MACD,0.5,0),COLORBROWN{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD>0,0,MACD,0.5,0),COLORLIMAGENTA{XG51};
DIFF :(EMA(CLOSE,12)-EMA(CLOSE,26))*100/EMA(CLOSE,26),COLORWHITE{XG51};
DEA : EMA(DIFF9,9),COLORWHITE,LINETHICK1{XG51};
IF(DIFF9<REF(DIFF9,1),DIFF9,DRAWNULL),COLORCYAN{XG51};
IF(DEA9<REF(DEA9,1),DEA9,DRAWNULL),COLORCYAN,LINETHICK1{XG51};
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1{XG51};
STICKLINE(低位金叉,0,0.08,2,0),COLORBLUE{XG51};
DRAWTEXT(低位金叉,-0.2,' 低金'),COLORRED{XG51};
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0)){XG51};
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1{XG51};
STICKLINE(二次金叉,0,0.06,2,0),COLORFF00FF{XG51};
DRAWICON(二次金叉,DEA*0.9,1) {XG51};
DRAWTEXT(二次金叉,0.15,' 二金叉'),COLORBLUE{XG51};
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA){XG51};
STICKLINE(底背离,0,0.03,2,0),COLOR00FF00{XG51};
DRAWTEXT(底背离,-0.19,' 底背'),COLORFF00FF{XG51};
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF){XG51};
STICKLINE(顶背离,0,0.03,2,0),COLORRED{XG51};
DRAWTEXT(顶背离,0.12,' 顶背'),COLORFF00FF{XG51};
DRAWTEXT(低位金叉 AND 二次金叉 AND 底背离,0.19,'三全项'),COLOR0000FF,LINETHICK2{X.G~5_1.C.N.{};