股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[通达信] 通达信锅底突破回踩加金坑源码(冷妞妞)


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 2023-10-9 11:34:48

以下是通达信锅底突破回踩加金坑源码(冷妞妞)

N:=5;
MA5:MA(C,5),COLORMAGENTA;
角度:ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*57.3,NODRAW,COLORYELLOW;
去掉:=IF(NAMELIKE('*ST'),0,1) AND IF(NAMELIKE('S'),0,1) AND IF(DYNAINFO(9)=0,0,1) AND IF(BARSCOUNT(V)<150,0,1);

涨停:=C>REF(C,1)*1.0988 AND C=H;
STICKLINE(涨停=1,O,C,2,0),COLORMAGENTA,LINETHICK2,DRAWABOVE;

LT:=LLVBARS(L,60);
LTT:=BARSLAST(CURRBARSCOUNT=CONST(LT)+1);
HT:=FINDHIGHBARS(H,LT+1,60,1);
高压线:DRAWLINE(CURRBARSCOUNT=CONST(HT)+1,H,ISLASTBAR,REF(H,HT),0),COLORYELLOW,LINETHICK2;
TT:=BARSLAST(CURRBARSCOUNT=CONST(HT)+1);
T:=BARSLAST(CROSS(C,REF(H,TT)));
GL:=C/REF(H,TT);
TA:=BARSLAST(GL=HHV(GL,T+1));
DF:=(C-REF(C,TA+1))/REF(C,TA+1)*100;
JL:=L/REF(H,TT);
XG:=DF<-7 AND JL<1.075{ AND MIN(C,O)*1.005>=REF(H,TT)}AND H>REF(H,TT);
XGT:=BARSLAST(COUNT(XG,T+1)=1 AND XG);
QF:=BACKSET(XGT=0,TA+1);
QFT:=BARSLAST(CROSS(QF=1,0.5));
XZF:=REFX(DF,BARSNEXT(XGT=0));
DRAWICON(CROSS(XGT=0,0.5),L*0.95,1);
DRAWLINE(T=0,REF(H,TT),QFT=0,REF(H,QFT),0),DOTLINE,COLORYELLOW;
DRAWLINE(QFT=0,REF(H,QFT),XGT=0,REF(H,TT),0),DOTLINE,COLORYELLOW;
DRAWTEXT(TT=0,REF(H,TT)*1.05,VARCAT(VARCAT('高压支撑价 : ',VAR2STR(REF(H,TT),2)),'元'))COLORYELLOW;
DRAWLINE(QFT=0,REF(H,QFT)*1.05,QFT=10,REF(H,QFT)*1.05,0),COLORBLUE,LINETHICK3;
DRAWTEXT(QFT=0,REF(H,QFT)*1.1,VARCAT(VARCAT('跌幅:',VAR2STR(XZF,2)),'%'))COLORYELLOW;
突破:=CROSS(MA5,高压线) AND 去掉;
DRAWTEXT(突破=1,H,'突破'),COLORYELLOW;
回踩:=COUNT(XG,T+1)=1 AND XG AND 去掉;
DRAWTEXT(回踩=1,L-L*0.03,'回踩'),COLORYELLOW;
DRAWLINE(TT=0,H,LTT=0,L,0),COLORYELLOW,LINETHICK2;
DRAWTEXT(LTT=0,L*0.98,'锅底'),COLORYELLOW;
坑:=((L-高压线)/高压线)*100,COLORYELLOW,NODRAW;
金坑:=EXIST(突破=1,34) AND REF(O>C,2) AND REF(O>C,1) AND O<C AND C>高压线 AND 坑<15 AND 去掉;
DRAWTEXT(金坑=1,H+H*0.03,'金坑'),COLORYELLOW;
DRAWNUMBER(金坑=1,L-L*0.03,坑),COLORRED;
NOTEXT突破锅底:EXIST(突破 OR LTT=0,N),COLORRED,NODRAW;
NOTEXT回踩金坑:EXIST(回踩 OR 金坑,N),COLORRED,NODRAW;


LT3:=LLVBARS(L,100);
HT3:=HHVBARS(H,60);
LT13:=FINDLOWBARS(L,HT3+1,30,1);
LTT3:=BARSLAST(CURRBARSCOUNT=CONST(LT3)+1);
LTT13:=BARSLAST(CURRBARSCOUNT=CONST(LT13)+1);
HT13:=FINDHIGHBARS(H,LTT13,LTT3+1,1);
HT1T3:=BARSLAST(CURRBARSCOUNT=CONST(HT13)+1);
HT2T3:=BARSLAST(CURRBARSCOUNT=CONST(HT3)+1);
TJ3:=L>REF(L,LTT3);
TJ13:=H>REF(H,HT1T3);
下轨:DRAWLINE(LTT3=0,L,LTT13=0 AND TJ3,L,1),COLORRED,LINETHICK2;
上轨:DRAWLINE(HT1T3=0,H,HT2T3=0 AND TJ13,H,1),COLORRED,LINETHICK2;
XLT3:=FINDLOWBARS(H,0,HT2T3+1,1);
XLT13:=BARSLAST(CURRBARSCOUNT=CONST(XLT3)+1);
XH1T3:=FINDHIGHBARS(H,XLT13,10,1);
XH1TT3:=BARSLAST(CURRBARSCOUNT=CONST(XH1T3)+1);
DF3:=(C-REF(C,HT2T3+1))/REF(C,HT2T3+1)*100;
XL2TT3:=BARSSINCEN(DF3<-15,HT2T3+1);
TJ23:=H<REF(H,HT2T3);
TJ33:=L<REF(L,XL2TT3);
上:DRAWLINE(HT2T3=0,H,XH1TT3=0 AND TJ23,H,1),COLORGREEN,LINETHICK3;
下:DRAWLINE(XL2TT3=0,L,XLT13=0 AND TJ33,L,1),COLORGREEN,LINETHICK3;





回复

举报

QQ|

GMT+8, 2024-11-18 12:40

快速回复 返回顶部 返回列表