通达信真龙头源码副图

　　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_10 AND X_1 AND (CLOSE>REF(HHV(HIGH,3),1)*X_2 AND (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)>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)*X_2 AND CLOSE>OPEN AND CLOSE>=HHV(HIGH,10)*X_9;

　　X_16:=(CLOSE>REF(HHV(HIGH,3),1)*X_2 AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.07)*X_2 AND X_15 AND X_14;

　　X_17:=DYNAINFO(4)>0 AND HHV(HIGH,10)/LLV(LOW,10)<1.25 AND REF(CLOSE,1)*X_2OPEN AND CLOSE>=HHV(HIGH,10);

　　X_18:=(CLOSE-REF(CLOSE,1)*X_2)/REF(CLOSE,1)*100>7;

　　X_19:=X_17 AND X_18;

　　X_20:=DATETODAY(DATE);

　　X_21:=X_20>9344 AND X_20<15000000;

　　X_22:=(X_11 AND X_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_29 AND LOWREF(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>9350 AND X_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) AND HIGH>REF(X_41,1) OR (CLOSE>X_36 AND CROSS(CLOSE,REF(X_41,1))) AND CLOSE/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.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;

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

　　X_60:=COUNT(X_59<35,100)>=95;

　　X_61:=X_43 AND X_58>0 AND NOT(DYNAINFO(4)=0) AND X_60 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(X_57,X_56) OR CROSS(X_44,0) OR REF(COUNT(CROSS(X_44,0),3)=1 AND X_44<0.15 AND CLOSE/OPEN>0.989 AND CLOSE/REF(CLOSE,1)<1.03,1) OR CROSS(X_45,X_46) OR CROSS(X_47,X_48)) 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;

　　X_62:=X_11+X_16+X_19+X_32+X_61>=2;

　　X_63:=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);

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

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

　　X_66:=VOL/REF(VOL,1)*X_2>1.9;

　　X_67:=X_63 AND X_64 AND X_65 AND X_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_68 AND X_68>X_69 AND X_69>X_70 AND CLOSE>X_72;

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

　　X_75:=VOL/REF(VOL,1)>2 OR VOL=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_77 AND X_78 AND X_79 AND X_80;

　　X_82:=kdj.K>REF(KDJ.K,1)*X_2;

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

　　X_84:=KDJ.J>REF(KDJ.J,1)*X_2;

　　X_85:=X_82 AND X_83 AND X_84;

　　X_86:=X_7 AND X_74 AND X_75 AND X_76 AND X_81 AND X_85;

　　X_87:=FILTER(X_86,15)*X_2;

　　X_88:=X_67 OR X_87;

　　龙头:DATE<15000000 AND ((X_88 AND X_62)*X_2 OR X_35 OR X_22),NODRAW,COLORRED;

　　stICKLINE(龙头,0,1,2,0),COLORRED;

　　DRAWTEXT(龙头,0.5,' 真龙头'),COLORYELLOW;