软件名称：[B]花雨满天 - 殷宝华均线+乾坤趋势=大势把握[/B]
软件类型：国产软件
运行环境：Win9X/2000/XP/2003/
软件语言：简体中文
授权方式：解密版
软件大小：6.00 KB
官方主页：Home Page
更新时间：2009-04-02 19:38:12
软件简介:

发一个飞狐主图.是我合成的,感谢公式原码作者!让大家看看.



//殷宝华均线+乾坤趋势=大势把握



工作:EMA(CLOSE,14),LINETHICK2;
一:EMA(CLOSE,144);
二:EMA(CLOSE,25);
三:EMA(CLOSE,318);
生命:EMA(CLOSE,453),COLORRED,LINETHICK2;
五:EMA(CLOSE,550);
六:EMA(CLOSE,610);
七:EMA(CLOSE,730);
八:EMA(CLOSE,888);
九:EMA(CLOSE,99),COLORGREEN;
DIFF:=( EMA(CLOSE,7) - EMA(CLOSE,19));
DEA:=EMA(DIFF,9);
MACD:=0.90*(DIFF-DEA);
TJ:=(DIFF>=DEA);
TJ1:=(DIFF>=0);
STICKLINE(TJ,H,L,0.4,0),COLORYELLOW;
STICKLINE(TJ,O,C,4,1),COLOR0088FF;
STICKLINE(TJ,O,C,3.4,1),COLOR00AAFF;
STICKLINE(TJ,O,C,2.8,1),COLOR00CCFF;
STICKLINE(TJ,O,C,2,1),COLOR00DDFF;
STICKLINE(TJ,O,C,1.2,1),COLOR55FFFF;
STICKLINE(TJ,O,C,0.4,1),COLOR99FFFF;
STICKLINE(TJ1 AND TJ,H,L,0.4,0),COLORF00FF0;
STICKLINE(TJ1 AND TJ,O,C,4,1),COLORFF33FF;
STICKLINE(TJ1 AND TJ,O,C,3.4,1),COLORFF55FF;
STICKLINE(TJ1 AND TJ,O,C,2.8,1),COLORFF77FF;
STICKLINE(TJ1 AND TJ,O,C,2,1),COLORFF99FF;
STICKLINE(TJ1 AND TJ,O,C,1.2,1),COLORFFBBFF;
STICKLINE(TJ1 AND TJ,O,C,0.4,1),COLORFFDDFF;
STICKLINE(DIFF<DEA,H,L,0.4,0),COLORF0F000;
STICKLINE(DIFF<DEA,O,C,4,1),COLORFF3300;
STICKLINE(DIFF<DEA,O,C,3.4,1),COLORFF6600;
STICKLINE(DIFF<DEA,O,C,2.8,1),COLORFF9900;
STICKLINE(DIFF<DEA,O,C,2,1),COLORFFBB00;
STICKLINE(DIFF<DEA,O,C,1.2,1),COLORFFDD00;
STICKLINE(DIFF<DEA,O,C,0.4,1),COLORFFFF00;
VAR1:=(CLOSE*2+HIGH+LOW)/4;
SK:= EMA(VAR1,13)-EMA(VAR1,73);
SD:= EMA(SK,2);
SJ:=(CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03)OR(CROSS(SK,SD)
AND SK<=-0.14 )OR(CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035));
DRAWICON(SJ,L*0.95,1);
STICKLINE(SJ,O,C,7.5,0),LINETHICK3,COLOR000033;
STICKLINE(SJ,O,C,6.7,0),LINETHICK3,COLOR000055;
STICKLINE(SJ,O,C,5.7,0),LINETHICK3,COLOR000077;
STICKLINE(SJ,O,C,4.5,0),LINETHICK3,COLOR000099;
STICKLINE(SJ,O,C,3.3,0),LINETHICK3,COLOR0000BB;
STICKLINE(SJ,O,C,1.9,0),LINETHICK3,COLOR0000DD;
STICKLINE(SJ,H,L,0.5,0),COLORRED;










DRAWTEXT((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )
OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)) ,L*0.99,'底'),COLORGREEN;
STICKLINE((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )
OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)),H,L,0.5,0),COLORRED;
STICKLINE((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )
OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)),O,C,10,1),LINETHICK3,COLORRED;


DRAWTEXTEX(CLOSE,1,20,80,'花'),COLORRED;
DRAWTEXTEX(CLOSE,1,20,160,'雨'),COLORRED;
DRAWTEXTEX(CLOSE,1,20,240,'满'),COLORRED;
DRAWTEXTEX(CLOSE,1,20,320,'天'),COLORRED;




Var1:=ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>REF(ZIG(3,10),2);{ZIG 有未来}
Var2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<REF(ZIG(3,10),2);
STICKLINE(Var1,C,O,8,0),COLORYELLOW,LINETHICK2;{高位黄s}
STICKLINE(Var1,C,O,3,0),COLORYELLOW,LINETHICK2;{高位黄s}
STICKLINE(Var1,H,L,1,0),COLORYELLOW,LINETHICK2;{高位黄s}
STICKLINE(Var2,C,O,8,0),COLORred,LINETHICK2;{底位红色}
STICKLINE(Var2,C,O,3,0),COLORred,LINETHICK2;{底位红色}
STICKLINE(Var2,H,L,1,0),COLORred,LINETHICK2;{底位红色};






