|
MACD变色(通达信):+ v5 F% |3 _; [# j
DIF1:=EMA(CLOSE,7)-EMA(CLOSE,19),COLORWHITE;
0 n! P% S1 _& U' K& [+ O) S5 y% WDEA1:=EMA(DIF1,9);) }9 V" F& ?- q5 F' K A+ p! i
MACD1:=(DIF1-DEA1)*2,COLORSTICK;2 c. K% j# B q" p& y# F
STICKLINE(MACD1>REF(MACD1,1) AND MACD1>0,0,MACD1,0,0),COLORRED;- ]. A3 ?% R a* N7 L" f1 m! D) C
STICKLINE(MACD10,0,MACD1,0,0),COLORYELLOW;3 {* e6 O5 K. E# ?" O1 Q: H! T
STICKLINE(MACD1MA(DIF1,4),DIF1,DRAWNULL),COLORRED;
| D4 w% e* B弱:IF(DEA1>MA(DEA1,4),DEA1,DRAWNULL),COLORMAGENTA;; n* o4 Q2 O) r \1 B4 H; C* }
流畅盘(亿):CAPITAL/1000000,LINETHICK0,NODRAW,COLORWHITE;/ P. `8 | W* Q; C3 Y7 Q% [
每股净资产:FINANCE(34),LINETHICK0,NODRAW,COLORGREEN;
7 ^1 l2 K! J- j. y0 ]. e年收益:FINANCE(33),LINETHICK0,NODRAW,COLORMAGENTA;
! ]3 h/ B" j4 t# a换手:VOL/CAPITAL*100,LINETHICK0,NODRAW,COLORCYAN;' c8 m( R5 p0 Z
用法:买入时不消等金叉出现,只要DIF由绿变红时(激进的可在MACD长绿柱变紫色时)到场;卖出也不必等死叉才卖,
! Z% x6 J+ X: w. G8 S$ a- Q" Q G2 ?只要DIF由红变绿就可卖出(激进者可在MACD长红柱变黄色时卖出)。发起用60分钟(激进者可用30分钟)图来操纵。
' G" p& n- v% j! t4 g
% a5 h1 f& u: T" u# P! w, @ }优化更新,交易点更为精确!并有MACD,KDJ,RSI顶底背离提示。/ ?+ V" V( X3 e
源码如下:) ] `# \! W# |8 z/ P3 p2 h
DIFF:EMA(CLOSE,7) - EMA(CLOSE,19);) Y. Y: k0 v' }) ~$ G) |
DEA:EMA(DIFF,9);; [4 f% @& O# e' n; ]3 v$ J
MACD:2*(DIFF-DEA),COLORSTICK;9 Q! N8 G$ [& x. D1 ?0 I
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));, L+ @+ z; I& z, p/ T
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;
% g( i# _7 I6 R- g1 OKDJ底背:IF(B2>0,-0.1,0),COLORFF00FF,POINTDOT;2 I% b4 l0 z& g. U
RSI底背:IF(B3>0,-0.1,0),COLORYELLOW,POINTDOT;+ a- C% J. a2 h: {7 i
MACD顶背:IF(D1>0,0.1,0),COLOR00FF00,POINTDOT;
- a( H' c6 c) C% l7 RKDJ顶背:IF(D2>0,0.1,0),COLORFFCC66,POINTDOT;) T* q$ R2 h4 w3 P# x! I
RSI顶背:IF(D3>0,0.1,0),COLORWHITE,POINTDOT;
/ `7 d" T- s- z K& V% TSTICKLINE(B1>0,-0.1,0,2,0),COLORRED;
3 ~* z& q5 z; r1 C* ~& }8 ^STICKLINE(B2>0,-0.1,0,2,0),COLORFF00FF;6 x* {% z1 y( L
STICKLINE(B3>0,-0.1,0,2,0),COLORYELLOW;
6 [) |8 p' J0 U$ VSTICKLINE(D1>0,0.1,0,2,0),COLOR00FF00;3 K+ N! V' T4 v# `+ r ~' @# m" V
STICKLINE(D2>0,0.1,0,2,0),COLORFFCC66;
, A$ ?8 W) M9 qSTICKLINE(D3>0,0.1,0,2,0),COLORWHITE;
( R. L( Q9 t$ T1 F1 PSTICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORRED;
& ]/ D' q7 W2 [1 ]4 s6 J4 }STICKLINE(MACD0,0,MACD,0,0),COLORYELLOW;9 K9 }8 u6 Z- [1 J; p
STICKLINE(MACDMA(DIFF,2),DIFF,DRAWNULL),COLORRED;5 W) ^, i. ~: c) l( }1 f2 b! n& \
弱:IF(DEA>MA(DEA,2),DEA,DRAWNULL),COLORMAGENTA; |