通达信变异布林主图未加密选股指标公式源码

通达信变异布林主图未加密选股指标公式源码

源码正文：

N:=2;M:=30{XG51};
ma(H,M) * (1 + 13 / 100) * 1.0382,LINETHICK1,COLORFF7F00{XG51};
MA(H,M) * (1 + 13 / 100),LINETHICK1,COLORFF7F00{XG51};
VAR22:=IF(((YEAR) >= (2039)) AND ((MONTH) > 3),0,1);VAR33:=(MA(C,3) + MA(C,6) + MA(C,12) + MA(C,24)) / 4 + ((1.88) * (stD((MA(C,3) + MA(C,6) + MA(C,12) + MA(C,24)) / 4,9))) * (VAR22){XG51};
急拉涨停线:=((MA(VAR33,12)) * (1.06)) * (VAR22),LINETHICK2,COLORGREEN {XG51};
VAR55:=(ema(H,10)) * (1 + 5 / (100)){XG51};
VAR6:=C * V{XG51};
VAR7:=EMA(((EMA(VAR6,3)) / (EMA(V,3)) + (EMA(VAR6,6)) / (EMA(V,6)) + (EMA(VAR6,12)) / (EMA(V,12)) + (EMA(VAR6,24)) / (EMA(V,24))) / 4,13){XG51};
VAR8:=(1.06) * (VAR7);VAR9:=(L / ((H + REF(C,1) + O) / 3)) * C+0.01{XG51};
急拉:DRAWICON(((crOSS(VAR9,VAR8)) AND (C > (VAR55))) AND C/REF(C,1)>1.099 AND (C+0.01 >= (急拉涨停线)),L,26){XG51};
DRAWTEXT(((CROSS(VAR9,VAR8)) AND (C > (VAR55))) AND C/REF(C,1)>1.099 AND (C+0.01 >= (急拉涨停线)),L*0.97,'牛'),COLORBLUE{XG51};
M2:=(EMA(C,2)+EMA(C,3))/2,COLORGRAY,DOTLINE{XG51};
M5:=(EMA(C,5)+EMA(C,6))/2{XG51};
M12:=EMA(C,12){XG51};
bsBL:=M12+2*STD(M12,6),COLORRED,DOTLINE{XG51};
M26:=EMA(C,26){XG51};
CSBL:=M26+2*STD(M26,13),COLORLIMAGENTA,DOTLINE{XG51};
M56:=EMA(C,56){XG51};
DSBL:=M56+2*STD(M56,28),COLORBLUE,DOTLINE{XG51};
M120:=EMA(C,120){XG51};
ESBL:=M120+2*STD(M120,60),COLORLIGREEN,DOTLINE{XG51};
EXBL:=M120-2*STD(M120,60),COLORLIBLUE,DOTLINE{XG51};
M256:=EMA(C,256){XG51};
FSBL:=M256+2*STD(M256,256/2),COLORWHITE,DOTLINE{XG51};
JD:=INTPART(ABS(ATAN((M2/REF(M2,1)+M5/REF(M5,1)+M12/REF(M12,1)+M26/REF(M26,1)
+M56/REF(M56,1)+M120/REF(M120,1)+M256/REF(M256,1)-7)/7*100)*180/3.14)){XG51};
QZ:=IF(JD<=1,1,JD){XG51};
JDX:EMA(M56,QZ),COLORMAGENTA,LINETHICK2{XG51};
IF(M2<JDX,JDX,DRAWNULL),COLORLIRED,LINETHICK2{XG51};
AB1:=C>REF(C,4){XG51};
AB2:=BArslASTCOUNT(AB1){XG51};
AB3:=REF(AB2,1)=8 AND AB2>REF(AB2,1){XG51};
AB4:=REF(BETWEEN(AB2,5,8),1) AND AB2<REF(AB2,1){XG51};
AB5:=ISLASTBAR AND BETWEEN(AB2,6,8){XG51};
AB6:=(BacKSET(AB3>0,9) OR BACKSET(AB4>0,AB2+1)*0 OR BACKSET(AB5>0,AB2))*AB2{XG51};
DRAWTEXT(AB6>0,H+H*0.02,VAR2STR(AB6,0)),COLORFF00FF{XG51};
DRAWTEXT(AB2=9,H+H*0.02,'9'),COLOR00FF00{XG51};
B1:=C<REF(C,4){XG51};
B2:=BARSLASTCOUNT(B1){XG51};
B3:=REF(B2,1)=8 AND B2>REF(B2,1){XG51};
B4:=REF(BETWEEN(B2,5,8),1) AND B2<REF(B2,1){XG51};
B5:=ISLASTBAR AND BETWEEN(B2,6,8){XG51};
B6:=(BACKSET(B3>0,9) OR BACKSET(B4>0,B2+1)*0 OR BACKSET(B5>0,B2))*B2{XG51};
DRAWTEXT(B6>0,L-L*0.02,VAR2STR(B6,0)),COLOR00FF00{XG51};
DRAWTEXT(B2=9,L-L*0.02,'9'),COLORFF00FF{XG51};
NS:=8{XG51};
AA:=REF(H,NS)=HHV(H,2*NS+1);
AA1:=REF(L,NS)=LLV(L,2*NS+1){XG51};
QY:=BACKSET(AA,NS+1);
QY1:=BACKSET(AA1,NS+1){XG51};
CC:=FILTER(QY,NS) AND H=HHV(H,NS+1);
CC1:=FILTER(QY1,NS) AND L=LLV(L,NS+1){XG51};
DDD:=BARSLAST(CC);
DD2:=BARSLAST(CC1){XG51};
GDTS:=IF(CC,CURRBARSCOUNT,0){XG51};
DDTS:=IF(CC1,CURRBARSCOUNT,0){XG51};
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
DDTS1:=IF(DD2,REF(DDTS,DD2),DDTS){XG51};
GDCS1:=CONST(DINGBUTS);
DDCS1:=CONST(DDTS1){XG51};
GDCS13:=CONST(REF(HIGH,GDCS1-1));
DDCS13:=CONST(REF(L,DDCS1-1)){XG51};
DINGBUTS1:=REF(DINGBUTS,DDD+1);
DDTS2:=REF(DDTS1,DD2+1){XG51};
GDCS2:=CONST(DINGBUTS1);
DDCS2:=CONST(DDTS2);GDCS23:=CONST(REF(HIGH,DINGBUTS1-1));
DDCS23:=CONST(REF(L,DDTS2-1)){XG51};
XG1:=BACKSET(ISLASTBAR,GDCS1){XG51};
XD1:=BACKSET(ISLASTBAR,DDCS1){XG51};
XG2:=BACKSET(ISLASTBAR,DINGBUTS1);
XD2:=BACKSET(ISLASTBAR,DDTS2){XG51};
STICKLINE(XG2,GDCS23,GDCS23,2,0),COLORRED{XG51};
STICKLINE(XG1,GDCS13,GDCS13,2,0),COLORBLUE{XG51};
STICKLINE(XD2,DDCS23,DDCS23,2,0),COLORBROWN{XG51};
STICKLINE(XD1,DDCS13,DDCS13,2,0),COLORGREEN{XG51};
STICKLINE(C/REF(C,1)>=1.096 AND H=C,O,C,1.5,0),COLORWHITE{XG51};
VAR4:=EMA(CLOSE,24);
底:EMA(VAR4*80/100,5),COLORCYAN,LINETHICK1{XG51};
去除ST:=NOT(NAMELIKE('S') OR NAMELIKE('*')),NODRAW {XG51};
TJ1:=(REF(底,1)>REF(C,1) AND C>底 AND C>REF(C,1)*1.02 ) ,NODRAW{XG51};
TJ:=FILTER(TJ1,3) ,NODRAW;
DRAWICON(TJ1,L*0.98,44){XG51};
抛物线:SAR(4,2,20)COLORWHITE,LINETHICK1,DOTLINE{XG51};
操:=MA(C,5){XG51};
神秘线:HHV(操,13)DOTLINE,COLORFFB9CC{XG51};
L1:=IF((REF(C,1)-REF(C,2))/REF(C,2)>0.07,1,0){XG51};
L2:=IF(C>REF(C,1),1,0){XG51};
L3:=IF(H>O AND O>C AND C>L,1,0){XG51};
L4:=(REF(vol,0)-REF(VOL,1))/ REF(VOL,1)*100>30{XG51};
L5:=CAPITAL<20000000{XG51};
L6:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4{XG51};
假阴线:=IF(L1+L2+L3+L4=4,1,0) AND L5 AND L6>REF(L6,1) AND L4 AND FILTER(REF(C,1)<L AND C>=L AND VOL>=REF(VOL,1),1);DRAWICON(FILTER(L2>=75 AND CROSS(90,L2) AND L3>L4>COST(95)<(COST(99)-COST(1))/20*0.7,25),L*0.97,9){XG51};
STICKLINE(假阴线,OPEN,CLOSE,3,0),COLOR8000FF{XG51};
DRAWICON(假阴线,L*0.94,9){XG51};
RC1:=REF(C,1){XG51};
CS:=IF(C>=1,10000,100000){XG51};
C涨停10:=1.10*RC1-49/CS{XG51};
C涨停5 :=1.05*RC1-49/CS{XG51};
C跌停10:=0.90*RC1+51/CS{XG51};
C跌停5 :=0.95*RC1+51/CS{XG51};
ST:=NAMELIKE('S') OR NAMELIKE('*S'){XG51};
涨停:= IF(ST, C>=C涨停5, C>=C涨停10){XG51};
跌停:= IF(ST, C<=C跌停5, C<=C跌停10){XG51};
盘中涨停:=IF(ST, H>=C涨停5, H>=C涨停10){XG51};
盘中跌停:=IF(ST, L<=C跌停5, L<=C跌停10){XG51};
STICKLINE(盘中涨停,H,MAX(C,O),0,0),COLORRED{XG51};
STICKLINE(盘中跌停,L,MIN(C,O),0,0),COLOR00AA00{XG51};
大阳线:=C>O AND (C>=C涨停5 OR C>(1.05*O-51/CS) ) OR (C>1000 AND C>RC1*1.024){XG51};
STICKLINE(大阳线,OPEN,CLOSE,1,0),COLOR0000AA{XG51};
大阴线:=C<O AND (C<=C跌停5 OR C<(0.95*O+49/CS) ) OR (C>1000 AND C<RC1*0.976){XG51};
STICKLINE(大阴线,OPEN,CLOSE,1,0),COLOR2F4F2F{XG51};
STICKLINE(涨停,OPEN,CLOSE,2.5,0),COLORFF00FF{XG51};
STICKLINE(跌停,OPEN,CLOSE,2.5,0),COLORCYAN{XG51};
假阴:=C<O AND C>REF(C,1){XG51};
STICKLINE(假阴,O,C,0.5,0),COLORWHITE;{XG51};
假阳:=C>O AND C<REF(C,1){XG51};
STICKLINE(假阳,O,C,0.5,0),COLORCYAN;{XG51};
半分位:=(O+C)/2{XG51};
昨半分位:=REF(半分位,1){XG51};
STICKLINE(CURRBARSCOUNT<=1,昨半分位,昨半分位,12,0),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.18,0.06,1,'昨半分位'),LINETHICK5,COLORBLUE{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.22,0.06,1,昨半分位){XG51};
A7:=C-REF(C,1){XG51};
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6){XG51};
买:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2)){XG51};
DRAWTEXT(FILTER(买=1,5),LOW-0.05,'↖买'),COLORBLUE{XG51};
STICKLINE(买,OPEN,CLOSE,2,0),COLORBLUE{X-G?5^1-C-N-{};

通达信只吃中间未加密选股指标公式源码

源码正文：

短线:=ema(C,1.5){XG51};
周线:=Ema(C,5){XG51};
平衡线:=EMA(周线,5){XG51};
VARF1:=COUNT(crOSS(短线,平衡线),2)=1{XG51};
VARF2:=COUNT(CROSS(周线,平衡线),2)=1{XG51};
XG:FILTER(VARF1 AND VARF2,2){X_G_5~1_C_N_{};