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

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[通达信] 三级MACD


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

三级MACD


{N:1,50,5(倍数可调)}
DIFF2:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA2:=EMA(DIFF2,9);
DIFF5:=EMA(CLOSE,12*N) - EMA(CLOSE,26*N);
DEA5:=EMA(DIFF5,9*N);
MACD5:=2*(DIFF5-DEA5);
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26),COLORMAGENTA,LINETHICK1;
DEA:=EMA(DIFF,9),COLOR00FFFF,LINETHICK1;
MACD:=2*(DIFF-DEA);
STICKLINE(MACD5>0 AND MACD5>REF(MACD5,1),MACD5,0,4,0),COLORFF6666;
STICKLINE(MACD5>0 AND MACD5<REF(MACD5,1),MACD5,0,4,0),COLORLIBLUE;
STICKLINE(MACD5<0 AND MACD5<REF(MACD5,1),MACD5,0,4,0),COLOR888888;
STICKLINE(MACD5<0 AND MACD5>REF(MACD5,1),MACD5,0,4,0),COLORLIGRAY;
DRAWBAND(DEA5,RGB(0,0,250),DIFF5,RGB(0,150,00));
DRAWBAND(DEA,RGB(250,250,0),DIFF,RGB(0,180,00));

STICKLINE(MACD>0 ,MACD,0,0,0),COLORMAGENTA;
STICKLINE(MACD>0 AND MACD<REF(MACD,1),MACD,0,0,1),COLORCYAN;
STICKLINE(MACD<0 AND MACD<REF(MACD,1),MACD,0,0,0),COLORCYAN;
STICKLINE(MACD<0 AND MACD>REF(MACD,1),MACD,0,0,0),COLORMAGENTA;
DRAWBAND(DEA2,RGB(250,250,250),DIFF2,RGB(250,0,0));
DIFF1:=DIFF,COLORMAGENTA,LINETHICK1;
DEA1:=DEA,COLORYELLOW,LINETHICK1;

A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
A22:=BARSLAST(REF(CROSS(DEA,DIFF),1));
B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);
C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));
D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
顶背离:=REF(CLOSE,A22+1)<CLOSE AND REF(DIFF,A22+1)>DIFF AND CROSS(DEA,DIFF);
{DRAWTEXT(顶背离,DEA*1.05,' 顶离'),COLORWHITE;
DRAWTEXT(底背离,DEA*0.95,' 底背'),COLORRED;}
A51:=BARSLAST(REF(CROSS(DIFF5,DEA5),1));
A522:=BARSLAST(REF(CROSS(DEA5,DIFF5),1));
B51:=REF(C,A51+1)>C AND REF(DIFF5,A51+1)<DIFF5 AND CROSS(DIFF5,DEA5);
C51:=BARSLAST(REF(CROSS(DEA,DIFF),1));
D51:=REF(C,C51+1)<C AND REF(DIFF5,C51+1)>DIFF5 AND CROSS(DEA5,DIFF5);
底离:=REF(CLOSE,A51+1)>CLOSE AND DIFF>REF(DIFF,A51+1) AND CROSS(DIFF,DEA);
顶离:=REF(CLOSE,A522+1)<CLOSE AND REF(DIFF5,A522+1)>DIFF5 AND CROSS(DEA5,DIFF5);
DRAWTEXT(底离,DEA5*1.02,' 5底背'),COLORFF00FF;
DRAWTEXT(顶离,DEA5*0.98,' 5顶离'),COLOR00FF00;
JCCOUNT:=COUNT(CROSS(DIFF1,DEA1),BARSLAST(DEA1>=0));
二次金叉:=CROSS(DIFF1,DEA1) AND DEA1<0 AND COUNT(JCCOUNT=2,55)=1;
低位金叉:=CROSS(DIFF1,DEA1) AND DIFF1<-0.1;
DRAWTEXT(低位金叉 AND 二次金叉 AND 底背离,+0.04,'全3项'),COLOR00FFFF,LINETHICK1;
JCCOUNT1:=COUNT(CROSS(DIFF5,DEA5),BARSLAST(DEA5>=0));
二次金叉5:=CROSS(DIFF5,DEA5) AND DEA5<0 AND COUNT(JCCOUNT1=2,55)=1;
低位金叉5:=CROSS(DIFF5,DEA5) AND DIFF5<-0.1;
DRAWTEXT(低位金叉5 AND 二次金叉5 AND 底背离,+0.02,'5分钟三项'),COLOR00FFFF,LINETHICK1;

DIFF日:EMA(CLOSE,12/N) - EMA(CLOSE,26/N),COLORYELLOW,LINETHICK1;
DEA日:EMA(DIFF日,9/N),COLORYELLOW,LINETHICK1;
IF(DEA日>=REF(DEA日,1),DEA日,DRAWNULL),COLORRED,LINETHICK2;
IF(DEA日>=REF(DEA日,1),DEA日,DRAWNULL)POINTDOT,COLOR3366FF,LINETHICK4;
R1A:=低位金叉5 AND 二次金叉5 AND 底离;
DRAWICON(R1A,DEA5,25);
R1B:= 顶离 AND DEA5>0;
DRAWICON(R1B,DEA5,24);
R2A:= 底背离;
DRAWICON(R2A,DIFF,1);
R2B:= 顶背离 AND DEA>0;
DRAWICON(R2B,DIFF,2);





gd19486

回复

举报

QQ|

GMT+8, 2024-10-9 16:27

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