MACD3背离 转载和谐完全加密通达信指标!

[复制链接]
查看28 | 回复0 | 2022-6-27 22:21:03 | 显示全部楼层 |阅读模式
 
日周期:=PERIOD=5;
MD周:=IF(日周期,MACD.DEA#WEEK,DRAWNULL);
MD周_:=IF(MD周>REF(MD周,5) AND 日周期,MACD.DEA#WEEK,DRAWNULL);
SHORT:=12;
LONG:=26;
MID:=9;
DIF1:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA1:=EMA(DIF1,MID);
MACD1:=(DIF1-DEA1)*2;
MH:=MACD1;{WWW.70822.com}
HHM:=CONST(HHV(MACD1,240));
MM:=0.3*HHM;
DIF:DIF1,COLORGREEN;
DEA:DEA1,COLORWHITE;
DIF升:IF(DIF>=REF(DIF,1),DIF,DRAWNULL),COLORMAGENTA;
DEA升:IF(DEA>=REF(DEA,1),DEA,DRAWNULL),COLORLIRED;
MACD:MACD1,COLORSTICK,COLORYELLOW;
金叉:=CROSS(DIF,DEA);
轴上金叉:=金叉 AND DEA>0;
轴上周期:=BARSLAST(CROSS(0,DEA));
轴上金叉数:=COUNT(轴上金叉,轴上周期);
二次金叉:=轴上金叉 AND 轴上金叉数=2;
TDXSTEP121:DRAWICON(二次金叉,0.8*DEA,1);
TDXSTEP122:DRAWICON(二次金叉,0.7*DEA,1);
A1:=BARSLAST(REF(CROSS(DIF,DEA) AND DIF<0,1));
HC:=HHV(CLOSE,6);{WWW.70822.com}
B1:=REF(HC,A1+1)>HC AND REF(DIF,A1+1)<DIF AND CROSS(DIF,DEA) AND DIF<0 AND A1>=12;
K:=KDJ.K(9,3,3);
D:=KDJ.D(9,3,3);
R1:=RSI.RSI1(6,12,24);
R2:=RSI.RSI2(6,12,24);
A2:=BARSLAST(REF(CROSS(K,D),1));
B2:=REF(CLOSE,A2+1)>CLOSE AND REF(K,A2+1)<K AND CROSS(K,D) AND A2>=9;
A3:=BARSLAST(REF(CROSS(R1,R2),1));
B3:=REF(CLOSE,A3+1)>CLOSE AND REF(R1,A3+1)<R1 AND CROSS(R1,R2) AND A3>=6;
C1:=BARSLAST(REF(CROSS(DEA,DIF) AND DIF>0,1));
LC:=LLV(CLOSE,6);
D1:=REF(LC,C1+1)<LC AND REF(DIF,C1+1)>DIF AND CROSS(DEA,DIF) AND DIF>0 AND C1>=12;
C2:=BARSLAST(REF(CROSS(D,K),1));
D2:=REF(CLOSE,C2+1)<CLOSE AND REF(K,C2+1)>K AND CROSS(D,K) AND C2>=9;
C3:=BARSLAST(REF(CROSS(R2,R1),1));
D3:=REF(CLOSE,C3+1)<CLOSE AND REF(R1,C3+1)>R1 AND CROSS(R2,R1) AND C3>=6;
M底背:IF(B1>0,1,0),NODRAW,COLORRED;
K底背:IF(B2>0,1,0),NODRAW,COLORMAGENTA;
R底背:IF(B3>0,1,0),NODRAW,COLORYELLOW;
M顶背:IF(D1>0,1,0),NODRAW,COLORGREEN;
K顶背:IF(D2>0,1,0),NODRAW,COLORFFCC66;
R顶背:IF(D3>0,1,0),NODRAW,COLORGRAY;
TDXSTEP123:STICKLINE(M底背,-MM,0,1,0),COLORRED;
TDXSTEP124:STICKLINE(K底背,-MM,0,1,0),COLORMAGENTA;
TDXSTEP125:STICKLINE(R底背,-MM,0,1,0),COLORYELLOW;
TDXSTEP126:STICKLINE(M顶背,MM,0,2,0),COLORGREEN;
TDXSTEP127:STICKLINE(K顶背,MM,0,2,0),COLORFFCC66;
TDXSTEP128:STICKLINE(R顶背,MM,0,2,0),COLORGRAY;
TDXSTEP129:STICKLINE(MACD<REF(MACD,1) AND MACD>0,0,MACD,0,0),COLOR00CCFF;
TDXSTEP130:STICKLINE(MACD>=REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORRED;
TDXSTEP131:STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,0,0),COLORFF5599;
TDXSTEP132:STICKLINE(MACD<=REF(MACD,1) AND MACD<0,0,MACD,0,0),COLORFFFF55;
J:KDJ.J,NODRAW;
RSI:R1,NODRAW,COLORMAGENTA;
CCI:CCI,NODRAW;

p20184817591334372.jpg

p20184817591334372.jpg

20184817592070689.rar

3.74 KB, 下载次数: 0

售价: 6 金钱  [记录]  [购买]

20184817592070689.rar

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则