通达信五彩成交量公式 源码 贴图

A:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,DRAWNULL)))));
 B:=FLOOR((FROMOPEN/A));
 {黄色色柱为盘中虚拟成交量}
万手:VOL/10000,LINETHICK0,NODRAW;
 AA:=IF(CURRBARSCOUNT=1,SUM(VOL,B)*A/FROMOPEN,DRAWNULL);
预测:STICKLINE(AA,0,AA,4,0),COLORYELLOW;
 {实盘画线}
 {STICKLINE(CURRBARSCOUNT=1,AA,0,2.5,0),COLORYELLOW};
 BB:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主动买:=IF(CLOSE>OPEN,BB*(HIGH-LOW),IF(CLOSE<OPEN,
 BB*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
主买:主动买/10000,COLORRED,NODRAW;
主动卖:=IF(CLOSE>OPEN,0-BB*((HIGH-CLOSE)+(OPEN-LOW)),
 IF(CLOSE<OPEN,0-BB*(HIGH-LOW),0-VOL/2));
主卖:-主动卖/10000,COLORGREEN,NODRAW;
差额:(主动买+主动卖)/10000,NODRAW;
 STICKLINE(CLOSE> REF(CLOSE,1),0,VOL,2.5,0),COLORLICYAN;
 STICKLINE(CLOSE< REF(CLOSE,1),0,VOL,2.5,0),COLORLIGREEN;
 STICKLINE(CLOSE= REF(CLOSE,1),0,VOL,2.5,0),COLORWHITE;
 {如果您还想用以前的假阴阳线，就把上面三行代码用大括号"()"括起来！}
 {并把下面四行代码的大括号"()"去掉！}
 {STICKLINE(C>-1,0,VOL,3,1),COLORRED;
 STICKLINE(C<O ,0,VOL,3,1),COLORFFFF00;
 STICKLINE(C=O AND C<REF(C,1),0,VOL,2,1),COLORFFFF00;
 STICKLINE(C=O AND C>REF(C,1),0,VOL,2,1),COLORRED;}
 STICKLINE(主动买>0,0,主动买,1,0),COLORRED;
 STICKLINE(主动卖<0,VOL,主动买,1,0),COLORBLUE;
 {STICKLINE(1,主动买-VOL,0,2,0),COLOR0FF000;}
 {持币:IF(SAR(10,2,20)>=H,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLORGREEN;}
 {持股:IF(SAR(10,2,20)<=L,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLORMAGENTA;}
五日: MA(V,5) COLORWHITE;

十日: MA(V,10) COLORYELLOW;
 {买盘:MA(主动买,5),LINETHICK2,COLOR00FFFF;
卖盘:MA(VOL-主动买,5),LINETHICK2,COLORFF00FF;};