同花顺PAV筹码公式

本人找了许久，不得已，将网上的通信达加密pav公式与通信达对比，无限逼近，效果令人满意。并在该指标中加入图文决策系统，股友们有福了，都拿去用吧，给个五星就行。不是好东西我也没必要费这么大力。

通信达PAV筹码

DRAWGBK(1,STRIP(RGB(0,50,70),RGB(70,50,0),1));

GV:(WINNER(0.98*CLOSE))*100,nodraw;

CV: (100-GV)*(-1),nodraw;

MGV: MA(GV,5),LINETHICK2,color0000aa;

MCV: MA(CV,13), ,LINETHICK2,coloraa0000;

DIFF: MGV+MCV,LINETHICK2,colormagenta;

零:0,colorgreen,DOTLINE;

STICKLINE(GV>0,0,GV*1.0,1,0),COLOR0011aa;

STICKLINE(GV>0,0,GV*0.8,1,0),COLOR0044aa ;

STICKLINE(GV>0,0,GV*0.6,1,0),COLOR0077aa;

STICKLINE(GV>0,0,GV*0.4,1,0),COLOR00aaaa ;

STICKLINE(GV>0,0,GV*0.2,1,0),COLOR00ddaa ;

STICKLINE(CV<0,0,CV*1.0,1,0),coloraa3300;

STICKLINE(CV<0,0,CV*0.8,1,0),COLOraa6600 ;

STICKLINE(CV<0,0,CV*0.6,1,0),COLORaa9900 ;

STICKLINE(CV<0,0,CV*0.4,1,0),COLORaacc00 ;

STICKLINE(CV<0,0,CV*0.2,1,0),COLORaaff00 ;

DRAWTEXT(diff<0 AND diff-REF(diff,2)>20 AND diff-REF(diff,1)>=REF(diff,1)-REF(diff,2)

,diff*0.7,'拉升'),colorred;

DRAWTEXT(diff>0 AND diff-REF(diff,2)<-20 AND diff-REF(diff,1)<=REF(diff,1)-REF(diff,2)

,diff*1.4,'下跌'),colorgreen;

DRAWTEXT(FILTER(diff<0 AND HHV(diff,10)-LLV(diff,10)<5,10),diff*0.5,'震仓洗盘'),colorwhite;

DRAWTEXT(FILTER(diff>0 AND STD(diff,10)/MA(STD(diff,10),120)>1.5,5),diff*1.6,'建仓吸筹'),colorwhite;

STICKLINE((diff> REF(diff,1) AND mcv>REF(mcv,1)) AND ((diff<0 AND REF(Cv,1)<-5 AND RANGE(Cv,-5,-1))

OR (diff>0 AND REF(Cv,1)<-50 AND Cv>-50)) ,0,12,20,0),colorred;

STICKLINE((diff> REF(diff,1) AND mcv>REF(mcv,1)) AND ((diff<0 AND REF(Cv,1)<-5 AND RANGE(Cv,-5,-1))

OR (diff>0 AND REF(Cv,1)<-50 AND Cv>-50)) ,12,90,8,0),colorwhite;

DRAWTEXT((diff> REF(diff,1) AND mcv>REF(mcv,1)) AND ((diff<0 AND REF(Cv,1)<-5 AND RANGE(Cv,-5,-1))

OR (diff>0 AND REF(Cv,1)<-50 AND Cv>-50)),100,'主升浪'),colorred;

DRAWICON(diff>0 AND REF(diff,1)>REF(diff,2) AND diff>=REF(diff,1) ,diff,1);

DRAWICON(diff>0 AND REF(diff,1)<REF(diff,2) AND diff<=REF(diff,1) ,diff,2);