通达信牛股分时分时主图公式 源码

{分时突破}

{MACD}

ZX:=DYNAINFO(3);

价位轴:ZX,COLORLICYAN;

DIFF0:= EMA(CLOSE,12) - EMA(CLOSE,26);

DEA0:= EMA(DIFF0,9);

攻击:=2*(DIFF0-DEA0)*2, COLORSTICK;

STICKLINE(攻击>REF(攻击,1) AND DIFF0>DEA0,攻击+ZX,ZX,1,0),COLORRED;

STICKLINE(攻击<REF(攻击,1) AND 攻击>0,攻击+ZX,ZX,1,0),COLORGREEN;

STICKLINE(攻击<REF(攻击,1) AND 攻击<0,攻击+ZX,ZX,1,0),COLORGREEN;

STICKLINE(攻击>REF(攻击,1) AND 攻击<0,攻击+ZX,ZX,1,0),COLORYELLOW;

分时顶:HHV(H,480),COLORRED,LINETHICK2;

现价:C,COLORWHITE,LINETHICK2;

W1:=C=HHV(C,20);

W2:=BARSLAST(W1);

W3:=IF(W2>0,REF(C,W2),REF(C,W2));

W4:=CROSS(C,REF(W3,1));

{均线5:MA(C,5)LINETHICK1,COLORCYAN;}

均价线:SUM(现价*V,240)/SUM(V,240),COLORYELLOW;

分时压力:MA(REF(HHV(C,30),1),2),COLORMAGENTA;

分时支撑:MA(REF(LLV(C,30),1),2),COLORBLUE;

DRAWICON(W4 AND COUNT(W4,5)=1,分时压力,9);

绝密线:EXPMA(C,17),COLORRED,LINETHICK2;

AA1:=(VOL/CLOSE)/3;

 AA2:=SUM((IF(((AA1>40) AND (CLOSE>(REF(CLOSE,1)))),AA1,0)),0);

 AA3:=SUM((IF(((AA1>40) AND (CLOSE<(REF(CLOSE,1)))),AA1,0)),0);

 AA4:=SUM((IF(((AA1<40) AND (CLOSE>(REF(CLOSE,1)))),AA1,0)),0);

 AA5:=SUM((IF(((AA1<40) AND (CLOSE<(REF(CLOSE,1)))),AA1,0)),0);

 AA6:=((AA2+AA3)+AA4)+AA5;

 AA7:=IF((BARSTATUS=2),((100*AA2)/AA6),0);

 AA8:=((IF((BARSTATUS=2),((100*AA3)/AA6),0)));

 AA9:=((IF((BARSTATUS=2),((100*AA4)/AA6),0)));

 AA10:=((IF((BARSTATUS=2),((100*AA5)/AA6),0)));

机买:=(AA2),LINETHICK0;

机卖:=(AA3),LINETHICK0;

散买:=(AA4);

散卖:=(AA5);

总买:=AA2+AA4;

总卖:=AA3+AA5;

机构买比:=机买/总买*0.1,LINETHICK0;

机构卖比:=机卖/总卖*0.1,LINETHICK0;

最新:CLOSE,LINETHICK2,COLORWHITE;

 AAB:=SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C));

 BB:=BETWEEN(C/AAB,C+H,C-H);

 DRAWTEXT( ISLASTBAR AND 最新>REF(最新,1),最新,STRCAT(' 涨▲',CON2STR(最新,2))),COLORMAGENTA;

 DRAWTEXT( ISLASTBAR AND 最新<REF(最新,1),最新,STRCAT(' 跌▼',CON2STR(最新,2))),COLOR00FF00;

均价11:SUM(C*V,240)/SUM(V,240),COLORYELLOW,LINETHICK2;

TT:=BARSCOUNT(C);

前高:=REF(HHV(H,TT),1);

突破:=CROSS(C,REF(HHV(H,TT),1)){ AND HHVBARS(VOL,TT)=0} AND C/均价11<1.09 AND TT>1 AND TT<240;

主力扫盘:=COUNT(突破,13)>=3 AND CROSS(C,REF(HHV(H,TT),1)){ AND HHVBARS(VOL,TT)=0};

 DRAWTEXT(主力扫盘,前高, '←扫盘'),COLORYELLOW;

