当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：三背离+能量潮主图（通达信公式 主图 源码 测试图）
软件名称：[B]三背离+能量潮主图（通达信公式 主图 源码 测试图）[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：4.00 KB
官方主页：Home Page
更新时间：2021-07-19 00:16:03
软件简介:
公式中分水岭上穿界线为买进时机，5日均线方向向上最佳（图标提示）。
5日均线由红变蓝是卖出时机,分水岭由紫变绿要坚决离场。
同时将KDJ、RSI、MACD公式出现底、顶背离的情形标在图上，一目了然。
附加能量潮及能量潮拐点提示，使操盘更简单！
友情提示:尽量在个股主升浪期间操作，也就是能量潮一直是红色时介入，能减少操作失误亏损的几率。
祝股友们股市投资顺利，不但有饭吃还能吃上大肉。
CY:=BARSLAST(CURRBARSCOUNT=100);
DX:=CONST(IF(ISLASTBAR=1,LLV(L,CY),0));
SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);
AA10:MA(CLOSE,0),COLOR0000FF;
AA12:MA(CLOSE,0),COLOR0000FF;
BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10);
BB12:=((ATAN((AA12 - REF(AA12,1))) * 3.1416) * 10);
MA13:=MA(CLOSE,13);
X1:=(C+L+H)/3;
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),LOW*0.98,'☆能量潮拐点'),COLOR007FFF;
DRAWBAND(IF(CURRBARSCOUNT<=100,DX+MACD*1.5,DRAWNULL),RGB(230,12,12),DX,RGB(10,30,230));
DRAWBAND(IF(CURRBARSCOUNT<=100,DX+MACD*1.5,DRAWNULL),RGB(230,30,12),DX,RGB(10,200,30));
IF(CURRBARSCOUNT<100,DX+MACD*1.5,DRAWNULL),COLORYELLOW;
A:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1));
B:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1);
分水岭:IF(MA(CLOSE,17)<B,B,MA(CLOSE,17)),COLORFF00FF,LINETHICK2;
界:分水岭-(EMA(C,3)-分水岭),COLORBLUE,LINETHICK2;
M5:MA(C,5),COLORWHITE,LINETHICK2;
IF(M5>=REF(M5,1),M5,DRAWNULL),COLORRED,LINETHICK2;
IF(M5<REF(M5,1),M5,DRAWNULL),COLORFF9900,LINETHICK2;
S:=(M5>界);
DD:=分水岭<REF(分水岭,1);
IF(DD,分水岭,DRAWNULL),COLOR00FF00,LINETHICK2;
IF(S,分水岭,DRAWNULL),COLOR00FFFF,POINTDOT,LINETHICK4;
DRAWICON(CROSS(分水岭,界),分水岭*0.985,34);{买入}
A1:=BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1));
B1:=REF(C,A1+1)>C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA");
DRAWTEXT(B1>0,L*0.99,'★M'),COLORFFFFFF;{MACD底背离}
A2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1));
B2:=REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D");
DRAWTEXT(B2,L*0.98,'◎K'),COLOR00FFFF;{KDJ底背离}
A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2");
DRAWTEXT(B3>0,L*0.97,'◆R'),COLORFF00FF;{RSI底背离}
C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1));
D1:=REF(C,C1+1)<C AND REF("MACD.DIF",C1+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF");
DRAWTEXT(D1>0,H*1.01,'★M'),COLOR00FF00;{MACD顶背离}
C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1));
D2:=REF(C,C2+1)<C AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K");
DRAWTEXT(D2>0,H*1.02,'◎K'),COLORCYAN;{KDJ顶背离}
C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));
D3:=REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1");
DRAWTEXT(D3>0,H*1.03,'◆R'),COLORFF9900;{RSI顶背离};
[url=http://www.70822.com/soft/sort013/sort05/down-157047.html]三背离+能量潮主图（通达信公式 主图 源码 测试图）[/url]