通达信真龙头指标公式

    X_1:=DYNAINFO(4)>0ANDHHV(HIGH,10)/LLV(LOW,10)<1.25ANDREF(CLOSE,1)<LLV(LOW,15)+(HHV(HIGH,15)-LLV(LOW,15))*0.85ANDCLOSE>OPENANDCLOSE>=HHV(HIGH,10);
    X_2:=IF(DATETODAY(DATE)<15000000,1,DRAWNULL);
    X_3:=Ema(CLOSE,5);
    X_4:=EMA(CLOSE,10);
    X_5:=EMA(CLOSE,14);
    X_6:=EMA(CLOSE,18);
    X_7:=EMA(CLOSE,40);
    X_8:=EMA(CLOSE,60);
    X_9:=IF(DATE<30000*500,1,DRAWNULL);
    X_10:=MAX(X_7,X_8);
    X_11:=CLOSE>X_10ANDX_1AND(CLOSE>REF(HHV(HIGH,3),1)*X_2AND(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.07);
    X_12:=vol;
    X_13:=MA(X_12,5);
    X_14:=X_13+X_13>X_12;
    X_15:=DYNAINFO(4)>0ANDHHV(HIGH,10)/LLV(LOW,10)<1.25ANDREF(CLOSE,1)<(LLV(LOW,15)+(HHV(HIGH,15)-LLV(LOW,15))*0.85)*X_2ANDCLOSE>OPENANDCLOSE>=HHV(HIGH,10)*X_9;
    X_16:=(CLOSE>REF(HHV(HIGH,3),1)*X_2AND(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.07)*X_2ANDX_15ANDX_14;
    X_17:=DYNAINFO(4)>0ANDHHV(HIGH,10)/LLV(LOW,10)<1.25ANDREF(CLOSE,1)*X_2<LLV(LOW,15)+(HHV(HIGH,15)-LLV(LOW,15))*0.85ANDCLOSE>OPENANDCLOSE>=HHV(HIGH,10);
    X_18:=(CLOSE-REF(CLOSE,1)*X_2)/REF(CLOSE,1)*100>7;
    X_19:=X_17ANDX_18;
    X_20:=DATETODAY(DATE);
    X_21:=X_20>9344ANDX_20<15000000;
    X_22:=(X_11ANDX_19)*X_21;
    X_23:=EMA(CLOSE,5);
    X_24:=EMA(CLOSE,10);
    X_25:=EMA(CLOSE,14);
    X_26:=EMA(CLOSE,18);
    X_27:=EMA(CLOSE,40);
    X_28:=EMA(CLOSE,60);
    X_29:=MAX(MAX(MAX(MAX(MAX(X_23,X_4),X_25),X_26),X_27),X_28)*X_9;
    X_30:=MIN(MIN(MIN(MIN(MIN(X_23,X_4),X_25),X_26),X_27),X_28)*X_9;
    X_31:=CLOSE>X_29ANDLOW<X_30AND(CLOSE>REF(HHV(HIGH,3),1)AND(CLOSE-REF(CLOSE,1)*X_2)/REF(CLOSE,1)>0.09);
    X_32:=FILTER(X_31>0,0)=1;
    X_33:=DATETODAY(DATE);
    X_34:=X_33>9350ANDX_33<15000000;
    X_35:=X_32*X_34;
    X_36:=MA(REF(HHV(CLOSE,26),1),2);
    X_37:=MA(CLOSE,26);
    X_38:=POW(CLOSE-X_37,2);
    X_39:=MA(X_38,13);
    X_40:=SQRT(X_39);
    X_41:=X_37+2*X_40;
    X_42:=REF(X_41,1);
    X_43:=crOSS(CLOSE,X_36)ANDHIGH>REF(X_41,1)OR(CLOSE>X_36ANDCROSS(CLOSE,REF(X_41,1)))ANDCLOSE/OPEN>0.998;
    X_44:=macd.MacD;
    X_45:=kd.K;
    X_46:=KD.D;
    X_47:=rsi.RSI1;
    X_48:=RSI.RSI3;
    X_49:=CLOSE-REF(CLOSE,1);
    X_50:=IF(X_49>=0,X_49,0)*X_9;
    X_51:=IF(X_49<0,-X_49,0)*X_9;
    X_52:=MEMA(X_50,10);
    X_53:=MEMA(X_51,10);
    X_54:=MEMA(X_50,6);
    X_55:=MEMA(X_51,6);
    X_56:=MA(100*X_52/(X_52+X_53),10)*X_9;
    X_57:=MA(100*X_54/(X_54+X_55),6)*X_9;
    X_58:=MA(CLOSE,5)/MA(CLOSE,10)>0.999ANDMA(CLOSE,10)/MA(CLOSE,20)>0.9847ANDMA(CLOSE,20)>MA(CLOSE,60)ANDREF(COUNT(MA(CLOSE,10)/MA(CLOSE,20)<1.017ORMA(CLOSE,5)/MA(CLOSE,10)<1.017,8)>=1,1)ANDMA(CLOSE,20)/MA(CLOSE,60)<1.121;
    X_59:=(CLOSE-MA(CLOSE,60))/MA(CLOSE,60)*100;
    X_60:=COUNT(X_59<35,100)>=95;
    X_61:=X_43ANDX_58>0ANDNOT(DYNAINFO(4)=0)ANDX_60ANDREF(COUNT(MA(CLOSE,20)>MA(CLOSE,30),4)=4ANDCOUNT(CLOSE>MA(CLOSE,5),3)>=2,1)ANDVOL>REF(VOL,1)AND(REF(COUNT(CLOSE>OPEN,10)>=6ORCOUNT(CLOSE>OPEN,5)>=4,1)ORCLOSE=HIGH)AND(CROSS(X_57,X_56)ORCROSS(X_44,0)ORREF(COUNT(CROSS(X_44,0),3)=1ANDX_44<0.15ANDCLOSE/OPEN>0.989ANDCLOSE/REF(CLOSE,1)<1.03,1)ORCROSS(X_45,X_46)ORCROSS(X_47,X_48))ANDREF(CLOSE/OPEN>0.988AND(CLOSE>OPENOR(CLOSE<=OPENANDHIGH/LOW<1.049)),1)ANDHIGH/CLOSE<1.013ANDCLOSE/OPEN>1.05;
    X_62:=X_11+X_16+X_19+X_32+X_61>=2;
    X_63:=MA(CLOSE,5)>MA(CLOSE,10)ANDMA(CLOSE,10)>MA(CLOSE,20)ANDMA(CLOSE,20)>MA(CLOSE,60)ANDMA(CLOSE,60)>MA(CLOSE,120)ANDMA(CLOSE,5)>REF(MA(CLOSE,5),1);
    X_64:=CLOSE>REF(CLOSE,1)*1.1-0.01;
    X_65:=HHV(HIGH,20)=HHV(CLOSE,1)ANDVOL>0ANDBARSCOUNT(CLOSE)*X_2>=20;
    X_66:=VOL/REF(VOL,1)*X_2>1.9;
    X_67:=X_63ANDX_64ANDX_65ANDX_66;
    X_68:=MA(CLOSE,5);
    X_69:=MA(CLOSE,10);
    X_70:=MA(CLOSE,20);
    X_71:=MA(CLOSE,30);
    X_72:=MA(CLOSE,60);
    X_73:=CLOSE>X_68ANDX_68>X_69ANDX_69>X_70ANDCLOSE>X_72;
    X_74:=CLOSE/REF(CLOSE,1)>1.05ANDREF(CLOSE,1)/REF(CLOSE,2)<1.05ANDCLOSE/LLV(CLOSE,10)<1.4;
    X_75:=VOL/REF(VOL,1)>2ORVOL=HHV(VOL,15);
    X_76:=CAPITAL<10000000;
    X_77:=ATAN((MA(CLOSE,5)/REF(MA(CLOSE,5),1)-1)*100)*57.299999>40;
    X_78:=ATAN((MA(CLOSE,10)/REF(MA(CLOSE,10),1)-1)*100)*57.299999>30;
    X_79:=ATAN((MA(CLOSE,20)/REF(MA(CLOSE,20),1)-1)*100)*57.299999>20;
    X_80:=ATAN((MA(CLOSE,30)/REF(MA(CLOSE,30),1)-1)*100)*57.299999>10;
    X_81:=X_77ANDX_78ANDX_79ANDX_80;
    X_82:=kdj.K>REF(KDJ.K,1)*X_2;
    X_83:=KDJ.D>REF(KDJ.D,1)*X_2ANDKDJ.D<70;
    X_84:=KDJ.J>REF(KDJ.J,1)*X_2;
    X_85:=X_82ANDX_83ANDX_84;
    X_86:=X_7ANDX_74ANDX_75ANDX_76ANDX_81ANDX_85;
    X_87:=FILTER(X_86,15)*X_2;
    X_88:=X_67ORX_87;
    龙头:DATE<15000000AND((X_88ANDX_62)*X_2ORX_35ORX_22),NODRAW,COLORRED;
    stICKLINE(龙头,0,1,2,0),COLORRED;
    DRAWTEXT(龙头,0.5,'真龙头'),COLORYELLOW;