MACD变色(通达信):
" D) V) Q$ X6 QDIF1:=EMA(CLOSE,7)-EMA(CLOSE,19),COLORWHITE;
, v0 C, Z8 a- Q* r) ?" V) rDEA1:=EMA(DIF1,9);
+ i1 g! {3 w$ y$ ~, QMACD1:=(DIF1-DEA1)*2,COLORSTICK;2 `7 N, D! y v7 h4 R8 R
STICKLINE(MACD1>REF(MACD1,1) AND MACD1>0,0,MACD1,0,0),COLORRED;
, Q( B5 R, U6 a1 `. A9 Q. USTICKLINE(MACD10,0,MACD1,0,0),COLORYELLOW;
/ W0 j! G' f& o) N5 ?STICKLINE(MACD1MA(DIF1,4),DIF1,DRAWNULL),COLORRED;/ k; L) f3 N0 F4 t c0 f, w
弱:IF(DEA1>MA(DEA1,4),DEA1,DRAWNULL),COLORMAGENTA;
$ p6 N3 w6 I( {& f0 d流畅盘(亿):CAPITAL/1000000,LINETHICK0,NODRAW,COLORWHITE;
7 F9 J) n9 `& i% P- }* j# q每股净资产:FINANCE(34),LINETHICK0,NODRAW,COLORGREEN;8 ?+ I- w4 E& t. `5 d
年收益:FINANCE(33),LINETHICK0,NODRAW,COLORMAGENTA;
- W4 h5 W6 E$ x6 Y% c" D换手:VOL/CAPITAL*100,LINETHICK0,NODRAW,COLORCYAN;
1 j( [6 c; z9 R8 m7 W用法:买入时不消等金叉出现,只要DIF由绿变红时(激进的可在MACD长绿柱变紫色时)到场;卖出也不必等死叉才卖,
- a; x6 x( Z7 A. W, ~2 D/ \只要DIF由红变绿就可卖出(激进者可在MACD长红柱变黄色时卖出)。发起用60分钟(激进者可用30分钟)图来操纵。* R, G' G4 J. s2 Q; O
4 P5 c/ P7 q6 p
优化更新,交易点更为精确!并有MACD,KDJ,RSI顶底背离提示。
! {& O2 ?$ ]* F. } `& B+ G源码如下:
/ L* M: c/ W4 S8 k/ L% E8 g6 A$ N2 NDIFF:EMA(CLOSE,7) - EMA(CLOSE,19);6 T1 w# P' A( c8 q* o: m# E, f
DEA:EMA(DIFF,9);
7 x' G: Y0 T3 ^3 x+ m% ` q! G( KMACD:2*(DIFF-DEA),COLORSTICK;
+ k# k( C5 |3 r( [1 M4 t7 f+ sA1:=BARSLAST(REF(CROSS(DIFF,DEA),1));/ t! u- H0 u& e, J. v
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 U: Z% M$ a, w: \8 JKDJ底背:IF(B2>0,-0.1,0),COLORFF00FF,POINTDOT;
5 m0 B9 h' s1 f$ S. L* ~RSI底背:IF(B3>0,-0.1,0),COLORYELLOW,POINTDOT;) Y7 s# w' m, D1 e
MACD顶背:IF(D1>0,0.1,0),COLOR00FF00,POINTDOT;
1 T4 Q2 M. ~* p; f1 N) G/ s7 M2 PKDJ顶背:IF(D2>0,0.1,0),COLORFFCC66,POINTDOT;7 o, O3 Z3 p6 z! G% i
RSI顶背:IF(D3>0,0.1,0),COLORWHITE,POINTDOT;
% R8 q) |1 [. b+ B0 ~& K' ]& ^STICKLINE(B1>0,-0.1,0,2,0),COLORRED;
* D$ N. f5 r0 H7 ZSTICKLINE(B2>0,-0.1,0,2,0),COLORFF00FF;
7 K5 d5 g% w+ |# w0 OSTICKLINE(B3>0,-0.1,0,2,0),COLORYELLOW;( y* z3 P; Z. L4 A' Q
STICKLINE(D1>0,0.1,0,2,0),COLOR00FF00;% M9 L/ A) C J
STICKLINE(D2>0,0.1,0,2,0),COLORFFCC66;
' h. A, i. {/ U6 NSTICKLINE(D3>0,0.1,0,2,0),COLORWHITE;4 \) Z6 e$ ~% C6 O* R
STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORRED;
& d' w4 _$ d( B, P( rSTICKLINE(MACD0,0,MACD,0,0),COLORYELLOW;
) f6 A. \, ^+ W R2 z; ]STICKLINE(MACDMA(DIFF,2),DIFF,DRAWNULL),COLORRED;- U# a/ y9 w! }9 q& g4 k- c# F
弱:IF(DEA>MA(DEA,2),DEA,DRAWNULL),COLORMAGENTA; |