康龙双彩图指标 通达信公式(附图)

[复制链接]
查看178 | 回复0 | 2021-8-20 19:08:09 | 显示全部楼层 |阅读模式

N:=9; M:=9;
VAR1:=(C-MA(C,6))/MA(C,6)*100;
VAR2:=(C-MA(C,24))/MA(C,24)*100;
VAR3:=(C-MA(C,32))/MA(C,32)*100;
VAR4:=(VAR1+VAR2+VAR3)/3;
VAR5:=EMA(VAR4,5);
VAR6:=MA(100*(C-LLV(C,34))/(HHV(H,34)-LLV(L,34)),5)-20;
VAR7:=SMA(SMA(100-3*(C-LLV(C,75))/(HHV(H,75)-LLV(L,75))*100,20,1)+SMA(2*(C-LLV(C,75))/(HHV(H,75)-LLV(L,75))*100,20,1),15,1);
VAR8:=VAR7<REF(VAR7,1) AND V>REF(V,1) AND C>REF(C,1);
A:=PERIOD;
BL:=IF(A=0,150,IF(A=1,50,IF(A=2,30,IF(A=3,17,IF(A=4,15,IF(A=5,8,IF(A=6,3,IF(A=7,2,IF(A=8,50,IF(A=9,3,1.3))))))))));
FM:=(EMA(CLOSE,1.414*N+1));
FCL:=IF(FM<=0.05,ABS(FM)+0.1,0);
DIF:=(EMA(CLOSE,N)-EMA(CLOSE,2*N+2))/(FCL+FM)*100*BL,COLORLIRED,LINETHICK2;
DEA:=EMA(DIF,N*0.75),COLORGREEN,LINETHICK2;
DRAWBAND(DEA,RGB(55,250,96),DIF,RGB(155,50,196));
ED:=(-0.4*REF(C,4)-0.4*REF(C,3)-1.1*REF(C,2)+0.9*REF(C,1)+2*C);
VARR3:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
VARR4:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
VARR5:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;
VARR6:=(VARR3+VARR4+VARR5)/3;
VARR7:=EMA(VARR6,5);
指标:=EMA(EMA(VARR3,5),5)*3, COLORSTICK;
VARR8:=IF(VARR6<=-20,10,0);
VAR9:=HHV(VARR8,10);
STICKLINE(VARR8=10,20,10,5,0),COLOR6666FF;
VARA:=IF(VAR9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);
RSV:=(SMA(ED,4,1)-LLV(L,M))/(HHV(H,M)-LLV(L,M))*100;
K:SMA(RSV,3,1),COLORWHITE,LINETHICK1;
D:SMA(K,3,1),COLORYELLOW,LINETHICK1;
J:2*K-1*D,COLORGREEN,LINETHICK1;
DRAWBAND(K,RGB(240,50,50),D,RGB(50,98,240));
MACD:2*(DIF-DEA),COLORRED,COLORSTICK;
黄色转强买:(MACD<0 AND MACD>REF(MACD,1),MACD),COLOR00FFFF,NODRAW;
STICKLINE(MACD>0 AND MACD<REF(MACD,1),0,MACD,0.1,0)COLOR00FF00;
STICKLINE(MACD>0 AND MACD>REF(MACD,1),0,MACD,0.1,0)COLORRED;
STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,0.1,0),COLORCYAN;
STICKLINE(MACD<0 AND MACD>REF(MACD,1),0,MACD,0.1,0),COLOR00FFFF;
看多:IF(LLV(VAR6,3)<VAR6,-60,DRAWNULL),LINETHICK2,COLORRED;
看空:IF(VAR6=LLV(VAR6,3),-60,DRAWNULL),LINETHICK2,COLORGREEN;
中短:IF(J>D,-50,DRAWNULL),LINETHICK2,COLORCC66FF;
超短:IF(VAR8>0,-40,DRAWNULL),LINETHICK2,COLORYELLOW;
观望:IF(J<D,-50,DRAWNULL),LINETHICK1,COLORFF9900;
战区:IF(VAR8=0,-40,DRAWNULL),LINETHICK1,COLOR6B8E23;
金叉:=CROSS(DIF,DEA) AND DIF<0.3;
STICKLINE(金叉,0,8,3,0),COLORYELLOW;
危险: STICKLINE(VAR2 AND CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),VAR1+10,0,1,0);
注意止损:STICKLINE(VAR2 AND FILTER(VAR1< REF(VAR1,1),3)
AND CROSS(MA(CLOSE,5),MA(CLOSE,2)),VAR1+6,0,3,0);
DRAWTEXT(VAR2 AND CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),VAR1+10,'危'),COLORBLUE;
DRAWTEXT(VAR2 AND FILTER(VAR1< REF(VAR1,1),6) AND CROSS(MA(CLOSE,5),MA(CLOSE,2)),VAR1+6,'损'),COLORBLUE;
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
转点:=IF(K>D AND CCI>0 AND DIF>DEA AND MACD>0,1,0);
STICKLINE(转点=1,50,50,2,0),COLORYELLOW;
STICKLINE(转点=0,50,50,2,0),COLORCYAN;
STICKLINE(C,90,90,1,0),COLORYELLOW;
STICKLINE(C,10,10,1,0),COLORCYAN;
STICKLINE(C,-90,-90,1,0),COLORCYAN;
SHORT:=6;
LONG:=13;
MID:=4;
DIFJ:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEAJ:=EMA(DIFJ,MID);
MACDK:=(DIFJ-DEAJ)*2,COLORSTICK;
MACDJC:CROSS(DIFJ,DEAJ);
STICKLINE(MACDJC,-100,-80,1,1),COLORWHITE;
STICKLINE(MACDJC,-100,-80,0,0),COLOR000099;
STICKLINE(MACDJC,-100,-80,2,0),COLOR0000BB;
STICKLINE(MACDJC,-100,-80,1,0),COLOR0000DD;
STICKLINE(MACDJC,-100,-80,0.1,0),COLOR0000FF;
{MACD金叉}
NK:=9;
MK1:=3;
MK2:=3;
RSV1:=(CLOSE-LLV(LOW,NK))/(HHV(HIGH,NK)-LLV(LOW,NK))*100;
K1:=SMA(RSV1,MK1,1);
D1:=SMA(K1,MK2,1);
J1:=3*K1-2*D1;
KDJC:CROSS(K1,D1);
{STICKLINE(KDJC,-60,-40,1,1),COLORYELLOW;}
STICKLINE(KDJC,-60,-40,0,0),COLOR330099;
STICKLINE(KDJC,-60,-40,2,0),COLOR9900BB;
STICKLINE(KDJC,-60,-40,1,0),COLORBB00DD;
STICKLINE(KDJC,-60,-40,0.1,0),COLORFF00FF;
{DRAWBAND(DIF,RGB(155,50,50),DEAC,RGB(0,100,50));}
{KDJ金叉}
NN1:=5;NN2:=10;NN3:=20;NN4:=30;
BBI:=(MA(CLOSE,NN1)+MA(CLOSE,NN2)+MA(CLOSE,NN3)+MA(CLOSE,NN4))/4,COLORRED,LINETHICK1;
BBIJC:CROSS(C,BBI),COLORRED;
{STICKLINE(BBIJC,-30,-10,1,1),COLORRED;}
STICKLINE(BBIJC,-30,-10,2.8,0),COLOR555555;
STICKLINE(BBIJC,-30,-10,2,0),COLOR888888;
STICKLINE(BBIJC,-30,-10,1.5,0),COLORAAAAAA;
STICKLINE(BBIJC,-30,-10,1,0),COLORCCCCCC;
STICKLINE(BBIJC,-30,-10,0.5,0),COLOREEEEEE;
{BBI金叉}
N5:=6;
LCK:=REF(CLOSE,1);
AA:=ABS(HIGH-LCK);
BB:=ABS(LOW-LCK);
CCK:=ABS(HIGH-REF(LOW,1));
DDK:=ABS(LCK-REF(OPEN,1));
R:=IF(AA>BB AND AA>CCK,AA+BB/2+DDK/4,IF(BB>CCK AND BB>AA,BB+AA/2+DDK/4,CCK+DDK/4));
X:=(CLOSE-LCK+(CLOSE-OPEN)/2+LCK-REF(OPEN,1));
SI:=16*X/R*MAX(AA,BB);
ASI:=SUM(SI,0);
MASI:=(ASI,N5);
ASIJC:CROSS(ASI,MASI),COLORBLUE;
STICKLINE(ASIJC,20,40,1,1),COLORBLUE;
{ASI金叉};
MTM:=CLOSE-REF(CLOSE,12);
MTMJC:=CROSS(MTM,0),COLORBROWN;
STICKLINE(MTMJC,50,70,1,1),COLORBROWN;
STICKLINE(MTMJC,50,70,2.8,0),COLOR555500;
STICKLINE(MTMJC,50,70,2,0),COLOR888800;
STICKLINE(MTMJC,50,70,1.5,0),COLORAAAA00;
STICKLINE(MTMJC,50,70,1,0),COLORCCCC00;
STICKLINE(MTMJC,50,70,0.5,0),COLOREEEE00;
XG:=MACDJC AND KDJC AND BBIJC AND ASIJC AND MTMJC;
{STICKLINE(XG,-100,100,1,0);}
{DRAWTEXT_FIX(XG>-1,0,0,0,'共振次数越多成功率越高');}
三指标共振:=MACDJC+KDJC+BBIJC+ASIJC+MTMJC=3;
STICKLINE(三指标共振,50,70,2.8,0),COLOR335555;
STICKLINE(三指标共振,50,70,2,0),COLOR338888;
STICKLINE(三指标共振,50,70,1.5,0),COLOR33AAAA;
STICKLINE(三指标共振,50,70,1,0),COLOR33CCCC;
STICKLINE(三指标共振,50,70,0,0),COLOR33EEEE;
四指标共振:=MACDJC+KDJC+BBIJC+ASIJC+MTMJC=4;
五指标共振:=MACDJC+KDJC+BBIJC+ASIJC+MTMJC=5;
{DRAWTEXT(三指标共振,85,'三指标共振');}
DRAWTEXT(四指标共振,0,'四指标共振');
DRAWTEXT(五指标共振,0,'五指标共振');

16320344a-0.jpg

16320344a-0.jpg

 

回复

使用道具 举报

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

本版积分规则