软件名称：[B]修改的macd~待完善[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：5.00 KB
官方主页：Home Page
更新时间：2013-08-13 03:50:00
软件简介:

M1:=WINNER( MA(CLOSE,1))*200;
M2:=WINNER(MA(CLOSE,20))*200;
VAR1:=(CLOSE-LLV(LOW,80))/(HHV(HIGH,80)-LLV(LOW,80))*200;
VAR2:=SMA(VAR1,3,1);
VAR3:=SMA(VAR2,3,1);
VAR4:=3*VAR2-2*VAR3;
VAR5:=LLV(LOW,5);
VAR6:=HHV(HIGH,5);
VAR7:=EMA((CLOSE-VAR5)/(VAR6-VAR5)*100,4)*2;
VAR8:=EMA(0.667*REF(VAR7,1)+0.333*VAR7,2);
VAR9:=3*VAR7-2*VAR8;
VARA:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
VARB:=POW(MA(LOW,5),2)+MA(LOW,5);
VARC:=POW(MA(HIGH,5),2)+MA(HIGH,5);
VARD:=(VARA-LLV(VARB,64))/(HHV(VARC,64)-LLV(VARB,64))*150+65-10;
VARE:=SMA(VARD,3,1)*1.5-100;
VARF:=SMA(VARE,3,1);
VAR10:=3*VARE-2*VARF;
VAR11:=(HIGH+LOW+CLOSE*2)/4;
VAR12:=EMA(VAR11,13);
VAR13:=STD(VAR11,13);
VAR14:=(VAR11-VAR12)*100/VAR13;
VAR15:=EMA(VAR14,5);
VAR17:=EMA(VAR15,13)+200-100;
VAR18:=EMA(VAR17,10);
VAR19:=3*VAR17-2*VAR18;
VAR1A:=VAR2+VAR7+VARE+VAR17;
VAR1B:=VAR3+VAR8+VARF+VAR18;
VAR1C:=VAR4+VAR9+VAR10+VAR19;
VAR1D:=(HIGH+LOW+CLOSE)/3;
VAR20:=(VAR1D-MA(VAR1D,34))/(0.015*AVEDEV(VAR1D,34));
VAR21:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
VAR22:=(HIGH+LOW+CLOSE+VAR1D)/4;
VAR23:=EMA(VAR22,24);
VAR24:=STD(VAR22,24);
VAR25:=(VAR22-VAR23)/VAR24*100;
VAR26:=(VAR1D-MA(VAR1D,24))/(0.015*AVEDEV(VAR1D,24));
VAR27:=EMA(VAR25,5);
VAR2A:=((VAR27+VAR26+VAR20)/3+165)/4;
VAR2B:=(EMA(EMA(EMA(VAR2A,15),10),5)-25)*2+VAR21;
VAR2C:=(VAR1A+VAR1B+VAR1C*30)/32/5-15;
VAR2D:=EMA(VAR2C,13);
VAR2E:=(VAR2A+VAR2C)/2/1.1;     
VAR28:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
VAR29:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
VAR30:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
VAR31:=REF(CLOSE,1);
VAR32:=SMA(MAX(CLOSE-VAR31,0),5,1)/SMA(ABS(CLOSE-VAR31),5,1)*100;
VAR33:=(HIGH+LOW+CLOSE)/3;
VAR34:=(VAR33-MA(VAR33,14))/(0.015*AVEDEV(VAR33,14));
VAR35:=(VAR28>=-15.8 AND VAR28<=-12.2 AND VAR29<=-20.8 AND VAR30<=-27.5 AND VAR32<=11.7 AND VAR34<=-145)*100;
VAR10A:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*(10);

增减力度:VAR10A*5;



V1:=MIN(REF(VOL,1),REF(VOL,2));
V2:=MIN(REF(VOL,3),REF(VOL,4));
V3:=MIN(REF(VOL,5),REF(VOL,6));
V4:=MIN(REF(VOL,7),REF(VOL,8));
V5:=MIN(REF(VOL,9),REF(VOL,10));
V6:=MIN(REF(VOL,11),REF(VOL,12));
V7:=MIN(REF(VOL,13),REF(VOL,14));
V8:=MIN(REF(VOL,15),REF(VOL,16));
W1:=MIN(MIN(V1,V2),MIN(V3,V4));
W2:=MIN(MIN(V5,V6),MIN(V7,V8));ZM:=MIN(W1,W2);


XG1:=ZM<REF(ZM,1) AND V>REF(V,1) AND REF(V,1)<REF(ZM,1) AND C>REF(C,1);

超短:=EMA(VAR2E,3),COLORGREEN ;
短线:=EMA(超短,5),COLORRED,LINETHICK2;
MA20:=MA(C,20);
L5:=MA(V,5);
DIFF:超短;
DEA:短线;
SJ:=HHVBARS(HIGH,8);
昨天跌价:=REF(C,2)-REF(C,1);
昨天跌幅:=(REF(C,2)-REF(C,1))/REF(C,2);
MACD:2*(DIFF-DEA), COLORSTICK;100,COLORYELLOW;
DL1:=VOL/CAPITAL*100<LLV(VOL/CAPITAL*100,34)*1.001;
DL2:=IF(CAPITAL=0,AMOUNT=LLV(AMOUNT,34),VOL<MA(VOL,SUMBARS(VOL,CAPITAL))/3);
DL:=DL1 OR DL2;
TJ1:=REF(COUNT(DL,3)>0,1) AND V>REF(V,1) AND C>MA(C,55) AND MA(C,20)>REF(MA(C,20),1) AND MACD AND REF(MACD,1)=0  AND (C/MA(C,55)-1)*100<15;
XG2:REF(TJ1,1) AND O<REF(C,1);

XG:C>REF(C,1) AND MACD<REF(MACD,1) AND V<REF(V,1) AND 增减力度>REF(增减力度,1) AND MA20>REF(MA20,1) AND 昨天跌价>0 AND 昨天跌幅<0.04 AND SJ>3 ;
缩量上涨为拐点:(REF(C,2)-REF(C,1))/REF(C,2)>0.025 AND V<REF(V,1) AND (C-REF(C,1))/C>0 AND MACD>REF(MACD,1);
DRAWICON(XG=1,DIFF*0.95,1);
DRAWICON(XG1=1,DIFF*0.9,7);
DRAWICON(缩量上涨为拐点=1,DIFF*0.95,11);
DRAWICON(XG2=1,DIFF*0.95,5);

[url=http://www.70822.com/soft/sort013/sort05/down-64811.html]修改的macd~待完善[/url]