|
|

楼主 |
发表于 2016-9-28 15:26
|
显示全部楼层
通达信公式(未经试验)
变色MACD:
DIF:EMA(C,12)-EMA(C,26);
DEA:EMA(DIF,9);
MACD:(DIF-DEA)*2,COLORSTICK;
STICKLINE(MACD<REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORGREEN;
STICKLINE(MACD<REF(MACD,1)AND MACD<0,0,MACD,0,0),COLORFFCC33;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,0,0),COLORRED;
STICKLINE(MACD>REF(MACD,1)AND MACD>0,0,MACD,0,0),COLORMAGENTA;
VAR1:=EMA(EMA(CLOSE,9),9);
分界点:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
A10:=CROSS(分界点,0);
开始控盘:IF(A10,MACD,0),LINETHICK1,COLORYELLOW;
TR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),22);
HD:=HIGH-REF(HIGH,1);
LD:=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),22);
DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),22);
PDI:=DMP*100/TR;
MDI:=DMM*100/TR;
ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,7);
底:IF(PDI<5 AND ADX>65,MACD,0),COLORLIRED,LINETHICK2;
A:=EMA(WINNER(CLOSE),10);
出货:IF(A>0.90 AND CLOSE<MA(CLOSE,5),MACD,0),STICK,LINETHICK3,COLORYELLOW;
LGL:=IF(EMA(C,5)/EMA(EMA(C,9),16)<=0.85 AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05 AND VOL/CAPITAL*100<5,50,0);
WR1:=-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))+100;
WR2:=-100*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50))+100;
WR3:=-100*(HHV(HIGH,70)-CLOSE)/(HHV(HIGH,70)-LLV(LOW,70))+100;
BIAS1 := ((CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100+10)*5;
BIAS2 := ((CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100+10)*5;
BIAS3 := ((CLOSE-MA(CLOSE,70))/MA(CLOSE,70)*100+10)*5;
金叉:=CROSS(DIF,DEA);
叉:=CROSS(DEA,DIF);
STICKLINE(金叉,0,MACD,3,0),COLORRED;
强:IF(DIF>=DEA,DIF,DRAWNULL),COLORRED,LINETHICK1;
弱:IF(DEA>=DIF,DEA,DRAWNULL),COLORFF9900,LINETHICK1; |
|
|