通达信富力实盘VOL副图源码

DRAWTEXT_FIX(1,0,0.07,0,'多头总成交粉色、空头总成交青色、向上攻击量红色、向下攻击量蓝色、上探量土色、下探量邮政绿、放量提示白色\天量黄色'),COLOR99CC32;

VAR2:=HIGH-LOW;
 VAR3:=ABS(OPEN-CLOSE);
 VAR4:=HIGH-IF(CLOSE>OPEN,CLOSE,OPEN);
 VAR5:=IF(CLOSE>OPEN,OPEN,CLOSE)-LOW;
 VAR6:=VAR3/VAR2*VOL;
 VAR7:=VAR4/VAR2*VOL;
 VAR8:=VAR5/VAR2*VOL;
 VAR9:=IF(VOL/CAPITAL>0.001,1,EXP(ABS(LOG(VOL/CAPITAL*100))));
 VARA:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100;
 VARB:=MA(CLOSE,5)>MA(CLOSE,10) AND MA(CLOSE,10)>MA(CLOSE,30) AND MA(CLOSE,30)>MA(CLOSE,60);
 VARC:=MA(CLOSE,5)<MA(CLOSE,10) AND MA(CLOSE,10)<MA(CLOSE,30);
 {多头成交: }STICKLINE(CLOSE>MA(CLOSE,30),0,VOL,3.1,1),COLORFF1CAE;
 {空头成交: }STICKLINE(CLOSE<MA(CLOSE,30),0,VOL,3.1,1),COLORFFFF00;
 {向上攻击量: }STICKLINE(VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE>OPEN,0,VAR6,1,0),COLORRED;
 {向下攻击量: }STICKLINE(VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE<OPEN,0,VAR6,1,0),COLORFF0400;
 {上探量: }STICKLINE(VAR7>VAR6 AND VAR7>VAR8,0,VAR7,1,0),COLOR5959AB;
 {下探量: }STICKLINE(VAR8>VAR6 AND VAR8>VAR7,0,VAR8,1,0),COLOR005F00;
 {相对地量:} STICKLINE(VAR9>2 AND VOL<MA(VOL,5)/2,0,VOL,1,0),COLORYELLOW;
 DRAWTEXT(VAR9>2 AND VOL<MA(VOL,5)/2,VOL,'地量'),COLORFFFFFF;
 {放量: }STICKLINE(VOL>MA(VOL,5)*2.5,0,VOL,1,0),COLORWHITE;
 DRAWTEXT(VAR7>VAR6 AND VARA>2 AND VAR7>VAR8 AND CLOSE>MA(CLOSE,5) AND CLOSE>MA(CLOSE,30) AND HIGH>MA(CLOSE,60) AND VOL>MA(VOL,5) AND VAR7>=MA(VOL,5),VOL,'逢高出货'),COLORFFFFFF;
 DRAWTEXT(VAR8>VAR6 AND VAR8>VAR7 AND VARA<-2 AND CLOSE<MA(CLOSE,30) AND VAR8<MA(VOL,5)/2 AND MA(VOL,5)<MA(VOL,10),VOL,'逢低跟进'),COLORFFFFFF;
 DRAWTEXT(VAR6>MA(VOL,5)*2 AND VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE>OPEN OR VOL>MA(VOL,5)*3 AND VARB,VOL,'强势参与'),COLORFFFFFF;
 DRAWTEXT(VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE<OPEN AND VAR6/VOL>0.7 AND VARC AND VAR6>MA(VOL,5),VAR6*2,'空头释放'),COLORFFFFFF;

ZZ:=IF(REF(C,1)>REF(O,1) AND O>REF(C,1)*1.014 AND C<O*1.02,1,3);
 V5:=MA(V,5);
 V12:=MA(V,12);
 V34:=MA(V,34);
 C6:=MA(C,6);
 STICKLINE(CROSS(C,C6) AND V>V5*1.2 AND V>V12*1.2 AND ZZ>2 AND C>H*0.975,0,VOL,2.8,0),COLORRED;
 STICKLINE(CROSS(C6,C) AND V>V5*1.2 AND V>V12*1.2,0,VOL,2.8,0),COLOR003F00;
 STICKLINE(VOL>MA(VOL,5)*2 AND V>V34*3 AND C<REF(C,1)*1.05,0,VOL,2.8,0),COLOR00FFFF;
 STICKLINE(VOL<MA(VOL,5)/2 AND V<V12/2,0,VOL,2.8,0),COLORCE6700;
 STICKLINE(VOL>MA(VOL,5)*2 AND V>V34*3 AND C<REF(C,1)*1.05 AND CROSS(C,C6) AND V>V5*1.2 AND V>V12*1.2 AND ZZ>2 AND C>H*0.975,VOL*0.5,0,2.8,0);
 STICKLINE(VOL>MA(VOL,5)*2 AND V>V34*3 AND C<REF(C,1)*1.05 AND CROSS(C6,C) AND V>V5*1.2 AND V>V12*1.2,VOL*0.5,0,2.8,0);
 DRAWTEXT (VOL>MA(VOL,5)*2 AND V>V34*3 AND C<REF(C,1)*1.05,V,'天'),COLORWHITE;
 DRAWTEXT (VOL<MA(VOL,5)/2 AND V<V12/2,(V5+V)/2,'地'),COLORWHITE;
 DRAWTEXT (CROSS(C,C6) AND V>V5*1.2 AND V>V12*1.2 AND ZZ>2 AND C>H*0.975,0,'吸'),COLORWHITE;
 DRAWTEXT (CROSS(C6,C) AND V>V5*1.2 AND V>V12*1.2,0,'出'),COLORWHITE;
地选:=VOL<MA(VOL,5)/2 AND V<V12/2;
吸选:=CROSS(C,C6) AND V>V5*1.2 AND V>V12*1.2 AND ZZ>2 AND C>H*0.975;

 VOLUME:VOL,NODRAW;
五日量:MA(VOLUME,20),COLORFF0000,LINETHICK2;
角度05:ATAN((五日量/REF(五日量,1)-1)*100)*180/3.1416,COLOR6B8E23,LINETHICK1;
 IF(角度05>=-10,五日量,DRAWNULL),COLORFFFFFF,LINETHICK2;