软件名称：[B]组合的生命线主图（源码）[/B]
软件类型：国产软件
运行环境：Win2000/WinXP/Win2003/WinVista
软件语言：简体中文
授权方式：共享软件
软件大小：4.00 KB
官方主页：Home Page
更新时间：2010-08-07 06:00:51
软件简介:

用法：股价上穿买入，偏离线上10%抛，线下15%底

组合生命线

日均价:=(C*3+H+L+O)/6;
SA1:=MA(C,5);
SA:=IF(C>SA1,L,H);
JUNJ:=SA;
ED1:=(-2*REF(JUNJ,2)+REF(JUNJ,1)+2*JUNJ),COLORBLUE;
ED2:=(-0.4*REF(JUNJ,4)-0.4*REF(JUNJ,3)-1.1*REF(JUNJ,2)+0.9*REF(JUNJ,1)+2*JUNJ),COLORBLUE;
ED3:=(-0.8*REF(JUNJ,4)-0.8*REF(JUNJ,3)-0.2*REF(JUNJ,2)+0.8*REF(JUNJ,1)+2*JUNJ),COLORBLUE;
JF1:=SMA(SMA(ED1,3,1),3,1),COLOR999900;
BIAS1 :=(JF1-MA(JF1,5))/MA(JF1,5)*100;
XAM1:=FLOOR(((JF1-MA(JF1,5))/MA(JF1,5)*100)/5);
生命线:SMA(SMA((EMA(日均价,ABS(5- XAM1))),3,1),3,1),COLORCYAN;
T10:=CONST(HHVBARS(V,10));
EP10:IF(CURRBARSCOUNT<=10+3,CONST(IF(T10=0,C,REF(C,T10))),DRAWNULL),COLORFEFEFE;
IF(CURRBARSCOUNT=T10+1,EP10,DRAWNULL),CIRCLEDOT,COLORFEFEFE;
T20→10:=CONST(REF(HHVBARS(V,10),10)+10);
EP20→10:IF(CURRBARSCOUNT<=20+3 AND CURRBARSCOUNT>=5,CONST(REF(C,T20→10)),DRAWNULL),COLOR009900;
IF(CURRBARSCOUNT=T20→10+1,EP20→10,DRAWNULL),CIRCLEDOT,COLOR00CC00;
T30→20:=CONST(REF(HHVBARS(V,10),20)+20);
EP30→20:IF(CURRBARSCOUNT<=30+3 AND CURRBARSCOUNT>=5,CONST(REF(C,T30→20)),DRAWNULL),COLOR009900;
IF(CURRBARSCOUNT=T30→20+1,EP30→20,DRAWNULL),CIRCLEDOT,COLOR00CC00;
T45→30:=CONST(REF(HHVBARS(V,15),30)+30);
EP45→30:IF(CURRBARSCOUNT<=45+3 AND CURRBARSCOUNT>=5,CONST(REF(C,T45→30)),DRAWNULL),COLOR009900;
IF(CURRBARSCOUNT=T45→30+1,EP45→30,DRAWNULL),CIRCLEDOT,COLOR00CC00;
{www.70822.com}
T65→45:=CONST(REF(HHVBARS(V,20),45)+45);
EP65→45:IF(CURRBARSCOUNT<=65+3 AND CURRBARSCOUNT>=5,CONST(REF(C,T65→45)),DRAWNULL),COLOR009900;
IF(CURRBARSCOUNT=T65→45+1,EP65→45,DRAWNULL),CIRCLEDOT,COLOR00CC00;
涨家数:INDEXADV,NODRAW, ;
跌家数:INDEXDEC,NODRAW,COLORGREEN;
C3:=REF(C,1);
涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0);
STICKLINE(涨停,OPEN,CLOSE,2.5,0),COLORRED;
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);
STICKLINE(跌停,OPEN,CLOSE,2.5,0),COLORGREEN;
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
K:=(C+H+L)/3;
D:=MA(K,4);
DRAWTEXT(REF(C,1)>D AND C<D AND D>REF(D,1),H*0.95, 'S'),COLORGREEN;
DRAWTEXT(REF(C,1)<D AND C>D AND D<REF(D,1),L*0.98 ,'B'),COLORRED;

[url=http://www.70822.com/soft/sort013/sort05/down-23397.html]组合的生命线主图（源码）[/url]