通达信主升龙头指标公式源码副图[万物公式]

VAR1:=DYNAINFO(4)>0 AND HHV(HIGH,10)/LLV(LOW,10)< 1.25 AND REF(CLOSE,1)< LLV(LOW,15)+(HHV(HIGH,15)-LLV(LOW,15))*0.85 AND CLOSE>OPEN AND CLOSE>=HHV(HIGH,10);

VAR2:=IF(DATETODAY(DATE)< 999999999,1,DRAWNULL);

VAR4:=EMA(CLOSE,10);

VAR7:=EMA(CLOSE,40);

VAR8:=EMA(CLOSE,60);

VAR9:=IF(DATE< 999999999,1,DRAWNULL);

VAR10:=MAX(VAR7,VAR8);

VAR11:=CLOSE>VAR10 AND VAR1 AND (CLOSE>REF(HHV(HIGH,3),1)*VAR2 AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.07);

VAR12:=vol;

VAR13:=MA(VAR12,5);

VAR14:=VAR13+VAR13>VAR12;

VAR15:=DYNAINFO(4)>0 AND HHV(HIGH,10)/LLV(LOW,10)< 1.25 AND REF(CLOSE,1)< (LLV(LOW,15)+(HHV(HIGH,15)-LLV(LOW,15))*0.85)*VAR2 AND CLOSE>OPEN AND CLOSE>=HHV(HIGH,10)*VAR9;

VAR16:=(CLOSE>REF(HHV(HIGH,3),1)*VAR2 AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.07)*VAR2 AND VAR15 AND VAR14;

VAR17:=DYNAINFO(4)>0 AND HHV(HIGH,10)/LLV(LOW,10)< 1.25 AND REF(CLOSE,1)*VAR2< LLV(LOW,15)+(HHV(HIGH,15)-LLV(LOW,15))*0.85 AND CLOSE>OPEN AND CLOSE>=HHV(HIGH,10);

VAR18:=(CLOSE-REF(CLOSE,1)*VAR2)/REF(CLOSE,1)*100>7;

VAR19:=VAR17 AND VAR18;

VAR20:=DATETODAY(DATE);

VAR21:=VAR20>9344 AND VAR20< 999999999;

VAR22:=(VAR11 AND VAR19)*VAR21;

VAR23:=EMA(CLOSE,5);

VAR25:=EMA(CLOSE,14);

VAR26:=EMA(CLOSE,18);

VAR27:=EMA(CLOSE,40);

VAR28:=EMA(CLOSE,60);

VAR29:=MAX(MAX(MAX(MAX(MAX(VAR23,VAR4),VAR25),VAR26),VAR27),VAR28)*VAR9;

VAR30:=MIN(MIN(MIN(MIN(MIN(VAR23,VAR4),VAR25),VAR26),VAR27),VAR28)*VAR9;

VAR31:=CLOSE>VAR29 AND LOW< VAR30 AND (CLOSE>REF(HHV(HIGH,3),1) AND (CLOSE-REF(CLOSE,1)*VAR2)/REF(CLOSE,1)>0.09);

VAR32:=FILTER(VAR31>0,0)=1;

VAR33:=DATETODAY(DATE);

VAR34:=VAR33>9350 AND VAR33< 999999999;

VAR35:=VAR32*VAR34;

VAR36:=MA(REF(HHV(CLOSE,26),1),2);

VAR37:=MA(CLOSE,26);

VAR38:=POW(CLOSE-VAR37,2);

VAR39:=MA(VAR38,13);

VAR40:=SQRT(VAR39);

VAR41:=VAR37+2*VAR40;

VAR43:=crOSS(CLOSE,VAR36) AND HIGH>REF(VAR41,1) OR (CLOSE>VAR36 AND CROSS(CLOSE,REF(VAR41,1))) AND CLOSE/OPEN>0.998;

VAR44:=macd.MACD;

VAR45:=kd.K;

VAR46:=KD.D;

VAR47:=rsi.RSI1;

VAR48:=RSI.RSI3;

VAR49:=CLOSE-REF(CLOSE,1);

VAR50:=IF(VAR49>=0,VAR49,0)*VAR9;

VAR51:=IF(VAR49< 0,-VAR49,0)*VAR9;

VAR52:=MEMA(VAR50,10);

VAR53:=MEMA(VAR51,10);

VAR54:=MEMA(VAR50,6);

VAR55:=MEMA(VAR51,6);

VAR56:=MA(100*VAR52/(VAR52+VAR53),10)*VAR9;

VAR57:=MA(100*VAR54/(VAR54+VAR55),6)*VAR9;

