以下是通达信神龙出渊主图/预警初选龙头源码和截图
通达信神龙出渊主图/选股预警初选龙头源码:
涨跌:=REF(C,1);
:=IF(((((C-涨跌)*100)/涨跌) =(10-((0.01*100)/涨跌))),1,0);
DIF:=(Ema(C,12)-EMA(C,26));
DEA:=EMA(DIF,9);
:=((DIF-DEA)*2);
VAR2:=(CLOSE*);
VAR3:=EMA((((((EMA(VAR2,3)/EMA(VOL,3))+(EMA(VAR2,6)/EMA(VOL,6)))+(EMA(VAR2,12)/EMA(VOL,12)))+(EMA(VAR2,24)/EMA(VOL,24)))/4),13);
VAR4:=EMA(CLOSE,9);
飞狐线:=(MA(CLOSE,25)+((MA(CLOSE,25)*20)/100));
强势线:=(MA(CLOSE,25)+((MA(CLOSE,25)*6)/100));
支撑线:=((((MA(CLOSE,3)+MA(CLOSE,6))+MA(CLOSE,12))+MA(CLOSE,24))/4);
压力线:=EMA((VAR4*1.14),5);
盈损线:=(LLV(REF(LOW,1),2)+((HHV(REF(HIGH,1),2)-LLV(REF(LOW,1),2))/2));
QD:=(((C 强势线)AND(C 支撑线))AND(C 盈损线));
小妖:=((COUNT(QD,10)=1)ANDQD);
XYJJ:=BArslAst(小妖);
JS:=crOSS(C,压力线);
妖狐:=((COUNT(JS,XYJJ) =1)ANDJS);
HX1:=((REF(妖狐,1)AND(O 压力线))AND(C 压力线));
HX2:=((REF(妖狐,1)ANDCROSS(C,飞狐线))AND(C 压力线));
狐仙前世:=(小妖AND妖狐);
狐仙金身:=(HX1ORHX2);
妖狐王:=((((REF(涨停,1)AND(O 压力线))AND(O REF(H,1)))AND(REF(H,1) REF(压力线,1)))AND(L =压力线));
XG:=((狐仙前世OR狐仙金身)OR妖狐王);
AAAA:=MA(C,1);
AAA:=SMA(SMA(SMA(AAAA,2,1),2,1),2,1);
BBB:=MA(AAA,3);
DRAWBAND(AAA,RGB(255,255,0),BBB,RGB(0,0,255));
CCC:=(3*C+L+O+H)/6;
牛线:=(20*CCC+19*REF(CCC,1)+18*REF(CCC,2)+17*REF(CCC,3)+16*REF(CCC,4)+15*REF(CCC,5)+14*REF(CCC,6)+13*REF(CCC,7)+12*REF(CCC,8)+11*REF(CCC,9)+10*REF(CCC,10)+9*REF(CCC,11)+8*REF(CCC,12)+7*REF(CCC,13)+6*REF(CCC,14)+5*REF(CCC,15)+4*REF(CCC,16)+3*REF(CCC,17)+2*REF(CCC,18)+REF(CCC,20))/210,colorred,LINETHICK2;
马线:=MA(牛线,5);
DRAWBAND(牛线,RGB(255,40,0),马线,RGB(256,200,0));
STICKLINE(IF((C REF(C,1)*1.096),2,0),OPEN,CLOSE,3,0),colorred;
DRAWTEXT(XG=1,LOW-0.05,'超牛龙头'),coloryellow;
MA5:MA(CLOSE,5);
MA10:MA(CLOSE,10);
MA20:MA(CLOSE,20);
MA60:MA(CLOSE,60);
MA120:MA(CLOSE,120);
MA250:MA(CLOSE,250);
MA7:MA(CLOSE,7);
MA8:MA(CLOSE,8);
MA9:MA(CLOSE,9);
{十大流通股股东数据公式}
AAA:=EXTERNVALUE(0,6);
大流通占比:AAA,NODRAW,COLORMAGENTA;
:100*V/CAPITAL,NODRAW,COLORMAGENTA;
净换手率:10000*V/(CAPITAL*(100-AAA)),NODRAW,COLORMAGENTA;
DRAWTEXT_FIX(1,0.05,0.04,0,HYBLOCK)COLOR0080FF;
DRAWTEXT_FIX(1,0.12,0.04,0,DYBLOCK)COLOR00FFFF;
DRAWTEXT_FIX(1,0.05,0.08,0,GNBLOCK)COLOR0000FF;
DRAWTEXT_FIX(1,0.05,0.12,0,FGBLOCK)COLORFF00FF;
DRAWTEXT_FIX(1,0.45,0.04,0,'绝对执行指令:跳空阴,出干净!')COLORYELLOW;
DRAWTEXT_FIX(1,0.35,0.07,0,'解禁日期:')COLORGREEN;
DRAWTEXT_FIX(1,0.4,0.07,0,EXTERNSTR(0,20)),COLOR00FF00,LINETHICK2;
E10:=EXPMA(C,10),COLORRED;
ZT:=C/REF(C,1) 1.091ANDC=H;
A:=BARSLASTCOUNT(ZT);
T:=BARSLAST(CROSS(A=3,0.5));
LL:=REF(L,(T+2));
TJ:=C
AA:=COUNT(TJ,T+1)=1ANDTJ;
TA:=BARSLAST(AA);
LT:=BARSLAST(L=LLV(L,TA+1));
TJ1:=CROSS(C,E10);
XG:=COUNT(TJ1,LT+1)=1ANDTJ1ANDTOTALBARSCOUNT
STICKLINE(XG,C,O,2,0),COLORYELLOW;
{DRAWTEXT(XG,L*0.95,'起轿'),COLORYELLOW;}
VAR1:=(OPEN+LOW+HIGH+CLOSE)/4;
JJ:=(CLOSE+HIGH+LOW)/3;
A1:=EMA(JJ,10);
B1:=REF(A1,1);
{DRAWBAND(A1,RGB(255,0,0),B1,RGB(0,0,255));}
A8:=100*EMA(EMA(C-REF(C,1),6),6)/EMA(EMA(ABS(C-REF(C,1)),6),6);
买:=LLV(A8,2)=LLV(A8,7)ANDCOUNT(A8 0,2)ANDCROSS(A8,MA(A8,2));
卖:=HHV(A8,2)=HHV(A8,15)ANDCOUNT(A8 0,2)ANDCROSS(MA(A8,2),A8);
买入:STICKLINE(买,OPEN,CLOSE,2.7,0),COLORYELLOW;
STICKLINE(买,O,C,3.1,0),COLOR005555;
STICKLINE(买,O,C,2.6,0),COLOR007777;
STICKLINE(买,O,C,2.1,0),COLOR009999;
STICKLINE(买,O,C,1.6,0),COLOR00BBBB;
STICKLINE(买,O,C,1.0,0),COLOR00DDDD;
STICKLINE(买,O,C,0.3,0),COLOR00FFFF;
STICKLINE(买,H,L,0.0,0),COLOR00FFFF;
卖出:STICKLINE(卖,OPEN,CLOSE,2.6,0),COLORBROWN;
STICKLINE(卖,O,C,3.1,0),COLORFFFFFF;
STICKLINE(卖,O,C,2.6,0),COLOR555555;
STICKLINE(卖,O,C,2.1,0),COLOR777777;
STICKLINE(卖,O,C,1.6,0),COLOR999999;
STICKLINE(卖,O,C,1.0,0),COLORCCCCCC;
STICKLINE(卖,O,C,0.3,0),COLORCCDDBB;
{神龙出渊}
ZQ_1:=MA(CLOSE,5);
ZQ_2:=MA(CLOSE,10);
ZQ_3:=MA(CLOSE,60);
ZQ_4:=MA(CLOSE,120);
ZQ_5:=REF(CLOSE,1) REF(ZQ_1,1)ANDOPEN ZQ_1ANDZQ_1 ZQ_4;{昨天的收盘价小于5线线,开盘价小于5日线,但五日线在120日线上方}
ZQ_6:=REF(ZQ_5,1)=0ANDZQ_5;{一天上述条件不成立,但今天刚线成立,即5日线上穿120线}
ZQ_7:=EMA(HHV(HIGH,1),8);
ZQ_8:=EMA(CLOSE,8);
ZQ_9:=ZQ_8 REF(ZQ_8,1)ANDCLOSE ZQ_8;
ZQ_10:=IF(ZQ_7 REF(ZQ_7,1)ORZQ_9,1,0);
ZQ_11:=(COUNT(ZQ_10=1,4)=3ANDZQ_10=0)*89;
ZQ_12:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
ZQ_13:=IF(CLOSE OPEN,ZQ_12*(HIGH-LOW),IF(CLOSE OPEN,ZQ_12*(HIGH-OPEN+CLOSE-LOW),VOL/2))+IF(CLOSE OPEN,0-ZQ_12*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE OPEN,0-ZQ_12*(HIGH-LOW),0-VOL/2));
ZQ_14:=ZQ_13/20/1.15;
ZQ_15:=ZQ_14*0.55+REF(ZQ_14,1)*0.33+REF(ZQ_14,2)*0.22;
ZQ_16:=EMA(ZQ_15,3);
ZQ_17:=ZQ_16
ZQ_18:=COUNT(ZQ_17,9)
ZQ_19:=CLOSE/REF(CLOSE,1) 1.09;
ZQ_20:=CLOSE=HIGH;
ZQ_21:=REF(ZQ_19,1)ANDREF(ZQ_20,1);
ZQ_22:=COUNT(ZQ_21,11)
ZQ_23:=MA(CLOSE,3);
ZQ_24:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
ZQ_25:=(HIGH-REF(CLOSE,1))/REF(CLOSE,1)*100;
ZQ_26:=REF(HHV(VOL,10),1);
ZQ_27:=MA(CLOSE,20);
ZQ_28:=(ZQ_23+ZQ_1)/2;
ZQ_29:=COUNT(COUNT(ZQ_24 9.9ANDCLOSE=HIGH,1) =1,30)
ZQ_30:=COUNT(COUNT(ZQ_24 9.9ANDCLOSE=HIGH,1) =1,60)
ZQ_31:=ZQ_27 REF(ZQ_27,1)ANDVOL ZQ_26ANDZQ_29ANDZQ_25 3ANDOPEN =ZQ_1ANDCLOSE ZQ_1AND(COUNT(ZQ_28 REF(ZQ_28,1),3) =3ORCOUNT(ZQ_1 REF(ZQ_1,1),3) =3)ANDCOUNT(ZQ_27 REF(ZQ_27,1),25)
ZQ_32:=(CLOSE-OPEN)/OPEN*100;
ZQ_33:=ZQ_30ANDVOL 1.3*REF(VOL,1)ANDCOUNT(ZQ_32 0.5,6) =5ANDCOUNT(ZQ_23 ZQ_1,5) =5ANDCOUNT(HIGH REF(HIGH,1),6) =5ANDZQ_25 4.5ANDOPEN =ZQ_23ANDCLOSE ZQ_23ANDOPEN ZQ_1;
ZQ_34:=ZQ_31ORZQ_33;
ZQ_35:=ZQ_34=1ANDCOUNT(ZQ_34,15)=1;
ZQ_36:=AMOUNT/VOL/7;
ZQ_37:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
ZQ_38:=SUM(AMOUNT,10)/ZQ_36/7;
ZQ_39:=DMA(ZQ_37,VOL/ZQ_38);
ZQ_40:=(CLOSE-ZQ_39)/ZQ_39*100;
ZQ_41:=-ZQ_40;
ZQ_42:=ZQ_40 ZQ_41;
ZQ_43:=CROSS(ZQ_40,0.6)ANDZQ_42;
ZQ_44:=EMA(CLOSE/REF(CLOSE,1),5);
ZQ_45:=EMA(CLOSE/REF(CLOSE,1),10);
ZQ_46:=CROSS(ZQ_44,ZQ_45);
ZQ_47:=ZQ_43ANDZQ_46;
ZQ_48:=ZQ_47ANDZQ_35;
ZQ_49:=COUNT(ZQ_35,10)
ZQ_50:=ZQ_47ANDZQ_49ANDZQ_22;
ZQ_51:=ZQ_47ANDZQ_22ANDZQ_11;
ZQ_52:=ZQ_48ANDZQ_22;
ZQ_53:=ZQ_50ORZQ_52ORZQ_51;
ZQ_54:=(EMA(CLOSE,12)-EMA(CLOSE,26))/EMA(CLOSE,26)*100;
ZQ_55:=EMA(ZQ_54,9);
ZQ_56:=(ZQ_54-ZQ_55)*100;
ZQ_57:=ZQ_56-REF(ZQ_56,1);
ZQ_58:=CROSS(ZQ_57,50);
ZQ_59:=EMA(EMA(EMA(CLOSE,12),12),12);
ZQ_60:=(ZQ_59-REF(ZQ_59,1))/REF(ZQ_59,1)*100;
ZQ_61:=MA(ZQ_60,9);
ZQ_62:=ZQ_60 ZQ_61;
ZQ_63:=CLOSE/REF(CLOSE,1) 1.09;
ZQ_64:=CLOSE=HIGH;
ZQ_65:=REF(ZQ_63,1)ANDREF(ZQ_64,1);
ZQ_66:=COUNT(ZQ_65,4)
ZQ_67:=COUNT(ZQ_65,5)
ZQ_68:=(3*CLOSE+LOW+OPEN+HIGH)/6;GOODGUPIAO:SMA(MAX(CLOSE-C,0),7,1)/SMA(ABS(CLOSE-C),7,1)*100,NODRAW;
ZQ_69:=(20*ZQ_68+19*REF(ZQ_68,1)+18*REF(ZQ_68,2)+17*REF(ZQ_68,3)+16*REF(ZQ_68,4)+15*REF(ZQ_68,5)+14*REF(ZQ_68,6)+13*REF(ZQ_68,7)+12*REF(ZQ_68,8)+11*REF(ZQ_68,9)+10*REF(ZQ_68,10)+9*REF(ZQ_68,11)+8*REF(ZQ_68,12)+7*REF(ZQ_68,13)+6*REF(ZQ_68,14)+5*REF(ZQ_68,15)+4*REF(ZQ_68,16)+3*REF(ZQ_68,17)+2*REF(ZQ_68,18)+REF(ZQ_68,20))/210;
ZQ_70:=MA(ZQ_69,6);
ZQ_71:=ZQ_69 ZQ_70;
ZQ_72:=CLOSE 1.02*REF(CLOSE,1);
ZQ_73:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100 (-6);
ZQ_74:=REF(CLOSE,1) (REF(CLOSE,BARSLAST(ZQ_72))+REF(CLOSE,BARSLAST(ZQ_72)+1))/2ANDCLOSE (REF(CLOSE,BARSLAST(ZQ_72))+REF(CLOSE,BARSLAST(ZQ_72)+1))/2;
ZQ_75:=REF(CLOSE,1) (REF(CLOSE,BARSLAST(ZQ_73))+REF(CLOSE,BARSLAST(ZQ_73)+1))/2ANDCLOSE (REF(CLOSE,BARSLAST(ZQ_73))+REF(CLOSE,BARSLAST(ZQ_73)+1))/2;
ZQ_76:=BARSLAST(ZQ_73) =7ANDZQ_72ANDZQ_75ANDCOUNT(ZQ_72,BARSLAST(ZQ_73))=1ANDNOT(HIGH=LOW)ANDREF(NOT(HIGH=LOW),BARSLAST(ZQ_73))=1;
ZQ_77:=COUNT(ZQ_76,7)
ZQ_78:=((CLOSE-REF(MA(CLOSE,6),1))/6+MA(CLOSE,6))*1.004;
ZQ_79:=CROSS(CLOSE,ZQ_78)ANDZQ_78 REF(ZQ_78,1);
ZQ_80:=((CLOSE-REF(MA(CLOSE,18),1))/18+MA(CLOSE,18))*1.004;
ZQ_81:=CROSS(CLOSE,ZQ_80)ANDZQ_80 REF(ZQ_80,1);
ZQ_82:=ZQ_79ANDZQ_81ANDZQ_76ANDZQ_71ANDZQ_62;
ZQ_83:=ZQ_66ANDZQ_76ANDZQ_71ANDZQ_62;
ZQ_84:=ZQ_82ORZQ_83;
ZQ_85:=ZQ_18ANDZQ_53;
ZQ_86:=ZQ_84ORZQ_85;
DRAWICON(ZQ_86,L,13);
DRAWTEXT(ZQ_86,L,'神龙出渊');
VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);VAR2:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),10,1);VAR3:=EMA(VAR2,10);VAR4:=LLV(LOW,33);VAR5:=EMA(IF(LOW =VAR4,VAR3,0),3);进场:IF(VAR5 REF(VAR5,1),0,VAR5),COLORRED,NODRAW;STICKLINE(VAR5 REF(VAR5,1),VAR5,0,3,0),COLORRED;洗盘:IF(VAR5 REF(VAR5,1),VAR5,0),COLORGREEN,NODRAW;STICKLINE(VAR5 REF(VAR5,1),0,VAR5,3,0),COLORGREEN;VAR12:=SMA(ABS(VAR1-H),13,1)/SMA(MAX(VAR1-H,0),10,1);VAR13:=EMA(VAR12,10);VAR14:=HHV(H,33);VAR15:=EMA(IF(H =VAR14,VAR13,0),3);主力出场:IF(VAR15 REF(VAR15,1),VAR15,0),COLORYELLOW,POINTDOT,LINETHICK0;STICKLINE(VAR15 REF(VAR15,1),0,VAR15,3,0),COLORYELLOW;冲顶:IF(VAR15 REF(VAR15,1),VAR15,0),COLORFF00FF,POINTDOT,LINETHICK0;STICKLINE(VAR15 REF(VAR15,1),0,VAR15,3,0),COLORFF00FF;A1:=REF(CLOSE,2);A2:=SMA(MAX(CLOSE-A1,0),7,1)/SMA(ABS(CLOSE-A1),7,1)*100;介入点:IF(A2 19,19,0)COLORWHITE;VARC:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1);金山:EMA(IF(L =LLV(L,30),VARC,0),3),COLORBLUE,LINETHICK2;
通达信神龙出渊主图/选股预警初选龙头截图