通达信绝密量能选股指标公式源码

通达信绝密量能选股指标公式源码

源码正文：

M1:=5;M2:=3{XG51};
volUME:=VOL,VOLstICK;maVOL1:=MA(VOLUME,M1);MAVOL2:=MA(VOLUME,M2);绿低量:=13;蓝低量:=55;灰低量:=100;N1:=21;SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));量能饱和:IF(SAT>1,1,SAT)*100,COLOR00AAFF,NODRAW;中点:=REFDATE(HHV(V,180)*0.5,DATE);STICKLINE(CURRBARSCOUNT=N1,中点*1.9,中点*1.5,100,1),COLOR00AAFF;STICKLINE(CURRBARSCOUNT=N1,中点*1.88,中点*1.52,量能饱和,0),COLOR0077FF;DRAWTEXT(CURRBARSCOUNT=N1+3,中点*1.8,'饱和度'),COLORBLUE; H_L:=0.1*CONST(HHV(VOL,240));启动5:=MA(V,5),COLORRED;洗盘40:=MA(V,40),COLORYELLOW;异动135:=MA(V,135),COLORLIMAGENTA; VVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL);STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,1,-1),COLOR00C0C0;量:VOL,VOLSTICK;换手: VOL*10000/FINANCE(7),NODRAW; 换10T:=SUM(换手,10),NODRAW;倍数:=1.9;倍量: VOL>=REF(V,1)*倍数 AND (IF(C<O,C>REF(C,1),1)),COLORBLUE,NODRAW;倍缩: REF(V,1)>=VOL*倍数,COLORLIMAGENTA,NODRAW;平量: RANGE(V/REF(V,1),0.97,1.03) AND BARSCOUNT(V)>=2,COLORRED,NODRAW;低量10: VOL=LLV(VOL,绿低量) AND BARSCOUNT(V)>=绿低量,COLORCYAN,NODRAW;低量50: VOL=LLV(VOL,蓝低量) AND BARSCOUNT(V)>=蓝低量,COLORYELLOW,NODRAW;地量:   VOL=LLV(VOL,灰低量) AND BARSCOUNT(V)>=灰低量,COLORBROWN,NODRAW;V1:=VOL*0.9;V2:=VOL*0.8;STICKLINE(倍量, 0,V1,1,0),COLORBLUE;STICKLINE(平量,0,V1,1,0),COLORRED;STICKLINE(低量10,0,V2,1,0),COLORLIBLUE;STICKLINE(低量50,0,V2,1,0),COLORYELLOW;STICKLINE(地量,0,V2,1,0),COLORBROWN;STICKLINE(倍缩,0,V*0.45,1,0),COLORLIMAGENTA;STICKLINE(C<O AND C>REF(C,1),0,V,0,0),COLORWHITE;真阳或假阴:=C>O OR C>REF(C,1);收阳:= REF(真阳或假阴,3);倍量1:=REF(倍量,3); 高量:=REF(V,3)>=HHV(V,7);三日不破:= LLV(C,3)>=REF(L,3);价升:=COUNT(C>=REF(C,1),3)=3;量缩:=COUNT(V<=REF(V,1),3)=3;连阳:= COUNT(真阳或假阴,3)=3;倍量将军柱:= 倍量1 AND 三日不破 AND 收阳;高量将军柱:= 高量  AND 三日不破 AND 收阳;将军柱:= 倍量将军柱 OR 高量将军柱;黄金柱:= 将军柱 AND 价升 AND 量缩 AND 连阳 ;STICKLINE(黄金柱,0.3*V,0.7*V,1,0),COLORWHITE; DRAWICON(黄金柱,V*1.5,3);V100:= V<=LLV(V,100)*1.2 AND V>0 AND BARSCOUNT(V)>=100;百日地量群:=COUNT(V100,5)>=3;DRAWTEXT(FILTER(百日地量群,4),V+3*H_L,'地量群'),COLORBROWN;长阴短柱:=C/REF(C,1)<=0.96 AND V<HHV(V,30)/1.9;DRAWTEXT(长阴短柱 ,V+1.6*H_L,'！'),COLORLIRED;CV:=CLOSE;bbiboll:=(MA(CV,3)+MA(CV,6)+MA(CV,12)+MA(CV,24))/4;UPR:=BBIBOLL+6*STD(BBIBOLL,11);DWN:=BBIBOLL-6*STD(BBIBOLL,11);QJJ:=VOL/((HIGH-LOW)*2-Abs(CLOSE-OPEN));XVL:=(IF(CLOSE>OPEN,QJJ*(HIGH-LOW),IF(CLOSE<OPEN,QJJ*(HIGH-OPEN+CLOSE-LOW),VOL/2))+IF(CLOSE>OPEN,0-QJJ*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-QJJ*(HIGH-LOW),0-VOL/2)));HSL:=(XVL/3)/1.15;攻击:=((HSL*0.55+(REF(HSL,1)*0.33))+(REF(HSL,2)*0.22));LLJX:=ema(攻击,3);B1:=IF(SUM(LLJX,1)>REF(MA(SUM(LLJX,1),1),1),SUM(LLJX,1),DRAWNULL);B2:=IF(SUM(LLJX,2)>REF(MA(SUM(LLJX,2),1),1),SUM(LLJX,2),DRAWNULL);B3:=IF(SUM(LLJX,3)>REF(MA(SUM(LLJX,3),1),1),SUM(LLJX,3),DRAWNULL);B4:=IF(SUM(LLJX,4)>REF(MA(SUM(LLJX,4),1),1),SUM(LLJX,4),DRAWNULL);B5:=IF(SUM(LLJX,5)>REF(MA(SUM(LLJX,5),1),1),SUM(LLJX,5),DRAWNULL);B6:=IF(SUM(LLJX,6)>REF(MA(SUM(LLJX,6),1),1),SUM(LLJX,6),DRAWNULL);B7:=IF(SUM(LLJX,7)>REF(MA(SUM(LLJX,7),1),1),SUM(LLJX,7),DRAWNULL);B8:=IF(SUM(LLJX,8)>REF(MA(SUM(LLJX,8),1),1),SUM(LLJX,8),DRAWNULL);B9:=IF(SUM(LLJX,9)>REF(MA(SUM(LLJX,9),1),1),SUM(LLJX,9),DRAWNULL);B10:=IF(SUM(LLJX,10)>REF(MA(SUM(LLJX,10),1),1),SUM(LLJX,10),DRAWNULL);XG:=B1 AND B2 AND B3 AND B4 AND B5 AND B6 AND B7 AND B8 AND B9 AND B10 AND (CLOSE-OPEN)>=(UPR-BBIBOLL) AND V/REF(V,1)>=1.9;DRAWICON(XG,V*1.1,13){X*G-5.1*C*N*{};