MACD趋势看盘(通达信)

源码正文：

short:=9{XG51};
long:=18{XG51};
mid:=7{XG51};
持仓区:0,COLORBLUE,LINETHICK0{XG51};
空仓区:0,COLORYELLOW,LINETHICK0{XG51};
dif:=ema(CLOSE,SHORT)-Ema(CLOSE,LONG){XG51};
DEA:=EMA(DIF,MID){XG51};
macd:2*(DIF-DEA),COLORstICK{XG51};
STICKLINE(MacD>=0,MACD,0,0,0),COLOR000FFF{XG51};
STICKLINE(MACD<0,MACD,0,0,0),COLORFF00FF{XG51};
STICKLINE(MACD<REF(MACD,1) AND MACD>0,0,MACD,0,0 ),COLORCYAN{XG51};
STICKLINE(MACD<=REF(MACD,1) AND MACD<0,0,MACD,0,0 ),COLORFFCC66{XG51};
趋势:IF(DIF>DEA,DEA,DEA),COLORRED{XG51};
建仓:IF(DIF<0,DIF,0),COLOR0099FF{XG51};
加仓:IF(DIF<0,0,DIF),COLORWHITE{XG51};
清仓:IF(DIF<DEA,DIF,DEA),COLORCYAN{XG51};
STICKLINE(DIF>DEA,0.025,-0.025,10,1),COLORBLUE{XG51};
STICKLINE(DIF<DEA,0.025,-0.025,10,1),COLORYELLOW{XG51};
A1:=BArslAST(REF(crOSS(DIF,DEA),1)){XG51};
B1:=REF(C,A1+1)>C AND REF(DIF,A1+1)<DIF AND CROSS(DIF,DEA){XG51};
A2:=BARSLAST(REF(CROSS("kdj.K"(9,3,3),"kdj.D"(9,3,3)),1)){XG51};
B2:=REF(C,A2+1)>C AND REF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)){XG51};
A3:=BARSLAST(REF(CROSS("rsi.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1)){XG51};
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)){XG51};
C1:=BARSLAST(REF(CROSS(DEA,DIF),1)){XG51};
D1:=REF(C,C1+1)<C AND REF(DIF,C1+1)>DIF AND CROSS(DEA,DIF){XG51};
C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1)){XG51};
D2:=REF(C,C2+1)<C AND REF("KDJ.K"(9,3,3),C2+1)>"KDJ.K"(9,3,3) AND CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)){XG51};
C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1)){XG51};
D3:=REF(C,C3+1)<C AND REF("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)){XG51};
MACD底背:IF(B1>0,-0.1,0),COLORWHITE,POINTDOT{XG51};
KDJ底背:IF(B2>0,-0.1,0),COLORFF00FF,POINTDOT{XG51};
RSI底背:IF(B3>0,-0.1,0),COLORBLUE,POINTDOT{XG51};
MACD顶背:IF(D1>0,0.1,0),COLOR00FF00,POINTDOT{XG51};
KDJ顶背:IF(D2>0,0.1,0),COLORFFCC66,POINTDOT{XG51};
RSI顶背:IF(D3>0,0.1,0),COLORRED,POINTDOT{XG51};
STICKLINE(B1>0,-0.1,0,2,0),COLORWHITE{XG51};
STICKLINE(B2>0,-0.15,-0.05,2,0),COLORFF00FF{XG51};
STICKLINE(B3>0,-0.2,-0.1,2,0),COLORBLUE{XG51};
STICKLINE(D1>0,0.1,0,2,0),COLOR00FF00{XG51};
STICKLINE(D2>0,0.15,0.05,2,0),COLORFFCC66{XG51};
STICKLINE(D3>0,0.2,0.1,2,0),COLORRED{X^G!5-1^C^N^{};

源码正文：

A股:CAPITAL/1000000,LINETHICK0,COLORRED{XG51};
实际量:vol,LINETHICK0{XG51};
AA:=VOL/((HIGH-LOW)*2-Abs(CLOSE-OPEN)){XG51};
主买:IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+ (CLOSE-LOW)),VOL /2)),POINTDOT,COLORWHITE{XG51};
主卖:IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0- AA*(HIGH-LOW),0-VOL /2)),LINETHICK0,COLORCYAN{XG51};
换手率％:VOL/CAPITAL*100,POINTDOT,COLORRED{XG51};
STICKLINE(C>=REF(C,1) ,0,VOL,2.5,1),COLORWHITE{XG51};
STICKLINE(C<REF(C,1),0,VOL,2.5,1),COLORCYAN{XG51};
STICKLINE(主买>0,0,主买,2.5,0),COLORWHITE{XG51};
STICKLINE(主卖<0 ,0,主卖,2.5,0),COLORCYAN{XG51};
资金异动:VOL/MA(VOL,55)*100,COLORBLUE{XG51};
STICKLINE(资金异动>100 ,0,VOL,0.6,0),COLORBLUE{XG51};
MA5:MA(V,5),COLORRED{XG51};
MA13:MA(V,13),COLORWHITE{XG51};
DRAWTEXT(crOSS(MA5,MA13),(V *1.05),'★'),COLORBLUE;

指标说明：
1.A股指流通股多少亿手；(判断大盘和小盘的依据）
2.柱状图中红线框指总成交量，红色填满区域代表主动买入估算，绿色填满区域代表主动卖出估算。（单位：金额）
3.资金异动指近期此股有无异常资金进出，柱状图以黄色柱状显示；
4.五角星代表五日均量上穿13日均量，量能放大。换手率就不说了，大家都知道。
5.长时间无黄柱或希希拉拉，说明无大资金进入，股票将继续原有趋势；有黄色柱状出现，此时有资金进入，连续黄柱出现，说明明显有庄家进入，可跟进待涨。
黄柱越集中，且30－60日内比较，明显量能放大，说明有**进入，可能后期有大的行情出现。
6.另此副图可完全取代缺省的vol副图指标。以节省版面空间。
7.本指标主力完全造不了假的，因为是顺势而为，也就是说，用的人再多也不会有任何问题，更不怕主力拿它骗人，如果想用它骗人只有自己自找苦吃，所以该指标永远具有强大的实战效力。
8.实战思维：无招胜有招，以不变应万变。
所有的指标公式都需要大家在实战中摸索规律，切勿仅根据说明就轻易做出选择。