|
MACD变色(通达信):. A# f6 H! z0 d% I
DIF1:=EMA(CLOSE,7)-EMA(CLOSE,19),COLORWHITE;' E6 Z1 B7 w; K4 A7 b% ]) U
DEA1:=EMA(DIF1,9);
! b$ m+ p. P w2 o- L/ o- k: o# H3 i6 tMACD1:=(DIF1-DEA1)*2,COLORSTICK;
# @- K) T) v% u* h- c$ xSTICKLINE(MACD1>REF(MACD1,1) AND MACD1>0,0,MACD1,0,0),COLORRED;
& K& {) i7 H @% F& L; TSTICKLINE(MACD10,0,MACD1,0,0),COLORYELLOW;' C. y7 q+ e& P- _$ E
STICKLINE(MACD1MA(DIF1,4),DIF1,DRAWNULL),COLORRED;
( Y4 |8 H" g0 I: G2 m弱:IF(DEA1>MA(DEA1,4),DEA1,DRAWNULL),COLORMAGENTA;, C3 o* s3 n6 F6 p! p) ^. D
流畅盘(亿):CAPITAL/1000000,LINETHICK0,NODRAW,COLORWHITE;
. R) [: i- t' T2 v0 ^( \+ C每股净资产:FINANCE(34),LINETHICK0,NODRAW,COLORGREEN;) T. F4 E5 M& C% O1 Q$ }
年收益:FINANCE(33),LINETHICK0,NODRAW,COLORMAGENTA;& Q9 `$ w/ r3 Z$ i
换手:VOL/CAPITAL*100,LINETHICK0,NODRAW,COLORCYAN;
6 S! b$ p" D$ T" K2 v5 G, n6 o" F用法:买入时不消等金叉出现,只要DIF由绿变红时(激进的可在MACD长绿柱变紫色时)到场;卖出也不必等死叉才卖,; z4 }7 ^" k; l4 `$ y
只要DIF由红变绿就可卖出(激进者可在MACD长红柱变黄色时卖出)。发起用60分钟(激进者可用30分钟)图来操纵。
. l9 B! Z: s9 Z9 n$ H # J7 B# p& V, [! R
优化更新,交易点更为精确!并有MACD,KDJ,RSI顶底背离提示。
9 m2 h% r8 g" {& n源码如下:
: M$ o: X' V5 ?: d7 Q" vDIFF:EMA(CLOSE,7) - EMA(CLOSE,19);
2 x! T7 h4 S G6 SDEA:EMA(DIFF,9);
3 n0 a( `& @0 H$ `MACD:2*(DIFF-DEA),COLORSTICK;0 ?& w' `, \1 V& Y& x$ w
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
) @. s' }% F; L! x* F2 x1 d3 X% SB1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)C AND REF("KDJ.K"(9,3,3),A2+1)C AND REF("RSI.RSI1"(6,12,24),A3+1)0,-0.1,0),COLORRED,POINTDOT;
% m! F2 l! @* O/ ?KDJ底背:IF(B2>0,-0.1,0),COLORFF00FF,POINTDOT;
8 u- l% ^: A9 _RSI底背:IF(B3>0,-0.1,0),COLORYELLOW,POINTDOT;
4 Z/ W v+ l* U: JMACD顶背:IF(D1>0,0.1,0),COLOR00FF00,POINTDOT; X O2 u t, G' f
KDJ顶背:IF(D2>0,0.1,0),COLORFFCC66,POINTDOT;0 E8 M/ }3 J* r, q N, U7 H, a
RSI顶背:IF(D3>0,0.1,0),COLORWHITE,POINTDOT;
" Z8 Z& u+ f( C+ b9 j. I' OSTICKLINE(B1>0,-0.1,0,2,0),COLORRED;
- v* M: _& G" u0 QSTICKLINE(B2>0,-0.1,0,2,0),COLORFF00FF;
2 [/ a: q; [# |2 Y9 J. L1 CSTICKLINE(B3>0,-0.1,0,2,0),COLORYELLOW;2 u( E6 o$ s- c# k2 G; N9 J
STICKLINE(D1>0,0.1,0,2,0),COLOR00FF00;
8 I. R: k' J) V/ ]+ aSTICKLINE(D2>0,0.1,0,2,0),COLORFFCC66;
" U" ]2 `# Z! R# U% a% t" LSTICKLINE(D3>0,0.1,0,2,0),COLORWHITE;3 l! A" B4 G8 Q
STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORRED;, K D0 @% F0 A# G
STICKLINE(MACD0,0,MACD,0,0),COLORYELLOW;
+ H9 I2 E9 R5 JSTICKLINE(MACDMA(DIFF,2),DIFF,DRAWNULL),COLORRED;! H+ Q& z/ K& B+ s& j3 ^/ K$ @- ~
弱:IF(DEA>MA(DEA,2),DEA,DRAWNULL),COLORMAGENTA; |