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

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

源码正文：

ma5:MA(CLOSE,5){XG51};
MA10:MA(CLOSE,10){XG51};
MA20:MA(CLOSE,20){XG51};
MA60:MA(CLOSE,60){XG51};
stICKLINE(C>O,C,O,3,0 ),COLOR000055{XG51};
STICKLINE(C>O,C,O,2.6,0 ),COLOR000077{XG51};
STICKLINE(C>O,C,O,2.1,0 ),COLOR000099{XG51};
STICKLINE(C>O,C,O,1.5,0 ),COLOR0000BB{XG51};
STICKLINE(C>O,C,O,0.9,0 ),COLOR0000DD{XG51};
STICKLINE(C>O,C,O,0.1,0 ),COLOR0000FF{XG51};
STICKLINE(C>O,H,L,0,0),COLORWHITE{XG51};
STICKLINE(C<O,H,L,0,0),COLORFF9900{XG51};
STICKLINE(C<O,C,O,0,0),COLORFF5500{XG51};
STICKLINE(C<O,C,O,3.1,0),COLORFF6600{XG51};
STICKLINE(C<O,C,O,2.4,0),COLORFF7700{XG51};
STICKLINE(C<O,C,O,2.0,0),COLORFF8800{XG51};
STICKLINE(C<O,C,O,1.6,0),COLORFF9900{XG51};
STICKLINE(C<O,C,O,1.2,0),COLORFFAA00{XG51};
STICKLINE(C<O,C,O,0.6,0),COLORFFCC00{XG51};
STICKLINE(C<O,C,O,0.1,0),COLORFFFF00{XG51};
RSV:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100{XG51};
K1:=SMA(RSV,10,1){XG51};
D1:=SMA(K1,5,1){XG51};
KK:=INTPART(K1){XG51};
DD0:=INTPART(D1){XG51};
TFXXS:=KK+DD0{XG51};
TGLD:=MOD(TFXXS,10){XG51};
TGLXS:=(TFXXS-REF(TFXXS,1))*10{XG51};
TYCFX:=TFXXS+TGLXS{XG51};
乖离系数:TGLXS,LINETHICK0,COLORCYAN,NODRAW{XG51};
DRAWTEXT_FIX(1,0.00,0,0,'所属地区:'),COLORRED{XG51};
DRAWTEXT_FIX(1,0.04,0,0,DYBLOCK),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.11,0,0,'所属行业:'),COLORRED{XG51};
DRAWTEXT_FIX(1,0.15,0,0,HYBLOCK),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.25,0,0,'概念题材:'),COLORRED{XG51};
DRAWTEXT_FIX(1,0.29,0,0,GNBLOCK),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0,0.05,0,'风格板块:'),COLORRED{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.04,0.05,0,FGBLOCK),COLORMAGENTA{XG51};
DRAWTEXT_FIX(ISLASTBAR,0,0.39,0,EXTERNSTR(0,3)),COLORRED{XG51};
DRAWTEXT_FIX(ISLASTBAR,0,0.36,0,EXTERNSTR(0,6)),COLORLIGREEN{XG51};
DRAWTEXT_FIX(ISLASTBAR,0,0.33,0,EXTERNSTR(0,12)),COLORLIBLUE{XG51};
DRAWTEXT_FIX(ISLASTBAR,0,0.3,0,EXTERNSTR(0,1)),COLORBLUE{XG51};
涨幅限制:=IF(NAMELIKE('ST') OR NAMELIKE('*ST') OR NAMELIKE('SST') OR NAMELIKE('S*ST'),105,110){XG51};
跌幅限制:=IF(NAMELIKE('ST') OR NAMELIKE('*ST') OR NAMELIKE('SST') OR NAMELIKE('S*ST'),95,90){XG51};
涨停:=ROUND(CLOSE*100)>=ROUND(REF(CLOSE,1)*涨幅限制) AND CLOSE=HIGH{XG51};
STICKLINE(涨停,C,O,3,0),COLORDD00DD{XG51};
STICKLINE(涨停,C,O,2,0),COLORFF00FF{XG51};
STICKLINE(涨停,C,O,1.5,0),COLORFF00FF{XG51};
STICKLINE(涨停,C,O,0.5,0),COLORFABBFF{XG51};
跌停:=ROUND(CLOSE*100)<=ROUND(REF(CLOSE,1)*跌幅限制+1) AND CLOSE=LOW{XG51};
STICKLINE(跌停,O,C,3,0),COLOR009900{XG51};
STICKLINE(跌停,O,C,2,0),COLOR009900{XG51};
STICKLINE(跌停,O,C,1.5,0),COLOR00BB00{XG51};
STICKLINE(跌停,L,H,0.5,0),COLOR00DD00{XG51};
圣:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100-10{XG51};
灵:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100{XG51};
石:=SMA(灵,13,8){XG51};
仙:=CEILING(SMA(石,13,8)){XG51};
编著:=SMA(圣,21,8){XG51};
AABB:=IF(L,CONST(L),DRAWNULL){XG51};