VAR58:=MA(CLOSE,5)/MA(CLOSE,10)>0.999 AND MA(CLOSE,10)/MA(CLOSE,20)>0.9847 AND MA(CLOSE,20)>MA(CLOSE,60) AND REF(COUNT(MA(CLOSE,10)/MA(CLOSE,20)< 1.017 OR MA(CLOSE,5)/MA(CLOSE,10)< 1.017,8)>=1,1) AND MA(CLOSE,20)/MA(CLOSE,60)< 1.121;

VAR59:=(CLOSE-MA(CLOSE,60))/MA(CLOSE,60)*100;

VAR60:=COUNT(VAR59< 35,100)>=95;

VAR61:=VAR43 AND VAR58>0 AND NOT(DYNAINFO(4)=0) AND VAR60 AND REF(COUNT(MA(CLOSE,20)>MA(CLOSE,30),4)=4 AND COUNT(CLOSE>MA(CLOSE,5),3)>=2,1) AND VOL>REF(VOL,1) AND (REF(COUNT(CLOSE>OPEN,10)>=6 OR COUNT(CLOSE>OPEN,5)>=4,1) OR CLOSE=HIGH) AND (CROSS(VAR57,VAR56) OR CROSS(VAR44,0) OR REF(COUNT(CROSS(VAR44,0),3)=1 AND VAR44< 0.15 AND CLOSE/OPEN>0.989 AND CLOSE/REF(CLOSE,1)< 1.03,1) OR CROSS(VAR45,VAR46) OR CROSS(VAR47,VAR48)) AND REF(CLOSE/OPEN>0.988 AND (CLOSE>OPEN OR (CLOSE<=OPEN AND HIGH/LOW< 1.049)),1) AND HIGH/CLOSE< 1.013 AND CLOSE/OPEN>1.05;

VAR62:=VAR11+VAR16+VAR19+VAR32+VAR61>=2;

VAR63:=MA(CLOSE,5)>MA(CLOSE,10) AND MA(CLOSE,10)>MA(CLOSE,20) AND MA(CLOSE,20)>MA(CLOSE,60) AND MA(CLOSE,60)>MA(CLOSE,120) AND MA(CLOSE,5)>REF(MA(CLOSE,5),1);

VAR64:=CLOSE>REF(CLOSE,1)*1.1-0.01;

VAR65:=HHV(HIGH,20)=HHV(CLOSE,1) AND VOL>0 AND BARSCOUNT(CLOSE)*VAR2>=20;

VAR66:=VOL/REF(VOL,1)*VAR2>1.9;

VAR67:=VAR63 AND VAR64 AND VAR65 AND VAR66;

VAR74:=CLOSE/REF(CLOSE,1)>1.05 AND REF(CLOSE,1)/REF(CLOSE,2)< 1.05 AND CLOSE/LLV(CLOSE,10)< 1.4;

VAR75:=VOL/REF(VOL,1)>2 OR VOL=HHV(VOL,15);

VAR76:=CAPITAL< 10000000;

VAR77:=ATAN((MA(CLOSE,5)/REF(MA(CLOSE,5),1)-1)*100)*57.299999>40;

VAR78:=ATAN((MA(CLOSE,10)/REF(MA(CLOSE,10),1)-1)*100)*57.299999>30;

VAR79:=ATAN((MA(CLOSE,20)/REF(MA(CLOSE,20),1)-1)*100)*57.299999>20;

VAR80:=ATAN((MA(CLOSE,30)/REF(MA(CLOSE,30),1)-1)*100)*57.299999>10;

VAR81:=VAR77 AND VAR78 AND VAR79 AND VAR80;

VAR82:=kdj.K>REF(KDJ.K,1)*VAR2;

VAR83:=KDJ.D>REF(KDJ.D,1)*VAR2 AND KDJ.D< 70;

VAR84:=KDJ.J>REF(KDJ.J,1)*VAR2;

VAR85:=VAR82 AND VAR83 AND VAR84;

VAR86:=VAR7 AND VAR74 AND VAR75 AND VAR76 AND VAR81 AND VAR85;

VAR87:=FILTER(VAR86,15)*VAR2;

VAR88:=VAR67 OR VAR87;

XG:=((VAR88 AND VAR62)*VAR2 OR VAR35 OR VAR22);

STICKLINE(XG, 0,10, 0.2, 0),COLORLIMAGENTA;

STICKLINE(XG, 0,5, 0.8, 0),COLORYELLOW;

DRAWTEXT(XG,7.4,主升龙头),COLORYELLOW;

DRAWICON(XG,11,9);