MACD变色(通达信):) X9 ?- b8 I3 {
DIF1:=EMA(CLOSE,7)-EMA(CLOSE,19),COLORWHITE;8 l; g5 ?+ U" @/ x6 j- u3 o/ I/ c! a
DEA1:=EMA(DIF1,9);
& c# F6 o, u, u3 GMACD1:=(DIF1-DEA1)*2,COLORSTICK;
) T5 }% G; l4 z7 s' M" MSTICKLINE(MACD1>REF(MACD1,1) AND MACD1>0,0,MACD1,0,0),COLORRED;
8 y3 ?5 R3 b, w* r. gSTICKLINE(MACD10,0,MACD1,0,0),COLORYELLOW;1 q# u; L# N4 t- v3 |
STICKLINE(MACD1MA(DIF1,4),DIF1,DRAWNULL),COLORRED;
; Q b7 M6 G+ M& o0 w) N/ I弱:IF(DEA1>MA(DEA1,4),DEA1,DRAWNULL),COLORMAGENTA;
' e1 e2 W" F! q# j+ K* H流畅盘(亿):CAPITAL/1000000,LINETHICK0,NODRAW,COLORWHITE;- {+ T- T* i! L) G+ O
每股净资产:FINANCE(34),LINETHICK0,NODRAW,COLORGREEN;
/ o8 \8 ~. z$ i年收益:FINANCE(33),LINETHICK0,NODRAW,COLORMAGENTA;. \ V: ]* s4 W2 [
换手:VOL/CAPITAL*100,LINETHICK0,NODRAW,COLORCYAN;
& I D6 X4 V" p用法:买入时不消等金叉出现,只要DIF由绿变红时(激进的可在MACD长绿柱变紫色时)到场;卖出也不必等死叉才卖,- N; K' l, L/ f5 ]3 x( I5 H
只要DIF由红变绿就可卖出(激进者可在MACD长红柱变黄色时卖出)。发起用60分钟(激进者可用30分钟)图来操纵。
& J& v* I2 S! l3 ~3 e( D- j ) D$ A' H; N0 F) F: p
优化更新,交易点更为精确!并有MACD,KDJ,RSI顶底背离提示。5 y P; F' x& Q8 T# W
源码如下:
- Z( |& x' T2 R; aDIFF:EMA(CLOSE,7) - EMA(CLOSE,19);9 I+ K) a i% s. T7 e* z5 |
DEA:EMA(DIFF,9);
; u" v$ p/ R& i) b7 A' `# yMACD:2*(DIFF-DEA),COLORSTICK;
% K8 T4 i( R0 A' P# q4 E& GA1:=BARSLAST(REF(CROSS(DIFF,DEA),1));. ^9 F, b' n0 u0 f* U
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;
; v" ?7 p1 ~2 ^KDJ底背:IF(B2>0,-0.1,0),COLORFF00FF,POINTDOT;
! e9 Q2 Y. X/ HRSI底背:IF(B3>0,-0.1,0),COLORYELLOW,POINTDOT;) L8 K1 a! b% Z5 h
MACD顶背:IF(D1>0,0.1,0),COLOR00FF00,POINTDOT;& j& T6 B5 i2 x
KDJ顶背:IF(D2>0,0.1,0),COLORFFCC66,POINTDOT;
, L" I3 J! _; |# J0 YRSI顶背:IF(D3>0,0.1,0),COLORWHITE,POINTDOT;0 d$ |# w( Z7 h9 w- x8 K: i. w
STICKLINE(B1>0,-0.1,0,2,0),COLORRED;
: T( N( a4 l+ H/ u5 P6 wSTICKLINE(B2>0,-0.1,0,2,0),COLORFF00FF;
( J& }4 x" f- zSTICKLINE(B3>0,-0.1,0,2,0),COLORYELLOW;" l# d6 O+ q+ f2 [; G
STICKLINE(D1>0,0.1,0,2,0),COLOR00FF00;
8 \. M& R" P- H' N4 R* W. hSTICKLINE(D2>0,0.1,0,2,0),COLORFFCC66;: I1 n4 k9 ^, h1 a
STICKLINE(D3>0,0.1,0,2,0),COLORWHITE;- W& t4 F) L$ X" M- ~8 q3 ^
STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORRED;: N V* y1 v8 }7 `
STICKLINE(MACD0,0,MACD,0,0),COLORYELLOW;
1 _1 |3 U$ z" {& ~) a1 S- B5 cSTICKLINE(MACDMA(DIFF,2),DIFF,DRAWNULL),COLORRED;0 Z M& n. I6 q- x' {9 s$ b2 t
弱:IF(DEA>MA(DEA,2),DEA,DRAWNULL),COLORMAGENTA; |