AAA:=(3*C+H+L+O)/6{XG51};
VAR1:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36{XG51};
VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3{XG51};
VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3{XG51};
VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3{XG51};
VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3{XG51};
VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3{XG51};

TJ1:=vol=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1{XG51};
立桩量:=FILTER(TJ1,5){XG51};
TJ2:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(HIGH,3),1,0))){XG51};
突破:=TJ2=1{XG51};
TJ3:=IF(BARSLAST(立桩量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立桩量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立桩量)=3 AND CLOSE>REF(LOW,3),1,0))){XG51};
三天法则:=TJ3=1{XG51};
成立:=三天法则 AND 突破{XG51};
条件成立:=FILTER(成立,3){XG51};
HIGHN:=10{XG51};
LOWN:=10{XG51};
HIGHDISPLAY:=0{XG51};
LOWDISPLAY:=0{XG51};
ZGDISPLAY:=0{XG51};
MADISPLAY:=0{XG51};
AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1){XG51};
QY:=BacKSET(AA,HIGHN+1){XG51};
CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1){XG51};
DDD:=BARSLAST(CC){XG51};
GDTS:=IF(CC,CURRBARSCOUNT,0){XG51};
DINGBU:=IF(DDD,REF(H,DDD),H){XG51};
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS){XG51};
DINGBU1:=REF(DINGBU,DDD+1){XG51};
GDCS1:=CONST(DINGBUTS){XG51};
DINGBUTS1:=REF(DINGBUTS,DDD+1){XG51};
GDCS2:=CONST(DINGBUTS1){XG51};
DINGBU2:=REF(DINGBU1,DDD+1){XG51};
MM:=IF(CURRBARSCOUNT>GDCS2,0,1){XG51};
AA1:=REF(L,LOWN)=LLV(L,2*LOWN+1){XG51};
QY1:=BACKSET(AA1,LOWN+1){XG51};
CC1:=FILTER(QY1,LOWN) AND L=LLV(L,LOWN+1){XG51};
DD1:=BARSLAST(CC1){XG51};
DDTS:=IF(CC1,CURRBARSCOUNT,0){XG51};
YDB:=IF(DD1,REF(L,DD1),L){XG51};
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS){XG51};
DDCS1:=CONST(DDTS1){XG51};
ZDB:=REF(YDB,DD1+1){XG51};
DDTS2:=REF(DDTS1,DD1+1){XG51};
DDCS2:=CONST(DDTS2){XG51};
VAR7:=0{XG51};
VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(Abs(CLOSE-REF(CLOSE,1)),7,1)*100{XG51};
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100{XG51};
VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0){XG51};
VAR11:=zig(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3){XG51};
VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3){XG51};
VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3){XG51};
VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3){XG51};
VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3){XG51};
VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3){XG51};
VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3){XG51};
VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3){XG51};
VAR19:=ema(CLOSE,2)-EMA(CLOSE,150){XG51};
买１:=VAR10{XG51};
买２:=(VAR11+VAR13+VAR15+VAR17){XG51};
卖１:=(VAR12+VAR14+VAR16+VAR18){XG51};
B:=IF(买１>0 OR 买２>0,LOW,DRAWNULL),COLORBLUE{XG51};
S:=IF(卖１>0,HIGH,DRAWNULL),COLORCYAN{XG51};
STICKLINE(S,O,C,3,0),COLORE9E9EE;
STICKLINE(S,O,C,2.5,0),COLORE5E5E5;
STICKLINE(S,O,C,1.5,0),COLORF7F7F7;
STICKLINE(S,O,C,0.5,0),COLORFFFFFF{XG51};
DRAWTEXT(crOSS(S,卖１),S,'←卖'),COLORRED{XG51};
STICKLINE(B,C,O,3,0),COLOR009999{XG51};
STICKLINE(B,C,O,2.5,0),COLOR00BBBB{XG51};
STICKLINE(B,C,O,1.5,0),COLOR00DDDD{XG51};
STICKLINE(B,C,O,0.5,0),COLOR00FFFF{XG51};
DRAWTEXT(CROSS(B,买１),B,'←买'),COLORWHITE{XG51};
ZB:=EMA(EMA(VAR3,5),5)*3, COLORSTICK{XG51};
VARA:=IF(VAR9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0){XG51};
K:=EMA(VAR7,5)*2, , COLORFF00FF{XG51};
D:=EMA(K,5), , COLORRED{XG51};
J:=K*3-D*2, ,COLORBLUE{XG51};
VARB:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5)) AND J>10{XG51};
HS:=VOL/CAPITAL*100, , COLORCYAN{XG51};
VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20{XG51};
VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1){XG51};
DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,LOW,'机构进场'),LINETHICK1,COLORBLUE{XG51};
VAR1A:=IF(VARE>0,VARE,0){XG51};
VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60{XG51};
VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100{XG51};
DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,LOW,'大顶（底）') COLORRED{XG51};
指标王:=CROSS(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1),SMA(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1),3,1)) AND SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1)<20{XG51};
DRAWTEXT(指标王,L,'主力建仓'),COLORBLUE{XG51};
DRAWTEXT(VAR1,L,'★短买'),COLORBLUE{XG51};
DRAWTEXT(CROSS(MA(C,3),MA(C,9)) AND C>=REF(C,1) AND C>O,L,'★加仓'),COLORBLUE{XG51};
DRAwrECTREL(0,500,147,999.4,IF(120,RGB(10,0,0),0));
压力:=MA(REF(HHV(C,30),1),2),COLORABFF46;
支撑:=MA(REF(LLV(C,30),1),2),COLOR9DFFFF{XG51};
总额:=AMOUNT{XG51};
买888:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L)){XG51};
买%:=买888/AMOUNT*100{XG51};
流入:=AMOUNT*买%/10000000000{XG51};
流出:=AMOUNT/100000000-流入{XG51};
净流:=(流入-流出){XG51};
总额3:=SUM(AMOUNT,3){XG51};
流入3:=SUM(流入,3){XG51};
流出3:=SUM(流出,3){XG51};
净流3:=SUM(流入-流出,3){XG51};
总额5:=SUM(AMOUNT,5){XG51};
流入5:=SUM(流入,5){XG51};
流出5:=SUM(流出,5){XG51};
净流5:=SUM(流入-流出,5){XG51};
总额10:=SUM(AMOUNT,10){XG51};
流入10:=SUM(流入,10){XG51};
流出10:=SUM(流出,10){XG51};
净流10:=SUM(流入-流出,10){XG51};
画:=CONST(FINDHIGH(总额10,0,190,1)){XG51};
超B:=L2_AMO(0,2)/10000.0{XG51};
大B:=L2_AMO(1,2)/10000.0{XG51};
中B:=L2_AMO(2,2)/10000.0{XG51};
小B:=L2_AMO(3,2)/10000.0{XG51};
超S:=L2_AMO(0,3)/10000.0{XG51};
大S:=L2_AMO(1,3)/10000.0{XG51};
中S:=L2_AMO(2,3)/10000.0{XG51};
小S:=L2_AMO(3,3)/10000.0{XG51};
TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0){XG51};
大宗进:=(超B)+(大B),NODRAW{XG51};
大宗出:=(超S)+(大S),NODRAW{XG51};
非大宗进:=(中B)+(小B),NODRAW{XG51};
非大宗出:=(中S)+(小S),NODRAW{XG51};
大宗进限制:=IF((超B+大B)=0,0,大宗进){XG51};
大宗出限制:=IF((超S+大S)=0,0,大宗出){XG51};
非大宗进限制:=IF(中B+小B=0,0,非大宗进){XG51};
非大宗出限制:=IF(中S+小S=0,0,非大宗出){XG51};
主力净流入:=(超B+大B)-(超S+大S),COLORWHITE,NODRAW{XG51};
散户净流入:=(中B+小B)-(中S+小S),COLORWHITE,NODRAW{XG51};
净流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S),COLORWHITE,NODRAW{XG51};
大单流入:=(超B+大B)/(超B+大B+超S+大S)*100,NODRAW{XG51};
大单流入限制:=IF((超B+大B+超S+大S)=0,0,大单流入){XG51};
大单流出比:=(超S+大S)/(超B+大B+超S+大S)*100,NODRAW{XG51};
大单流出限制:=IF((超B+大B+超S+大S)=0,0,大单流出比){XG51};
总流入比:=(超B+大B+中B+小B)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW{XG51};
总流出比:=(超S+大S+中S+小S)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW{XG51};
成交总量:=(超B+大B+中B+小B+超S+大S+中S+小S),NODRAW{XG51};
机构参与度:=(超B+超S+大B+大S)/成交总量*100,COLORBLUE,NODRAW{XG51};
大单强度:=(超B+大B-超S-大S)/成交总量*100,COLORBLUE,NODRAW{XG51};
大单强度限制:=IF(大单强度=0,-100,大单强度){XG51};
大单强度比:=IF(大单强度>=0,(大单强度限制+100)/2,100-ABS((大单强度限制-100)/2)),NODRAW{XG51};
超单强度:=(超B-超S)/(超B+超S)*100,COLORBLUE,NODRAW{XG51};
超单强度限制:=IF(超单强度=0,-100,超单强度){XG51};
超单强度比:=IF(超单强度>0,(超单强度限制+100)/2,IF(超单强度<0,100-ABS((超单强度限制-100)/2),0)),NODRAW{XG51};
DAZHIV:=CONST(MAX(ABS(大宗进),MAX(ABS(大宗出),MAX(ABS(非大宗进),ABS(非大宗出))))),NODRAW{XG51};
DRAWRECTREL(0,CONST(930-(ABS(大宗进)*250/DAZHIV)),35,950,IF(CONST(大宗进>0),RGB(255,0,0),RGB(23,125,255))){XG51};
DRAWRECTREL(37,CONST(930-(ABS(大宗出)*250/DAZHIV)),72,950,IF(CONST(大宗出>0),RGB(23,125,255),RGB(255,0,0))){XG51};
DRAWRECTREL(75,CONST(930-(ABS(非大宗进)*250/DAZHIV)),110,950,IF(CONST(非大宗进>0),RGB(255,0,0),RGB(23,125,255))){XG51};
DRAWRECTREL(112,CONST(930-(ABS(非大宗出)*250/DAZHIV)),147,950,IF(CONST(非大宗出>0),RGB(23,125,255),RGB(255,0,0))){XG51};
DRAWRECTREL(150,CONST(940-(ABS(净流入)*250/DAZHIV))-20,190,950,IF(CONST(净流入>0),RGB(200,0,0),RGB(0,125,50))){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.0001,0.9,0,STRCAT('',CON2STR(大宗进/1,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.036,0.9,0,STRCAT('',CON2STR(大宗出/1,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.074,0.9,0,STRCAT('',CON2STR(非大宗进/1,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.111,0.9,0,STRCAT('',CON2STR(非大宗出/1,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.150,0.9,0,STRCAT('',CON2STR(净流入/1,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.000,0.96,0,STRCAT(STRCAT(' 主力买卖 ',CON2STR(主力净流入,0)),'万')),COLORLIMAGENTA{XG51};
DRAWTEXT_FIX(1,0.078,0.96,0,STRCAT(STRCAT(' 散户买卖 ',CON2STR(散户净流入,0)),'万')),COLORGREEN{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.145,0.96,0,' 净流入:(万)'),COLORBLUE{XG51};
主力买力度:=LARGEINTRDVOL*1000/VOL{XG51};
主力卖力度:=LARGEOUTTRDVOL*1000/VOL{XG51};
AAD:=CONST(MAX(ABS(主力买力度),ABS(主力卖力度)))*4,NODRAW{XG51};
DRAWRECTREL(0,515,CONST(ABS(主力买力度)*560/AAD),568,IF(CONST(主力买力度)>0,RGB(255,0,0),RGB(0,50,0))){XG51};
DRAWRECTREL(0,570,CONST(ABS(主力卖力度)*560/AAD),623,IF(CONST(主力卖力度)>0,RGB(0,50,0),RGB(255,0,0))){XG51};
DRAWTEXT_FIX(1,0,0.524,0,STRCAT('主买力度:',CON2STR(主力买力度,0))),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0,0.576,0,STRCAT('主卖力度:',CON2STR(主力卖力度,0))),COLORBLUE{XG51};
ddx:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*1000/FINANCE(7){XG51};
DDY:=IF(TRADENUM>0,(TRADEOUTNUM-TRADEINNUM)*100/TRADENUM,0){XG51};
DDZ:=IF(TRADENUM>0,(LARGETRDINNUM-LARGETRDOUTNUM)/TRADENUM*100,0){XG51};
DRAWRECTREL(150,500,192,540,IF(CONST(DDX)>0,RGB(255,0,0),RGB(0,50,0))){XG51};
DRAWRECTREL(150,545,192,585,IF(CONST(DDY)>0,RGB(255,0,0),RGB(0,50,0))){XG51};
DRAWRECTREL(150,590,192,630,IF(CONST(DDZ)>0,RGB(255,0,0),RGB(0,50,0))){XG51};
DRAWTEXT_FIX(1,0.153,0.500,0,STRCAT('DDX:',CON2STR(DDX,1))),COLORBLUE,COLORRED{XG51};
DRAWTEXT_FIX(1,0.153,0.548,0,STRCAT('DDY:',CON2STR(DDY,1))),COLORBLUE,COLORRED{XG51};
DRAWTEXT_FIX(1,0.153,0.596,0,STRCAT('DDZ:',CON2STR(DDZ,1))),COLORBLUE,COLORRED{XG51};
T1:=IF (DDX>0 AND REF(DDX,1)<0,1,0){XG51};
T2:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)<0,2,T1){XG51};
T3:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)<0,3,T2){XG51};
T4:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)<0,4,T3){XG51};
T5:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)<0,5,T4){XG51};
T6:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)>0 AND REF(DDX,6)<0,6,T5){XG51};
T7:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)>0 AND REF(DDX,6)>0 AND REF(DDX,7)<0,7,T6){XG51};
T8:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)>0 AND REF(DDX,6)>0 AND REF(DDX,7)>0 AND REF(DDX,8)<0,8,T7){XG51};
T9:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)>0 AND REF(DDX,6)>0 AND REF(DDX,7)>0 AND REF(DDX,8)>0 AND REF(DDX,9)<0,9,T8){XG51};
T:=IF (DDX>0 AND REF(DDX,1)>0 AND REF(DDX,2)>0 AND REF(DDX,3)>0 AND REF(DDX,4)>0 AND REF(DDX,5)>0 AND REF(DDX,6)>0 AND REF(DDX,7)>0 AND REF(DDX,8)>0 AND REF(DDX,9)>0,10,T9){XG51};
DRAWTEXT_FIX(1,0.190,0.500,0,STRCAT(STRCAT(' ',CON2STR(T,0)),' [天] ')),COLORBLUE{XG51};
T11:=IF (DDY>0 AND REF(DDY,1)<0,1,0){XG51};
T21:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)<0,2,T11){XG51};
T31:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)<0,3,T21){XG51};
T41:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)<0,4,T31){XG51};
T51:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)<0,5,T41){XG51};
T61:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)>0 AND REF(DDY,6)<0,6,T51){XG51};
T71:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)>0 AND REF(DDY,6)>0 AND REF(DDY,7)<0,7,T61){XG51};
T81:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)>0 AND REF(DDY,6)>0 AND REF(DDY,7)>0 AND REF(DDY,8)<0,8,T71){XG51};
T91:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)>0 AND REF(DDY,6)>0 AND REF(DDY,7)>0 AND REF(DDY,8)>0 AND REF(DDY,9)<0,9,T81){XG51};
TY01:=IF (DDY>0 AND REF(DDY,1)>0 AND REF(DDY,2)>0 AND REF(DDY,3)>0 AND REF(DDY,4)>0 AND REF(DDY,5)>0 AND REF(DDY,6)>0 AND REF(DDY,7)>0 AND REF(DDY,8)>0 AND REF(DDY,9)>0,10,T91){XG51};
DRAWTEXT_FIX(1,0.190,0.548,0,STRCAT(STRCAT(' ',CON2STR(TY01,0)),' [天] ')),COLORBLUE{XG51};
T1Z:=IF (DDZ>0 AND REF(DDZ,2)<0,1,0){XG51};
T2Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)<0,2,T1Z){XG51};
T3Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)<0,3,T2Z){XG51};
T4Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)<0,4,T3Z){XG51};
T5Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)<0,5,T4Z){XG51};
T6Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)>0 AND REF(DDZ,6)<0,6,T5Z){XG51};
T7Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)>0 AND REF(DDZ,6)>0 AND REF(DDZ,7)<0,7,T6Z){XG51};
T8Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)>0 AND REF(DDZ,6)>0 AND REF(DDZ,7)>0 AND REF(DDZ,8)<0,8,T7Z){XG51};
T9Z:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)>0 AND REF(DDZ,6)>0 AND REF(DDZ,7)>0 AND REF(DDZ,8)>0 AND REF(DDZ,9)<0,9,T8Z){XG51};
TZ:=IF (DDZ>0 AND REF(DDZ,1)>0 AND REF(DDZ,2)>0 AND REF(DDZ,3)>0 AND REF(DDZ,4)>0 AND REF(DDZ,5)>0 AND REF(DDZ,6)>0 AND REF(DDZ,7)>0 AND REF(DDZ,8)>0 AND REF(DDZ,9)>0,10,T9Z){XG51};
DRAWTEXT_FIX(1,0.190,0.596,0,STRCAT(STRCAT(' ',CON2STR(TZ,0)),' [天] ')),COLORBLUE{X*G!5~1*C*N*{};

通达信大中三元主图未加密选股指标公式源码

源码正文：

A1:=(CLOSE/REF(CLOSE,1)-1)*100{XG51};
A2:=EVERY(A1>1,3){XG51};
A3:=SUM(A1,3)>12{XG51};
中三元:=A2 AND A3{XG51};
stICKLINE(中三元,C,O,3,0),COLOR00FFFF{XG51};
连续三天开盘高:=EVERY(O>REF(C,1),3){XG51};
{XG51};
三天涨幅大2.5:=EVERY(C>REF(C,1)*1.025,3){XG51};
三元连动:=连续三天开盘高 AND 三天涨幅大2.5{XG51};
STICKLINE(三元连动,C,O,2,0),COLOR4080FF{XG51};
三元连动1:=三天涨幅大2.5{XG51};
STICKLINE(三元连动1,C,O,0.5,0),COLORC080FF;

 {X?G*5_1?C?N?{};