软件名称：[B]乘风MACD - 精美副图指标[/B]
软件类型：国产软件
运行环境：Win9X/2000/XP/2003/
软件语言：简体中文
授权方式：解密版
软件大小：18.0 KB
官方主页：Home Page
更新时间：2009-01-22 15:08:20
软件简介:
乘风MACD
DRAWGBKLAST(C>0,STRIP(RGB(30,30,60),RGB(30,30,60),70));
DIFF1 := (EMA(CLOSE,12) - EMA(CLOSE,26))*100;
DEA1 := EMA(DIFF1,9);
MACD1 := 2*(DIFF1-DEA1);
macd:=macd1;
LC := REF(CLOSE,1);
RSI14:=SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100;
RSIm:sma(MAX(CLOSE-LC,0),14,1)/sMA(ABS(CLOSE-LC),14,1)*200-100,linethick2,COLORaa77bb,PRECIS2;
FILLRGN(rsim,-30,rsim>-30),COLORaa99cc;
FILLRGN(rsim,-30,rsim<=-30),Color008080;
D1:=(EMA(CLOSE,pn)-EMA(CLOSE,pm))*100;
D2:=(EMA(OPEN,pn)-EMA(OPEN,pm))*100;
D3:=(EMA(HIGH,pn)-EMA(HIGH,pm))*100;
D4:=(EMA(LOW,pn)-EMA(LOW,pm))*100;
DRAWICON(CROSS(d1,diff1) and diff1<-0.05*100 ,d4-0.1*100,7),LAYER0;
DRAWICON(CROSS(diff1,d1) and diff1>0.1*100 ,d3+0.1*100,8),LAYER0;
macd2:=2*(d1-ema(d1,8));
diff:diff1,ColorFF0080,PRECIS2;
dea:dea1,color0099FF,PRECIS2;
PARTLINE(DIFF,DIFF<=REF(diff,1)),LINETHICK2,color009900;
PARTLINE(DIFF,DIFF>REF(diff,1)),LINETHICK2,ColorFF0080;
PARTLINE(DEA,DEA<=REF(DEA,1)),LINETHICK2,colorFF9999;
PARTLINE(DEA,DEA>REF(DEA,1)),LINETHICK2,color0099FF;
diff2:d1,COLORYELLOW,PRECIS2;
dea2:MA(D1,8),DOTLINE,COLORWHITE,PRECIS2;
牛熊线:EMA(DIFf,60),COLORBROWN,DOTLINE,PRECIS2;
zsx1:=(ema(c,3)-ema(c,8))*100;
zsxk:=sma(zsx1,2,1);
zsxd:=sma(zsxk,2,1);
jsx:=sma(5*zsxk-4*zsxd,2,1);
加速线:jsx,COLORCYAN,PRECIS2,DOTLINE;
{PARTLINE(加速线,加速线<=REF(加速线,1)),LINETHICK1,COLORCYAN,DOTLINE;}
PARTLINE(加速线,加速线>REF(加速线,1)),LINETHICK1,COLORMAGENTA,DOTLINE;
Var1:=(EMA(CLOSE,34)-EMA(CLOSE,5))*100;
Var2:=EMA(Var1,5);
趋势:(-2)*(Var1-Var2),COLORBLUE,DOTLINE;
{PARTLINE(趋势,趋势<=REF(趋势,1)),LINETHICK1,COLORBLUE;}
PARTLINE(趋势,趋势>REF(趋势,1)),DOTLINE,Color0080FF;
STICKLINE(MACD2<=ref(MACD2,1)and MACD2>0,0,MACD2,2,0 ),COLOR00AAFF;
STICKLINE(MACD2<=ref(MACD2,1)and MACD2>0,0,MACD2,1.8,0 ),COLOR00BBFF;
STICKLINE(MACD2<=ref(MACD2,1)and MACD2>0,0,MACD2,1.3,0 ),COLOR00CCFF;
STICKLINE(MACD2<=ref(MACD2,1)and MACD2>0,0,MACD2,1.2,0 ),COLOR00DDFF;
STICKLINE(MACD2<=ref(MACD2,1)and MACD2>0,0,MACD2,1,0 ),COLOR00EEFF;
STICKLINE(MACD2<=ref(MACD2,1)and MACD2>0,0,MACD2,0.5,0 ),COLOR00FFFF;
STICKLINE(MACD2>ref(MACD2,1)and MACD2>0,0,MACD2,5,0 ),COLOR0000AA;
STICKLINE(MACD2>ref(MACD2,1)and MACD2>0,0,MACD2,4 ,0 ),COLOR0011BB;
STICKLINE(MACD2>ref(MACD2,1)and MACD2>0,0,MACD2,3,0 ),COLOr0022CC;
STICKLINE(MACD2>ref(MACD2,1)and MACD2>0,0,MACD2,2,0 ),COLOR0033DD;
STICKLINE(MACD2>ref(MACD2,1)and MACD2>0,0,MACD2,1,0 ),COLOR0044EE;
STICKLINE(MACD2>ref(MACD2,1)and MACD2>0,0,MACD2,0.5 ,0 ),COLOR0055FF;
STICKLINE(MACD2>ref(MACD2,1)and MACD2<=0,0,MACD2,5,0 ),COLORAA00BB;
STICKLINE(MACD2>ref(MACD2,1)and MACD2<=0,0,MACD2,4 ,0 ),COLORBB11BB;
STICKLINE(MACD2>ref(MACD2,1)and MACD2<=0,0,MACD2,3,0 ),COLORCC22BB;
STICKLINE(MACD2>ref(MACD2,1)and MACD2<=0,0,MACD2,2,0 ),COLORDD33BB;
STICKLINE(MACD2>ref(MACD2,1)and MACD2<=0,0,MACD2,1 ,0 ),COLOREE44BB;
STICKLINE(MACD2>ref(MACD2,1)and MACD2<=0,0,MACD2,0.5,0 ),COLORFF55BB;
STICKLINE(MACD2<=ref(MACD2,1)and MACD2<=0,0,MACD2,2,0 ),COLORFF7700;
STICKLINE(MACD2<=ref(MACD2,1)and MACD2<=0,0,MACD2,1.5 ,0 ),COLORFF8811;
STICKLINE(MACD2<=ref(MACD2,1)and MACD2<=0,0,MACD2,1.2,0 ),COLORFFAA22;
STICKLINE(MACD2<=ref(MACD2,1)and MACD2<=0,0,MACD2,1.0 ,0 ),COLORFFBB33;
STICKLINE(MACD2<=ref(MACD2,1)and MACD2<=0,0,MACD2,0.8 ,0 ),COLORFFDD44;
STICKLINE(MACD2<=ref(MACD2,1)and MACD2<=0,0,MACD2,0.5 ,0 ),COLORFFFF55;
STICKLINE(D1>D2,D1,D2,8.5,0),COLOR0055AA;
STICKLINE(D1>D2,D1,D2,6,0),COLOR0066bb;
STICKLINE(D1>D2,D1,D2,3,0),COLOR0077CC;
STICKLINE(D1>D2,D1,D2,1,0),COLOR0099DD;
STICKLINE(D1<=D2,D1,D2,6,0),COLOR009900;
STICKLINE(D1<=D2,D1,D2,4,0),COLOR006600;
STICKLINE(D1<=D2,D1,D2,2,0),COLOR00aa00;
STICKLINE(D1<=D2,D1,D2,1,0),COLOR00cc00;
STICKLINE(macd>0 and macd>ref(macd,1),0,macd,1.5,0),Color000080;
STICKLINE(macd>0 and macd<=ref(macd,1),0,macd,0.5,0),Color008080;
STICKLINE(macd<=0 and macd<=ref(macd,1),0,macd,0.5,0),COLORBLUE;
STICKLINE(macd<=0 and macd>ref(macd,1),0,macd,1.5,0),Color4080FF;
STICKLINE(D1<=D2,D3,D4,0,0),COLOR00dd00;
STICKLINE(D1>D2,D3,D4,0,0),COLOR00BBFF;
20,POINTDOT,COLORGREEN,LINETHICK3;
50,POINTDOT,COLORGREEN,LINETHICK3;
-40,POINTDOT,COLORGREEN,LINETHICK3;
{大MACD周期数}
szbz3:=COUNT(macd>0,2)=2 and ref(macd,3)<=0 and ref(macd,2)>0;
DRAWTEXT(szbz3,0,'3'),COLORWHITE,ALIGN1,LAYER0;
szbz5:=COUNT(macd>0,4)=4 and ref(macd,5)<=0 and ref(macd,4)>0;
DRAWTEXT(szbz5,0,'5'),COLORWHITE,ALIGN1,LAYER0;
szbz8:=COUNT(macd>0,7)=7 and ref(macd,8)<=0 and ref(macd,7)>0;
DRAWTEXT(szbz8,0,'8'),COLORWHITE,ALIGN1,LAYER0;
szbz13:=COUNT(macd>0,12)=12 and ref(macd,13)<=0 and ref(macd,12)>0;
DRAWTEXT(szbz13,0,'13'),COLORWHITE,ALIGN1,LAYER0;
szbz18:=COUNT(macd>0,17)=17 and ref(macd,18)<=0 and ref(macd,17)>0;
DRAWTEXT(szbz18,0,'18'),COLORWHITE,ALIGN1,LAYER0;
szbz21:=COUNT(macd>0,20)=20 and ref(macd,21)<=0 and ref(macd,20)>0;
DRAWTEXT(szbz21,0,'21'),COLORWHITE,ALIGN1,LAYER0;
szbz3b:=COUNT(macd<0,2)=2 and ref(macd,3)>=0 and ref(macd,2)<0;
DRAWTEXT(szbz3b,0,'3'),COLORYELLOW,ALIGN1,LAYER0;
szbz5b:=COUNT(macd<0,4)=4 and ref(macd,5)>=0 and ref(macd,4)<0;
DRAWTEXT(szbz5b,0,'5'),COLORYELLOW,ALIGN1,LAYER0;
szbz8b:=COUNT(macd<0,7)=7 and ref(macd,8)>=0 and ref(macd,7)<0;
DRAWTEXT(szbz8b,0,'8'),COLORYELLOW,ALIGN1,LAYER0;
szbz13b:=COUNT(macd<0,12)=12 and ref(macd,13)>=0 and ref(macd,12)<0;
DRAWTEXT(szbz13b,0,'13'),COLORYELLOW,ALIGN1,LAYER0;
szbz18b:=COUNT(macd<0,17)=17 and ref(macd,18)>=0 and ref(macd,17)<0;
DRAWTEXT(szbz18b,0,'18'),COLORYELLOW,ALIGN1,LAYER0;
szbz21b:=COUNT(macd<0,20)=20 and ref(macd,21)>=0 and ref(macd,20)<0;
DRAWTEXT(szbz21b,0,'21'),COLORYELLOW,ALIGN1,LAYER0;
{小MACD周期数 新股票}
szbzb3:=COUNT(macd2>0,2)=2 and ref(macd2,3)<=0 and ref(macd2,2)>0;
DRAWTEXT(szbzb3,macd2,'3'),COLORGREEN,ALIGN1,LAYER0;
szbzb5:=COUNT(macd2>0,4)=4 and ref(macd2,5)<=0 and ref(macd2,4)>0;
DRAWTEXT(szbzb5,macd2,'5'),COLORGREEN,ALIGN1,LAYER0;
szbzb8:=COUNT(macd2>0,7)=7 and ref(macd2,8)<=0 and ref(macd2,7)>0;
DRAWTEXT(szbzb8,macd2,'8'),COLORGREEN,ALIGN1,LAYER0;
szbzb13:=COUNT(macd2>0,12)=12 and ref(macd2,13)<=0 and ref(macd2,12)>0;
DRAWTEXT(szbzb13,macd2,'13'),COLORGREEN,ALIGN1,LAYER0;
szbzb18:=COUNT(macd2>0,17)=17 and ref(macd2,18)<=0 and ref(macd2,17)>0;
DRAWTEXT(szbzb18,macd2,'18'),COLORGREEN,ALIGN1,LAYER0;
szbzb21:=COUNT(macd2>0,20)=20 and ref(macd2,21)<=0 and ref(macd2,20)>0;
DRAWTEXT(szbzb21,macd2,'21'),COLORGREEN,ALIGN1,LAYER0;
szbzb3b:=COUNT(macd2<0,2)=2 and ref(macd2,3)>=0 and ref(macd2,2)<0;
DRAWTEXT(szbzb3b,macd2,'3'),COLORBLUE,ALIGN1,LAYER0;
szbzb5b:=COUNT(macd2<0,4)=4 and ref(macd2,5)>=0 and ref(macd2,4)<0;
DRAWTEXT(szbzb5b,macd2,'5'),COLORBLUE,ALIGN1,LAYER0;
szbzb8b:=COUNT(macd2<0,7)=7 and ref(macd2,8)>=0 and ref(macd2,7)<0;
DRAWTEXT(szbzb8b,macd2,'8'),COLORBLUE,ALIGN1,LAYER0;
szbzb13b:=COUNT(macd2<0,12)=12 and ref(macd2,13)>=0 and ref(macd2,12)<0;