通达信的公式
源码如下:
A:EMA((CLOSE-REF(C,1))/REF(C,1)*10-(INDEXC-REF(INDEXC,1))/REF(INDEXC,1)
*10,5),LINETHICK1,COLORRED;
STICKLINE(A>0,0,A,1,2),COLORRED;
STICKLINE(A<0,0,A,1,2),COLORGREEN;
H1:=CLOSE-REF(CLOSE,1);
H2:=IF(CLOSE-REF(CLOSE,1)>=0,H1,0);
H3:=REF(CLOSE,1)-CLOSE;
H4:=IF(CLOSE-REF(CLOSE,1)<=0,H3,0);
H5:=SUM(H2,90)/SUM(H4,90);
H6:=100-100/(1+H5);
H7:=EMA(H6,21);
H8:=EMA(H7,5);
H9:=EMA(H7,3);
MACD:(H7-H9)*2,COLORSTICK;
STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORRED;
STICKLINE(MACD<=REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORMAGENTA;
STICKLINE(MACD<REF(MACD,1) AND MACD<0,0,MACD,0,0),COLORGREEN;
STICKLINE(MACD>=REF(MACD,1) AND MACD<0,0,MACD,0,0),COLORBLUE;
JJ :=(C*2+H+L)/4;
SK := EMA(JJ,13) - EMA(JJ,21);
SD := EMA(SK,3);
SP := EMA(SK,10);
长线1:IF(SD>=SP,SD,SP),LINETHICK1,COLORWHITE;
长线2:IF(SP-SD,SP,SD),LINETHICK1,COLORYELLOW;
A1:=EMA(CLOSE,7)-EMA(CLOSE,21);
B1:=EMA((0.668*REF(A1,1)+0.333*A1),1);
做多:IF(A1>=B1,A1,B1),LINETHICK1,COLORRED;
做空:IF(B1-A1,B1,A1),LINETHICK1,COLORGREEN;
通达信上显示如下
而在金字塔的显示的图片这样的
少了长线1和做多线
求大侠老师帮忙修改一下
谢谢啦
长线1 和做多线 都存在啊 。只是被长线2 和做空线覆盖了而已