已主力扫盘:=BARSLAST(主力扫盘)<13;

 DRAWTEXT(BARSLAST(主力扫盘)<8,(DYNAINFO(3))*9.5/10 , '↖已扫'),COLORGREEN;

全仓买进:=CROSS(C,REF(HHV(H,TT),1)) AND HHVBARS(VOL,TT)=0 AND C/均价11<1.09 AND TT>1 AND TT<240 AND BARSLAST(主力扫盘)>=21;

DRAWTEXT(全仓买进 ,前高, '←全仓'),COLORCYAN;

VAR1:=EMA(EMA(C,13),13);

控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;

 JJJ:=DYNAINFO(11);

 P:=55;

 S:=8;

 M1:=3;

能量:=(EMA(C,S)-EMA(C,P))*10;

空头:=EMA(能量,M1);

 BTJ11:=(C-JJJ)/JJJ<-0.03;

 BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2;

 BTJ3:=CROSS(能量,空头) AND 能量<-0.3;

 BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);

有庄:=BTJ811;

RSV:=(CLOSE-LLV(LOW,6))/(HHV(HIGH,6)-LLV(LOW,6))*80;

K:=SMA(RSV,2,1);

D:=SMA(K,2,1);

RS:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*80;

K1:=RS>=75;

K2:=RS<80;

HJ_2:=DYNAINFO(4)>0 AND HHV(HIGH,2)/LLV(LOW,2)<1.25 AND REF(CLOSE,1)<LLV(LOW,3)+(HHV(HIGH,3)-LLV(LOW,3))*0.85;

HJ_9:=EMA(CLOSE,2);

HJ_10:=EMA(CLOSE,3);

HJ_11:=MAX(HJ_9,HJ_10);

X2:=CLOSE>HJ_11 AND HJ_2 AND (CLOSE>REF(HHV(HIGH,2),1) AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.015);

DRAWTEXT(X2,C*0.999,'←准备注意买进'),COLORGREEN;

{牛熊线}

NX:=MA(((SLOPE(C,20)*5)+C),10);

{中枢}

B1:=HOUR=09 AND  MINUTE=45;

B20:=LLV(L,15);

B30:=BARSLAST(B1);

B4:=REF(B20,B30);

B5:CONST(B4),COLORFF80FF,CIRCLEDOT,LINETHICK2;

DRAWTEXT(CURRBARSCOUNT=20,B4,'分时支撑'),COLORYELLOW;

C1:=HOUR=09 AND  MINUTE=45;

C2:=HHV(H,15);

C3:=BARSLAST(C1);

C4:=REF(C2,C3);

C5:CONST(C4),COLORFF80FF,CIRCLEDOT,LINETHICK2;

DRAWTEXT(CURRBARSCOUNT=20,C4,'分时突破'),COLORRED;

{DRAWBAND(C5,RGB(204,204,204),B5,RGB(204,204,204));}

{MACD}

DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);

DEA:=EMA(DIF,9);

MACD10:=(DIF-DEA)*2;

AA0:=MACD10>00 AND DIF>0 AND DEA>0;

{捉牛信号}

A100:=HOUR=10 AND  MINUTE=0;

A20:=HHV(H,30);

A30:=BARSLAST(A100);

A40:=REF(A20,A30);

A50:=CONST(A40);

A80:=CLOSE>A50 AND REF(C<=A50,1) AND CLOSE>NX;

AB:=FILTER(A80,100);

A90:=DYNAINFO(3);

AC:=CLOSE<=A90*1.04 AND CLOSE>A90;

量比:=V/REF(MA(V,5),1);

XG:=AA0 AND AB AND AC AND A40>A90 AND 量比>=1;

DRAWICON(XG,A50,23);

{DRAWTEXT(CURRBARSCOUNT=20,A4,'强势区域'),COLORYELLOW;

D1:=HOUR=10 AND  MINUTE=0;

D2:=LLV(L,30);

D3:=BARSLAST(D1);

D4:=REF(D2,D3);

D5:CONST(D4),COLOR808080,CIRCLEDOT,LINETHICK2;

DRAWTEXT(CURRBARSCOUNT=20,D4,'底部区域'),COLORYELLOW;}

{均线突破中枢}

