通达信顶底背离主图源码

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

以下是通达信顶底背离主图源码(无源码的请下载附件导入)

MA13:=MA(CLOSE,13);
 X1:=(CLOSE+LOW+HIGH)/(3);
 BB13:=((ATAN(EMA(X1,13)-REF(EMA(X1,13),1)))*(3.1416))*(10);
 EMA8:=EMA(CLOSE,8);
 DRAWTEXT(FILTER((BB13>1) AND (EMA(X1,13)>REF(EMA(X1,8),1)),10),EMA8,'∠45上升'),CoLorFFFFFF;
压力:MA(REF(HHV(CLOSE,30),1),2),CoLor9DFFFF;
支撑:MA(REF(LLV(CLOSE,30),1),2),CoLorABFF46;
 AA1:=(AMOUNT)/(VOL);
 BB1:=(LOW<(AA1)*(0.9));
 CC1:=(((CLOSE-REF(CLOSE,1))/(REF(CLOSE,1)))*(100)>1.2);
 DD1:=(LOW<(MA(CLOSE,5))*(0.921));
 EE1:=(VOL<(MA(VOL,5))*(1.5));
 FF1:=BB1 AND CC1 AND DD1 AND EE1;
 DRAWTEXT(FF1,(LOW)*(0.96),'老鼠仓'),CoLor4080FF;
 A51:=(3)*(SMA(((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55)))*(100),5,1))-(2)*(SMA(((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55)))*(100),5,1));
黑马线:=EMA(A51,5);
 A54:=((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21)))*(100);
趋势线:=MA((3)*(SMA(A54,6,1))-(2)*(SMA(SMA(A54,5,1),5,1)),2);
 DRAWTEXT(CROSS(趋势线,0) AND (黑马线<40),(LOW)*(0.96),'▲大黑马'),CoLor00FFFF;
 LC:=REF(CLOSE,1);
 RSI:=((SMA(MAX(CLOSE-LC,0),3,1))/(SMA(ABS(CLOSE-LC),3,1)))*(100);
 FF:=EMA(CLOSE,3);
 MA15:=EMA(CLOSE,21);
 DRAWTEXT(CROSS(FF,MA15),(LOW)*(0.96),'底背离'),CoLorA6E500;
 DRAWTEXT(CROSS(88,RSI),(HIGH)*(1.04),'顶背离'),CoLor1880FF;
 VAR2:=LLV(LOW,27);
 VAR3:=HHV(HIGH,34);
 VAR4:=(EMA(((CLOSE-VAR2)/(VAR3-VAR2))*(4),4))*(25);
注意买:=IF((VAR4<10),80,100);
 RSV:=((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)))*(100);
 K:=SMA(RSV,3,1);
 D:=SMA(K,3,1);
 J:=(3)*(K)-(2)*(D);
超跌:=IF((J<0),10,0);
 BDDD:=(LLV(J,2)=LLV(J,8));
买入:=IF(CROSS(J,REF(J+0.01,1)) AND BDDD AND (J<20),30,0);
 DRAWTEXT(买入 AND (注意买=100) AND (超跌=0),(LOW)*(0.96),'短线'),CoLor8000FF;
 MTM:=CLOSE-REF(CLOSE,1);
 DX:=((100)*(EMA(EMA(MTM,6),6)))/(EMA(EMA(ABS(MTM),6),6));