【上市时间】:REF(YEAR,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFF;
月:REF(MONTH,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFF00FF;
日:REF(DAY,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFFFF;
DDX:=IF(C<0,0,"DDX.DDX");
TC势:IF(C<0,0,(EMA(SLOPE(CLOSE,34)*20+CLOSE,75))*1);
TF势:IF(C<0,0,EMA(CLOSE,8)),LINETHICK2;
KL:=TF势-TC势;
STICKLINE(KL>=0,TF势,TC势,0.5,0),colorFF;
STICKLINE(KL<0,TF势,TC势,0.5,0),colorFF00;
YF1:="RSI.RSI1";
YF2:="RSI.RSI2";
MACD1:="MACD.DIFF";
MACD2:="MACD.DEA";
KDJ0:="KDJ.D";
KDJ1:="KDJ.K";
AA:=FILTER(CROSS(KDJ1,KDJ0) AND KDJ0<40 AND MACD2<0 AND DDX>0,13);
W10:=BARSLAST(AA);
WW1:=FILTER(OPEN<REF(LOW,1) AND CLOSE>OPEN AND MA(CLOSE,3)>KL AND VOL>REF(VOL,1),13);
CC:=REF(HHV(CLOSE,120),1);
DD:=REF(LLV(CLOSE,120),1);
WW:=100*(CLOSE-DD)/(CC-DD);
EE:=AMOUNT;
FF:=EMA(EE,5)/REF(EMA(EE,5),5);
霸占:=FILTER(FF>=2 AND WW<35 AND BARSCOUNT(CLOSE)>30 OR FF>=2 AND WW<100 AND BARSCOUNT(CLOSE)<50,90);
QIJ:=FILTER(CROSS(YF2,YF1),13);
YF:=7*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1)-3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1)-SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1),2,1);
QJ:=89.89;
WW0:=FILTER(CROSS(YF2,YF1) AND YF1>58 OR CROSS(QJ,YF),9);
WWW0:=BARSLAST(WW0);
取点:=IF(W10>0 AND W10<WWW0,W10,0);
取点1:=IF(WWW0>0 AND WWW0<W10,WWW0,0);
DRAWTEXTEX(CLOSE,1,660,960,'新庄进场:'+NUMTOSTR(取点,0)+' 天'),colorFF;
DRAWTEXTEX(CLOSE,1,840,960,'主力回吐:'+NUMTOSTR(取点1,0)+' 天'),colorFF00;
A4:=MA(CLOSE,20);
A5:=CLOSE>MA(CLOSE,5);
A6:=MA(CLOSE,5)>MA(CLOSE,10);
A7:=CLOSE>MA(CLOSE,10);
A8:=MA(CLOSE,5)>MA(CLOSE,20);
A9:=CLOSE>MA(CLOSE,20);
A10:=REF(A4,1);
A11:=A4>A10;
AVX:=IF(C<0,0,IF(A5,10,-10)+IF(A6,10,-10)+IF(A7,10,-10)+IF(A8,10,-10)+IF(A9,10,-10)+IF(A11,10,-10));
DSLX:=CLOSE/INDEXC;
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);
TJTS1:=BARSTATUS=2 AND CLOSE<200;
TJTS2:=BARSTATUS=2 AND CLOSE>200;
K2:=HHV(HIGH*1.04,(BARSLAST(SYSPARAM(2)=BARPOS))+1);
DRAWTEXT(TJTS1 AND CROSS(AVX,1) AND V1>=V2 AND DSLX>=DSLX1,K2*0.99,'舞庄解盘：该股的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS1 AND CROSS(AVX,1) AND V1<V2 AND DSLX>=DSLX1,K2*0.99,'舞庄解盘：该股虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS1 AND CROSS(AVX,1) AND V1>V2 AND DSLX<DSLX1,K2*0.99,'舞庄解盘：该股量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS1 AND CROSS(AVX,1) AND V1<=V2 AND DSLX<DSLX1,K2*0.99,'舞庄解盘：该股趋势尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS1 AND CROSS(1,AVX) AND V1>=V2 AND DSLX>=DSLX1,K2*0.99,'舞庄解盘：该股趋势变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望。'),ALIGN2,colorFF00;
DRAWTEXT(TJTS1 AND CROSS(1,AVX) AND V1<V2 AND DSLX>=DSLX1,K2*0.99,'舞庄解盘：该股随大盘一起下跌，程明显缩量走势，考虑到大盘风险，减持或清仓。'),ALIGN2,colorFF00;
DRAWTEXT(TJTS1 AND CROSS(1,AVX) AND V1>=V2 AND DSLX<DSLX1,K2*0.99,'舞庄解盘：该股放量下跌，走势明显偏弱，离场观望。'),ALIGN2,colorFF00;
DRAWTEXT(TJTS1 AND CROSS(1,AVX) AND V1<V2 AND DSLX<DSLX1,K2*0.99,'舞庄解盘：该股缩量下跌，走势偏弱，离场观望。'),ALIGN2,colorFF00;
DRAWTEXT(TJTS1 AND AVX>=1 AND REF(AVX,1)>0 AND V1>=V2 AND DSLX>=DSLX1,K2*0.99,'舞庄解盘：该股形态良好，强势明显，量能充足，可以继续持有。'),ALIGN2,colorFFFF00;
DRAWTEXT(TJTS1 AND
[url=http://www.70822.com/soft/sort013/sort02/down-7999.html]花雨满天 - 殷宝华均线+乾坤趋势=大势把握[/url]