通达信游龙戏水主图指标公式源码分享

相关简介:通达信游龙戏水主图指标公式源码分享

     通达信指标公式源码概况：

　　指标类别：通达信指标公式

　　授权方式：免费版

　　指标评级：★★★★★

　　指标分类：策略

　　画线方法：主图

通达信指标公式源码：

    YB:=L=H;
    TB:=O=HANDC=HANDL<>H;
    XG:=FINANCE(42)>100ANDREF(YB,2)ANDREF(YB,1)ANDTB;
    ZT:=C/REF(C,1)>1.095ANDC=H;
    TJ1:=REF(ZTANDNOT(XG)ANDREF(ZT=0,2),1);
    TJ2:=REF(LOW/REF(C,1)>1.001,1);
    TJ3:=BETWEEN(((OPEN/REF(C,1)-1)*100),3,8.5);
    TJ4:=(OPEN/REF(C,1)-1)*100>REF((OPEN/REF(C,1)-1)*100,1);
    TJ5:=REF(V,1)>REF(V,2)*1.2;
    TJ6:=DYNAINFO(9)/REF(V,1)>0.1;
    TJ1ANDTJ2ANDTJ3ANDTJ4ANDTJ5ANDTJ6;
    W1:=C=HHV(C,20);
    W2:=BARSLAST(W1);
    W3:=IF(W2>0,REF(C,W2),REF(C,W2));
    W4:=CROSS(C,REF(W3,1));
    HIGHN:=10;LOWN:=10;HIGHDISPLAY:=0;LOWDISPLAY:=0;ZGDISPLAY:=0;MADISPLAY:=0;
    AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);
    QY:=BACKSET(AA,HIGHN+1);
    CC:=FILTER(QY,HIGHN)ANDH=HHV(H,HIGHN+1);
    {DRAWICON(CC,H*1.02,11);}
    DDD:=BARSLAST(CC);
    CURRBARSCOUNT:=DATACOUNT-BARPOS;
    GDTS:=IF(CC,CURRBARSCOUNT,0);
    DINGBU:=IF(DDD,REF(H,DDD),H);{顶部}
    DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
    DINGBU1:=REF(DINGBU,DDD+1);
    GDCS1:=DINGBUTS[DATACOUNT];
    DINGBUTS1:=REF(DINGBUTS,DDD+1);
    GDCS2:=DINGBUTS1[datacount];
    DINGBU2:=REF(DINGBU1,DDD+1);
    MMM:=IF(CURRBARSCOUNT>GDCS2,0,1);
    高点压力:LINEVALUE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1,0),COLORGREEN,LINETHICK0;
    DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1),COLORGREEN,LINETHICK2;
    AA1:=REF(L,LOWN)=LLV(L,2*LOWN+1);
    QY1:=BACKSET(AA1,LOWN+1);
    CC1:=FILTER(QY1,LOWN)ANDL=LLV(L,LOWN+1);
    {DRAWICON(CC1,L*0.98,1);}
    DD1:=BARSLAST(CC1);
    DDTS:=IF(CC1,CURRBARSCOUNT,0);
    YDB:=IF(DD1,REF(L,DD1),L);
    DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
    DDCS1:=DDTS1[datacount];
    ZDB:=REF(YDB,DD1+1);
    DDTS2:=REF(DDTS1,DD1+1);
    DDCS2:=DDTS2[datacount];
    低点支撑:LINEVALUE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1,0),COLORRED,LINETHICK0;
    DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1),COLORgreen,LINETHICK2;
    ZGSTAR:=(高点压力+低点支撑)/2;
    ZGEND:=ZGSTAR[datacount];
    STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2);
    {N1：20；N2：10；N3：5}
    input:N1(20,1,100),N2(10,1,100),N3(5,1,100);
    AA:=REF(H,N1)=HHV(H,2*N1+1);
    QY:=BACKSET(AA,N1+1);
    CC:=FILTER(QY,N1)ANDH=HHV(H,N1+1);
    DDD:=BARSLAST(CC);
    CURRBARSCOUNT:=DATACOUNT-BARPOS;
    GDTS:=IF(CC,CURRBARSCOUNT,0);
    DINGBU:=IF(DDD,REF(H,DDD),H);{顶部}
    DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
    DINGBU1:=REF(DINGBU,DDD+1);
    GDCS1:=DINGBUTS[DATACOUNT];
    DINGBUTS1:=REF(DINGBUTS,DDD+1);
    GDCS2:=DINGBUTS1[datacount];
    DINGBU2:=REF(DINGBU1,DDD+1);
    MM:=IF(CURRBARSCOUNT>GDCS2,0,1);
    高点压力2:DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1)COLORwhite,linethick2;
    AA1:=REF(L,N1)=LLV(L,2*N1+1);
    QY1:=BACKSET(AA1,N1+1);
    CC1:=FILTER(QY1,N1)ANDL=LLV(L,N1+1);
    DD1:=BARSLAST(CC1);
    DDTS:=IF(CC1,CURRBARSCOUNT,0);
    YDB:=IF(DD1,REF(L,DD1),L);
    DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
    DDCS1:=DDTS1[datacount];
    ZDB:=REF(YDB,DD1+1);
    DDTS2:=REF(DDTS1,DD1+1);
    DDCS2:=DDTS2[datacount];
    低点支撑2:DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1)COLORwhite,linethick2;
    DRAWLINE(CURRBARSCOUNT=DDCS2,L,ISLASTBAR,REF(L,DDCS2-1),1),COLOR0055FF,POINTDOT,LINETHICK1;
    DRAWLINE(CURRBARSCOUNT=DDCS1,L,ISLASTBAR,REF(L,DDCS1-1),1),COLORYELLOW,POINTDOT,LINETHICK1;
    LAA:=REF(H,N2)=HHV(H,2*N2+1);
    LQY:=BACKSET(LAA,N2+1);
    LCC:=FILTER(LQY,N2)ANDH=HHV(H,N2+1);
    LDDD:=BARSLAST(LCC);
    LGDTS:=IF(LCC,CURRBARSCOUNT,0);
    LDINGBU:=IF(LDDD,REF(H,LDDD),H);{顶部}
    LDINGBUTS:=IF(LDDD,REF(LGDTS,LDDD),LGDTS);
    LDINGBU1:=REF(LDINGBU,LDDD+1);
    LGDCS1:=LDINGBU1[datacount];
    LDINGBUTS1:=REF(LDINGBUTS,LDDD+1);
    LGDCS2:=LDINGBUTS1[datacount];;
    LDINGBU2:=REF(LDINGBU1,LDDD+1);
    LMM:=IF(CURRBARSCOUNT>LGDCS2,0,1);
    压力:DRAWLINE(CURRBARSCOUNT=LGDCS2,H,CURRBARSCOUNT=LGDCS1,H,1)COLORgreen;
    DRAWLINE(CURRBARSCOUNT=LGDCS2,H,ISLASTBAR,REF(H,LGDCS2-1),1),COLOR0055FF,POINTDOT,linethick1;
    DRAWLINE(CURRBARSCOUNT=LGDCS1,H,ISLASTBAR,REF(H,LGDCS1-1),1),COLORYELLOW,POINTDOT,linethick1;
    LAA1:=REF(L,N2)=LLV(L,2*N2+1);
    LQY1:=BACKSET(LAA1,N2+1);
    LCC1:=FILTER(LQY1,N2)ANDL=LLV(L,N2+1);
    LDD1:=BARSLAST(LCC1);
    LDDTS:=IF(LCC1,CURRBARSCOUNT,0);
    LYDB:=IF(LDD1,REF(L,LDD1),L);
    LDDTS1:=IF(LDD1,REF(LDDTS,LDD1),LDDTS);
    LDDCS1:=LDDTS1[datacount];
    LZDB:=REF(LYDB,LDD1+1);
    LDDTS2:=REF(LDDTS1,DD1+1);
    LDDCS2:=LDDTS2[datacount];;
    支撑:DRAWLINE(CURRBARSCOUNT=LDDCS2,L,CURRBARSCOUNT=LDDCS1,L,1)COLORWHITE;
    LLAA:=REF(H,N3)=HHV(H,2*N3+1);
    LLQY:=BACKSET(LLAA,N3+1);
    LLCC:=FILTER(LLQY,N3)ANDH=HHV(H,N3+1);
    LLDDD:=BARSLAST(LLCC);
    LLGDTS:=IF(LLCC,CURRBARSCOUNT,0);
    LLDINGBU:=IF(LLDDD,REF(H,LLDDD),H);{顶部}
    LLDINGBUTS:=IF(LLDDD,REF(LLGDTS,LLDDD),LLGDTS);
    LLDINGBU1:=REF(LLDINGBU,LLDDD+1);
    LLGDCS1:=LLDINGBU1[datacount];
    LLDINGBUTS1:=REF(LLDINGBUTS,LLDDD+1);
    LLGDCS2:=LLDINGBUTS1[datacount];
    LLDINGBU2:=REF(LLDINGBU1,LLDDD+1);
    LLMM:=IF(CURRBARSCOUNT>LGDCS2,0,1);
    L压力:DRAWLINE(CURRBARSCOUNT=LLGDCS2,H,CURRBARSCOUNT=LLGDCS1,H,1)COLORYELLOW;
    DRAWLINE(CURRBARSCOUNT=LLGDCS2,H,ISLASTBAR,REF(H,LLGDCS2-1),1),COLOR0055FF,POINTDOT,linethick1;
    DRAWLINE(CURRBARSCOUNT=LLGDCS1,H,ISLASTBAR,REF(H,LLGDCS1-1),1),COLORYELLOW,POINTDOT,linethick2;
    LLAA1:=REF(L,N3)=LLV(L,2*N3+1);
    LLQY1:=BACKSET(LLAA1,N3+1);
    LLCC1:=FILTER(LLQY1,N3)ANDL=LLV(L,N3+1);
    LLDD1:=BARSLAST(LCC1);
    LLDDTS:=IF(LLCC1,CURRBARSCOUNT,0);
    LLYDB:=IF(LLDD1,REF(L,LLDD1),L);
    LLDDTS1:=IF(LLDD1,REF(LLDDTS,LLDD1),LDDTS);
    LLDDCS1:=LLDDTS1[datacount];
    LLZDB:=REF(LLYDB,LLDD1+1);
    LLDDTS2:=REF(LLDDTS1,DD1+1);
    LLDDCS2:=LLDDTS2[datacount];
    L支撑:DRAWLINE(CURRBARSCOUNT=LLDDCS2,L,CURRBARSCOUNT=LLDDCS1,L,1)COLORYELlow;

