預(yù)測MACD的金叉與死叉---副圖

陌遇 2010-08-07

展開全文

{參數(shù)}N1:=12;N2:=26;M:=9;

DIFF: EMA(CLOSE,N1)-EMA(CLOSE,N2),COLORBB00BB,LINETHICK2,LAYER0;
DEA:EMA(DIFF,M),COLOR00BB00,LINETHICK2,LAYER0;
MACD: (DIFF-DEA)*2,COLORSTICK;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,8,0 ),COLOR003333;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,7,0 ),COLOR004444;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,6,0 ),COLOR005555;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,5,0 ),COLOR007777;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,4,0 ),COLOR009999;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,3,0 ),COLOR00BBBB;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,2,0 ),COLOR00DDDD;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1,0 ),COLOR00FFFF;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,8 ,0 ),COLOR000033;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,7 ,0 ),COLOR000044;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,6 ,0 ),COLOR000055;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,5 ,0 ),COLOR000077;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,4 ,0 ),COLOR000099;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,3 ,0 ),COLOR0000BB;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,2 ,0 ),COLOR0000DD;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1 ,0 ),COLOR0000FF;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,8,0 ),COLOR333333;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,7,0 ),COLOR444444;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,6,0 ),COLOR555555;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,5,0 ),COLOR777777;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,4,0 ),COLOR999999;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,3,0 ),COLORBBBBBB;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,2,0 ),COLORDDDDDD;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,1,0 ),COLORFFFFFF;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,8,0 ),COLOR333300;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,7,0 ),COLOR444400;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,6,0 ),COLOR555500;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,5,0 ),COLOR777700;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,4,0 ),COLOR999900;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,3,0 ),COLORBBBB00;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,2,0 ),COLORDDDD00;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,1,0 ),COLORFFFF00;
今日交叉價:((REF(EMA(C,N2),1)*(N2-1)*(N1+1))+(REF(DEA,1)*(N1+1)*(N2+1))-(REF(EMA(C,N1),1)*(N1-1)*(N2+1)))/(2*(N2-N1)),PRECIS2,LINETHICK0;
DRAWFLAGTEXT(DEA<DIFF AND MACD<REF(MACD,1),DIFF,'今日死叉價位預(yù)測: '+NUMTOSTRN(今日交叉價,2)),ALIGN2,ColorBLUE;
DRAWFLAGTEXT(DEA>DIFF AND MACD>REF(MACD,1),DIFF,'今日金叉價位預(yù)測: '+NUMTOSTRN(今日交叉價,2)),ALIGN2,ColorRED;
{www.888gs.com}
明日交叉價:((EMA(C,N2)*(N2-1)*(N1+1))+(DEA*(N1+1)*(N2+1))-(EMA(C,N1)*(N1-1)*(N2+1)))/(2*(N2-N1)),PRECIS2,LINETHICK0;
DRAWFLAGTEXT(DEA<DIFF AND MACD<REF(MACD,1),DIFF,'明日死叉價位預(yù)測: '+NUMTOSTRN(明日交叉價,2)),ALIGN2,ColorBLUE;
DRAWFLAGTEXT(DEA>DIFF AND MACD>REF(MACD,1),DIFF,'明日金叉價位預(yù)測: '+NUMTOSTRN(明日交叉價,2)),ALIGN2,ColorRED;