软件名称：[B]通达信自用集粹主图源码[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：17.0 KB
官方主页：Home Page
更新时间：2016-08-29 00:32:01
软件简介:
{双线持币,单线持股}
双线持币:HHV(MA(HIGH,(3)),2),LINETHICK2,COLOR00FF00;
单线持股:LLV(MA(HIGH,(3)),1),LINETHICK2,COLOR0000FF;
{乖离率}
六日乖离:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
乖离率:六日乖离,NODRAW;
{多空线}
MID:=(3*C+L+O+H)/6;
DKX:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+
16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+
13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+
10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+
7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+
4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED;
MADKX:MA(DKX,5),COLORGREEN; {原指标为10}
多空:IF(DKX>MADKX,1,0),COLORYELLOW,NODRAW;
{波峰波谷}
A1:=REF(C,10)=HHV(C,2*10+1);
B1:=FILTER(A1,10);
C1:=BACKSET(B1,10+1);
HD:=FILTER(C1,10);
A2:=REF(C,10)=LLV(C,2*10+1);
B2:=FILTER(A2,10);
C2:=BACKSET(B2,10+1);
LD:=FILTER(C2,10);
A:=REF(C,BARSLAST(HD));
B:=REF(C,BARSLAST(LD));
TTT1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
TTT2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
波峰:IF(TTT1,A,A),COLORFF00FF,POINTDOT;
STICKLINE(TTT1,A,A,9,0),COLORFF00FF;
波谷:IF(TTT2,B,B),COLOR80FF00,POINTDOT;
STICKLINE(TTT2,B,B,9,0),COLOR80FF00;
{买卖点}
AA05:=MA(C,5),COLOR0099CC;
五日乖离率:=(C-AA05)/AA05*100;
BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);
加速度5:=EMA((速度5-REF(速度5,1)),3),LINETHICK0;
AA10:=MA(C,10);
AA20:=MA(C,20);
BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;
AA30:=MA(C,30);
三拾日乖离率:=(C-AA30)/AA30*100,LINETHICK0;
VAR1:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1);
VAR2:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1);
BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;
强势狙击:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10);
加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND AA05>REF(AA05,1) AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA10>REF(AA10,1)
AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) ;
清仓:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>AA30 OR O>AA30) AND AA05<REF(AA05,1) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10<REF(AA10,1),10);
DRAWTEXT(加仓 ,LOW*0.98,'←加仓'),COLORRED;
JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10>REF(AA10,1) ;
减仓:=FILTER(JC,10);
MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA05>REF(AA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<AA30;
买入:=FILTER(MR,10);
DRAWTEXT(减仓,HIGH*1.02,'←减仓'),COLORCYAN;
DRAWTEXT(买入,LOW*0.98,'←买入'),COLORYELLOW;
DRAWTEXT(清仓 ,HIGH*1.02,'←清仓'),COLORGREEN;
DRAWTEXT(强势狙击,LOW*0.98,'←强势狙击'),COLORYELLOW;
VAR21:=MAX(ABS(HIGH-AMOUNT/VOL/100),ABS(AMOUNT/VOL/100-LOW));
VAR3:=ABS((OPEN+CLOSE)/2-AMOUNT/VOL/100);
MV:=(VAR21+VAR3)/AMOUNT*VOL*100*50;
DRAWTEXT(MV>6 AND L<=LLV(L,10),L*0.95,'←异动'),COLORCYAN;
{K线文字解盘1，可以删去}
A74:=MA(CLOSE,20);
A75:=(CLOSE > MA(CLOSE,5));
A76:=(MA(CLOSE,5) > MA(CLOSE,10));
A77:=(CLOSE > MA(CLOSE,10));
A78:=(MA(CLOSE,5) > MA(CLOSE,20));
A79:=(CLOSE > MA(CLOSE,20));
A710:=REF(A74,1);
A711:=(A74 > A710);
AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10)))
+ IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);
TT1:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
TT2:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
TT3:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)),1,0));
TT4:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)),1,0));
TT5:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
TT6:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
TT7:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));
TT8:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
TT9:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
TT10:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
TT11:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));
TT12:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
TT13:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
TT14:=CONST(IF( C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
TT15:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));
TT16:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
TT17:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0));
TT18:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0));
TT19:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 < V2)),1,0));
TT20:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 >= V2)),1,0));
TT21:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 < V2)),1,0));
TT22:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)),1,0));
TT23:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)),1,0));
TT24:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)),1,0));
TT25:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)),1,0));
DRAWTEXT_FIX(TT1=1,0.4,0.9,0,'量能理想,明显走强,中线参与，仓位在2/3左右。') COLORFFFFFF;
DRAWTEXT_FIX(TT2=1,0.4,0.9,0,'走势趋强,还显不足,短线进场，仓位在1/2左右。') COLORFFFFFF;
DRAWTEXT_FIX(TT3=1,0.4,0.9,0,'量价良好,没有明显走强，短线进场，仓位1/2左右。') COLORFFFFFF;
DRAWTEXT_FIX(TT4=1,0.4,0.9,0,'形态尚可，量能不足，未完全走强，短线参与，仓位1/3左右。') COLORFFFFFF;
DRAWTEXT_FIX(TT5=1,0.4,0.9,0,'形态变坏，重仓者减持大半，清仓者观望。') COLORFFFFFF;
DRAWTEXT_FIX(TT6=1,0.4,0.9,0,'随大盘一起下跌，明显缩量走势，考虑到风险，减持或清仓。') COLORFFFFFF;
DRAWTEXT_FIX(TT7=1,0.4,0.9,0,'该股放量下跌，走势明显偏弱，离场观望。') COLORFFFFFF;
DRAWTEXT_FIX(TT8=1,0.4,0.9,0,'该股缩量下跌，走势偏弱，离场观望。') COLORFFFFFF;
DRAWTEXT_FIX(TT9=1,0.4,0.9,0,'该股形态良好，强势明显，量能充足，可以继续持有。') COLORFFFFFF;
DRAWTEXT_FIX(TT10=1,0.4,0.9,0,'上行趋势不变，强势依然，量能开始转弱，注意风险。') COLORFFFFFF;
DRAWTEXT_FIX(TT11=1,0.4,0.9,0,'该股仍然具备上涨潜力，但股性偏弱，可考虑减仓。') COLORFFFFFF;
DRAWTEXT_FIX(TT12=1,0.4,0.9,0,'该股走势趋弱，量能不足，减持大部分筹码。') COLORFFFFFF;
DRAWTEXT_FIX(TT13=1,0.4,0.9,0,'该股形态不佳，注意成交量的变化，目前不适合参与。') COLORFFFFFF;
DRAWTEXT_FIX(TT14=1,0.4,0.9,0,'趋势不明，股价偏弱，注意量能变化，目前不宜参与。') COLORFFFFFF;
DRAWTEXT_FIX(TT15=1,0.4,0.9,0,'有走强迹象，但量能不足，趋势不明，不适合
[url=http://www.70822.com/soft/sort013/sort05/down-101894.html]通达信自用集粹主图源码[/url]