本人找了许久,不得已,将网上的通信达加密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); |
