通达信抓涨停主图选股指标公式源码

通达信抓涨停主图选股指标公式源码

源码正文：

N:=30;M:=95;N1:=7;N2:=79{XG51};
V1:=ema(CLOSE,5),COLORBLUE{XG51};
V2:=Ema(EMA(CLOSE,29)*1.01,10),COLORFFCC66{XG51};
V3:=EMA(CLOSE,10),COLORFF00FF{XG51};
V4:=EMA(EMA(CLOSE,60)*0.99,10),COLOR0099FF{XG51};
VAR11:=AMOUNT/vol/100{XG51};
运作:= MA(CLOSE,18),COLORRED{XG51};
平均:=EMA(EMA(VAR11,2),N),COLOR00FF00{XG51};
底仓:= EMA(EMA(VAR11,13),M),COLORYELLOW{XG51};
无穷成本均线:=dma(CLOSE,VOL/CAPITAL),COLORYELLOW{XG51};
持仓:IF(CLOSE>=SAR(4,8,20),SAR(4,8,20)*0.96,DRAWNULL),CIRCLEDOT ,COLORWHITE {XG51};
空仓:=IF(CLOSE<SAR(4,8,20),SAR(4,8,20),DRAWNULL),CIRCLEDOT ,COLORCYAN {XG51};
量能饱和:(AMOUNT/CLOSE)/HHV((AMOUNT/CLOSE),26)*100,COLORWHITE,NODRAW{XG51};
换手率:VOL/CAPITAL*100,COLORCYAN,NODRAW{XG51};
大盘指数:=INDEXC,NODRAW,COLORMAGENTA {XG51};
涨:INDEXADV,NODRAW,COLORMAGENTA {XG51};
跌:INDEXDEC,NODRAW,COLORCYAN{XG51};
数浪（未来）:zig(3,5),COLORRED,LINETHICK1{XG51};
VAR326:=IF(CLOSE>REF(CLOSE,1),88,0){XG51};
VAR327:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND VAR326>0, 91, 0){XG51};
stICKLINE(VAR327>90,L*0.99,L*0.95,4,0),COLORBLUE{XG51};
DRAWTEXT(VAR327>90,LOW*0.95,32),COLORBLUE{XG51};
操作线:=EMA(C,7),COLOR00FF00{XG51};
A:=(REF(操作线,1)){XG51};
STICKLINE((操作线>A),A,操作线*0.98,6,0),COLOR0000FF{XG51};
STICKLINE((操作线<=A),A,操作线*1.01,6,0), COLOR00FF00{XG51};
M9:=(MA(CLOSE,9)){XG51};
Y:=((HIGH+LOW)/(2)){XG51};
ao:=MA(Y,5)-(MA(Y,34)){XG51};
DU0:=(crOSS(AO,0)){XG51};
UD0:=(CROSS(0,AO)){XG51};
TDU0:=(BArslAST(DU0)){XG51};
TUD0:=(BARSLAST(UD0)){XG51};
DU3:=(REF(DU0,1)){XG51};
UD3:=(REF(UD0,1)){XG51};
TDU3:=(BARSLAST(DU3)){XG51};
TUD3:=(BARSLAST(UD3)){XG51};
UDGLINE:=(IF((TDU3<TUD3),REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3))){XG51};
JDU0:=(REF(CLOSE,1)<=REF(UDGLINE,1)) AND (CLOSE>UDGLINE) AND (TDU0<(TUD0)){XG51};
JUD0:=(REF(CLOSE,1)>=REF(UDGLINE,1)) AND (CLOSE<UDGLINE) AND (TUD0<(TDU0)){XG51};
JDU1:=JDU0 AND (COUNT(JDU0,TDU0)=(1)){XG51};
JUD1:=JUD0 AND (COUNT(JUD0,TUD0)=(1)){XG51};
JDU2:=JDU1 AND (REF(BARSLAST(JUD1),1)<(REF(BARSLAST(JDU1),1))){XG51};
JUD2:=JUD1 AND (REF(BARSLAST(JUD1),1)>(REF(BARSLAST(JDU1),1))){XG51};
JDU3:=JDU1 AND (REF(BARSLAST(JUD1),1)>(REF(BARSLAST(JDU1),1))){XG51};
JUD3:=JUD1 AND (REF(BARSLAST(JUD1),1)<(REF(BARSLAST(JDU1),1))){XG51};
DRAWTEXT(JDU2,(M9)*(0.94999998),33),COLORBLUE{XG51};
VAR1:=(((CLOSE-MA(CLOSE,30))/(MA(CLOSE,30)))*(100)){XG51};
VAR2:=(CLOSE>OPEN) AND (OPEN-LOW>HIGH-(CLOSE)){XG51};
VAR3:=(REF(VAR1,1)<(-20)) AND (VAR2){XG51};
VAR4:=(REF(VAR1,1)<(-20)) AND (CLOSE>OPEN) AND (((CLOSE-REF(CLOSE,1))/(REF(CLOSE,1)))*(1000)>(20)){XG51};
VAR5:=(FILTER((VAR3 OR VAR4),3)){XG51};
VAR6:=(OPEN>CLOSE) AND (HIGH-IF((CLOSE>OPEN),CLOSE,OPEN)>IF((OPEN<CLOSE),OPEN,CLOSE)-(LOW)){XG51};
VAR7:=(REF(VAR1,1)>Abs((-20))) AND (VAR6){XG51};
VAR8:=(REF(VAR1,1)>ABS((-20))) AND (CLOSE<OPEN) AND (((REF(CLOSE,1)-CLOSE)/(REF(CLOSE,1)))*(1000)>(20)){XG51};
VAR9:=(FILTER((VAR7 OR VAR8),3)){XG51};
VAARA:=(REF(VAR1,1)<(-13)) AND (VAR2){XG51};
VARB:=(REF(VAR1,1)<(-13)) AND (CLOSE>OPEN) AND (((CLOSE-REF(CLOSE,1))/(REF(CLOSE,1)))*(1000)>(20)){XG51};
VARC:=(FILTER((VAARA OR VARB),3)){XG51};
VARD:=(REF(VAR1,1)>ABS((-13))) AND (VAR6){XG51};
VARE:=(REF(VAR1,1)>ABS((-13))) AND (CLOSE<OPEN) AND (((REF(CLOSE,1)-CLOSE)/(REF(CLOSE,1)))*(1000)>(20)){XG51};
VARF:=(FILTER((VARD OR VARE),3)){XG51};
DRAWTEXT(((VARF)*(VAR1)>0),(1)*(REF(CLOSE,1)),34),COLORCYAN{XG51};
M1:EMA(CLOSE,3),COLORRED{XG51};
M2:=EMA(CLOSE,8){XG51};
M3:EMA(M2,13),COLORCYAN{XG51};
VAR14:=EMA(M3,55){XG51};
VAR15:=(REF(HIGH,1)+REF(LOW,1))/2{XG51};
VAR16:=MA(CLOSE,20)+2*STD(CLOSE,20){XG51};
DRAWTEXT(CROSS(VAR15,VAR16),HIGH*1.06,35), COLORCYAN{XG51};
VAR17:=REF(CLOSE,1){XG51};
VAR18:=SMA(MAX(CLOSE-VAR17,0),N1,1)/SMA(ABS(CLOSE-VAR17),N1,1)*100{XG51};
VAR19:=CROSS(N2,VAR18){XG51};
VARA:=FILTER(VAR9,4){XG51};
DRAWTEXT(VARA,HIGH*1.06,36), COLORCYAN{XG51};
_红柱:=IF("macd.MacD">REF("MACD.MACD",1),"MACD.MACD",DRAWNULL),STICK,COLORWHITE{XG51};
绿柱:=IF("MACD.MACD"<REF("MACD.MACD",1),"MACD.MACD",DRAWNULL),
STICK,COLORCYAN{XG51};
_抄底:=ABS((CROSS("MACD.dif","MACD.DEA")
&&"MACD.DEA"<=-0.07)*"MACD.DIF")*1.50,COLORMAGENTA{XG51};
_DIF:="MACD.DIF",COLORRED{XG51};
_DEA:="MACD.DEA",COLORBLUE{XG51};
__强度:=IF(_DIF>_DEA,_DIF,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
_强度:=IF(_DEA<_DIF,_DEA,DRAWNULL),COLORLIMAGENTA,LINETHICK2{XG51};
DRAWTEXT(ABS(_抄底)>0,LOW*0.98,37),COLORLIMAGENTA{X~G.5!1~C~N~{};