软件名称：[B]超越布林[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：6.00 KB
官方主页：Home Page
更新时间：2012-09-23 09:15:20
软件简介:
N 2 300 20
M1:=((EMA(C,12)-EMA(C,26))/EMA(C,12)+1)*N,NODRAW;
DIF:=MA(((EMA(C,12)-EMA(C,26))/EMA(C,12)+1)*C,M1);
M:EMA("KDJ.K"(9,3,3)/100+"KDJ.D"(9,3,3)/100,N)*N,NODRAW;
M_A:=SUM(C,M)/SUM(1,M);{此式有利看新股}
{M_A:=MA(C,N);备用,当上市交易日数>=N时与上式等值};
CQ:=ABS(C);
SD1:=SQRT(SUM((C-M_A)*(C-M_A)*CQ/SUM(CQ,M),M));
SD2:=SQRT(SUM((C-M_A)*(C-M_A)*CQ,M)/SUM(CQ,M));
SD:=(SD1+SD2)/2;{其实SD1、SD2无原理性区别，但有个截尾误差}
顶线:M_A+2*SD;
强线:M_A+SD;
中线:M_A,LINETHICK1;
弱线:M_A-SD;
底线:M_A-2*SD;
;
;GJ:=AMOUNT/100;
E:=(H+L+O+2*C)/5;
明日阻力:=2*E-L;
明日支撑:=2*E-H;
明日突破:=E+(H-L);
明日反转:=E-(H-L);
今日阻力:=REF(明日阻力 , 1);
今日支撑:=REF(明日支撑 , 1);
D今日支撑:=STRCAT('今日支撑: ',CON2STR(今日支撑,2));
D今日阻力:=STRCAT('今日阻力: ',CON2STR(今日阻力,2));
D明日支撑:=STRCAT('明日支撑: ',CON2STR(明日支撑,2));
D明日阻力:=STRCAT('明日阻力: ',CON2STR(明日阻力,2));
D明日突破:=STRCAT('明日突破: ',CON2STR(明日突破,2));
D明日反转:=STRCAT('明日反转: ',CON2STR(明日反转,2));
DRAWTEXT_FIX(ISLASTBAR,0.00,0.01,0,D今日支撑),COLOR00FFFF;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.08,0,D今日阻力),COLOR00FF00;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.15,0,D明日支撑),COLORFF00FF;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.22,0,D明日阻力),COLORFFFF00;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.29,0,D明日突破),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.36,0,D明日反转),COLORGREEN;
日:=50;昨前:=3;
高1:=REF(HHV(H,日),昨前);
低1:=REF(LLV(L,日),昨前);
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
支撑80.9%:REFDATE(H5,DATE),COLORRED;
支撑61.8%:REFDATE(H4,DATE),COLORGREEN,LINETHICK1;
STICKLINE(CURRBARSCOUNT=1,支撑80.9%,支撑80.9%,500,-1),COLORRED;
STICKLINE(CURRBARSCOUNT=1,支撑61.8%,支撑61.8%,500,-1),COLORGREEN;
{精确的倒数线 ［通达信版］ 壹瓣杺埖
自设参数M 1 999 1}
CURR:=CURRBARSCOUNT;
A3:=HIGH+HIGH*(HIGH-LLV(LOW,10))/LLV(LOW,10);
IF(BETWEEN(CURR,M+3,M-8),REF(H,BARSLAST(CURR=M+3)),DRAWNULL),COLORFFFFFF;
IF(BETWEEN(CURR,M+3,M-8),REF(L,BARSLAST(CURR=M+3)),DRAWNULL),COLOR00FF00,DOTLINE;
IF(BETWEEN(CURR,M+3,M-8),REF(A3,BARSLAST(CURR=M+3)),DRAWNULL),COLOR6699FF,DOTLINE;
DRAWTEXT(CURR=M+1,REF(H,BARSLAST(CURR=M+3)),'CBL'),COLORFFFFFF;
DRAWTEXT(CURR=M+1,REF(L,BARSLAST(CURR=M+3)),'CBL STOP'),COLOR00FF00;
DRAWTEXT(CURR=M+1,REF(A3,BARSLAST(CURR=M+3)),'CBL MAX'),COLOR6699FF;
DRAWTEXT(CURR=M,LOW*0.995,'▲'),COLOR00FF00;VAR3:=LLV(HIGH,240);
VAR4:=100*(CLOSE-VAR3)/VAR3;
VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;
VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;
VAR7:=0;
VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);
VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);
买１:=VAR10;
买２:=(VAR11+VAR13+VAR15+VAR17);
卖１:=(VAR12+VAR14+VAR16+VAR18);
B:IF(买１>0 OR 买２>0,LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK3,COLORYELLOW;
S:IF(卖１>0,HIGH*1.01,DRAWNULL),CROSSDOT,LINETHICK3,COLORGREEN;
VAR100:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20))));
VAR200:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20))));
VAR300:=(100 - MA(((100 * (HHV(HIGH,5) - CLOSE)) / (HHV(HIGH,5) - LLV(LOW,5))),34));
{通达信股票指标公式}
F:IF(CROSS(VAR200,MA(VAR300,5)),LOW * 0.98,DRAWNULL),CROSSDOT,LINETHICK3,COLORFF00FF;
DRAWTEXT(CROSS(S,卖１),S,'←逃'),COLORWHITE,LINETHICK1;
DRAWTEXT(CROSS(B,买１),B,'←准备'),COLORRED,LINETHICK1;
{价:}
{JC1:=(REF(C,3)+REF(C,5)+REF(C,7)+REF(C,8)+REF(C,13)+REF(C,21))/6;
参考价1:SMA(JC1,5,1),CIRCLEDOT,COLORGREEN;
IF(C>=参考价1,参考价1,DRAWNULL),CIRCLEDOT,COLOR0000FF;}
PH:=TROUGHBARS(2,5,1);
LL:=HHV(H,PH);
TJ1:=LL=HIGH AND LL<REF(LL,1);{//=1}
TS:=SUMBARS(TJ1,2);
TJ:=PEAKBARS(2,5,1)=1 AND TS>=PH;
DRAWICON(TJ,HIGH*1.01+0.02,2);
警告灯:IF(TJ,HIGH*1.008,DRAWNULL),CROSSDOT,LINETHICK2,COLORCYAN;
PL:=BARSLAST(TJ);
支撑:IF(BARSLAST(TJ1),
REF(LOW,BARSLAST(TJ1)),DRAWNULL),COLOREA91B5;
压力:IF(BARSLAST(TJ),REF(HIGH,PL),DRAWNULL),COLORYELLOW;
TJ_2:=LOW>REF(REF(LOW,TS),PL);
DRAWTEXT(ISLASTBAR,压力,'压力'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,支撑,'支撑'),COLOREA91B5;
{DRAWICON(COUNT(TJ_2,PL+1)=1,HIGH*1.005,2);{//向下的箭头表示出局点}
{DRAWICON(BARSLAST(TJ1),REF(LOW*0.995,BARSLAST(TJ1)),1);};
[url=http://www.70822.com/soft/sort013/sort05/down-53039.html]超越布林[/url]