2009年封笔之作：均线系统的妙用

学习比尔 威廉姆《混沌交易法》，细读再三，颇受启发。突发奇想，对均线进行改良，
以期贴近市场本来面目，更好明了市场之真实含义，多一分理解，多一分体悟。
思路如下：
利用5，13，34之EMA均线组合构成短线操作系统，
当5大于13与34时，表示短线处于多头区，短线以5天均线作为进出参考。
当5小于13与34时，表示短线处于空头区，短线以13天均线作为进出参考。
当5介于13与34时，表示短线处于混沌区，短线以34天均线作为进出参考。

同理：利用55，89，144之EMA均线组合构成长线操作系统，
当55大于89与144时，表示长线处于多头区，长线以55天均线作为进出参考。
当55小于89与144时，表示长线处于空头区，长线以89天均线作为进出参考。
当55介于89与144时，表示长线处于混沌区，长线以144天均线作为进出参考。
---------------------------------------------------------------------------
这样，主图仅有两条均线，却提示了短，长周期的不同韵律，指导实站，岂不更妙！
闲话不表，老话必言：运用之妙，存户一心，如是如是！！
----------------------------------------------------------------------------
附加指数叠加，个股与大盘之强弱，可谓一目了然。此叠加法乃借鉴他人之作，
自己略加改进，正是：他山之石，可以攻玉！！
参数Ｐ=144，用于选择叠加周期。黄K表示量饱和。
============================================================================
飞狐版本

M1:=EMA(C,5);
M2:=EMA(C,13);
M3:=EMA(C,34);
MC1:=EMA(C,55);
MC2:=EMA(C,89);
MA4:=EMA(C,144);
短线:IF(M1>MAX(M2,M3),M1,IF(M1<MIN(M2,M3),M2,M3)),COLOR00FF00,LINETHICK2;
PARTLINE(短线>REF(短线,1),短线),coloryellow,linethick2;
长线:IF(MC1>MAX(MC2,MA4),MC1,IF(MC1<MIN(MC2,MA4),MC2,MA4)),COLORFFFF00,LINETHICK2;
PARTLINE(长线>REF(长线,1),长线),colorRED,linethick2;
DRAWICON(短线>长线 AND L<长线 AND C>短线 AND C>O,L*0.98,4);
DRAWICON(CROSS(MIN(短线,长线),C),H*1.02,5);

{主图叠加指数K线}

分:=(LLV(INDEXL,P));  百:=(HHV(INDEXH,P))-分;
点:=(LLV(L,P));   基:=(HHV(H,P))-点;
CC比:=(INDEXC-分)/百;  HH比:=(INDEXH-分)/百;
LL比:=(INDEXL-分)/百;  OO比:=(INDEXO-分)/百;
CX:=if(CAPITAL>0,CC比*基+点,c);
HX:=IF(CAPITAL>0,HH比*基+点,h); 
LX:=IF(CAPITAL>0,LL比*基+点,l);
OX:=IF(CAPITAL>0,OO比*基+点,o);
STICKLINE(OX>CX,HX,LX,0,0),COLOR00FF00;
STICKLINE(OX<=CX,HX,LX,0,0),COLORFF00FF;
STICKLINE(OX>CX,OX,CX,6,0),COLOR00FF00;
STICKLINE(OX<=CX,OX,CX,6,0),COLORFF00FF;
KLINE(o,h,l,c,0);
【量H】:=IF((AMOUNT/C)/(HHV(AMOUNT,21)/HHV(C,21))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,21)/HHV(C,21))*100);
STICKLINE(【量H】=100,L,H,0.8,0),COLORYELLOW;
STICKLINE(【量H】=100 AND C>=O,C,O,8,1),COLORYELLOW;
STICKLINE(【量H】=100 AND C<O,C,O,8,0),COLORYELLOW;
ZDF:=(C-REF(C,1))/REF(C,1)*100;
STICKLINE(ZDF>9.8,O,C,5,0),COLORRED;
STICKLINE(ZDF<-9.8,O,C,5,0),COLORBLUE;

================================================================================
通达信版本
M1:=EMA(C,5);
M2:=EMA(C,13);
M3:=EMA(C,34);

MC1:=EMA(C,55);
MC2:=EMA(C,89);
MA4:=EMA(C,144);

短线:IF(M1>MAX(M2,M3),M1,IF(M1<MIN(M2,M3),M2,M3)),COLOR00FF00,LINETHICK2;
短强:IF(短线>REF(短线,1),短线,DRAWNULL),COLORYELLOW,LINETHICK2;

长线:IF(MC1>MAX(MC2,MA4),MC1,IF(MC1<MIN(MC2,MA4),MC2,MA4)),COLORFFFF00,LINETHICK2;
长强:IF(长线>REF(长线,1),长线,DRAWNULL),COLORRED,LINETHICK2;

DRAWICON(短线>长线 AND L<长线 AND C>短线 AND C>O,L*0.98,1);

DRAWICON(CROSS(MIN(短线,长线),C),H*1.02,2);

{主图叠加指数K线}

分:=(LLV(INDEXL,P));  百:=(HHV(INDEXH,P))-分;
点:=(LLV(L,P));   基:=(HHV(H,P))-点;
CC比:=(INDEXC-分)/百;  HH比:=(INDEXH-分)/百;
LL比:=(INDEXL-分)/百;  OO比:=(INDEXO-分)/百;
CX:=IF(CAPITAL>0,CC比*基+点,DRAWNULL);
HX:=IF(CAPITAL>0,HH比*基+点,DRAWNULL);  
LX:=IF(CAPITAL>0,LL比*基+点,DRAWNULL);
OX:=IF(CAPITAL>0,OO比*基+点,DRAWNULL);
STICKLINE(OX>CX,HX,LX,0,0),COLOR00FF00;
STICKLINE(OX<=CX,HX,LX,0,0),COLORFF00FF;
STICKLINE(OX>CX,OX,CX,3,0),COLOR00FF00;
STICKLINE(OX<=CX,OX,CX,3,0),COLORFF00FF;
DRAWKLINE(H,O,L,C);

【量H】:=IF((AMOUNT/C)/(HHV(AMOUNT,21)/HHV(C,21))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,21)/HHV(C,21))*100);
STICKLINE(【量H】=100,L,H,0.4,0),COLORYELLOW;
STICKLINE(【量H】=100 AND C>=O,C,O,4,1),COLORYELLOW;
STICKLINE(【量H】=100 AND C<O,C,O,4,0),COLORYELLOW;

ZDF:=(C-REF(C,1))/REF(C,1)*100;
STICKLINE(ZDF>9.8,O,C,2,0),COLORRED;
STICKLINE(ZDF<-9.8,O,C,2,0),COLORBLUE;