指数与个股叠加结合黄金线可以判研个股趋势。。。个股5日线上穿指数线做多个股。。。
源码：
指数H:=IF(CODELIKE('60'),"999999$H","399001$H");
指数L:=IF(CODELIKE('60'),"999999$L","399001$L");
指数C:=IF(CODELIKE('60'),"999999$C","399001$C");
指数:指数C,COLORYELLOW,NODRAW;
指数±:指数C-REF(指数C,1),COLORLIGRAY,NODRAW;
股票:C,COLORRED,NODRAW;
股票±:C-REF(C,1),COLORLIGRAY,NODRAW;
{黄金分割线}
日:=75;
昨前:=3;
高1:=REF(HHV(指数H,日),昨前);
高2:=REF(HHV(H,日),昨前);
低2:=REF(LLV(L,日),昨前);
A:=高2/高1;
H1:=高2-(高2-低2)*0.191;
H2:=高2-(高2-低2)*0.382;
H3:=高2-(高2-低2)*0.5;
H4:=高2-(高2-低2)*0.618;
H5:=高2-(高2-低2)*0.809;
NOTEXT一0.809:REFDATE(H1,DATE),COLORFF6198,DOTLINE;
NOTEXT二0.618:REFDATE(H2,DATE),COLORFF6198,DOTLINE;
NOTEXT三0.500:REFDATE(H3,DATE),COLORFF6198,DOTLINE;
NOTEXT四0.382:REFDATE(H4,DATE),COLORFF6198,DOTLINE;
NOTEXT五0.191:REFDATE(H5,DATE),COLORFF6198,DOTLINE;
NOTEXT股票:MA(C,5)LINETHICK1,COLORRED;
NOTEXT指数:MA(指数C*A,5)LINETHICK1,COLORYELLOW;
顶:REFDATE(高2,DATE),COLORRED;
底:REFDATE(低2,DATE),COLORGREEN;
股票均线:=MA(C,3);
指数均线:=MA(指数C*A,3);
DRAWICON(CROSS(股票均线,指数均线),底,1);
DRAWICON(CROSS(指数均线,股票均线),顶,2);
UploadPic/2011-2/201122619354759471.jpgUploadPic/2011-2/201122619362096799.jpg{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
