通达信超短分时T+0分时主力附图未加密选股指标公式源码

这个指标使用很久了，忘了是从那里弄到的，里面的理念非常好，特别是有情提示”满仓买入“这个超级牛逼，和”卖出“也很及时，因为你们有人说想我给你们提供分时打板指标，就把这个分享给你们使用吧，代码全开源，你们可以去研究。
XG:HHV(H,480),DOTLINE,COLORGREEN{XG51};
RQ:=DATETODAY(DATE)-DATETODAY(REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT))+1{XG51};
JY:=BArslAST((RQ-REF(RQ,1))!=WEEKDAY-REF(WEEKDAY,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0)+1{XG51};
ma1:=REF(C,JY){XG51};
MA2:=REF(MA1,JY){XG51};
MA3:=REF(MA2,JY){XG51};
MA4:=REF(MA3,JY){XG51};
MA5:=REF(MA4,JY){XG51};
MA6:=REF(MA5,JY){XG51};
MA7:=REF(MA6,JY){XG51};
MA8:=REF(MA7,JY){XG51};
MA9:=REF(MA8,JY){XG51};
H1:=MAX(DYnaINFO(3),DYNAINFO(5)){XG51};
L1:=MIN(DYNAINFO(3),DYNAINFO(6)){XG51};
P1:=H1-L1{XG51};
阻力:L1+P1*8/9,COLORLICYAN,DOTLINE{XG51};
支撑:L1+P1*0.5/9,COLORCYAN,DOTLINE{XG51};
均线:IF(BETWEEN(C/(SUM(AMOUNT,0)/SUM(vol*100,0)),1.05,0.95)=0,MA(C,0),(SUM(AMOUNT,0)/SUM(VOL*100,0))),COLORBLUE,DOTLINE{XG51};
dif:=(ema(CLOSE,12)-EMA(CLOSE,26))+DYNAINFO(3){XG51};
DEA:=EMA(DIF,9){XG51};
MacD1:=10*(DIF-DEA){XG51};
macd2:=EMA(MACD1,2){XG51};
STICKLINE(MACD1>=MACD2 AND MACD1>=0,DYNAINFO(3),MACD1+DYNAINFO(3),0,-1),COLORBLACK{XG51};
STICKLINE(MACD1<MACD2 AND MACD1>0,DYNAINFO(3),MACD1+DYNAINFO(3),0,-1),COLORLIRED{XG51};
STICKLINE(MACD1>=MACD2 AND MACD1<0,DYNAINFO(3),MACD1+DYNAINFO(3),0,-1),COLORBLACK{XG51};
STICKLINE(MACD1<MACD2 AND MACD1<0,DYNAINFO(3),MACD1+DYNAINFO(3),0,-1),COLORLIBLUE{XG51};
XX:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE)){XG51};
主力:=expma(CLOSE/XX,20);大户:=EXPMA(CLOSE/XX,60);散户:=EXPMA(CLOSE/XX,120){XG51};
底:=1;1.022,NODRAW;高:=1.033{XG51};
DRAWTEXT(crOSS(主力,1.02),C*0.999,' 拉'),COLORLIMAGENTA{XG51};
DRAWICON(CROSS(主力,1.04),C,45){XG51};
DRAWTEXT(CROSS(主力,1.04),C*0.999,' 冲'),COLORWHITE{XG51};
A1:=(VOL/CLOSE)/3{XG51};
A2:=SUM((IF(((A1>40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0){XG51};
A3:=SUM((IF(((A1>40) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0){XG51};
A4:=SUM((IF(((A1<40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0){XG51};
A5:=SUM((IF(((A1<40) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0){XG51};
A6:=((A2+A3)+A4)+A5{XG51};
A7:=IF((BARSTATUS=2),((100*A2)/A6),0){XG51};
A8:=((IF((BARSTATUS=2),((100*A3)/A6),0))){XG51};
A9:=((IF((BARSTATUS=2),((100*A4)/A6),0))){XG51};
A10:=((IF((BARSTATUS=2),((100*A5)/A6),0))){XG51};
DRAWTEXT(LONGCROSS(支撑,C,2),C-0.01,' 买入'),COLOR0000FF{XG51};
DRAWICON(LONGCROSS(支撑,C,2),C-0.01,1){XG51};
STICKLINE(LONGCROSS(支撑,C,2),C,阻力,0,-1),COLORGREEN{XG51};
DRAWTEXT(LONGCROSS(C,阻力,2),C+0.01,' 卖出'),COLORCYAN{XG51};
DRAWICON(LONGCROSS(C,阻力,2),C+0.01,45){XG51};
STICKLINE(LONGCROSS(C,阻力,2),C,支撑,0,-1),COLORWHITE{XG51};
量价:=(VOL/CLOSE)/3{XG51};
B2:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0){XG51};
B3:=SUM((IF(((量价>0.20) AND (CLOSE<(REF(CLOSE,1)))),量价,0)),0){XG51};
B6:=B2+B3;DD1:=1;比:=B2/B3{XG51};
D1:=YEAR AND MONTH AND DAY{XG51};
BA1:=STRCAT(CON2STR(YEAR,0),'年'){XG51};
BA2:=STRCAT(CON2STR(MONTH,0),'月'){XG51};
BA3:=STRCAT(CON2STR(DAY,0),'日'){XG51};
BA4:=STRCAT('星期',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',IF(WEEKDAY=6,'六','日'))))))){XG51};
AA:=STRCAT(STRCAT(STRCAT(BA1,BA2),STRCAT(BA3,BA4)),''){XG51};
DRAWTEXT_FIX(D1,0.905,0,0,AA),COLORBROWN{XG51};
WA1:=V*C/100{XG51};
WA2:=SUM((IF(((WA1/8>20) AND (CLOSE>(REF(CLOSE,1)))),WA1,0)),0){XG51};
WA3:=SUM((IF(((WA1/8>20) AND (CLOSE<(REF(CLOSE,1)))),WA1,0)),0){XG51};
WA4:=SUM((IF(((WA1/8<20) AND (CLOSE>(REF(CLOSE,1)))),WA1,0)),0){XG51};
WA5:=SUM((IF(((WA1/8<20) AND (CLOSE<(REF(CLOSE,1)))),WA1,0)),0){XG51};
WA6:=((A2+A3)+A4)+A5{XG51};
WA7:=IF((ISLASTBAR),((100*WA2)/WA6),0){XG51};
WA8:=IF((ISLASTBAR),((100*WA3)/WA6),0){XG51};
WA9:=IF((ISLASTBAR),((100*WA4)/WA6),0){XG51};
WA10:=IF((ISLASTBAR),((100*WA5)/WA6),0){XG51};
机构买盘:=(WA2){XG51};
机构卖盘:=(WA3){XG51};
散户买盘:=(WA4){XG51};
散户卖盘:=(WA5){XG51};
DRAWTEXT_FIX(1,0.752,1-0.088,0,STRCAT(STRCAT('【机构买盘】',CON2STR(机构买盘,2)),' 万')),COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.752,1-0.001,0,STRCAT(STRCAT('【机构卖盘】',CON2STR(机构卖盘,2)),' 万')),COLORCYAN{XG51};
DRAWTEXT_FIX(1,0.883,1-0.088,0,STRCAT(STRCAT('【散户买盘】',CON2STR(散户买盘,2)),' 万')),COLORLIMAGENTA{XG51};
DRAWTEXT_FIX(1,0.883,1-0.001,0,STRCAT(STRCAT('【散户卖盘】',CON2STR(散户卖盘,2)),' 万')),COLORGREEN{XG51};

{*W!W.W-X_G_5-1-C+N+{*}

通达信炫酷布林一主两副套装未加密选股指标公式源码

源码正文：

使用说明:
绝非华而不实的布林指标一套（一主图两副图），趋势、通道、位置、幅度、方向、级别、粘合、发散、乖离、极限、盘整、突破。

BOLL0:=ma(CLOSE,10){XG51};
UPPER0:=BOLL0+2*stD(CLOSE,10){XG51};
LOWER0:=BOLL0-2*STD(CLOSE,10){XG51};
DRAWBAND(UPPER0,RGB(100,200,100),BOLL0,0){XG51};
DRAWBAND(BOLL0,RGB(50,150,50),LOWER0,0){XG51};
BOLL1:=MA(CLOSE,20){XG51};
UPPER1:=BOLL1+2*STD(CLOSE,20){XG51};
LOWER1:=BOLL1-2*STD(CLOSE,20){XG51};
DRAWBAND(UPPER1,RGB(255,220,0),BOLL1,0){XG51};
DRAWBAND(BOLL1,RGB(255,160,0),LOWER1,0){XG51};
BOLL2:=MA(CLOSE,30){XG51};
UPPER2:=BOLL2+2*STD(CLOSE,30){XG51};
LOWER2:=BOLL2-2*STD(CLOSE,30){XG51};
DRAWBAND(UPPER2,RGB(0,160,255),BOLL2,0){XG51};
DRAWBAND(BOLL2,RGB(0,160,255),LOWER2,0){XG51};
BOLL3:=MA(CLOSE,60){XG51};
UPPER3:=BOLL3+2*STD(CLOSE,60){XG51};
LOWER3:=BOLL3-2*STD(CLOSE,60){XG51};
DRAWBAND(UPPER3,RGB(200,160,255),BOLL3,0){XG51};
DRAWBAND(BOLL3,RGB(150,100,255),LOWER3,0){XG51};
BOLL4:=MA(CLOSE,120){XG51};
UPPER4:=BOLL4+2*STD(CLOSE,120){XG51};
LOWER4:=BOLL4-2*STD(CLOSE,120){XG51};
DRAWBAND(UPPER4,RGB(0,100,255),BOLL4,0){XG51};
DRAWBAND(BOLL4,RGB(0,100,255),LOWER4,0){XG51};
UMID:=(BOLL4+UPPER4)/2{XG51};
LMID:=(BOLL4+LOWER4)/2{XG51};
DRAWBAND(UMID,RGB(0,170,255),BOLL4,0){XG51};
DRAWBAND(BOLL4,RGB(0,140,255),LMID,0){XG51};
dif1:=ema(CLOSE,10)-EMA(CLOSE,120){XG51};
DEA1:=EMA(DIF1,9){XG51};
macd1:=(DIF1-DEA1)*2{XG51};
STICKLINE(MacD1>0,BOLL4,BOLL4+MACD1,0.35,0),COLORWHITE{XG51};
STICKLINE(MACD1<0,BOLL4,BOLL4+MACD1,0.35,0),COLORYELLOW{XG51};
MA120:BOLL4,COLORWHITE,LINETHICK5{XG51};
IF(BOLL4<REF(BOLL4,1),BOLL4,DRAWNULL),COLORYELLOW,LINETHICK5{XG51};
MA60:BOLL3,COLORWHITE,LINETHICK4{XG51};
IF(BOLL3<REF(BOLL3,1),BOLL3,DRAWNULL),COLORYELLOW,LINETHICK4{XG51};
MA30:BOLL2,COLORWHITE,LINETHICK3{XG51};
IF(BOLL2<REF(BOLL2,1),BOLL2,DRAWNULL),COLORYELLOW,LINETHICK3{XG51};
MA20:BOLL1,COLORWHITE,LINETHICK2{XG51};
IF(BOLL1<REF(BOLL1,1),BOLL1,DRAWNULL),COLORYELLOW,LINETHICK2{XG51};
MA10:BOLL0,COLORWHITE,LINETHICK1{XG51};
IF(BOLL0<REF(BOLL0,1),BOLL0,DRAWNULL),COLORYELLOW,LINETHICK1{XG51};
DRAWKLINE(H,O,L,C);

BOLL0:=MA(CLOSE,10){XG51};
UPPER0:=BOLL0+2*STD(CLOSE,10){XG51};
LOWER0:=BOLL0-2*STD(CLOSE,10){XG51};
BOLL1:=MA(CLOSE,20){XG51};
UPPER1:=BOLL1+2*STD(CLOSE,20){XG51};
LOWER1:=BOLL1-2*STD(CLOSE,20){XG51};
BOLL2:=MA(CLOSE,30){XG51};
UPPER2:=BOLL2+2*STD(CLOSE,30){XG51};
LOWER2:=BOLL2-2*STD(CLOSE,30){XG51};
BOLL3:=MA(CLOSE,60){XG51};
UPPER3:=BOLL3+2*STD(CLOSE,60){XG51};
LOWER3:=BOLL3-2*STD(CLOSE,60){XG51};
BOLL4:=MA(CLOSE,120){XG51};
UPPER4:=BOLL4+2*STD(CLOSE,120){XG51};
LOWER4:=BOLL4-2*STD(CLOSE,120){XG51};
JX4A:=UPPER4-BOLL4{XG51};
JX4B:=LOWER4-BOLL4{XG51};
DRAWBAND(JX4A,RGB(0,120,255),0,0){XG51};
DRAWBAND(0,RGB(0,100,255),JX4B,0){XG51};
JX3A:=UPPER3-BOLL3{XG51};
JX3B:=LOWER3-BOLL3{XG51};
DRAWBAND(JX3A,RGB(200,160,255),0,0){XG51};
DRAWBAND(0,RGB(150,100,255),JX3B,0){XG51};
JX2A:=UPPER2-BOLL2{XG51};
JX2B:=LOWER2-BOLL2{XG51};
DRAWBAND(JX2A,RGB(0,200,255),0,0){XG51};
DRAWBAND(0,RGB(0,160,255),JX2B,0){XG51};
JX1A:=UPPER1-BOLL1{XG51};
JX1B:=LOWER1-BOLL1{XG51};
DRAWBAND(JX1A,RGB(255,220,0),0,0){XG51};
DRAWBAND(0,RGB(255,160,0),JX1B,0){XG51};
JX0A:=UPPER0-BOLL0{XG51};
JX0B:=LOWER0-BOLL0{XG51};
DRAWBAND(JX0A,RGB(100,200,100),0,0){XG51};
DRAWBAND(0,RGB(50,150,50),JX0B,0){XG51};
GL0:C-BOLL0,COLORWHITE,LINETHICK1{XG51};
GL1:C-BOLL1,COLORWHITE,LINETHICK2{XG51};
GL2:C-BOLL2,COLORWHITE,LINETHICK3{XG51};
GL3:C-BOLL3,COLORWHITE,LINETHICK4{XG51};
GL4:C-BOLL4,COLORWHITE,LINETHICK5{XG51};
IF(GL0<0,GL0,DRAWNULL),COLORYELLOW,LINETHICK1{XG51};
IF(GL1<0,GL1,DRAWNULL),COLORYELLOW,LINETHICK2{XG51};
IF(GL2<0,GL2,DRAWNULL),COLORYELLOW,LINETHICK3{XG51};
IF(GL3<0,GL3,DRAWNULL),COLORYELLOW,LINETHICK4{XG51};
IF(GL4<0,GL4,DRAWNULL),COLORYELLOW,LINETHICK5;

DRAWBAND(100,RGB(0,140,255),0,0){XG51};
DRAWBAND(0,RGB(0,100,255),-100,0){XG51};
JC:0,NODRAW{XG51};
ST:50,POINTDOT,COLORRED{XG51};
SW:-50,POINTDOT,COLORRED{XG51};
VAR10:=MA(CLOSE,10){XG51};
BB10:=50*(CLOSE-VAR10)/STD(CLOSE,10){XG51};
VAR20:=MA(CLOSE,20){XG51};
BB20:=50*(CLOSE-VAR20)/STD(CLOSE,20){XG51};
VAR60:=MA(CLOSE,60){XG51};
BB60:=60*(CLOSE-VAR60)/STD(CLOSE,60){XG51};
VAR120:=MA(CLOSE,120){XG51};
BB120:=50*(CLOSE-VAR120)/STD(CLOSE,120){XG51};
BBJX:(BB10+BB20+BB60+BB120)/4,COLORRED{XG51};
BBK1:EMA(BBJX,5),COLORWHITE{XG51};
BBK2:EMA(BBK1,5),COLORWHITE,LINETHICK2{XG51};
BBK3:EMA(BBK2,5),COLORWHITE,LINETHICK3{XG51};
IF(BBK1<REF(BBK1,1),BBK1,DRAWNULL),COLORYELLOW{XG51};
IF(BBK2<REF(BBK2,1),BBK2,DRAWNULL),COLORYELLOW,LINETHICK2{XG51};
IF(BBK3<REF(BBK3,1),BBK3,DRAWNULL),COLORYELLOW,LINETHICK3{X*G.5=1*C*N*{};