|
MACD变色(通达信):+ H) s- z' a- i* v' N
DIF1:=EMA(CLOSE,7)-EMA(CLOSE,19),COLORWHITE;6 O0 h) ~) f& v5 K9 C( k
DEA1:=EMA(DIF1,9);
: l! s' q' o* f% tMACD1:=(DIF1-DEA1)*2,COLORSTICK;9 H I2 U7 ?4 u4 S: d6 q7 V$ y
STICKLINE(MACD1>REF(MACD1,1) AND MACD1>0,0,MACD1,0,0),COLORRED;
* D. g' _2 ^ @5 S; w8 D F8 h9 `2 {0 xSTICKLINE(MACD10,0,MACD1,0,0),COLORYELLOW;
N8 o) B5 M6 }. U0 k5 M4 c& P3 fSTICKLINE(MACD1MA(DIF1,4),DIF1,DRAWNULL),COLORRED;
X. r3 r* o% g% J4 z弱:IF(DEA1>MA(DEA1,4),DEA1,DRAWNULL),COLORMAGENTA;
* O4 u. t* b: m, z! m流畅盘(亿):CAPITAL/1000000,LINETHICK0,NODRAW,COLORWHITE;' f7 X& a0 u1 ]4 v% U Q$ ?' k \
每股净资产:FINANCE(34),LINETHICK0,NODRAW,COLORGREEN;
1 s( E7 N6 O0 c8 V( \年收益:FINANCE(33),LINETHICK0,NODRAW,COLORMAGENTA;* r, L2 ^; ^ n# ~: U) R
换手:VOL/CAPITAL*100,LINETHICK0,NODRAW,COLORCYAN;
% N$ U/ E' l4 u; c3 h$ z/ ~) P用法:买入时不消等金叉出现,只要DIF由绿变红时(激进的可在MACD长绿柱变紫色时)到场;卖出也不必等死叉才卖,5 r5 V1 i- a5 ~1 M V
只要DIF由红变绿就可卖出(激进者可在MACD长红柱变黄色时卖出)。发起用60分钟(激进者可用30分钟)图来操纵。" `/ ~4 R% d( |" C* x
1 e) V, C6 Z: l, d8 A4 k9 z6 h. d
优化更新,交易点更为精确!并有MACD,KDJ,RSI顶底背离提示。
9 \8 h1 J, n" `$ r源码如下:4 [. x2 ~7 ?( H% L
DIFF:EMA(CLOSE,7) - EMA(CLOSE,19);6 j9 S- a' p" a8 `
DEA:EMA(DIFF,9);$ o( m1 I& M1 Y7 t6 ~
MACD:2*(DIFF-DEA),COLORSTICK;6 L; d4 L$ G1 O. Y2 k
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
" p& D( _% x* VB1:=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;
- P' b0 o- ?% K& \8 b& W* q0 {; UKDJ底背:IF(B2>0,-0.1,0),COLORFF00FF,POINTDOT;
. E! E9 }4 [0 G$ u% d& v9 C$ ~RSI底背:IF(B3>0,-0.1,0),COLORYELLOW,POINTDOT;
$ o7 U( w/ }( a$ x+ H8 rMACD顶背:IF(D1>0,0.1,0),COLOR00FF00,POINTDOT;" y: [* w0 a& I& z# `/ E& F
KDJ顶背:IF(D2>0,0.1,0),COLORFFCC66,POINTDOT;
" {% P' e4 @3 Z L/ ^RSI顶背:IF(D3>0,0.1,0),COLORWHITE,POINTDOT;$ I- O$ x4 q ~0 Y2 [" { o f3 ^
STICKLINE(B1>0,-0.1,0,2,0),COLORRED;
* l& Z% [1 @% q8 i- l" SSTICKLINE(B2>0,-0.1,0,2,0),COLORFF00FF;
% T; [& M0 F$ ^STICKLINE(B3>0,-0.1,0,2,0),COLORYELLOW;
# |7 f3 S% r+ ]; U3 W$ f) _STICKLINE(D1>0,0.1,0,2,0),COLOR00FF00;+ _ ^' A7 N3 l9 b1 F. { l* J+ K- G
STICKLINE(D2>0,0.1,0,2,0),COLORFFCC66;
9 b/ T; G& l) NSTICKLINE(D3>0,0.1,0,2,0),COLORWHITE;; G! f/ x- h+ @1 y4 m
STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORRED;
$ @* N9 ?' F' v* Z' SSTICKLINE(MACD0,0,MACD,0,0),COLORYELLOW;1 i1 z: \2 T5 Y! Z$ R6 n( x
STICKLINE(MACDMA(DIFF,2),DIFF,DRAWNULL),COLORRED;- P* e$ i0 K& W7 e; P5 e& P
弱:IF(DEA>MA(DEA,2),DEA,DRAWNULL),COLORMAGENTA; |