通达信心烛叠彩主图源码

[复制链接]
查看60 | 回复0 | 2022-7-24 08:06:53 | 显示全部楼层 |阅读模式

通达信心烛叠彩主图源码

{心烛叠彩}
 


箱顶:MA(REF(HHV(C,30),1),2),COLOR0000FF,LINETHICK2;
箱底:MA(REF(LLV(C,30),1),2),COLOR00FF00,LINETHICK2;
 A:=(3*CLOSE+LOW+OPEN+HIGH)/6;
 HJX21:=(21*A+20*REF(A,1)+19*REF(A,2)+18*REF(A,3)+17*REF(A,4)+16*REF(A,5)+
 15*REF(A,6)+14*REF(A,7)+13*REF(A,8)+12*REF(A,9)+11*REF(A,10)+
 10*REF(A,11)+9*REF(A,12)+8*REF(A,13)+7*REF(A,14)+6*REF(A,15)+
 5*REF(A,16)+4*REF(A,17)+3*REF(A,18)+2*REF(A,19)+
 REF(A,21))/231;
 HJX3:=(3*A+2*REF(A,1)+REF(A,2))/6;
 DC1:EMA(HJX3,4),COLORff00ff;
 DC2:EMA(DC1,3),COLORRED;
 DC3:EMA(DC1,7),COLORRED;
 K1:=BACKSET(DC1<REF(DC1,1),2);
 K2:=BACKSET(DC2<REF(DC2,1),2);
 K3:=BACKSET(DC3<REF(DC3,1),2);
 DC4:EMA(HJX21,6),COLORYELLOW;
 DC5:EMA(HJX21,16),COLORYELLOW;
 DC6:EMA(HJX21,34),COLORYELLOW;
 RSV:=(CLOSE-LLV(LOW,6))/(HHV(HIGH,6)-LLV(LOW,6))*100;
 K:=SMA(RSV,3,1);
 D:=SMA(K,3,1);
 J:=3*K-2*D;
 YX2:=D>REF(D,1);
 YX3:=DC4>DC6 AND DC5>DC6;
 YX4:=CLOSE>DC4 AND CLOSE/DC4<1.1;
 YX5:=DC1>DC2 AND DC2>DC3;
 XG:=YX2 AND YX3 AND YX4;
神:XG AND COUNT(XG,10)=1 AND COUNT(YX5,10)<5,PRECIS0,LINETHICK0;
 DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
 DEA:=EMA(DIFF,9);
 MACD:=2*(DIFF-DEA);
 XG0:=CROSS(MACD,0);
叠:CROSS(CLOSE,DC1) AND CROSS(CLOSE,DC2) AND CROSS(CLOSE,DC3) AND BARSLAST(XG0)<=5
AND CLOSE<DC4 ,PRECIS0,LINETHICK0;
 HJX:=EMA(HJX21,12);
 ZF:=100*(CLOSE-REF(CLOSE,1))/REF(CLOSE,1);
 TTUP:=HJX+2*STD(CLOSE,20);
 TTDOWN:=HJX-2*STD(CLOSE,20);
 HUP:=EMA(TTUP,3);
 HDOWN:=EMA(TTDOWN,3);
 LBRISE:=HUP/REF(HUP,1)>1.0035;
 MIDRISE:=HJX>REF(HJX,1);
 LBDOWN:=HDOWN<REF(HDOWN,1);
 CLB1:=LOW/HUP<1.01 AND  CLOSE/HUP>0.99 AND (OPEN+LOW)/2.1<HUP ;
 KXT:=CLOSE>OPEN AND ((HIGH-CLOSE)+(OPEN-LOW))/(CLOSE-OPEN)<1.2 AND HIGH/CLOSE<1.035;
 TDKD:=100*(HUP-HDOWN)/HJX;
 TDXT:=TDKD<15 AND LLV(TDKD,8)<10;
 XGG:=LBRISE AND MIDRISE AND CLB1 AND KXT AND TDXT;
 CXG:=COUNT(XGG,20);
喇:XGG AND CXG=1 AND COUNT(LBRISE,10)<10 AND HIGH/HHV(HIGH,5)>0.98,PRECIS0,LINETHICK0;
 DRAWICON(神,LOW*0.970,9);
金:CROSS(DC1,DC2),PRECIS0,LINETHICK0;
 partline(DC1,K1),COLORGREEN,LINETHICK1;
 partline(DC2,K2),COLORGREEN,LINETHICK1;
 partline(DC3,K3),COLORGREEN,LINETHICK1;
 
CDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2+O)/5;
 E:=CDP;
 zl:=2*E-REF(L,1);
 zc:=2*E-REF(H,1);
 fz:=E-(REF(H,1)-REF(L,1));
 ZZ:=CDP+(REF(H,1)-REF(L,1));
 drawtextabs(10,80,'低吸:'+ numtostrn(zc,3)),ColorFFFFFF;
 drawtextabs(10,60,'中价:'+ numtostrn(E,3)),ColorFFFF10;
 drawtextabs(10,40,'高抛:'+ numtostrn(zl,3)),COLORGREEN;
 drawtextabs(10,20,'追涨:'+ numtostrn(ZZ,3)),Coloryellow;
 drawtextabs(10,100,'杀跌:'+ numtostrn(fz,3)),ColorFF77FF;
 STICKLINE(DISPSTATUS=2 ,zl,zl,50,9991),COLORGREEN;
 STICKLINE(DISPSTATUS=2 ,zc,zc,50,9991),ColorFFFFFF;
 STICKLINE(DISPSTATUS=2 ,E,E,50,9991),ColorFFFF10;
 STICKLINE(DISPSTATUS=2 ,fz,fz,50,9991),ColorFF77FF;
 STICKLINE(DISPSTATUS=2 ,ZZ,ZZ,50,9991),Coloryellow;
 
var1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
 var2:=REF(var1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var3:=REF(var2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 var4:=REF(var3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var5:=REF(var4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 var6:=REF(var5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var7:=REF(var6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 var8:=REF(var7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var9:=REF(var8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 varA:=REF(var9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 varB:=REF(varA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 varC:=REF(varB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 varD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
 varE:=REF(varD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 varF:=REF(varE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var10:=REF(varF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 var11:=REF(var10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var12:=REF(var11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 var13:=REF(var12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var14:=REF(var13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 var15:=REF(var14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var16:=REF(var15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 var17:=REF(var16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 var18:=REF(var17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 var19:=REF(varD OR varE OR varF OR var10 OR var11 OR var12 OR var13 OR
 var14 OR var15 OR var16 OR var17 OR var18,1) AND var1;
 var1A:=REF(var1 OR var2 OR var3 OR var4 OR var5 OR var6 OR var7 OR
var8 OR var9 OR varA OR varB OR varC,1) AND varD;
 STICKLINE(var19,REF(CLOSE,1),REF(CLOSE,2),10,0),COLOR00ffff;
 STICKLINE(var1A,REF(CLOSE,1),REF(CLOSE,2),10,0),COLORff50ff;
 
DRAWTEXT(FILTER(EMA(EMA(C,5),5)>REF(EMA(EMA(C,5),5),1)
AND HHV(MA(H,13),13)<REF(HHV(MA(H,13),13),1)
AND C>REF(C,1),11),L*0.98,'追'),COLORYELLOW;
 
DRAWTEXT(CROSS(84,SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100),H*1.03,'逃'),COLORYELLOW ;

201244425.png

201244425.png

 

回复

使用道具 举报

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

本版积分规则