[源码注释]通达信公式动态翻译结果

   YB赋值:最低价=最高价

   TB赋值:开盘价=HANDC=HANDL<

   >

   最高价

   XG赋值:上市的天数>

   100ANDREF(YB,2)ANDREF(YB,1)ANDTB

   ZT赋值:收盘价/1日前的收盘价>

   1.095ANDC=最高价

   TJ1赋值:1日前的ZTANDNOT(XG)ANDREF(ZT=0,2)

   TJ2赋值:?日前的最低价/1日前的收盘价>

   1.001,1)

   TJ3赋值:((开盘价/1日前的收盘价-1)*100)位于3和8.5之间

   TJ4赋值:(开盘价/1日前的收盘价-1)*100>

   1日前的(开盘价/1日前的收盘价-1)*100

   TJ5赋值:1日前的成交量(手)>

   2日前的成交量(手)*1.2

   TJ6赋值:现量/1日前的成交量(手)>

   0.1

   TJ1ANDTJ2ANDTJ3ANDTJ4ANDTJ5ANDTJ6

   W1赋值:收盘价=20日内收盘价的最高值

   W2赋值:上次W1距今天数

   W3赋值:如果W2>0,返回W2日前的收盘价,否则返回W2日前的收盘价

   W4赋值:收盘价上穿1日前的W3

   HIGHN赋值:10

   LOWN赋值:10

   HIGHDISPLAY赋值:0

   LOWDISPLAY赋值:0

   ZGDISPLAY赋值:0

   MADISPLAY赋值:0

   AA赋值:HIGHN日前的最高价=2*HIGHN+1日内最高价的最高值

   QY赋值:若AA则将最近HIGHN+1周期置为1

   CC赋值:QY的HIGHN日过滤ANDH=HIGHN+1日内最高价的最高值

   DDD赋值:上次CC距今天数

   CURRBARSCOUNT赋值:DATACOUNT-BARPOS

   GDTS赋值:如果CC,返回到最后交易的周期,否则返回0

   DINGBU赋值:如果DDD,返回DDD日前的最高价,否则返回最高价

   DINGBUTS赋值:如果DDD,返回DDD日前的GDTS,否则返回GDTS

   DINGBU1赋值:DDD+1日前的DINGBU

   GDCS1赋值:DINGBUTS[DATACOUNT]

   DINGBUTS1赋值:DDD+1日前的DINGBUTS

   GDCS2赋值:DINGBUTS1[DATACOUNT]

   DINGBU2赋值:DDD+1日前的DINGBU1

   MMM赋值:如果到最后交易的周期>GDCS2,返回0,否则返回1

   输出高点压力:LINEVALUE(到最后交易的周期=GDCS2,最高价,到最后交易的周期=GDCS1,最高价,1,0),画绿色,线宽为0

   当满足条件到最后交易的周期=GDCS2时,在最高价位置画直线起点，当满足条件到最后交易的周期=GDCS1时,在最高价位置画直线终点,1表示是否延长.,画绿色,线宽为2

   AA1赋值:LOWN日前的最低价=2*LOWN+1日内最低价的最低值

   QY1赋值:若AA1则将最近LOWN+1周期置为1

   CC1赋值:QY1的LOWN日过滤ANDL=LOWN+1日内最低价的最低值

   DD1赋值:上次CC1距今天数

   DDTS赋值:如果CC1,返回到最后交易的周期,否则返回0

   YDB赋值:如果DD1,返回DD1日前的最低价,否则返回最低价

   DDTS1赋值:如果DD1,返回DD1日前的DDTS,否则返回DDTS

   DDCS1赋值:DDTS1[DATACOUNT]

   ZDB赋值:DD1+1日前的YDB

   DDTS2赋值:DD1+1日前的DDTS1

   DDCS2赋值:DDTS2[DATACOUNT]

   输出低点支撑:LINEVALUE(到最后交易的周期=DDCS2,最低价,到最后交易的周期=DDCS1,最低价,1,0),画红色,线宽为0

   当满足条件到最后交易的周期=DDCS2时,在最低价位置画直线起点，当满足条件到最后交易的周期=DDCS1时,在最低价位置画直线终点,1表示是否延长.,画绿色,线宽为2

   ZGSTAR赋值:(高点压力+低点支撑)/2

   ZGEND赋值:ZGSTAR[DATACOUNT]

   STARDAY赋值:如果DDCS2<GDCS2,返回DDCS2,否则返回GDCS2

   输出INPUT:N1(20,1,100),N2(10,1,100),N3(5,1,100)

   AA赋值:N1日前的最高价=2*N1+1日内最高价的最高值

   QY赋值:若AA则将最近N1+1周期置为1

   CC赋值:QY的N1日过滤ANDH=N1+1日内最高价的最高值

   DDD赋值:上次CC距今天数

   CURRBARSCOUNT赋值:DATACOUNT-BARPOS

   GDTS赋值:如果CC,返回到最后交易的周期,否则返回0

   DINGBU赋值:如果DDD,返回DDD日前的最高价,否则返回最高价

   DINGBUTS赋值:如果DDD,返回DDD日前的GDTS,否则返回GDTS

   DINGBU1赋值:DDD+1日前的DINGBU

   GDCS1赋值:DINGBUTS[DATACOUNT]

   DINGBUTS1赋值:DDD+1日前的DINGBUTS

   GDCS2赋值:DINGBUTS1[DATACOUNT]

   DINGBU2赋值:DDD+1日前的DINGBU1

   MM赋值:如果到最后交易的周期>GDCS2,返回0,否则返回1

   输出高点压力2:当满足条件到最后交易的周期=GDCS2时,在最高价位置画直线起点，当满足条件到最后交易的周期=GDCS1时,在最高价位置画直线终点,1表示是否延长.画白色,线宽为2

   AA1赋值:N1日前的最低价=2*N1+1日内最低价的最低值

   QY1赋值:若AA1则将最近N1+1周期置为1

   CC1赋值:QY1的N1日过滤ANDL=N1+1日内最低价的最低值

   DD1赋值:上次CC1距今天数

   DDTS赋值:如果CC1,返回到最后交易的周期,否则返回0

   YDB赋值:如果DD1,返回DD1日前的最低价,否则返回最低价

   DDTS1赋值:如果DD1,返回DD1日前的DDTS,否则返回DDTS

   DDCS1赋值:DDTS1[DATACOUNT]

   ZDB赋值:DD1+1日前的YDB

   DDTS2赋值:DD1+1日前的DDTS1

   DDCS2赋值:DDTS2[DATACOUNT]

   输出低点支撑2:当满足条件到最后交易的周期=DDCS2时,在最低价位置画直线起点，当满足条件到最后交易的周期=DDCS1时,在最低价位置画直线终点,1表示是否延长.画白色,线宽为2

   当满足条件到最后交易的周期=DDCS2时,在最低价位置画直线起点，当满足条件是否最后一个周期时,在DDCS2-1日前的最低价位置画直线终点,1表示是否延长.,COLOR0055FF,POINTDOT,线宽为1

   当满足条件到最后交易的周期=DDCS1时,在最低价位置画直线起点，当满足条件是否最后一个周期时,在DDCS1-1日前的最低价位置画直线终点,1表示是否延长.,画黄色,POINTDOT,线宽为1

   LAA赋值:N2日前的最高价=2*N2+1日内最高价的最高值

   LQY赋值:若LAA则将最近N2+1周期置为1

   LCC赋值:LQY的N2日过滤ANDH=N2+1日内最高价的最高值

   LDDD赋值:上次LCC距今天数

   LGDTS赋值:如果LCC,返回到最后交易的周期,否则返回0

   LDINGBU赋值:如果LDDD,返回LDDD日前的最高价,否则返回最高价

   LDINGBUTS赋值:如果LDDD,返回LDDD日前的LGDTS,否则返回LGDTS

   LDINGBU1赋值:LDDD+1日前的LDINGBU

   LGDCS1赋值:LDINGBU1[DATACOUNT]

   LDINGBUTS1赋值:LDDD+1日前的LDINGBUTS

   LGDCS2赋值:LDINGBUTS1[DATACOUNT]

   LDINGBU2赋值:LDDD+1日前的LDINGBU1

   LMM赋值:如果到最后交易的周期>LGDCS2,返回0,否则返回1

   输出压力:当满足条件到最后交易的周期=LGDCS2时,在最高价位置画直线起点，当满足条件到最后交易的周期=LGDCS1时,在最高价位置画直线终点,1表示是否延长.画绿色

   当满足条件到最后交易的周期=LGDCS2时,在最高价位置画直线起点，当满足条件是否最后一个周期时,在LGDCS2-1日前的最高价位置画直线终点,1表示是否延长.,COLOR0055FF,POINTDOT,线宽为1

   当满足条件到最后交易的周期=LGDCS1时,在最高价位置画直线起点，当满足条件是否最后一个周期时,在LGDCS1-1日前的最高价位置画直线终点,1表示是否延长.,画黄色,POINTDOT,线宽为1

   LAA1赋值:N2日前的最低价=2*N2+1日内最低价的最低值

   LQY1赋值:若LAA1则将最近N2+1周期置为1

   LCC1赋值:LQY1的N2日过滤ANDL=N2+1日内最低价的最低值

   LDD1赋值:上次LCC1距今天数

   LDDTS赋值:如果LCC1,返回到最后交易的周期,否则返回0

   LYDB赋值:如果LDD1,返回LDD1日前的最低价,否则返回最低价

   LDDTS1赋值:如果LDD1,返回LDD1日前的LDDTS,否则返回LDDTS

   LDDCS1赋值:LDDTS1[DATACOUNT]

   LZDB赋值:LDD1+1日前的LYDB

   LDDTS2赋值:DD1+1日前的LDDTS1

   LDDCS2赋值:LDDTS2[DATACOUNT]

   输出支撑:当满足条件到最后交易的周期=LDDCS2时,在最低价位置画直线起点，当满足条件到最后交易的周期=LDDCS1时,在最低价位置画直线终点,1表示是否延长.画白色

   LLAA赋值:N3日前的最高价=2*N3+1日内最高价的最高值

   LLQY赋值:若LLAA则将最近N3+1周期置为1

   LLCC赋值:LLQY的N3日过滤ANDH=N3+1日内最高价的最高值

   LLDDD赋值:上次LLCC距今天数

   LLGDTS赋值:如果LLCC,返回到最后交易的周期,否则返回0

   LLDINGBU赋值:如果LLDDD,返回LLDDD日前的最高价,否则返回最高价

   LLDINGBUTS赋值:如果LLDDD,返回LLDDD日前的LLGDTS,否则返回LLGDTS

   LLDINGBU1赋值:LLDDD+1日前的LLDINGBU

   LLGDCS1赋值:LLDINGBU1[DATACOUNT]

   LLDINGBUTS1赋值:LLDDD+1日前的LLDINGBUTS

   LLGDCS2赋值:LLDINGBUTS1[DATACOUNT]

   LLDINGBU2赋值:LLDDD+1日前的LLDINGBU1

   LLMM赋值:如果到最后交易的周期>LGDCS2,返回0,否则返回1

   输出L压力:当满足条件到最后交易的周期=LLGDCS2时,在最高价位置画直线起点，当满足条件到最后交易的周期=LLGDCS1时,在最高价位置画直线终点,1表示是否延长.画黄色

   当满足条件到最后交易的周期=LLGDCS2时,在最高价位置画直线起点，当满足条件是否最后一个周期时,在LLGDCS2-1日前的最高价位置画直线终点,1表示是否延长.,COLOR0055FF,POINTDOT,线宽为1

   当满足条件到最后交易的周期=LLGDCS1时,在最高价位置画直线起点，当满足条件是否最后一个周期时,在LLGDCS1-1日前的最高价位置画直线终点,1表示是否延长.,画黄色,POINTDOT,线宽为2

   LLAA1赋值:N3日前的最低价=2*N3+1日内最低价的最低值

   LLQY1赋值:若LLAA1则将最近N3+1周期置为1

   LLCC1赋值:LLQY1的N3日过滤ANDL=N3+1日内最低价的最低值

   LLDD1赋值:上次LCC1距今天数

   LLDDTS赋值:如果LLCC1,返回到最后交易的周期,否则返回0

   LLYDB赋值:如果LLDD1,返回LLDD1日前的最低价,否则返回最低价

   LLDDTS1赋值:如果LLDD1,返回LLDD1日前的LLDDTS,否则返回LDDTS

   LLDDCS1赋值:LLDDTS1[DATACOUNT]

   LLZDB赋值:LLDD1+1日前的LLYDB

   LLDDTS2赋值:DD1+1日前的LLDDTS1

   LLDDCS2赋值:LLDDTS2[DATACOUNT]

   输出L支撑:当满足条件到最后交易的周期=LLDDCS2时,在最低价位置画直线起点，当满足条件到最后交易的周期=LLDDCS1时,在最低价位置画直线终点,1表示是否延长.画黄色