JJ1:=DAY!=REF(DAY,1);

JJ2:=BARSLAST(V>0 AND JJ1)+1;

JJ:=SUM(V*C,JJ2)/SUM(V,JJ2);

XG2:=CROSS(JJ,C5);

DRAWICON(XG2,JJ,23);

{TS:=(B4+C4)/2;

DRAWTEXT(XG2,TS,'回落靠近黄线买');}

VARA3:=HHV(CLOSE,90);

VARA4:=LLV(CLOSE,90);

VARA5:=VARA3 - VARA4;

VARA6:=EMA((CLOSE - VARA4)/VARA5 - 0.5,14);

ZLSP:=VARA6*20;

VARA7:=REF(HHV(CLOSE,66),2);

VARA8:=CROSS(CLOSE,VARA7) AND (HHV(CLOSE,110)/LLV(CLOSE,110) - 1) * 100 < 45 AND ZLSP < 5.666;

VARA11:=15* FILTER(VARA8,41);

XG0:HHV(H,480),DOTLINE,COLORCYAN;

DRAWTEXT(FILTER(CROSS(C,REF(XG,1)),10) AND C>REF(XG,1),C*0.995,'突'),COLORYELLOW;

RQ:=DATETODAY(DATE)-DATETODAY(REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT))+1;

JY:=BARSLAST((RQ-REF(RQ,1))!=WEEKDAY-REF(WEEKDAY,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0)+1;

MA1:=REF(C,JY);

MA2:=REF(MA1,JY);

MA3:=REF(MA2,JY);

MA4:=REF(MA3,JY);

MA5:=REF(MA4,JY);

MA6:=REF(MA5,JY);

MA7:=REF(MA6,JY);

MA8:=REF(MA7,JY);

MA9:=REF(MA8,JY);

H1:=MAX(DYNAINFO(3),DYNAINFO(5));

L1:=MIN(DYNAINFO(3),DYNAINFO(6));

P1:=H1-L1;

阻力:L1+P1*8/9,COLORLIRED,DOTLINE;

支撑:L1+P1*0.5/9,COLORGREEN,DOTLINE;

均线: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))),COLORYELLOW,DOTLINE;

DIFF:=(EMA(CLOSE,12)-EMA(CLOSE,26))+DYNAINFO(3);

DEAA:=EMA(DIFF,9);

MACD1:=10*(DIFF-DEAA);

MACD2:=EMA(MACD1,2);

XX:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE));

主力:=EXPMA(CLOSE/XX,20);大户:=EXPMA(CLOSE/XX,60);散户:=EXPMA(CLOSE/XX,120);

底:=1;1.022,NODRAW;高:=1.033;

DRAWTEXT(CROSS(主力,1.02),C*0.999,'  拉'),COLORMAGENTA;

DRAWICON(CROSS(主力,1.04),C,26);

DRAWTEXT(CROSS(主力,1.04),C*0.999,'  冲'),COLORRED;

A1:=(VOL/CLOSE)/3;

