[通达信指标]分时7 分时买卖 机构散户筹码公式源码

HH:=REF(HHV(H,500),60);

LL:=REF(LLV(L,500),60);

H1:=HH-(HH-LL)*1;H2:=HH-(HH-LL)*0.91;

H3:=HH-(HH-LL)*0.85;H4:=HH-(HH-LL)*0.809;

H5:=HH-(HH-LL)*0.777;H6:=HH-(HH-LL)*0.707;

H7:=HH-(HH-LL)*0.666;H8:=HH-(HH-LL)*0.618;

H9:=HH-(HH-LL)*0.563;H10:=HH-(HH-LL)*0.5;

H11:=HH-(HH-LL)*0.424;

H12:=HH-(HH-LL)*0.382;

H13:=HH-(HH-LL)*0.309;

H14:=HH-(HH-LL)*0.25;

H15:=HH-(HH-LL)*0.191;

H16:=HH-(HH-LL)*0.1375;

H17:=HH-(HH-LL)*0.0807;

ZHICHENG1:REFDATE(H2,DATE),COLORLIBLUE,DOTLINE;

ZHICHENG2:REFDATE(H8,DATE),,DOTLINE,COLORGRAY;

ZHICHENG3:REFDATE(H17,DATE),COLORYELLOW,DOTLINE;

底:REFDATE(H1,DATE),COLORLIGREEN;

顶:REFDATE(HH,DATE),COLORLIRED;

DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

买:=CROSS(C,ZHICHENG1);

卖:=CROSS(ZHICHENG3,C);

DRAWICON(买,底,1);

DRAWICON(卖,顶,2);

N:=3;FF:=(C-REF(C,N))/REF(C,N);

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

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

AP1:=AH1-AL1;阻力:=AL1+AP1*7/8;

支撑:=AL1+AP1*0.5/8;

现价:=CLOSE;DRAWTEXT(LONGCROSS(支撑,现价,2),C*0.999,’买’),COLORCYAN;

DRAWTEXT(LONGCROSS(现价,阻力,2),C*1.004,’ 卖’),COLORMAGENTA;

DRAWICON(LONGCROSS(现价,阻力,2),C*1.002,15);

TT:=BARSCOUNT(CLOSE);CC:=CLOSE;

MAJ:=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)));

上均:=(MAJ*1.007 );

下均:=(MAJ/1.005 );

时长:=IF(HOUR>=10 AND HOUR<15,1,0);

涨幅:=(CLOSE>DYNAINFO(3))>1.02;

跌幅:=(CLOSE/DYNAINFO(3))<0.98;

横盘:=((HHV(CLOSE,BARSCOUNT(CLOSE))-LLV(CLOSE,BARSCOUNT(CLOSE)))/CLOSE)<0.03;

YY:=SMA(VOL,30,1);

放量:=SUM(VOL,6)>REF(MA(VOL,30),1)*0.03;

涨跌幅:=涨幅 OR 跌幅;

横涨:=横盘 AND 放量 AND (C>上均);

DRAWTEXT(FILTER(横涨,50),MAJ*0.995,’   突破’),COLORLIRED;

DRAWICON(FILTER(横涨,50),MAJ*0.995,26);MA30:=EMA(CLOSE,30);

A2:=DYNAINFO(3);

A3:=IF(C=A2,C*1.005,IF(C<A2,C*1.005,C*0.995));

A5:=IF(C=A2,CON2STR(0,2),IF(C>A2,CON2STR((C-A2)/A2*100,2),CON2STR((A2-C)/A2*100,2)));

A6:=IF(ZTPRICE(DYNAINFO(3),0.1)=C OR DTPRICE(DYNAINFO(3),0.1)=C,STRCAT(CON2STR(C,2),’★  ‘),IF(C=REF(C,1),STRCAT(CON2STR(C,2),’◆  ‘),IF(C>REF(C,1),STRCAT(CON2STR(C,2),’▲  ‘),STRCAT(CON2STR(C,2),’  ‘))));

A4:=STRCAT(STRCAT(‘   ‘,A6),STRCAT(A5,’%’));

A7:=IF(DYNAINFO(3)>C,0.9973,1.0027);

DRAWTEXT(CURRBARSCOUNT=240,C*A7,”);

DRAWTEXT(ISLASTBAR AND C>A2 ,C*1,A4),COLOR3333FF;

DRAWTEXT(ISLASTBAR AND C=A2 ,C*1,A4),COLORWHITE;

DRAWTEXT(ISLASTBAR AND C<A2 ,C*1,A4),COLOR42C800;

DRAWTEXT_FIX(CURRBARSCOUNT=120,0.4,0.01,0,’【微信公众号：量化爱好者之家 】’),COLORGREEN;

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

机构买盘:=(WA2);机构卖盘:=(WA3);散户买盘:=(WA4);散户卖盘:=(WA5);

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

DRAWTEXT_FIX(1,0.730,1-0.001,0,STRCAT(STRCAT(‘【机构卖盘】’,CON2STR(机构卖盘,2)),’ 万’)),COLORGREEN;

DRAWTEXT_FIX(1,0.860,1-0.088,0,STRCAT(STRCAT(‘【散户买盘】’,CON2STR(散户买盘,2)),’ 万’)),COLORMAGENTA;

DRAWTEXT_FIX(1,0.860,1-0.001,0,STRCAT(STRCAT(‘【散户卖盘】’,CON2STR(散户卖盘,2)),’ 万’)),COLORCYAN;

QA1:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),-VOL/CAPITAL*100,0)),0);

CHENGJIAO:=V*C/100,NODRAW;{万元}QA4:=SUM((IF(((CHENGJIAO/8<20) AND (CLOSE>(REF(CLOSE,1)))),CHENGJIAO,0)),0);

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

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

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

QA6:=((QA2+QA3)+QA4)+QA5;

AAA1:=STRCAT(STRCAT(‘机构买入 ‘,CON2STR((100*QA2)/QA6,0)),’%’);

AAA2:=STRCAT(STRCAT(‘机构卖出 ‘,CON2STR((100*QA3)/QA6,0)),’%’);

AAA0:=STRCAT(STRCAT(‘机构总买入 ‘,CON2STR((100*(QA2-QA3))/A6,0)),’%’);

AAA3:=STRCAT(STRCAT(‘散户买入 ‘,CON2STR((100*QA4)/QA6,0)),’%’);

AAA4:=STRCAT(STRCAT(‘散户卖出 ‘,CON2STR((100*QA5)/QA6,0)),’%’);