您现在的位置:程序化交易>> 股票公式>> 通达信>> 通达信知识>>正文内容

通达信短进快抛主图指标公式源码(好精致) [通达信]

  • 咨询内容:

    此主题相关图片如下qq图片20160217212616.png:

    此主题相关图片如下qq图片20160217212631.jpg:

    此主题相关图片如下qq图片20160217212634.png:

     下载信息  [文件大小:   下载次数: ]点击浏览该文件:通达信短进快抛主图指标公式源码(好精致).txt


    通达信短进快抛主图指标公式源码(好精致)

    ============================
    {以下为趋势线自动划线,有未来函数,如不喜可直接删除}
    可以从文本文档直接下载复制新建公式,或者从以下部分拼接公式。

     

  • 通达信技术部: {续1}
    {以下为趋势线自动划线,有未来函数,如不喜可直接删除}
    RC1:=REF(C,1);
    AA:=REF(H,8)=HHV(H,2*8+1); AA1:=REF(L,8)=LLV(L,2*8+1);
    QY:=BACKSET(AA,8+1); QY1:=BACKSET(AA1,8+1);
    CC2:=FILTER(QY,8) AND H=HHV(H,8+1); CC1:=FILTER(QY1,8) AND L=LLV(L,8+1);
    DDD:=BARSLAST(CC2); DD1:=BARSLAST(CC1);
    GDTS:=IF(CC2,CURRBARSCOUNT,0); DDTS:=IF(CC1,CURRBARSCOUNT,0);
    DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS); DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
    GDCS1:=CONST(DINGBUTS); DDCS1:=CONST(DDTS1);
    GDCS13:=CONST(REF(H,GDCS1-1)); DDCS13:=CONST(REF(L,DDCS1-1));
    DINGBUTS1:=REF(DINGBUTS,DDD+1); DDTS2:=REF(DDTS1,DD1+1);
    GDCS2:=CONST(DINGBUTS1); DDCS2:=CONST(DDTS2);
    GDCS23:=CONST(REF(H,DINGBUTS1-1)); DDCS23:=CONST(REF(L,DDTS2-1));
    XG1:=BACKSET(ISLASTBAR,GDCS1); XD1:=BACKSET(ISLASTBAR,DDCS1);
    XG2:=BACKSET(ISLASTBAR,DINGBUTS1); XD2:=BACKSET(ISLASTBAR,DDTS2);
    M:=INTPART(3*8/5);
    AAA:=REF(H,M)=HHV(H,2*M+1);
    QYY:=BACKSET(AAA,M+1);
    CCC:=FILTER(QYY,M) AND H=HHV(H,M+1);
    DDDD:=BARSLAST(CCC),NODRAW;
    GDTSS:=IF(CCC,CURRBARSCOUNT,0);
    DINGBUTSS:=IF(DDDD,REF(GDTSS,DDDD),GDTSS);
    GDCS11:=CONST(DINGBUTSS);
    DINGBUTS11:=REF(DINGBUTSS,DDDD+1);
    GDCS22:=CONST(DINGBUTS11);
    AA11:=REF(L,M)=LLV(L,2*M+1);
    QY11:=BACKSET(AA11,M+1);
    CC11:=FILTER(QY11,M) AND L=LLV(L,M+1);
    DD11:=BARSLAST(CC11);
    DDTSS:=IF(CC11,CURRBARSCOUNT,0);
    DDTS11:=IF(DD11,REF(DDTSS,DD11),DDTSS);
    DDCS11:=CONST(DDTS11);
    DDTS22:=REF(DDTS11,DD11+1);
    DDCS22:=CONST(DDTS22);
    AA1F:=REF(H,5)=HHV(H,2*5+1);
    B1:=FILTER(AA1F,5);
    CH:=BACKSET(B1,5+1);
    D1:=FILTER(CH,5);
    R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1); S11:=R11>REF(R11,1);

     

  • 通达信客服: {续2}
    AA2:=REF(L,5)=LLV(L,2*5+1);
    B2:=FILTER(AA2,5);
    C12:=BACKSET(B2,5+1);
    D2:=FILTER(C12,5);
    T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1); U11:=T11>REF(T11,1);
    HIGHN:=10;LOWN:=10;
    AAR:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);
    QYQ:=BACKSET(AAR,HIGHN+1);
    CCQ:=FILTER(QYQ,HIGHN) AND H=HHV(H,HIGHN+1);
    DDDQQ:=BARSLAST(CCQ);
    GDTSQ:=IF(CCQ,CURRBARSCOUNT,0);
    DINGBUTSQ:=IF(DDDQQ,REF(GDTSQ,DDDQQ),GDTSQ);
    GDCS1Q:=CONST(DINGBUTSQ);
    DINGBUTS1Q:=REF(DINGBUTSQ,DDDQQ+1);
    GDCS2Q:=CONST(DINGBUTS1Q);
    AA1Q:=REF(L,LOWN)=LLV(L,2*LOWN+1);
    QY1Q:=BACKSET(AA1Q,LOWN+1);
    CC1Q:=FILTER(QY1Q,LOWN) AND L=LLV(L,LOWN+1);
    DD1Q:=BARSLAST(CC1Q);
    DDTSQ:=IF(CC1Q,CURRBARSCOUNT,0);
    DDTS1Q:=IF(DD1Q,REF(DDTSQ,DD1Q),DDTSQ);
    DDCS1Q:=CONST(DDTS1Q);
    DDTS2Q:=REF(DDTS1Q,DD1Q+1);
    DDCS2Q:=CONST(DDTS2Q);
    TJ2:=BACKSET(ISLASTBAR,SUMBARS(V,CAPITAL));
    TJ3:=TJ2>REF(TJ2,1);
    上:DRAWLINE(CURRBARSCOUNT=GDCS22,H,CURRBARSCOUNT=GDCS11,H,1),COLORGRAY,LINETHICK1;
    下:DRAWLINE(CURRBARSCOUNT=DDCS22,L,CURRBARSCOUNT=DDCS11,L,1) COLORGRAY,LINETHICK1;
    IF(XG2,GDCS23,DRAWNULL),COLORC0C0C0,POINTDOT;
    IF(XG1,GDCS13,DRAWNULL),COLORC0C0C0,POINTDOT;
    IF(XD2,DDCS23,DRAWNULL),COLORC0C0C0,POINTDOT;
    IF(XD1,DDCS13,DRAWNULL),COLORC0C0C0,POINTDOT;
    短压:DRAWLINE(D1,H,S11,H,1),COLOR808000;
    短撑:DRAWLINE(D2,L,U11,L,1),COLOR808000;
    高压:DRAWLINE(CURRBARSCOUNT=GDCS2Q,H,CURRBARSCOUNT=GDCS1Q,H,1) COLORMAGENTA,LINETHICK1;
    低撑:DRAWLINE(CURRBARSCOUNT=DDCS2Q,L,CURRBARSCOUNT=DDCS1Q,L,1),COLORMAGENTA,LINETHICK1;
    {以上为趋势线自动划线}
    Z1:=STRCAT(HYBLOCK,' ');
    Z2:=STRCAT(Z1,DYBLOCK);
    Z3:=STRCAT(Z2,' ');
    DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORLIRED;
    DRAWTEXT_FIX(ISLASTBAR,0,0.03,0,EXTERNSTR(0,3)),COLORWHITE;
    DRAWTEXT_FIX(ISLASTBAR,0,0.06,0,EXTERNSTR(0,6)),COLORLIBLUE;
    DRAWTEXT_FIX(ISLASTBAR,0,0.09,0,EXTERNSTR(0,12)),COLORLIGREEN;{老王}
    DRAWTEXT_FIX(ISLASTBAR,0,0.15,0,FGBLOCK),COLORLIMAGENTA;
    DRAWTEXT_FIX(ISLASTBAR,0,0.12,0,EXTERNSTR(0,1)),COLORYELLOW;{融胜}
    主力成本线:EMA(COST(9),250),COLORBROWN,DOTLINE;
    {牛马线买点公式升级版}
    MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
    牛线:WMA(MID,20),COLORRED;
    马线:MA(牛线,5),COLORWHITE;
    DRAWICON( FILTER(CROSS(牛线,马线),20),马线-0.002 ,1);
    DRAWTEXT(CROSS(牛线,马线),LOW*0.984,'买'),COLORRED,LINETHICK2;
    止损价:H*0.95,LINETHICK0.5,COLORRED; 
    庄家:牛线,COLORRED;

     

  • 网友交流: {续3}

    IF(庄家>=REF(庄家,1),庄家,DRAWNULL),COLORRED,LINETHICK4;
    IF(庄家<=REF(庄家,1),庄家,DRAWNULL),COLORGREEN,LINETHICK2;
    DRAWBAND(牛线,RGB(255,87,22),马线,RGB(0,30,255));
    N1:=10;
    TK:=CONST(HHVBARS(V,10)),COLOR0000FF,LINETHICK1;
    量能平台:IF(CURRBARSCOUNT<=N1+3,CONST(IF(TK=0,C,REF(C,TK))),DRAWNULL),COLORGRAY,LINETHICK2;
    {NOTEXT_新量能点:IF(CURRBARSCOUNT=TK+1,量能平台,DRAWNULL),CIRCLEDOT,COLORFFFFFF,LINETHICK5;}
    DRAWTEXT(ISLASTBAR,量能平台,'量能平台'),COLORGRAY;
    {稳涨}
    红轨道:=MA(MA(CLOSE,3),1),LINETHICK1,COLORYELLOW;
    轨道:MA(MA(CLOSE,3),3),COLOR32CD32,LINETHICK2;
    NOTEXT_升:IF(红轨道>=轨道,轨道,DRAWNULL),COLORMAGENTA,LINETHICK2;
    机构:(L2_VOL(0,0) - L2_VOL(0,1))*10000/FINANCE(7),NODRAW,COLORRED;
    大户:(L2_VOL(1,0) - L2_VOL(1,1))*10000/FINANCE(7),NODRAW,COLORMAGENTA;
    主力:机构+大户,NODRAW,COLORYELLOW;
    STICKLINE(主力>0,O,C,1.5,1),COLORRED;
    STICKLINE(主力<0,O,C,1.5,1),COLORCYAN;
    STICKLINE(大户>0,O,C,1,0),COLORMAGENTA;
    STICKLINE(大户<0,O,C,1,0),COLORGREEN;
    STICKLINE(机构>0 AND 大户>0,O,(O+C)/2,1,0),COLORRED;
    STICKLINE(机构<0 AND 大户>0,C,(O+C)/2,1,0),COLORCYAN;
    STICKLINE(机构>0 AND 大户<0,O,(O+C)/2,1,0)COLORMAGENTA;
    STICKLINE(机构<0 AND 大户<0,C,O,1,0)COLORLICYAN;
    累计:=SUM(主力,30),COLORMAGENTA;
    均值:=EMA(累计,MIN(10,30)),COLORWHITE;
    {红}
    STICKLINE(CROSS(累计,均值),H,L,0,0),COLORRED,LINETHICK1;
    STICKLINE(CROSS(累计,均值),CLOSE,OPEN,1.4,0),COLOR000088;
    STICKLINE(CROSS(累计,均值),CLOSE,OPEN,1,0),COLOR0000BB;
    STICKLINE(CROSS(累计,均值),CLOSE,OPEN,0.6,0),COLOR0000DD; 
    STICKLINE(CROSS(累计,均值),CLOSE,OPEN,0,0),COLOR0000FF;
    {蓝}
    STICKLINE(CROSS(均值,累计),H,L,0,0),COLORFF8800,LINETHICK1;
    STICKLINE(CROSS(均值,累计),CLOSE,OPEN,1.4,0),COLORBB4400;
    STICKLINE(CROSS(均值,累计),CLOSE,OPEN,1,0),COLORCC5500;
    STICKLINE(CROSS(均值,累计),CLOSE,OPEN,0.6,0),COLORDD6600;
    STICKLINE(CROSS(均值,累计),CLOSE,OPEN,0,0),COLOREE7700;

     

  • 网友交流: {续4}
    {高低点定位}
    G0:=(XMA(XMA(H,30),30)-XMA(XMA(L,30),30))+XMA(XMA(H,30),30);
    D0:=XMA(XMA(L,30),30)-(XMA(XMA(H,30),30)-XMA(XMA(L,30),30));
    G01:=(XMA(XMA(H,30),30)-XMA(XMA(L,30),30))*0.5+XMA(XMA(H,30),30);
    D01:=XMA(XMA(L,30),30)-(XMA(XMA(H,30),30)-XMA(XMA(L,30),30))*0.5;
    GO0:=(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3+XMA(XMA(H,60),60);
    DO0:=XMA(XMA(L,60),60)-(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3;
    STICKLINE(CURRBARSCOUNT=1,G0,G0,100,5),COLORGREEN;
    STICKLINE(CURRBARSCOUNT=1,D0,D0,100,5),COLORMAGENTA;
    STICKLINE(CURRBARSCOUNT=1,GO0,GO0,100,5),COLORLIBLUE;
    STICKLINE(CURRBARSCOUNT=1,DO0,DO0,100,5),COLORRED;
    DRAWTEXT(ISLASTBAR,G0,'卖'),COLORGREEN;
    DRAWTEXT(ISLASTBAR,D0,'买'),COLORMAGENTA;
    DRAWTEXT(ISLASTBAR,GO0,'顶'),COLORLIBLUE;
    DRAWTEXT(ISLASTBAR,DO0,'底'),COLORRED;
    {一绝}
    Q_1:=C-REF(C,1);
    Q_2:=100*EMA(EMA(Q_1,6),6)/EMA(EMA(ABS(Q_1),6),6);
    Q_3:=CROSS(EMA(C,19),EMA(C,7));
    Q_4:=CROSS(EMA(C,7),EMA(C,19));
    ZD1:=L=LLV(L,BARSLAST(Q_3)+1);
    ZD2:=LLV(L,BARSLAST(Q_3)+1);
    ZD3:=H=HHV(H,BARSLAST(Q_4)+1);
    ZD4:=HHV(H,BARSLAST(Q_4)+1);
    Q_A:=DRAWLINE(ZD1,ZD2,ZD3,ZD4,0);
    U1:=H=HHV(H,BARSLAST(Q_4)+1);
    U2:=HHV(H,BARSLAST(Q_4)+1);
    U3:=L=LLV(L,BARSLAST(Q_3)+1);
    U4:=LLV(L,BARSLAST(Q_3)+1);
    Q_B:=DRAWLINE(U1,U2,U3,U4,0);
    TJ:=IF(Q_B<REF(Q_B,1) AND Q_B=Q_A,1,0);
    BB:=REF(TJ,1)=0 AND TJ>=1 ;
    DRAWICON(BB,L*0.99,39);{绿▲见底标志}
    SS:=REF(Q_A<REF(Q_A,1) AND Q_B=Q_A,1)=0 AND TJ<1; 
    DRAWICON(SS,H*1.005,36);{X图标卖出标志}
    {私募公式}
    AAE:= WINNER(CLOSE+CLOSE*15/100)*100;
    BBE:= WINNER(CLOSE+CLOSE*0/100)*100;
    CCE:= AAE-BBE;
    DDE:= (WINNER(CLOSE-CLOSE*0.1/100)-WINNER(CLOSE-CLOSE*15/100))*100;
    EEE:= CCE<3 AND DDE<0.5 AND OPEN>LOW;
    AE1:= DYNAINFO(6);

 

有思路,想编写各种指标公式,程序化交易模型,选股公式,预警公式的朋友

可联系技术人员 QQ: 511411198  点击这里给我发消息进行 有偿 编写!不贵!点击查看价格!


【字体: 】【打印文章】【查看评论

相关文章

    没有相关内容