买:=IF((LLV(DX,2)=LLV(DX,7)) AND COUNT((DX<0),2) AND CROSS(DX,MA(DX,2)),1,0);
 DRAWTEXT(FILTER((买=1),5),(LOW)*(0.96),'拉升'),CoLorFFDE00;
 STICKLINE((CLOSE>REF(CLOSE,1)),HIGH,LOW,0,1),CoLor0000FF;
 STICKLINE((CLOSE>REF(CLOSE,1)),OPEN,CLOSE,8,0),CoLor000055;
 STICKLINE((CLOSE=REF(CLOSE,1)),HIGH,LOW,0,1),CoLorFFFFFF;
 STICKLINE((CLOSE=REF(CLOSE,1)),OPEN,CLOSE,8,1),CoLor333333;
 STICKLINE((CLOSE<REF(CLOSE,1)),HIGH,LOW,0,1),CoLorFFFF00;
 STICKLINE((CLOSE<REF(CLOSE,1)),OPEN,CLOSE,8,0),CoLorFF0033;
 STICKLINE((CLOSE>OPEN),OPEN,LOW,0.5,0),CoLor0000FF;
 STICKLINE((CLOSE>OPEN),CLOSE,HIGH,0.5,0),CoLor0000FF;
 STICKLINE((OPEN>=CLOSE),CLOSE,LOW,0.5,0),CoLor00FF00;
 STICKLINE((OPEN>=CLOSE),OPEN,HIGH,0.5,0),CoLor00FF00;
 STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,7,0),CoLorFF7700;
 STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,6,0),CoLorFF9900;
 STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,5,0),CoLorFFBB00;
 STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,4,0),CoLorFFCC00;
 STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,3,0),CoLorFFDD00;
 STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,2,0),CoLorFFEE00;
 STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,1,0),CoLorFFFF00;
 STICKLINE((CLOSE>OPEN),CLOSE,OPEN,7,0),CoLor000055;
 STICKLINE((CLOSE>OPEN),CLOSE,OPEN,6,0),CoLor000066;
 STICKLINE((CLOSE>OPEN),CLOSE,OPEN,5,0),CoLor000077;
 STICKLINE((CLOSE>OPEN),CLOSE,OPEN,4,0),CoLor000099;
 STICKLINE((CLOSE>OPEN),CLOSE,OPEN,3,0),CoLor0000BB;
 STICKLINE((CLOSE>OPEN),CLOSE,OPEN,2,0),CoLor0000DD;
 STICKLINE((CLOSE>OPEN),CLOSE,OPEN,1,0),CoLor0000FF;
 VAR9Q:=((((CLOSE=HHV(CLOSE,4)) AND ((REF(CLOSE,1)>=REF(CLOSE,2)) or (REF(CLOSE,1)>=REF(CLOSE,3))) or (REF(CLOSE,1)=HHV(CLOSE,4)) AND (CLOSE>=REF(CLOSE,2))) or (REF(CLOSE,2)=HHV(CLOSE,4)) AND (REF(CLOSE,3)=LLV(CLOSE,4)) AND (CLOSE>=REF(CLOSE,1))) or (REF(CLOSE,3)=HHV(CLOSE,4)) AND (CLOSE>=REF(CLOSE,1)) AND (CLOSE>=REF(CLOSE,2)));
 STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/(2),7,0),CoLor000055;
 STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/(2),6,0),CoLor000066;
 STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/(2),5,0),CoLor000077;
 STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/(2),4,0),CoLor000099;
 STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/(2),3,0),CoLor0000BB;
 STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/(2),2,0),CoLor0000DD;
 STICKLINE(VAR9Q,CLOSE,(OPEN+CLOSE)/(2),1,0),CoLor0000FF;
 VARAQ:=(CLOSE=HHV(CLOSE,4)) AND (REF(CLOSE,1)=LLV(CLOSE,4));
 STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/(2),7,0),CoLorFF11FF;
 STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/(2),6,0),CoLorFF33FF;
 STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/(2),5,0),CoLorFF55FF;
 STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/(2),4,0),CoLorFF77FF;
 STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/(2),3,0),CoLorFF99FF;
 STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/(2),2,0),CoLorFFBBFF;
 STICKLINE(VARAQ,CLOSE,(OPEN+CLOSE)/(2),1,0),CoLorFFDDFF;
 VARBQ:=((((CLOSE=LLV(CLOSE,4)) AND ((REF(CLOSE,1)<REF(CLOSE,2)) or (REF(CLOSE,1)<REF(CLOSE,3))) or (REF(CLOSE,1)=LLV(CLOSE,4)) AND (CLOSE<REF(CLOSE,2))) or (REF(CLOSE,2)=LLV(CLOSE,4)) AND (REF(CLOSE,1)<>HHV(CLOSE,4)) AND (CLOSE<REF(CLOSE,1))) or (REF(CLOSE,3)=LLV(CLOSE,4)) AND (CLOSE<REF(CLOSE,1)) AND (CLOSE<REF(CLOSE,2)));
 STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/(2),7,0),CoLor333333;
 STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/(2),6,0),CoLor555555;
 STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/(2),5,0),CoLor777777;
 STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/(2),4,0),CoLor999999;
 STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/(2),3,0),CoLorBBBBBB;
 STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/(2),2,0),CoLorDDDDDD;
 STICKLINE(VARBQ,CLOSE,(OPEN+CLOSE)/(2),1,0),CoLorFFFFFF;
 VARCQ:=((REF(CLOSE,1)=LLV(CLOSE,4)) AND (CLOSE>=REF(CLOSE,2)) or (REF(CLOSE,2)=LLV(CLOSE,4)) AND (REF(CLOSE,1)<=REF(CLOSE,3)) AND (REF(CLOSE,2)<REF(CLOSE,4)) AND (CLOSE>=REF(CLOSE,1)));
 STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),7,0),CoLor003300;
 STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),6,0),CoLor005500;
 STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),5,0),CoLor007700;
 STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),4,0),CoLor009900;
 STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),3,0),CoLor00BB00;
 STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),2,0),CoLor00DD00;
 STICKLINE(VARCQ,OPEN,(OPEN+CLOSE)/(2),1,0),CoLor00FF00;
 VARDQ:=((REF(CLOSE,1)=HHV(CLOSE,4)) AND (CLOSE<REF(CLOSE,2)) or ((REF(CLOSE,2)=HHV(CLOSE,4)) AND (REF(CLOSE,1)>REF(CLOSE,3)) or (REF(CLOSE,3)=HHV(CLOSE,4)) AND (REF(CLOSE,1)>REF(CLOSE,2))) AND (REF(CLOSE,2)>=REF(CLOSE,4)) AND (CLOSE<REF(CLOSE,1)));
 STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),7,0),CoLorFF1100;
 STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),6,0),CoLorFF3300;
 STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),5,0),CoLorFF5500;
 STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),4,0),CoLorFF7700;
 STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),3,0),CoLorFF9900;
 STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),2,0),CoLorFFBB00;
 STICKLINE(VARDQ,OPEN,(OPEN+CLOSE)/(2),1,0),CoLorFFDD00;

838233993.jpg

838233993.jpg

回复

使用道具 举报

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

本版积分规则