新年送上显示主买卖量的飞孤[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; |
