MACD变色(通达信):9 G8 j0 _& n3 C7 w; Y6 w
DIF1:=EMA(CLOSE,7)-EMA(CLOSE,19),COLORWHITE;( E# t2 s. |4 u
DEA1:=EMA(DIF1,9);
, n% D" W2 z% [+ }" e. tMACD1:=(DIF1-DEA1)*2,COLORSTICK;* n' D) [( B$ `4 H' T6 w6 {7 c
STICKLINE(MACD1>REF(MACD1,1) AND MACD1>0,0,MACD1,0,0),COLORRED;
) f/ y7 L) u: A5 Q `& lSTICKLINE(MACD10,0,MACD1,0,0),COLORYELLOW;
: z e# V j4 \' ~STICKLINE(MACD1MA(DIF1,4),DIF1,DRAWNULL),COLORRED;- G' V9 v' T3 _; h5 M7 I
弱:IF(DEA1>MA(DEA1,4),DEA1,DRAWNULL),COLORMAGENTA;
K; v- @! [- l# a" I/ W7 q# W/ x流畅盘(亿):CAPITAL/1000000,LINETHICK0,NODRAW,COLORWHITE;/ }/ B2 a9 `+ R$ m' s% J+ j, B7 X
每股净资产:FINANCE(34),LINETHICK0,NODRAW,COLORGREEN;1 ~) H+ Z7 L; u
年收益:FINANCE(33),LINETHICK0,NODRAW,COLORMAGENTA;- ?. }- Z; h7 t. M0 z- h& u8 t$ y3 K
换手:VOL/CAPITAL*100,LINETHICK0,NODRAW,COLORCYAN;
6 ?2 f# n1 r4 w1 B2 a& |用法:买入时不消等金叉出现,只要DIF由绿变红时(激进的可在MACD长绿柱变紫色时)到场;卖出也不必等死叉才卖,/ R2 ~2 u3 ~; |1 m0 g
只要DIF由红变绿就可卖出(激进者可在MACD长红柱变黄色时卖出)。发起用60分钟(激进者可用30分钟)图来操纵。
\3 u4 \; w. {& {( J - s& S9 H, }6 k& B0 m1 I- f- m% o
优化更新,交易点更为精确!并有MACD,KDJ,RSI顶底背离提示。! Z' @/ q$ f( d7 ~
源码如下:
! L1 i H, P7 tDIFF:EMA(CLOSE,7) - EMA(CLOSE,19);
% a @+ a- @# w! I) ]/ o5 IDEA:EMA(DIFF,9);+ M! K5 A+ c3 `1 r9 W
MACD:2*(DIFF-DEA),COLORSTICK;, K5 d- f4 }* z- E" \$ r
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));. Q a4 ]5 G 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;* Y9 z7 H: ?3 ]& ~* f% d
KDJ底背:IF(B2>0,-0.1,0),COLORFF00FF,POINTDOT;
* R) Z3 p4 K2 h3 ARSI底背:IF(B3>0,-0.1,0),COLORYELLOW,POINTDOT;
& C% h2 \3 V4 `0 TMACD顶背:IF(D1>0,0.1,0),COLOR00FF00,POINTDOT;0 j' \# B3 V7 S+ A/ J0 S3 h
KDJ顶背:IF(D2>0,0.1,0),COLORFFCC66,POINTDOT;9 C* z. _4 Q& R, `) |/ o3 \% z; H
RSI顶背:IF(D3>0,0.1,0),COLORWHITE,POINTDOT;
7 g' U& Z# t4 t _! A& TSTICKLINE(B1>0,-0.1,0,2,0),COLORRED;
( O; f0 @# E- ?' M+ o/ WSTICKLINE(B2>0,-0.1,0,2,0),COLORFF00FF;
8 u& s5 K# Q* c% G; \9 Y; ^STICKLINE(B3>0,-0.1,0,2,0),COLORYELLOW;+ G# C- E" \! Y( ~ U3 e+ l% ~6 c
STICKLINE(D1>0,0.1,0,2,0),COLOR00FF00;
4 q$ w& h2 {. ]$ N6 n4 q# xSTICKLINE(D2>0,0.1,0,2,0),COLORFFCC66;
( ^. u# ?/ X" w3 ^STICKLINE(D3>0,0.1,0,2,0),COLORWHITE;
; c1 p/ n$ I& S* [1 j) k. GSTICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORRED;
: J, W) k, H6 }2 |STICKLINE(MACD0,0,MACD,0,0),COLORYELLOW;2 I2 G. n7 z0 v
STICKLINE(MACDMA(DIFF,2),DIFF,DRAWNULL),COLORRED;
+ p, B! a% W0 O H' X弱:IF(DEA>MA(DEA,2),DEA,DRAWNULL),COLORMAGENTA; |