|
MACD变色(通达信):: V0 O1 a6 S" x: |1 O+ P. Y" Q" u* G
DIF1:=EMA(CLOSE,7)-EMA(CLOSE,19),COLORWHITE;
9 b' _$ t6 [) o: fDEA1:=EMA(DIF1,9);
- F6 V. M2 A P; \4 G* V VMACD1:=(DIF1-DEA1)*2,COLORSTICK;
: k; \+ [* O1 m$ S: ASTICKLINE(MACD1>REF(MACD1,1) AND MACD1>0,0,MACD1,0,0),COLORRED;' \5 u$ n7 H9 E! ?2 D
STICKLINE(MACD10,0,MACD1,0,0),COLORYELLOW;3 X; U( \' A: q1 x$ V1 L1 u a- T- C
STICKLINE(MACD1MA(DIF1,4),DIF1,DRAWNULL),COLORRED;" q) F2 N9 ~& o$ }+ D7 e. G: n4 e
弱:IF(DEA1>MA(DEA1,4),DEA1,DRAWNULL),COLORMAGENTA;1 T7 t* w, ^' S6 ^0 J$ h! A4 ]+ d
流畅盘(亿):CAPITAL/1000000,LINETHICK0,NODRAW,COLORWHITE;
1 X1 i1 A8 P0 L- h; D! O1 h/ n* w每股净资产:FINANCE(34),LINETHICK0,NODRAW,COLORGREEN;
) w5 o! j- j( S$ D, Y& b2 X5 z- J年收益:FINANCE(33),LINETHICK0,NODRAW,COLORMAGENTA;( Q5 L: m; ~! b& I- B2 t8 F
换手:VOL/CAPITAL*100,LINETHICK0,NODRAW,COLORCYAN;
- M: d6 H1 E8 G& \用法:买入时不消等金叉出现,只要DIF由绿变红时(激进的可在MACD长绿柱变紫色时)到场;卖出也不必等死叉才卖,
7 A' w% o5 F/ R( w7 |; o只要DIF由红变绿就可卖出(激进者可在MACD长红柱变黄色时卖出)。发起用60分钟(激进者可用30分钟)图来操纵。9 ]3 B7 i2 E6 ]
6 Q, G! x T6 l; o# E
优化更新,交易点更为精确!并有MACD,KDJ,RSI顶底背离提示。
4 x1 z5 t6 w# g( ^- {, x源码如下:
8 Z n) y- ]& H7 yDIFF:EMA(CLOSE,7) - EMA(CLOSE,19);
, E6 P& y1 ~% L& R! }) k' ~DEA:EMA(DIFF,9);
( T- O& H }( s( jMACD:2*(DIFF-DEA),COLORSTICK;
8 M# d" r7 B. C( j- L. gA1:=BARSLAST(REF(CROSS(DIFF,DEA),1));7 j: Q8 ]& ^9 H
B1:=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;3 a* p5 w8 N+ ?- u/ p R
KDJ底背:IF(B2>0,-0.1,0),COLORFF00FF,POINTDOT;7 E& ]8 V2 |7 R: B$ r& a( ~
RSI底背:IF(B3>0,-0.1,0),COLORYELLOW,POINTDOT;0 M" F: \. ?9 M% d9 A9 U
MACD顶背:IF(D1>0,0.1,0),COLOR00FF00,POINTDOT;
7 Q9 w1 a& Y9 l6 d8 K7 {( \. |KDJ顶背:IF(D2>0,0.1,0),COLORFFCC66,POINTDOT;2 E* b; ^! w r0 P) X; Z* O
RSI顶背:IF(D3>0,0.1,0),COLORWHITE,POINTDOT;7 U0 Z/ B- B0 Q7 Z7 \( \6 j6 b3 _2 T6 Q
STICKLINE(B1>0,-0.1,0,2,0),COLORRED;
9 e! [" ^* O& X! H, N9 ESTICKLINE(B2>0,-0.1,0,2,0),COLORFF00FF;
5 l8 w/ \# o# s& p7 z( g5 ^: o+ eSTICKLINE(B3>0,-0.1,0,2,0),COLORYELLOW;
7 o$ S6 K2 Y2 x1 `6 a1 n0 JSTICKLINE(D1>0,0.1,0,2,0),COLOR00FF00;0 N" d9 V D6 i& N5 n: b. w8 a; N
STICKLINE(D2>0,0.1,0,2,0),COLORFFCC66;4 c; y- q2 [. n' a6 {" p2 |
STICKLINE(D3>0,0.1,0,2,0),COLORWHITE;" F# i) Z7 @5 Q R; t; V7 z
STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORRED; h( E( }5 f* V! H- E1 H& y. M
STICKLINE(MACD0,0,MACD,0,0),COLORYELLOW;
# P z( {$ Y# U6 tSTICKLINE(MACDMA(DIFF,2),DIFF,DRAWNULL),COLORRED;
8 |" L, {% g& J) k3 [- c弱:IF(DEA>MA(DEA,2),DEA,DRAWNULL),COLORMAGENTA; |