通达信变色的macd
-
相关简介:通达信变色的macd {股海网提供: www.guhai.com.cn } VARA:=(2*CLOSE+HIGH+LOW)/4; VARB:=EXPMA(EXPMA(EXPMA(VARA,4),4),4); J:(VARB-REF(VARB,1))/REF(VARB,1)*1200,COLORSTICK; STICKLINE(J0,0,J,0,0),COLORLIGREEN; VAR1:=EMA(EMA(CLOSE,9),9); 控盘:=(VAR1-REF(VAR1,1
-
文章来源:择股网作者:股海网发布时间:2009-12-07浏览次数:

通达信变色的macd
{股海网提供:www.guhai.com.cn}
- VARA:=(2*CLOSE+HIGH+LOW)/4;
- VARB:=EXPMA(EXPMA(EXPMA(VARA,4),4),4);
- J: (VARB-REF(VARB,1))/REF(VARB,1)*1200, COLORSTICK;
- STICKLINE(J<0,0 ,J,0,0),COLORLIGREEN;
- VAR1:=EMA(EMA(CLOSE,9),9);
- 控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
- STICKLINE(控盘<0,控盘,0,1,0),COLORWHITE;
- A10:=CROSS(控盘,0);
- 无庄控盘:IF(控盘<0,控盘,0),COLORWHITE,NODRAW;
- 开始控盘:IF(A10,1,0),LINETHICK1,COLORYELLOW;
- STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORRED;
- 有庄控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORRED,NODRAW;
- VAR2:=100*WINNER(CLOSE*0.95);
- STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,0),COLORFF00FF;
- 高度控盘:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORFF00FF,NODRAW;
- STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLOR00FF00;
- 主力出货:IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLOR00FF00,NODRAW;
- D: MA(J,3),COLORGREEN,LINETHICK1;
- K: MA(J,1),COLORCYAN,LINETHICK1;
- IF(D>REF(D,1),D,DRAWNULL),COLORYELLOW,LINETHICK2;
- IF(J>REF(J,1),J,DRAWNULL),COLORRED,LINETHICK2;