通达信稳健波段操盘主图未加密选股指标公式源码

源码正文：

A:ema(C,21)COLORYELLOW,LINETHICK3{XG51};
B:=A<REF(A,1){XG51};
IF(B-1,A,DRAWNULL)COLORWHITE,LINETHICK3{XG51};
AA:=Ema(C,3) > EMA(C,21){XG51};
BB:=EMA(C,3) < EMA(C,21){XG51};
CC:= EMA(C,3) > EMA(C,8){XG51};
CC1:=EMA(C,3) < EMA(C,8){XG51};
DD:=CLOSE<OPEN{XG51};
stICKLINE(AA,H,L,0,0),COLOR007FFF{XG51};
STICKLINE(AA,O,C,3,1),COLOR007FFF{XG51};
STICKLINE(AA AND DD,O,C,3,0),COLOR007FFF{XG51};
STICKLINE(BB,H,L,0,0),COLORCYAN{XG51};
STICKLINE(BB,O,C,3,1),COLORCYAN{XG51};
STICKLINE(BB AND DD,O,C,3,0),COLORCYAN{XG51};
STICKLINE(BB AND CC,H,L,0,1),COLORF00FF0{XG51};
STICKLINE(BB AND CC,O,C,3,1),COLORF00FF0{XG51};
STICKLINE(BB AND CC AND DD,O,C,3,0),COLORF00FF0{XG51};
STICKLINE(AA AND CC1,H,L,0,0),COLORYELLOW{XG51};
STICKLINE(AA AND CC1,O,C,3,1),COLORYELLOW{XG51};
STICKLINE(AA AND CC1 AND DD,O,C,3,0),COLORYELLOW{XG51};
买线:=MA(CLOSE,9),LINETHICK2{XG51};
卖线:=MA(CLOSE,20){XG51};
BU:=crOSS(买线,卖线){XG51};
SEL:=CROSS(卖线,买线){XG51};
DRAWTEXT(BU,L-0.1,'建仓')COLORBLUE{XG51};
DRAWTEXT(SEL,H+0.1,'空仓'){XG51};
A2:=(C-REF(C,1))/REF(C,1)*100<1.02{XG51};
A3:=H>MA(C,5)*1.12{XG51};
AAA:= A2 AND A3{XG51};
DRAWTEXT(AAA,H*1.05,'卖点'),COLORRED{XG51};
EMA13:=EMA(C,13),COLOR0000FF,LINETHICK2{XG51};
EMA34:=EMA(C,34),COLORBLUE{XG51};
EMA55:=EMA(C,55),COLORFF00FF{XG51};
EMA120:=EMA(C,120),COLORFFCC66{XG51};
AR1:=EMA55>EMA34 AND EMA34>EMA13{XG51};
AR2:=BArslAST((C-EMA13)/EMA13*100<-6){XG51};
AR3:=EMA13>=REF(EMA13,2){XG51};
AR4:=COUNT(CROSS(C,EMA13),AR2)=1{XG51};
AR5:=AR1 AND AR2 AND AR3 AND AR4{XG51};
AR6:=AR5 AND FILTER(AR5,10){XG51};
DRAWTEXT(AR6,L-0.09,'启动'),COLORBLUE{XG51};
STICKLINE(AR6,H,L,3,0),LINETHICK2,COLORBLUE{XG51};
BR1:=COUNT(BETWEEN((C-REF(C,1))/REF(C,1)*100,0,5) ,5)=5{XG51};
BR2:=Abs((EMA13-EMA34)+(EMA34-EMA55))/C<0.2{XG51};
BR3:=C>EMA55 AND (REF(C,1)<REF(EMA55,1) OR REF(C,2)<REF(EMA55,2) OR REF(C,3)<REF(EMA55,3) OR REF(C,4)<REF(EMA55,4) OR REF(C,5)<REF(EMA55,5)){XG51};
BR4:=BR1 AND BR2 AND BR3{XG51};
DRAWTEXT(BR4 AND FILTER(BR4,10),L-0.09,'上升'),COLOR00C5FF{XG51};
STICKLINE(BR4 AND FILTER(BR4,10),O,C,3,1),LINETHICK2,COLOR00C5FF{XG51};
CR1:=(C-REF(C,1))/REF(C,1)*100>0.5{XG51};
CR2:=V>MA(V,5)*0.6{XG51};
CR3:=COUNT(CROSS(EMA13,EMA55),3)=1{XG51};
CR4:=ABS(EMA34-EMA55)/EMA55<0.03{XG51};
CR5:=EMA55<=EMA120 AND EMA55>=REF(EMA55,1){XG51};
CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND CR5,2){XG51};
STICKLINE(CR6,O,C,3,1),LINETHICK2,COLORF00FF0{XG51};
DRAWTEXT(CR6,L-0.09,'涨升'),COLORF00FF0{XG51};
DR1:=EMA13>EMA34 AND EMA34<EMA55{XG51};
DR2:=BARSLAST(CROSS(C,EMA55) ){XG51};
DR3:=H=HHV(H,DR2){XG51};
DR4:=BARSLAST(DR3){XG51};
DR5:=COUNT(O>C AND C<REF(C,1) AND C>EMA55 AND BETWEEN((C-EMA55)/EMA55,0,0.02),DR4)=1{XG51};
DR6:=C>REF(C,1) {XG51};
DR7:= DR1 AND DR5 AND DR6 {XG51};
DR8:=DR7 AND FILTER(DR7 ,10){XG51};
DRAWTEXT(DR8,L-0.09,'出击'),COLORD6BA63{XG51};
ER:=BARSLAST(REF(CROSS(EMA55,EMA34),1)) AND CROSS(EMA34,EMA55){XG51};
DRAWTEXT(ER,L-0.09,'金叉'),COLOR0099FF{XG51};
FR:=BARSLAST(REF(CROSS(EMA34,EMA13),1)) AND CROSS(EMA13,EMA34){XG51};
DRAWTEXT(FR,L-0.09,'加仓'),COLORRED{XG51};
GR1:=BARSLAST(BETWEEN("bias.BIAS2"(6,13,24),0,5) ){XG51};
GR2:=EMA13>EMA34 AND EMA34>EMA55 AND EMA13>REF(EMA13,1){XG51};
GR3:=COUNT("BIAS.BIAS2"(6,13,24)>10 AND H=HHV(H,GR1),GR1){XG51};
GR4:=H=HHV(H,GR1){XG51};
GR5:="macd.MacD"(12,26,9)<REF("MACD.MACD"(12,26,9),1){XG51};
GR6:=GR2 AND GR3 AND GR4{XG51};
GR7:=GR2 AND GR3 AND GR4 AND GR5{XG51};
DRAWTEXT(GR6 AND GR7,H+0.13,'了结'),COLOR00FF00{XG51};
HR2:=EMA13>=REF(EMA13,3) AND EMA34>=REF(EMA34,1) AND EMA55>=REF(EMA55,1) AND CROSS(C,EMA13) AND CROSS(C,EMA34) AND CROSS(C,EMA55){XG51};
DRAWTEXT(HR2 AND FILTER(HR2,10),L-0.3,'推进'),COLORFFC8FF{XG51};
STICKLINE(HR2 AND FILTER(HR2,10),O,C,3,1),LINETHICK2,COLORFFC8FF{X+G_5!1+C+N+{};

源码正文：

HJ_1:=IF(DATE<1451130,1,0){XG51};
dif:IF(HJ_1=1,macd.DIF,0),LINETHICK2{XG51};
DEA:IF(HJ_1=1,maCD.DEA,0){XG51};
DRAWTEXT_FIX(HJ_1=0,0,0.01,0,27),COLORLIMAGENTA{XG51};
MacD:(DIF-DEA)*2,COLORstICK{XG51};
DRAWICON(REF(DIF,1)>REF(DIF,2) AND DIF<REF(DIF,1) AND DIF>0 AND DIF>DEA,DIF*1.1,2),COLORCYAN{XG51};
DRAWICON(crOSS(DEA,DIF) AND DIF>0,DIF,37),COLORCYAN{XG51};
DRAWICON(REF(DIF,1)<REF(DIF,2) AND DIF>REF(DIF,1) AND DIF<0 AND DIF<DEA,DIF*1.1,1),COLORWHITE{XG51};
DRAWICON(CROSS(DIF,DEA) AND DIF<0,DIF,36),COLORWHITE{XG51};
HJ_2:=BArslAST(REF(MACD,1)<0 AND MACD>0){XG51};
HJ_3:=LLVBARS(MACD,HJ_2+20){XG51};
HJ_4:=IF(HJ_3>HJ_2,REF(MACD,HJ_3),0){XG51};
HJ_5:=MACD<0 AND MACD>HJ_4 AND LOW=LLV(LOW,HJ_2+20) AND HJ_4<0{XG51};
HJ_6:=REF(HJ_5,1)=1 AND MACD>REF(MACD,1) AND REF(DIF,HJ_3)<0 AND MACD<0{XG51};
低背:DRAWLINE(HJ_4=HJ_3,MACD,HJ_6,MACD,0),COLORWHITE,LINETHICK2{XG51};
DRAWICON(HJ_6,MACD*1.2,26){XG51};
HJ_7:=HHVBARS(MACD,HJ_2+20){XG51};
HJ_8:=IF(HJ_7>HJ_2,REF(MACD,HJ_7),0){XG51};
HJ_9:=MACD>0 AND MACD<HJ_8 AND HIGH=HHV(HIGH,HJ_2+20) AND HJ_8>0{XG51};
HJ_10:=REF(HJ_9,1)=1 AND MACD>REF(MACD,1) AND REF(DIF,HJ_7)>0{XG51};
顶背:DRAWLINE(HJ_8=HJ_7,MACD,HJ_10,MACD,0),COLORCYAN,LINETHICK2{XG51};
DRAWICON(HJ_10,MACD*1.2,15){XG51};
HJ_11:=CLOSE/MA(CLOSE,40)*100<78{XG51};
HJ_12:=CLOSE/MA(CLOSE,60)*100<74{XG51};
HJ_13:=HIGH>LOW*1.051{XG51};
HJ_14:=HJ_13 AND COUNT(HJ_13,5)>1{XG51};
HJ_15:=IF(HJ_14 AND (HJ_11 OR HJ_12),2,0){XG51};
HJ_16:=CLOSE/REF(CLOSE,25)<=1.1{XG51};
HJ_17:=SMA(MAX(CLOSE-REF(CLOSE,2),0),7,1)/SMA(Abs(CLOSE-REF(CLOSE,2)),7,1)*100<15{XG51};
HJ_18:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100{XG51};
HJ_19:=SMA(HJ_18,2,1){XG51};
HJ_20:=SMA(HJ_19,2,1){XG51};
HJ_21:=IF(HJ_19>REF(HJ_19,1) AND REF(HJ_19,1)<REF(HJ_19,2) AND HJ_19<23,1.5,0){XG51};
抄底:HJ_16 AND HJ_15 AND HJ_17 AND HJ_21 AND HJ_1=1,COLORRED{XG51};
HJ_22:=100-100*(HHV(HIGH,5*8)-CLOSE)/(HHV(HIGH,5*8)-LLV(LOW,5*8)){XG51};
HJ_23:=MA(CLOSE,5){XG51};
HJ_24:=IF(CLOSE>SAR(10,2,20),1,0){XG51};
HJ_25:=IF(CLOSE<SAR(10,2,20),(-1),0){XG51};
HJ_26:=ATAN((HJ_23/REF(HJ_23,1)-1)*100)*180/3.1416{XG51};
HJ_27:=IF(HJ_26>30,1,0){XG51};
HJ_28:=IF(HJ_26<(-30),(-1),0){XG51};
HJ_29:=HJ_24+HJ_27+HJ_25+HJ_28{XG51};
IF(HJ_29<(-1) OR HJ_22<25.01,DIF,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
IF(HJ_22>74.989998 OR HJ_29>0,DIF,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
DIF1:=ema(CLOSE,12) - EMA(CLOSE,26){XG51};
DEA1:=EMA(DIF1,9){XG51};
MACD1:=2*(DIF1-DEA1),STICK{XG51};
MACD2:=EMA(MACD1,3){XG51};
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,1,0),COLORWHITE{XG51};
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,1,0),COLORF00FF0{XG51};
STICKLINE(MACD1<MACD2,0,MACD1,1,0),COLORGREEN{XG51};
STICKLINE(MACD1>=0 OR MACD1<=0,0,0,50,1),COLORRED{XG51};
DIFF:DIF1,COLOR33FF33{XG51};
DEA3:DEA1,COLORBLUE{XG51};
MACD3:MACD1,NODRAW,COLORLIMAGENTA{XG51};
强:IF(DIF1>=DEA1,DIF1,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
低位金叉:= CROSS(DIFF,DEA) AND DIFF<(-0.1){XG51};
STICKLINE(低位金叉,0,-0.3,1,0),COLOR00FFFF{XG51};
DRAWTEXT(低位金叉,-0.3,' 低位金叉'),COLOR00FFFF{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.15,1,0),COLORFF00FF{XG51};
DRAWICON(二次金叉,DEA*1.04,1),COLOR0000FF{XG51};
DRAWTEXT(二次金叉,-0.15,' 二次金叉'),COLORFF00FF{XG51};
A1:= BARSLAST(REF(CROSS(DIFF,DEA),1)){XG51};
底背离:= REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA){XG51};
STICKLINE(底背离,0,0.15,1,0),COLOR00FF00{XG51};
DRAWLINE(A1=0,DEA,底背离,DEA,0),LINETHICK3,COLORRED{XG51};
DRAWTEXT(底背离,0.15,' 底背离'),COLOR00FF00{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};
DRAWLINE(A2=0,DEA,顶背离,DEA,0),LINETHICK3,COLORYELLOW{XG51};
AA:=C>REF(C,4){XG51};
NT:=BARSLASTCOUNT(AA){XG51};
TJ11:=NT=9{XG51};
TJ13:=ISLASTBAR AND BETWEEN(NT,5,8){XG51};
AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT{XG51};
DRAWTEXT(AY>0,MACD*1.02,VAR2STR(AY,0)),COLORLICYAN{XG51};
DRAWTEXT(NT=9,MACD*1.02,'9'),COLORCYAN{XG51};
B1:=C{XG51};
NT0:=BARSLASTCOUNT(B1){XG51};
TJ21:=NT0=9 {XG51};
TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8){XG51};
AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0{XG51};
DRAWTEXT(AY1>0,MACD*0.98,VAR2STR(AY1,0)),COLORCYAN{XG51};
DRAWTEXT(NT0=9,MACD*0.98,'9'),COLORWHITE{XG51};
DRAWICON(CROSS(DEA1,DIF1),DEA1,2){XG51};
N:=9; P1:=3; P2:=3{XG51};
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*2{XG51};
K:SMA(RSV,P1,1){XG51};
D:SMA(K,P2,1){XG51};
J:3*K-2*D{XG51};
IF(J>REF(J,1),J,DRAWNULL),COLORWHITE,LINETHICK3;
DRAWICON(CROSS(J,1),J,1){XG51};
DRAWICON(K>80 AND D>80 AND CROSS(D,K),D,2){XG51};
IF(J<0,J,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
IF(J>1.8,J,DRAWNULL),COLORRED,LINETHICK3{XG51};
IF(K>1.8,K,DRAWNULL),COLOR0000FF,LINETHICK2{XG51};
IF(D>1.9,D,DRAWNULL),COLORFFFF11,LINETHICK2{XG51};
VAR1:=(2*CLOSE+HIGH+LOW)/3{XG51};
VAR2:=EMA(EMA(EMA(VAR1,3),3),3){XG51};
J1: (VAR2-REF(VAR2,1))/REF(VAR2,1)*100, COLORSTICK{XG51};
D1: MA(J1,2){XG51};
K1: MA(J1,1),COLORWHITE{XG51};
DRAWTEXT(FILTER(CROSS(D1,K1)AND J1>0.2,5),D1+0.05,'S'),COLORWHITE{XG51};
DRAWTEXT(CROSS(K1,D1)AND J1<=-0.2,K1-0.05,'B'),COLORWHITE{X~G_5-1~C~N~{};