通达信黑马未加密选股指标公式源码

源码正文：

VAR1:=ma(CLOSE,5){XG51};
VAR2:=MA(CLOSE,10){XG51};
VAR3:=MA(CLOSE,30){XG51};
VAR4:=MA(CLOSE,60){XG51};
VAR5:=ema(COst(85),7){XG51};
VAR6:=EMA(COST(15),7){XG51};
VAR7:=SUM(CLOSE*vol*100,4)/SUM(VOL*100,4){XG51};
VAR8:=INTPART(VAR7*100)/100{XG51};
VAR9:=SUM(CLOSE*VOL*100,7)/SUM(VOL*100,7){XG51};
VARA:=INTPART(VAR9*100)/100{XG51};
VARB:=SUM(CLOSE*VOL*100,28)/SUM(VOL*100,28){XG51};
VARC:=INTPART(VARB*100)/100{XG51};
VARD:=EMA(CLOSE,5)-EMA(CLOSE,10){XG51};
VARE:=EMA(VARD,9){XG51};
VARF:=(-100)*(HHV(CLOSE,5)-CLOSE)/(HHV(CLOSE,5)-LLV(LOW,5))+100{XG51};
VAR10:=(-100)*(HHV(CLOSE,10)-CLOSE)/(HHV(CLOSE,10)-LLV(LOW,10))+100{XG51};
VAR11:=(-100)*(HHV(CLOSE,20)-CLOSE)/(HHV(CLOSE,20)-LLV(LOW,20))+100{XG51};
VAR12:=(-100)*(HHV(CLOSE,30)-CLOSE)/(HHV(CLOSE,30)-LLV(LOW,30))+100{XG51};
VAR13:=REF(VARE,1){XG51};
VAR14:=VARE{XG51};
VAR15:=VAR14-VAR13{XG51};
VAR16:=REF(VARD,1){XG51};
VAR17:=VARD{XG51};
VAR18:=VAR17-VAR16{XG51};
VAR19:=OPEN{XG51};
VAR1A:=CLOSE{XG51};
黑马选股: VAR19<=VAR1 AND VAR19<=VAR2 AND VAR19<=VAR3 AND VAR1A>=VAR1 AND VAR1A>=VARC AND VAR15>0 AND VAR18>0{X.G*5.1.C.N.{};

源码正文：

主力:=xma(Xma((CLOSE*2+LOW-OPEN-HIGH)/4,2),2){XG51};
散户:=ema(主力,11)-EMA(主力,22){XG51};
量比:=EMA(散户,5){XG51};
杭: (-100)*(散户-量比)*100,COLOR00FF00,LINETHICK5{XG51};
州: 100*(散户-量比)*100,COLOR0000FF,LINETHICK5{XG51};
龙:0{XG51};
IF(州<=REF(州,1),州,DRAWNULL),COLOR00FFFF,LINETHICK5{XG51};
DRAWTEXT(crOSS(州,REF(州,1)),州,'买'),COLOR00FFFF{XG51};
DRAWTEXT(CROSS(REF(州,1),州),州,'卖'),COLOR00FF00{XG51};
VAR2:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100){XG51};
VAR3:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100){XG51};
VAR4:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100){XG51};
VAR5:=(((VAR2 + (2 * VAR3)) + (3 * VAR4)) / 6){XG51};
VAR6:=MA(VAR5,3){XG51};
开始控盘:=stICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),3.5,0),COLOR00AAFF{XG51};
STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),3.5,0),COLOR0044FF{XG51};
STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),2.5,0),COLOR0088FF{XG51};
STICKLINE((VAR6 <= (0 - 10)),0,(0 - 20),3,0),COLOR00AAFF{XG51};
VAR1:=EMA(EMA(CLOSE,3),1){XG51};
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000{XG51};
STICKLINE(控盘<0,控盘,0,3.5,0),COLORFFAA00{XG51};
STICKLINE(控盘<0,控盘,0,3.5.2,0),COLORFF4400{XG51};
STICKLINE(控盘<0,控盘,0,2.5,0),COLORFF8800{XG51};
STICKLINE(控盘<0,控盘,0,0,0),COLORFFAA00{XG51};
主力出货:0,COLORFFAA00{XG51};
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLOR000088{XG51};
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR0000AA{XG51};
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR0000CC{XG51};
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,1,0),COLOR0000EE{XG51};
主力吸货:0,COLOR0000FF{XG51};
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLOR008800{XG51};
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR00AA00{XG51};
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR00CC00{XG51};
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,1,0),COLOR00EE00{XG51};
STICKLINE(ddx<0,0,DDX,3.5,0),COLOR008800{XG51};
STICKLINE(DDX<0,0,DDX,2.5,0),COLOR00AA00{XG51};
STICKLINE(DDX<0,0,DDX,1.5,0),COLOR00CC00{XG51};
STICKLINE(DDX<0,0,DDX,1,0),COLOR00EE00{XG51};
对倒出货洗盘:0,COLOR00FF00{XG51};
黄色底部吸货:0,COLORBLUE{XG51};
DRAWTEXT(CROSS(控盘,0),0-3,'买。追'),COLORFF00FF{XG51};
DRAWTEXT(CROSS(0,控盘),0-0,'卖'),COLORCYAN{X_G-5?1_C_N_{};