相关简介:通达信游龙戏水主图指标公式源码分享 通达信指标公式源码概况: 指标类别:通达信指标公式 授权方式:免费版 指标评级:★★★★★ 指标分类:策略 画线方法:主图通达信指标公式源码: 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) 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表示是否延长.画黄色