通达信盘口资金分时指标公式[万物公式]

VAR1:=IF(DATE<=1231031,1,0);

{XG:HHV(H,480),DOTLINE,COLORCYAN;}

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*VAR1;

支撑:=L1+P1*0.5/9*VAR1;

{均线: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;}

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

DEA:=EMA(DIF,9);

macd1:=10*(DIF-DEA);

MacD2:=EMA(MACD1,2);

STICKLINE(MACD1>=MACD2 AND MACD1>=0,DYNAINFO(3),MACD1+DYNAINFO(3),0,-1),COLORLIGRAY;

STICKLINE(MACD10,DYNAINFO(3),MACD1+DYNAINFO(3),0,-1),COLORLICYAN;

STICKLINE(MACD1>=MACD2 AND MACD1<0,DYNAINFO(3),MACD1+DYNAINFO(3),0,-1),COLORLIGRAY;

STICKLINE(MACD1

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,45);

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)));

DRAWTEXT(LONGCROSS(支撑,C,2),C-0.01, 买入),COLOR0000FF,LINETHICK2;

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

STICKLINE(LONGCROSS(支撑,C,2),C,阻力,0,-1),COLORCYAN;

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

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

STICKLINE(LONGCROSS(C,阻力,2),C,支撑,0,-1),COLORRED;

量价:=(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.002,1-0.138,0,STRCAT(STRCAT(【机构买盘】,CON2STR(机构买盘,2)), 万))*VAR1,COLORRED;

DRAWTEXT_FIX(1,0.002,1-0.001,0,STRCAT(STRCAT(【机构卖盘】,CON2STR(机构卖盘,2)), 万))*VAR1,COLORGREEN;

DRAWTEXT_FIX(1,0.332,1-0.138,0,STRCAT(STRCAT(【大户买盘】,CON2STR(大户买盘,2)), 万))*VAR1,COLORMAGENTA;

DRAWTEXT_FIX(1,0.332,1-0.001,0,STRCAT(STRCAT(【大户卖盘】,CON2STR(大户卖盘,2)), 万))*VAR1,COLORCYAN;