新年送上显示主买卖量的飞孤[VOL]优化原码,祝朋友们在新的一年里身体健康,万事如意!
DRAWGBK(CLOSE=CLOSE,COLORRGB(30,30,60),COLORRGB(30,30,60),1);
预测额:=IF(DATE<>CURRENTDATE OR OPENMINUTES(CURRENTTIME)=1,AMOUNT,(AMOUNT/OPENMINUTES(CURRENTTIME))*240), LINETHICK;
n:=20;
SAT:=IF((预测额/CLOSE)/(HHV(预测额,N)/HHV(CLOSE,N))*100>100,100,(预测额/CLOSE)/(HHV(预测额,N)/HHV(CLOSE,N))*100);
预测量:=IF(DATE<>CURRENTDATE OR OPENMINUTES(CURRENTTIME)=1,VOL,(VOL/OPENMINUTES(CURRENTTIME))*240), LINETHICK;
量:=VOL;
V0001:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主买:IF(CLOSE>OPEN,V0001*(HIGH-LOW),IF(CLOSE<OPEN,V0001*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),Color6d0076,POINTDOT,LINETHICK0,{PRECISION0}COLORRED;
主卖:IF(CLOSE>OPEN,0-V0001*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-V0001*(HIGH-LOW),0-VOL/2)),ColorFFD1BE,POINTDOT,LINETHICK0,PRECISION0;
净买:主买+主卖,COLORMAGENTA,LINETHICK0,PRECISION0;
换手率:=VOL/CAPITAL*100;
hs:=换手率;
量比:IF(BARPOS=DATACOUNT,DYNAINFO(17),VOL/REF(MA(VOL,5),1)),LINETHICK0,COLORYELLOW,PRECISION2;
A:=MA(换手率,2);
X:=LLV(A,20),linethick;
X1:=(A-LLV(A,20))=0;
换手最小:=IF(ALL (A>0,5) AND FILTERX(X1,5),X1,0),COLORRED;
X2:=HHV(A,20);
X3:=(A-X2)=0;
换手最大:=IF(ALL(REF(A,1)<X2,5) AND FILTERX(X3,5),1,0),COLORGREEN;
STICKLINE(CLOSE<=REF(CLOSE,1) , VOL,0,8.5,0), Color808040;
STICKLINE(CLOSE>REF(CLOSE,1), VOL,0,8.5,1) {ColorFF4D80}ColorFF87FF,LINETHICK2;
STICKLINE(净买>0,0,主买,5,0),color102088;
STICKLINE(净买>0,0,主买,4,0),color1020aa;
STICKLINE(净买>0,0,主买,3,0),color1020bb;
STICKLINE(净买>0,0,主买,2,0),color1020bb;
STICKLINE(净买>0,0,主买,1,0),color1020dd;
STICKLINE(净买>0,0,主买,0.5,0),color1020ee;
STICKLINE(净买<=0,0,主买,5,0),color102088;
STICKLINE(净买<=0,0,主买,4,0),color1020aa;
STICKLINE(净买<=0,0,主买,3,0),color1020bb;
STICKLINE(净买<=0,0,主买,2,0),color1020cc;
STICKLINE(净买<=0,0,主买,1,0),color1020dd;
STICKLINE(净买<=0,0,主买,0.5,0),color1020ee;
STICKLINE(净买>0,VOL,主买,5,0),COLORFF7700;
STICKLINE(净买>0,VOL,主买,4,0),COLORFF8811;
STICKLINE(净买>0,VOL,主买,3,0),COLORFFAA22;
STICKLINE(净买>0,VOL,主买,2,0),COLORFFBB33;
STICKLINE(净买>0,VOL,主买,1,0),COLORFFDD44;
STICKLINE(净买>0,VOL,主买,0.5,0),COLORFFFF55;
STICKLINE(净买<=0,VOL,主买,5,0),COLORFF7700;
STICKLINE(净买<=0,VOL,主买,4,0),COLORFF8811;
STICKLINE(净买<=0,VOL,主买,3,0),COLORFFAA22;
STICKLINE(净买<=0,VOL,主买,2,0),COLORFFBB33;
STICKLINE(净买<=0,VOL,主买,1,0),COLORFFDD44;
STICKLINE(净买<=0,VOL,主买,0.5,0),COLORFFFF55;
{喜欢加均线的朋友下面的原码去掉括号后贴上去即可}
{五日: MA(V,5) COLORWHITE;
十日: MA(V,10) COLORYELLOW;}
h13:=HHV(MA(VOL,13),13),COLORGREEN;
l13:=LLV(MA(VOL,5),13),COLORBROWN,LINETHICK2;
mv5:=MA(VOL,5),color8888FF,PRECISION0;
mv13:=MA(VOL,13),COLORMAGENTA,PRECISION0;
mv34:=MA(VOL,34),LINEDOT,COLORWHITE,PRECISION0;
PARTLINE(MA(SUM(主买,34),10)<SUM(主买,34),-300),COLORMAGENTA,LINETHICK2;
PARTLINE(MA(SUM(主买,34),10)>=SUM(主买,34) ,-300),COLORBLUE,LINETHICK2;
DRAWICON(MA(SUM(主买,34),10)>REF(MA(SUM(主买,34),10),1),-300,12);
DRAWICON(MA(SUM(主买,34),10)<=REF(MA(SUM(主买,34),10),1),-300,11);
天量:=VOL=HHV(VOL,0);
F:=100*(CLOSE-REF(CLOSE,1))/REF(CLOSE,1);
今小昨:=IF(CLOSE<REF(OPEN,1) AND F<0,1,0);
Sa1:=今小昨;
今小前:=IF(CLOSE<REF(OPEN,2) AND F<0,1,0),LINETHICK0;
Sa2:=今小前;
流通盘（亿）:CAPITAL/1000000,POINTDOT;
{流通市值（亿）:(CAPITAL/100*C)/10000,POINTDOT,COLOR33CCFF;}
成交额（千万）:AMOUNT/10000000,POINTDOT;
ZLCM:=EMA(WINNER(CLOSE)*70,3);
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);
ZSHTL:=SHCM/(ZLCM+SHCM)*100;
ZZLKP:=ZLCM/(ZLCM+SHCM)*100,COLORYELLOW;
ZZLJJ:=EMA(ZZLKP,89);
发现主筹码:CROSS(ZZLKP,ZZLJJ),COLORRED;
主力控盘系数:INTPART(ZZLKP)COLORMAGENTA;{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
