通达信用K线直接显示买卖趋势主图源码

以下是通达信用K线直接显示买卖趋势主图源码

通达信用K线直接显示买卖趋势主图源码

【由于通达信函数与大智慧的区别这个不能与大智慧完全一样.但是用起来影响不大.其他说明请看大智慧的内容.他们的核心还是相同的：—————–
公式源码：———————————————————-
{二九宽带}
上18H:WMA(SMA(HHV(HIGH,18),9/2,1),3),COLOR00FF00,DOTLINE;
下18L:WMA(SMA(LLV(LOW,18),9/2,1),3),COLOR009900,DOTLINE;
通道:(上18H+下18L)/2,COLOR0598FF,DOTLINE;
DRAWBAND(上18H,RGB(60,0,60),通道,RGB(60,0,60));
DRAWBAND(通道,RGB(0,60,0),下18L,RGB(0,60,0));
WMA(SMA(HHV(HIGH,18),9/2,1),3),COLOR00FF00,DOTLINE;
WMA(SMA(LLV(LOW,18),9/2,1),3),COLOR009900,DOTLINE;
(上18H+下18L)/2,COLOR0598FF,DOTLINE;

{ACZC}
AC:=(C+REF(C,1)-HHV(H,2)-LLV(L,2));
MX:=MAX(AC,MAX(ABS(AC-HHV(H,2)),ABS(AC-LLV(L,2))));
WX4:WMA(MX,4),COLORFF4567;
ZC:=(2.5*C+H+L+O*0.5)/5;
ZC4:WMA(ZC,4),COLOR00FF00,LINETHICK2;
IF(ZC4>REF(ZC4,1),ZC4,DRAWNULL),COLORRED,LINETHICK3;
{MACD}
DIF:=EMA(CLOSE,7) – EMA(CLOSE,13);
DEA:=EMA(DIF,3);
DRAWTEXT(CROSS(DIF,DEA),L*0.99,’DIF’),COLOR0077FF,LINETHICK1;
DRAWTEXT(CROSS(DEA,DIF),H*1.02,’DEA’),COLOR00FF00,LINETHICK1;
{高抛}
SJ:=WMA((ZC-LLV(L,5))/(HHV(H,5)-LLV(L,5))*100,2);
ZJ:=WMA(0.618*REF(SJ,1)+0.382*SJ,2);
DRAWTEXT(CROSS(ZJ,SJ) AND SJ>70,H+0.1,’←高抛’),COLOR00FFFF,LINETHICK2;
 

{趋势涨K线}
AA:=(WX4-ZC4)<=0 ;
BB:=(WX4-ZC4)>0;
CC:=(ZC4-REF(ZC4,1))>0 AND (REF(ZC4,1)-REF(ZC4,2))>0;
{趋势跌K线}
STICKLINE(BB ,HIGH ,LOW,0,0 ),COLORGREEN;
STICKLINE(BB ,CLOSE ,OPEN,3,0 ),COLOR00DD00;
STICKLINE(BB ,CLOSE ,OPEN,2,0 ),COLOR00EE00;
STICKLINE(BB ,CLOSE ,OPEN,1,0 ),COLOR00FF00;
STICKLINE(BB ,CLOSE ,OPEN,0,0) ,COLOR00FF00;

STICKLINE(AA OR CC ,HIGH ,LOW,0,0 ),COLOR0000FF;
STICKLINE(AA OR CC ,CLOSE,OPEN,3,0) ,COLOR0000DD;
STICKLINE(AA OR CC ,CLOSE,OPEN,2,0) ,COLOR0000EE;
STICKLINE(AA OR CC ,CLOSE,OPEN,1,0) ,COLOR0000FF;
STICKLINE(AA OR CC ,CLOSE,OPEN,0,0) ,COLOR0000FF;

{原本涨跌}
STICKLINE(CLOSE>OPEN OR CLOSE=OPEN AND CLOSE>REF(CLOSE,1),H,H*1.001,2,0),COLORRED;
STICKLINE(CLOSE<OPEN OR CLOSE=OPEN AND CLOSE<=REF(CLOSE,1),L,L*0.999,2,0),COLORCYAN;