通达信潜筹V3.3副图指标
源码
DN:=5;
CJ:=(H+L+2*O+3*C)/7; KN:=POW(HHV(H,18)/HHV(H,0),0.9); 短筹:SMA(SMA((PWINNER(36,0.66*CJ)+0.618*PWINNER(18,0.86*CJ))*61.8,1.2*DN,0.41*DN),2.2*DN,2.2*DN-1),COLORYELLOW; 抢筹:=IF(SLOPE(短筹,0.4*DN)>=0,SLOPE(短筹,0.4*DN)*POW(0.61*DN,1.5),0); 活筹:=0.28*短筹+4.62*抢筹-3; 上涨角:=HHV(ATAN(SLOPE(活筹,0.6*DN)*0.58)*180/3.14159,0.6*DN); TT:=(上涨角+1.11*短筹)/1.916; 屯:=SMA(TT,2.4*DN,0.6*DN); 屯筹:(2.28*HHV(屯,1.6*DN)+SMA(屯,2.4*DN,1))/2.801,COLORRED; QL:=(抢筹*0.8+SLOPE(短筹,0.4*DN)*(60-短筹)*0.8+SLOPE(屯筹,0.6*DN)*(88-屯筹)*0.55+SLOPE(屯,0.6*DN)*(屯-100)*0.2)*POW(DN/4.2,0.4)*KN; 潜筹:IF(SLOPE(QL,1.6*DN)>0,0.22*SMA(QL,2.4*DN,2.4*DN-1)+0.44*HHV(QL,1.6*DN)-4,0),COLORFF9977; DBL:=IF(SLOPE(C,2)>0,SLOPE(C,2)*SLOPE(潜筹,2)/C,0)*1.5; 短背离:=0.618*HHV(DBL,9)+DBL; QF:=BARSLAST(CROSS(75*KN,潜筹))+1; 潜伏期:=IF(QF=1,REF(QF,1)+1,QF); 潜深:=0.5*HHV(潜伏期,3.6*DN)+0.5*SMA(潜伏期,3.6*DN,1); 上浮力:IF(SLOPE(潜深,2)<0,KN*50*POW(-SLOPE(潜深,2),0.2),0),COLORMAGENTA,LINETHICK2; KP:=BARSLAST(CROSS(短筹,屯筹*(KN-0.0495)))+1; 活跃期:BARSLAST(CROSS(上浮力,0.1))+1,LINETHICK0; ZP:=SMA(MA(115*KN-屯筹*(KN-0.0495),KP)*0.6,1.8*DN,2); 庄筹派发:ZP+25,COLORWHITE; 背离:SMA(WINNER(0.993*C)*100-屯筹,3.6*DN,1.6*DN),LINETHICK2,COLORCYAN; 回马枪:=0.618*HHV(SLOPE(背离,2),9)+SLOPE(背离,2); 势:抢筹+SLOPE(屯筹,8)+POW(ABS(50-短筹)/39,3),COLORB0AFFF; 法:0.3*IF(回马枪*势>0,POW(回马枪*势,0.9),-POW(-回马枪*势,0.6)),LINETHICK0; 术:势*0.66+1.1*IF(短背离>0,POW(短背离,0.9),-POW(-短背离,0.6)),LINETHICK0; 潜筹涌动:=SMA(潜筹,1.8*DN,2); XG:=SMA(V,4,3)<1.421*SMA(V,24,1); 牛市粗选:屯筹>88 AND 庄筹派发<46.7 AND 0.495*潜筹涌动+潜伏期>18.2 AND XG ,LINETHICK0; 熊市粗选:((回马枪>0 AND ABS(背离+3)>21) OR 法>2.07 OR 术>16) AND C/REF(C,1)>=1.048 AND 潜筹涌动>0 AND XG,LINETHICK0; STICKLINE(术>0,术,0,2,0),COLOR0000FF; STICKLINE(法>0,法,0,1,0),COLORWHITE; IF(SLOPE(屯筹,2)<=0,屯筹,DRAWNULL),COLORBLUE; DRAWICON(熊市粗选,-5,1);
