通达信放弃抄底 努力追涨源码分享 附图
SJ:=WMA(((2*C+H+L)/4-LLV(L,5))/(HHV(H,5)-LLV(L,5))*100,2);
ZJ:=WMA(0.618*REF(SJ,1)+0.382*SJ,2);
ENTERLONG:CROSS(SJ,ZJ) AND SJ<30,COLORRED;
EXITLONG:CROSS(ZJ,SJ) AND SJ>70,COLORGREEN;
N:=STRCAT(CON2STR(YEAR,0),' 年 ');
Y:=STRCAT(CON2STR(MONTH,0),' 月 ');
R:=STRCAT(CON2STR(DAY,0),' 日 ');
DRAWTEXT_FIX(C>0,0.88,0,0,SJ);
MA1:EMA(EMA(C,21),3);
MA2:EMA(EMA(C,34),3);
TT1:=C>MA1 AND C>MA2;
TT2:=TT1 AND REF(TT1,1)=0;
DRAWICON(TT2,L*0.99,6);
EMA10:MA(C,10),COLORRED LINETHICK2;
EMA5:MA(C,5),COLORYELLOW LINETHICK1;
EMA30:MA(C,30),COLORBLUE LINETHICK1;
TY:=DYNAINFO(8)>0;
GG:=V=LLV(V,100) AND TY;
DRAWICON(GG,LOW*0.96,1);
DRAWICON(GG,LOW*0.95,17);
阻力价:HHV(HIGH,19),COLORBLUE, LINETHICK2;
VAR4:EMA(C,3), LINETHICK2;
七天线:MA(C,7),COLORGRAY;
工作线:(EMA(C,14)),POINTDOT,LINETHICK4,COLORYELLOW;
生命线:(MA(C,25)),LINETHICK2,COLORMAGENTA;
{不惑线:(MA(C,40)),COLORCYAN; }
姊妹线:(EMA(C,56)),POINTDOT,COLORWHITE;
A3:=EMA((((SLOPE(C,21)) * 20) + C),68);
A4:=EMA(C,10);
A5:=REF(C,2);
A6:=((SMA((MAX((C - A5),0)),6,1)) / (SMA(ABS((C - A5)),6,1))) * 100;
A7:=IF(((A6 < (REF(A6,1))) AND (A6 > 79)),A6,0);
A8:=LLV(L,21);
A9:=HHV(H,21);
A10:=EMA((((CLOSE - A8) / (A9 - A8)) * 100),5);
A11:=EMA((((CLOSE - A8) / (A9 - A8)) * 50),13);
A12:=EMA(((0.667 * (REF(A10,1))) + (0.333 * A10)),2);
A13:=LLV(L,55);
A14:=HHV(H,34);
A15:=EMA((((C - A13) / (A14 - A13)) * 100),3);
A16:=(A11 + A15) / 2;
A17:=EMA(((0.667 * (REF(A15,1))) + (0.333 * A10)),2);
A18:=EMA(A16,5);
A19:=EMA(((0.667 * (REF(A18,1))) + (0.333 * A18)),2);
A20:=CROSS(A10,A11);
A21:=(CROSS(A10,A19)) AND (A19 < 30);
A22:=A21 * 0.6;
A23:=((C + L) + H) / 3;
A24:=EMA(A23,6);
A25:=EMA(A24,5);
A26:=CROSS(A24,A25);
DRAWICON(A26,(LOW / 1.015),1),LINETHICK2,COLORMAGENTA;
STICKLINE(((C >= 工作线) AND (C >= O)),H,L,0,1),COLORRED;
STICKLINE(((C >= 工作线) AND (C >= O)),O,C,2,1),COLORRED;
STICKLINE(((C >= 工作线) AND (C <= O)),H,L,0,0),COLORRED;
STICKLINE(((C >= 工作线) AND (C <= O)),O,C,2,0),COLORRED;
STICKLINE(((C < 工作线) AND (C >= O)),H,L,0,1),COLORGREEN;
STICKLINE(((C < 工作线) AND (C >= O)),O,C,2,1),COLORGREEN;
STICKLINE(((C < 工作线) AND (C <= O)),H,L,0,0),COLORGREEN;
STICKLINE(((C < 工作线) AND (C <= O)),O,C,2,0),COLORGREEN;
VARA:=IF(CLOSE>150,91.3,0.913);
箱下沿:INTPART(CLOSE/VARA )*VARA,POINTDOT,COLORGREEN;
箱上沿:箱下沿+VARA,POINTDOT,COLORYELLOW;
箱中线:(箱下沿+箱上沿)/2,POINTDOT,COLORWHITE;
STICKLINE(C,箱下沿,箱下沿,5,0),COLORGREEN;
STICKLINE(C,箱上沿,箱上沿,5,0),COLORMAGENTA;
STICKLINE(C,箱中线,箱中线,5,0),COLORWHITE;
CC:IF(CURRBARSCOUNT<18,CONST(REF(C,1)),DRAWNULL),COLOR000000,LINETHICK3;
止赢价位:1.05*CC,COLORYELLOW,LINETHICK3;
DRAWTEXT(ISLASTBAR,HHV(C,5)*1.05,'止赢价位'),COLORRED,LINETHICK3;
多:BBI,COLORWHITE;DRAWTEXT(C=H AND C/REF(C,1)>1.01,L,'F'),COLORRED,LINETHICK2;
STICKLINE(ISLASTBAR,HHV(C,5)*0.95-0.01,HHV(C,5)*0.95,50,0),COLORWHITE,LINETHICK4;
DRAWTEXT(ISLASTBAR,HHV(C,5)*0.95,'止损价位'),COLORRED,LINETHICK4;
高1:=REF(HHV(H,120),3);
低1:=REF(LLV(L,120),3);
H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
H3:=高1-(高1-低1)*0.5;
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
突破:=REF(EMA(C,14),1);
A1X:=(EMA(C,10)-突破)/突破*100;
JZ:=IF(A1X>=0,REF(EMA(C,10),BARSLAST(CROSS(A1X,0))+1),REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1)),COLORFFFF00,LINETHICK2;
N1:=100;
KD:=BARSLAST(CURRBARSCOUNT=N1);
GD:=CONST(IF(ISLASTBAR=1,HHV(H,KD),0));
DD:=CONST(IF(ISLASTBAR=1,LLV(L,KD),0));
KJ:=GD-DD;
GD4:=IF(CURRBARSCOUNT<=N1/2,GD,DRAWNULL);
ND:=IF(BARSCOUNT(C)>=8,8,BARSCOUNT(C));
AMOV:=VOL*(C+L+H)/3;
MN:=SUM(AMOV,ND)/SUM(VOL,ND);
AAC:=CROSS(A1X,0),LINETHICK0;
BBC:=CROSS(0,A1X),LINETHICK0;
(AAC,JZ*0.98,34);
(BBC,JZ*1.015,35);
LC:= REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
逃顶:=CROSS(82,RSI);
( 逃顶,H*1.01,15);
DRAWTEXT( 逃顶,H*1.01,' ←快跑'),COLORFFFFFF;
平衡:=IF(CURRBARSCOUNT<=N1,DD+KJ/2,DRAWNULL),COLOR00FFFF,NODRAW;
压力:=IF(CURRBARSCOUNT<=N1,GD-KJ*0.191,DRAWNULL),COLORFF00FF,NODRAW;
支撑:=IF(CURRBARSCOUNT<=N1,DD+KJ*0.191,DRAWNULL),COLOR00FF00,NODRAW;
高区:IF(CURRBARSCOUNT<=N1,GD,DRAWNULL),COLORRED,DOTLINE;
低区:IF(CURRBARSCOUNT<=N1,DD,DRAWNULL),COLOR00FF00,DOTLINE,LINETHICK4;
A1:=BARSLAST(MONTH!=REF(MONTH,1))+1;
月±%:(CLOSE/REF(CLOSE,A1)-1)*100,COLOR00FFFF,NODRAW;
DRAWKLINE(H,O,L,C);
DRAWTEXT(CURRBARSCOUNT=1,压力,'0.809'),COLOR0000FF;
来函数检测结果如下：
该公式包含未来函数:DYNAINFO
解密、定制、编写指标公式请联系QQ或微信同号：88652583
置顶指标
相关指标公式
SJ赋值:WMA(((2*C+H+L)/4-5日内L最低值)/(5日内H最高值-5日内L最低值)*100,2)
ZJ赋值:WMA(0.618*1日前的SJ+0.382*SJ,2)
输出
ENTERLONG:SJ上穿ZJ AND SJ<30,画红色
输出
EXITLONG:ZJ上穿SJ AND SJ>70,画绿色
N赋值:STRCAT(CON2STR(YEAR,0),' 年 ')
Y赋值:STRCAT(CON2STR(MONTH,0),' 月 ')
R赋值:STRCAT(CON2STR(DAY,0),' 日 ')
DRAWTEXT_FIX(C>0,0.88,0,0,SJ)
输出
MA1:C的21日指数移动平均,3)
输出
MA2:C的34日指数移动平均,3)
TT1赋值:C>MA1 AND C>MA2
TT2赋值:TT1 AND 1日前的TT1=0
当满足条件TT2时,在L*0.99和6之间画图标
输出
EMA10:MA(C,10),画红色 线宽为2
输出
EMA5:MA(C,5),画黄色 线宽为1
输出
EMA30:MA(C,30), 画蓝色 线宽为1
TY赋值:DYNAINFO(8)>0
GG赋值:V=100日内V最低值 AND TY
当满足条件GG时,在最低价*0.96和1之间画图标
当满足条件GG时,在最低价*0.95和17之间画图标
输出
阻力价:19日内最高价最高值, 画蓝色, 线宽为2
输出
VAR4:C的3日指数移动平均, 线宽为2
输出
七天线:MA(C,7),COLORGRAY
输出
工作线:(C的14日指数移动平均),POINTDOT, 线宽为4,画黄色
输出
生命线:(MA(C,25)), 线宽为2,画洋红色
输出
{不惑线:(MA(C,40)),画青色
输出}
姊妹线:(C的56日指数移动平均),POINTDOT,画白色
A3赋值:EMA((((SLOPE(C,21)) * 20) + C),68)
A4赋值:C的10日指数移动平均
A5赋值:2日前的C
A6赋值:((SMA((MAX((C - A5),0)),6,1)) / (SMA((C - A5的绝对值),6,1))) * 100
A7赋值:IF(((A6 < (1日前的A6)) AND (A6 > 79)),A6,0)
A8赋值:21日内L最低值
A9赋值:21日内H最高值
A10赋值:EMA((((收盘价 - A8) / (A9 - A8)) * 100),5)
A11赋值:EMA((((收盘价 - A8) / (A9 - A8)) * 50),13)
A12赋值:EMA(((0.667 * (1日前的A10)) + (0.333 * A10)),2)
A13赋值:55日内L最低值
A14赋值:34日内H最高值
A15赋值:EMA((((C - A13) / (A14 - A13)) * 100),3)
A16赋值:(A11 + A15) / 2
A17赋值:EMA(((0.667 * (1日前的A15)) + (0.333 * A10)),2)
A18赋值:A16的5日指数移动平均
A19赋值:EMA(((0.667 * (1日前的A18)) + (0.333 * A18)),2)
A20赋值:A10上穿A11
A21赋值:(A10上穿A19) AND (A19 < 30)
A22赋值:A21 * 0.6
A23赋值:((C + L) + H) / 3
A24赋值:A23的6日指数移动平均
A25赋值:A24的5日指数移动平均
A26赋值:A24上穿A25
DRAWICON(A26,(最低价 / 1.015),1), 线宽为2,画洋红色
STICKLINE(((C >= 工作线) AND (C >= O)),H,L,0,1),画红色
STICKLINE(((C >= 工作线) AND (C >= O)),O,C,2,1),画红色
STICKLINE(((C >= 工作线) AND (C <= O)),H,L,0,0),画红色
STICKLINE(((C >= 工作线) AND (C <= O)),O,C,2,0),画红色
STICKLINE(((C < 工作线) AND (C >= O)),H,L,0,1),画绿色
STICKLINE(((C < 工作线) AND (C >= O)),O,C,2,1),画绿色
STICKLINE(((C < 工作线) AND (C <= O)),H,L,0,0),画绿色
STICKLINE(((C < 工作线) AND (C <= O)),O,C,2,0),画绿色
如果收盘价>150返回91.3否则返回0.913
输出
箱下沿:INTPART(收盘价/VARA )*VARA,POINTDOT,画绿色
输出
箱上沿:箱下沿+VARA,POINTDOT,画黄色
输出
箱中线:(箱下沿+箱上沿)/2,POINTDOT,画白色
当满足条件C时,在箱下沿和箱下沿之间画柱状线
当满足条件C时,在箱上沿和箱上沿之间画柱状线
当满足条件C时,在箱中线和箱中线之间画柱状线
输出
CC:IF( 到最后交易的周期<18,CONST(1日前的C),DRAWNULL),COLOR000000, 线宽为3
输出
止赢价位:1.05*CC,画黄色, 线宽为3
当满足条件ISLASTBAR时,在5日内C最高值*1.05和'止赢价位'位置书写文字
输出
多:BBI,画白色
当满足条件C=H AND C/1日前的C>1.01时,在L和'F'位置书写文字
当满足条件ISLASTBAR时,在5日内C最高值*0.95-0.01和5日内C最高值*0.95之间画柱状线
当满足条件ISLASTBAR时,在5日内C最高值*0.95和'止损价位'位置书写文字
高1赋值:3日前的120日内H最高值
低1赋值:3日前的120日内L最低值
H1赋值:高1-(高1-低1)*0.191
H2赋值:高1-(高1-低1)*0.382
H3赋值:高1-(高1-低1)*0.5
H4赋值:高1-(高1-低1)*0.618
H5赋值:高1-(高1-低1)*0.809
突破赋值:1日前的C的14日指数移动平均
A1X赋值:(C的10日指数移动平均-突破)/突破*100
JZ赋值:IF(A1X>=0,上次A1X上穿0距今天数+1日前的C的10日指数移动平均,REF(C的10日指数移动平均,上次0上穿A1X距今天数+1)),COLORFFFF00, 线宽为2
N1:=100
KD赋值:上次 到最后交易的周期=N1距今天数
如果ISLASTBAR=1返回KD日内H最高值否则返回0
如果ISLASTBAR=1返回KD日内L最低值否则返回0
KJ赋值:GD-DD
如果 到最后交易的周期<=N1/2返回GD否则返回DRAWNULL
如果C的有效数据周期数>=8返回8否则返回C的有效数据周期数
AMOV赋值:成交量*(C+L+H)/3
MN赋值:ND的AMOV日累和/ND的成交量日累和
AAC赋值:A1X上穿0,LINETHICK0
BBC赋值:0上穿A1X,LINETHICK0
(AAC,JZ*0.98,34)
(BBC,JZ*1.015,35)
LC赋值: 1日前的收盘价
收盘价-LC和0较大值的6日[1日权重]移动平均
逃顶赋值:82上穿RSI
( 逃顶,H*1.01,15)
当满足条件 逃顶时,在H*1.01和' ←快跑'位置书写文字
如果 到最后交易的周期<=N1返回DD+KJ/2否则返回DRAWNULL
如果 到最后交易的周期<=N1返回GD-KJ*0.191否则返回DRAWNULL
如果 到最后交易的周期<=N1返回DD+KJ*0.191否则返回DRAWNULL
如果 到最后交易的周期<=N1返回GD否则返回DRAWNULL
如果 到最后交易的周期<=N1返回DD否则返回DRAWNULL
A1赋值:上次MONTH!=1日前的MONTH距今天数+1
输出
月±%:(收盘价/A1日前的收盘价-1)*100,COLOR00FFFF,NODRAW
DRAWKLINE(H,O,L,C)
当满足条件 到最后交易的周期=1时,在压力和'0.809'位置书写文字
