通达信红杏在墙,好看好用公式副图源码

[复制链接]
查看115 | 回复0 | 2021-8-26 21:26:00 | 显示全部楼层 |阅读模式

以下是通达信红杏在墙,好看好用公式副图源码(无源码的请下载附件导入)

MACD金叉:黄桔
MACD死叉:苹果

{MACD金叉:黄桔。MACD死叉:苹果}

LC:=REF(C,1);

DI:=(EMA(C,12)-EMA(C,26))/C*100+60,COLOR660000;

DE:=EMA(DI,9),LINETHICK1,COLOR00AAAA;

STICKLINE(1=1,DI*1.2,120,4,0),COLORFFCC00;

RSI6:SMA(MAX(C-LC,0),6,1)/SMA(ABS(C-LC),6,1)*150-30,NODRAW,COLOR009900;

RSI06:=IF(RSI6>0,SMA(MAX(C-LC,0),6,1)/SMA(ABS(C-LC),6,1)*150-30,0),NODRAW,COLOR009900;

CCI:((C-MA(C,14))/(0.015*AVEDEV(C,14)))/4+50,NODRAW,COLOR668800;

CCI0:=IF(CCI>0,((C-MA(C,14))/(0.015*AVEDEV(C,14)))/4+50,0),NODRAW,COLOR668800;

   K9:=SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1);

   D9:=SMA(K9,3,1);

J9:3*K9-2*D9,COLORAA6600,NODRAW;

J09:=IF(J9>0,3*K9-2*D9,0),COLORAA6600,NODRAW;

STICKLINE(J09>=0,REF(J09,10),0,4,0),COLORAA6600;

STICKLINE(CCI0>=0,REF(CCI0,5),0,4,0),COLOR888800;

STICKLINE(1=1,-15,0,4,0),COLOR556688;

STICKLINE(1=1,RSI06,0,4,0),COLOR008800;

STICKLINE(1=1,DI*1.2,DI,6,1),COLOR111111;

STICKLINE(1=1,DI*1.2,DI,2,1),COLOR777777;

STICKLINE(DE>=0,DE,0,4,0),COLORAAAAAA;

STICKLINE(1=1,DI*0.97,DI*0.98,4,0),COLOR777777;

STICKLINE(1=1,DI*0.94,DI*0.95,4,0),COLOR777777;

STICKLINE(RSI6>=0,RSI6,0,4,0),COLOR009900;

STICKLINE(CCI>=0,CCI/3,0,4,0),COLOR005500;

红杏出墙超跌:IF(LLV(CCI,10)<0 AND C=LLV(C,10) AND L=LLV(L,10),80-CCI,DRAWNULL),CROSSDOT,

     LINETHICK6,COLORCC00FF;

IF(LLV(CCI,10)<0 AND C=LLV(C,10) AND L=LLV(L,10),80-CCI,DRAWNULL),CROSSDOT,

     LINETHICK1,COLORFFFFFF;

IF(LLV(DI,10)<0 AND C=LLV(C,10) AND L=LLV(L,10),70-DI,DRAWNULL),CROSSDOT,

     LINETHICK6,COLOR6644FF;

IF(LLV(DI,10)<0 AND C=LLV(C,10) AND L=LLV(L,10),70-DI,DRAWNULL),CROSSDOT,

     LINETHICK1,COLORFFFFFF;

IF(LLV(J9,10)<-6 AND C=LLV(C,10) AND L=LLV(L,10),70-J9,DRAWNULL),CROSSDOT,

     LINETHICK6,COLOR0000FF;

IF(LLV(J9,10)<-6 AND C=LLV(C,10) AND L=LLV(L,10),70-J9,DRAWNULL),CROSSDOT,

     LINETHICK1,COLORFFFFFF;

IF(LLV(RSI6,10)<0 AND C=LLV(C,10) AND L=LLV(L,10),70-RSI6,DRAWNULL),CROSSDOT,

     LINETHICK6,COLORAA00FF;

IF(LLV(RSI6,10)<0 AND C=LLV(C,10) AND L=LLV(L,10),70-RSI6,DRAWNULL),CROSSDOT,

     LINETHICK1,COLORFFFFFF;

蓝花凋零超涨:IF(HHV(CCI,10)>100 AND C=HHV(C,10) AND H=HHV(H,10),100-CCI,DRAWNULL),CROSSDOT,

     LINETHICK6,COLORFF8800;

IF(HHV(CCI,10)>100 AND C=HHV(C,10) AND H=HHV(H,10),100-CCI,DRAWNULL),CROSSDOT,

     LINETHICK1,COLORFFFFFF;

IF(HHV(DI,10)>100 AND C=HHV(C,10) AND H=HHV(H,10),100-DI,DRAWNULL),CROSSDOT,

     LINETHICK6,COLORAAAA00;

IF(HHV(DI,10)>100 AND C=HHV(C,10) AND H=HHV(H,10),100-DI,DRAWNULL),CROSSDOT,

     LINETHICK1,COLORFFFFFF;

IF(HHV(J9,10)>114 AND C=HHV(C,10) AND H=HHV(H,10),100-J9,DRAWNULL),CROSSDOT,

     LINETHICK6,COLORFF0077;

IF(HHV(J9,10)>114 AND C=HHV(C,10) AND H=HHV(H,10),100-J9,DRAWNULL),CROSSDOT,

     LINETHICK1,COLORFFFFFF;

IF(HHV(RSI6,10)>98 AND C=HHV(C,10) AND H=HHV(H,10),100-RSI6,DRAWNULL),CROSSDOT,

      LINETHICK6,COLORFF3300;

IF(HHV(RSI6,10)>98 AND C=HHV(C,10) AND H=HHV(H,10),100-RSI6,DRAWNULL),CROSSDOT,

     LINETHICK1,COLORFFFFFF;

  AA:=IF(CCI>REF(CCI,1) AND J9>REF(J9,1) AND RSI6>REF(RSI6,1) AND (DI>REF(DI,1)

        OR DE>REF(DE,1)) AND HHV(CCI,10)<100 AND HHV(J9,10)<100 AND HHV

        (RSI6,10)<100,1,0);

DRAWICON(AA=1 AND REF(AA,1)=0,RSI6,17);

  BB:=IF(CCI<REF(CCI,1) AND J9<REF(J9,1) AND RSI6<REF(RSI6,1) AND (DI<REF(DI,1)

        OR DE<REF(DE,1)) AND LLV(CCI,10)>0 AND LLV(J9,10)>0 AND LLV(RSI6,10)

        >0,1,0);

DRAWICON(BB=1 AND REF(BB,1)=0,RSI6,16);

DRAWICON(CROSS(DI,DE) AND DE>REF(DE,1) AND HHV(CCI,10)<100 AND HHV(J9,10)<

        100 AND HHV(RSI6,10)<100,RSI6,17);
 

回复

使用道具 举报

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

本版积分规则