A2:=SUM((IF(((A1>40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0);

A3:=SUM((IF(((A1>40) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0);

A4:=SUM((IF(((A1<40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0);

A5:=SUM((IF(((A1<40) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0);

A6:=((A2+A3)+A4)+A5;

A7:=IF((BARSTATUS=2),((100*A2)/A6),0);

A8:=((IF((BARSTATUS=2),((100*A3)/A6),0)));

A9:=((IF((BARSTATUS=2),((100*A4)/A6),0)));

A10:=((IF((BARSTATUS=2),((100*A5)/A6),0)));

DRAWICON(LONGCROSS(支撑,C,2),C-0.01,23);

DRAWTEXT(LONGCROSS(C,阻力,2),C+0.01,'  卖'),COLORGREEN;

DRAWICON(LONGCROSS(C,阻力,2),C+0.01,15);

量价:=(VOL/CLOSE)/3;

B2:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0);

B3:=SUM((IF(((量价>0.20) AND (CLOSE<(REF(CLOSE,1)))),量价,0)),0);

B6:=B2+B3;DD1:=1;比:=B2/B3;

D1:=YEAR AND MONTH AND DAY;

BA1:=STRCAT(CON2STR(YEAR,0),'年');

BA2:=STRCAT(CON2STR(MONTH,0),'月');

BA3:=STRCAT(CON2STR(DAY,0),'日');

BA4:=STRCAT('星期',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',IF(WEEKDAY=6,'六','日')))))));

AA:=STRCAT(STRCAT(STRCAT(BA1,BA2),STRCAT(BA3,BA4)),'');

DRAWTEXT_FIX(D1,0.905,0,0,AA),COLORGRAY;

WA1:=V*C/100;

WA2:=SUM((IF(((WA1/8>20) AND (CLOSE>(REF(CLOSE,1)))),WA1,0)),0);

WA3:=SUM((IF(((WA1/8>20) AND (CLOSE<(REF(CLOSE,1)))),WA1,0)),0);

WA4:=SUM((IF(((WA1/8<20) AND (CLOSE>(REF(CLOSE,1)))),WA1,0)),0);

WA5:=SUM((IF(((WA1/8<20) AND (CLOSE<(REF(CLOSE,1)))),WA1,0)),0);

WA6:=((A2+A3)+A4)+A5;

WA7:=IF((ISLASTBAR),((100*WA2)/WA6),0);

WA8:=IF((ISLASTBAR),((100*WA3)/WA6),0);

WA9:=IF((ISLASTBAR),((100*WA4)/WA6),0);

WA10:=IF((ISLASTBAR),((100*WA5)/WA6),0);

机构买盘:=(WA2);

机构卖盘:=(WA3);

散户买盘:=(WA4);

散户卖盘:=(WA5);

DRAWTEXT_FIX(1,0.752,1-0.088,0,STRCAT(STRCAT('【机构买盘】',CON2STR(机构买盘,2)),' 万')),COLORRED;

DRAWTEXT_FIX(1,0.883,1-0.088,0,STRCAT(STRCAT('【机构卖盘】',CON2STR(机构卖盘,2)),' 万')),COLORGREEN;

敢死队:= (EXPMA(CLOSE,500)-REF(EXPMA(CLOSE,500),1))/REF(EXPMA(CLOSE,500),1)*100;

GSD11:=CROSS(EXPMA(敢死队,120)-0.0004,EXPMA(敢死队,200));

XGG:=(GSD11);

均价:SUM(V*C,0)/SUM(V,0),COLORYELLOW;

地:=EMA(均价,50)/0.99,LINETHICK2,COLORGREEN;

均价1:SUM(V*C,0)/SUM(V,0),COLORYELLOW;

地1:=EMA(均价1,50)/0.97,LINETHICK2,COLORGREEN;

如果:IF(地>REF(地,1),地,DRAWNULL),COLORRED,LINETHICK2;

买单次数:=COUNT(V>2000 AND C>REF(C,1),0) AND XG;

时间:=TIME2=100100;

N:=BARSLAST(时间);

C11:CONST(IF(N,MAX(REF(HHV(H,0),N+1),DYNAINFO(4)),HHV(H,0))),DOTLINE,COLORRED;

C21:CONST(IF(N,MIN(REF(LLV(L,0),N+1),DYNAINFO(4)),LLV(L,0))),DOTLINE,COLORGREEN;

C31:(C11+C21)/2,DOTLINE,COLORYELLOW;

VV:=HHV(V,0);

ZF:=(C11/C21-1)*100;

DRAWTEXT(CURRBARSCOUNT=2,C11,VARCAT(VARCAT(VARCAT(VARCAT('上限:',VAR2STR(C1,2)),'元,'),VARCAT('振幅:',VAR2STR(ZF,2))),'%')),COLORRED;

DRAWTEXT(CURRBARSCOUNT=2,C31,VARCAT(VARCAT('中限:',VAR2STR(C31,2)),'元')),COLORYELLOW;

DRAWTEXT(CURRBARSCOUNT=2,C21,VARCAT(VARCAT('下限:',VAR2STR(C21,2)),'元')),COLORGREEN;

DRAWTEXT(C11/C21<=1.03 AND CROSS(C,C11) AND V>=VV,C11*1.005,'↙准备买入')COLORRED;

DRAWTEXT(C11/C21<=1.03 AND CROSS(C21,C) AND V>=VV,C21*0.998,'★卖出')COLORGREEN;