通达信牛股分时分时主图公式 源码
{分时突破}
{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;
