通达信无双VOL副图指标

通达信无双VOL副图指标 源码 贴图





  M1:=5;
M2:=10;{公式之家 BBS.GSZB.TOP}
VVOL:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,(-1),(-1)),COLOR00C0C0;
VOLUME:VOL,VOLSTICK;
MAVOL1:MA(VOLUME,M1);
MAVOL2:MA(VOLUME,M2);
VAR1:=1*AMOUNT;
VAR2:=1*MA(AMOUNT,5);
VAR3:=1*MA(AMOUNT,10);
VAR4:=HHV(VAR1,30)=VAR1;
VAR5:=HHV(VAR1,60)=VAR1;
VAR6:=HHV(VAR1,100)=VAR1;
VAR7:=HHV(VAR1,250)=VAR1;
STICKLINE(VAR4,VOLUME,VOLUME*0.7,1,0),COLORMAGENTA;
STICKLINE(VAR5,VOLUME,VOLUME*0.7,1,0),COLORYELLOW;
STICKLINE(VAR6,VOLUME,VOLUME*0.7,1,0),COLORGREEN;
STICKLINE(VAR7,VOLUME,VOLUME*0.7,1,0),COLORFF7100;
VAR8:=LLV(VAR1,30)=VAR1;
VAR9:=LLV(VAR1,60)=VAR1;
VAR10:=LLV(VAR1,100)=VAR1;
VAR11:=LLV(VAR1,250)=VAR1;
STICKLINE(VAR8,(-50000),0,1,0),COLORMAGENTA;
STICKLINE(VAR9,(-50000),0,1,0),COLORYELLOW;
STICKLINE(VAR10,(-50000),0,1,0),COLORGREEN;
STICKLINE(VAR11,(-50000),0,1,0),COLORFF7100;
IF(CROSS(0.9,1/VOL*1000>0.01 AND KDJ.J<0),VOLUME*5,0),COLORYELLOW,LINETHICK2;