公式网-网站导航


网站搜索:  

公式指标网 发表于2012/5/13 11:04:14

请把大智慧《精准线主图、副图》公式改为通达信?

问:请把大智慧《精准线主图、副图》公式改为通达信?{精准线主图}
N:=3;
BL:=4;
BN:=20;
C2:=REF(C,1);
MA3:MA(C2,3),COLORYELLOW;
MA10:MA(C2,BN),COLORGREEN;
MA13:MA(C2,13),COLORBLUE;
L0:=0.00;
L1:=ABS(L-REF(L,1))<=L0;
L2:=ABS(L-REF(L,2))<=L0;
L3:=ABS(L-REF(L,3))<=L0;
L4:=ABS(L-REF(L,4))<=L0;
L5:=ABS(L-REF(L,5))<=L0;
首次:=L1 OR L2 OR L3 {OR L4 OR L5};
中点:=(H+L)/2;
本日跌率:=(O-C)*100/O;
比前跌率:=(REF(C,1)-C)*100/REF(C,1);
左大阴K:=FILTER(比前跌率>BL,N) ;
天数:=BARSLAST(左大阴K);
JC:=REF(C,天数);
下:=HHV(中点,天数)<REF(中点,天数);
MAVOL1:=MA(V,5);
JJ:=(3*C+H+L+O)/6;
VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1 AND C>REF(C,1);
LJL:=FILTER(TJ1,5);
TJ2:=IF(BARSLAST(LJL)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(LJL)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(LJL)=3 AND CLOSE>REF(HIGH,3),1,0)));
TP:=TJ2=1;
STICKLINE(CLOSE,REF(LOW,BARSLAST(LJL)),REF(LOW,BARSLAST(LJL)),6,0),COLORYELLOW;
TJ3:=IF(BARSLAST(LJL)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(LJL)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(LJL)=3 AND CLOSE>REF(LOW,3),1,0)));
STFZ:=TJ3=1;
CL:=STFZ AND TP;
TJCL:=FILTER(CL,3);
STICKLINE(LJL,OPEN,CLOSE,5,0),COLORYELLOW;
DRAWTEXT(LJL,L*0.99,'黄金柱'),COLORf00ff0;
涨停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(涨停,OPEN,CLOSE,3,0),COLORRED;
跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(跌停,OPEN,CLOSE,2,0),COLORGREEN;
DRAWTEXTABS(35,0,BKNAME ),colorDDDDDD;
DRAWTEXTABS(35,15,'流通盘:'+CAPITAL/100+'万股,利润增长:'+FINANCE2(10)+'%。每股收益:'+FINANCE2(3)+'元。' ),color00DDDD;
历史最低价:LLV(LOW,0),color00FF00,LINETHICK0;
历史最高价:HHV(HIGH,0),Colorred,LINETHICK0;
三日涨跌:(C-REF(CLOSE,3))/C*100,ColorFF00FF,LINETHICK0;
十五日涨跌:(C-REF(CLOSE,15))/C*100,LINETHICK0;
三十日涨跌:(C-REF(CLOSE,30))/C*100,LINETHICK0;
DRAWRECTABS(0,0,30,35,rgb(250,60,80)),color000099;
DRAWRECTABS(0,30,30,45,rgb(250,250,80)),color009999;
DRAWTEXTABS(2,5,'飞鸟'),colorFFFFFF,LINETHICK1;
DRAWTEXTABS(2,18,'精准'),colorFFFFFF,LINETHICK1;
DRAWTEXTABS(4,30,'线'),color0000FF,LINETHICK1;


副图源码:

今日:VOL,pRECIS0,VOLSTICK;
MA5:MA(VOL,5),pRECIS0;
MA10:MA(VOL,10),pRECIS0;
MA20:MA(VOL,20),pRECIS0;
倍量:(VOL/REF(VOL,1)>2 AND COUNT(CLOSE>OPEN,1)) OR (LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1) AND VOL/REF(VOL,1)>2),pRECIS0,COLORFF00FF;
stickline(倍量,0,v,7,0),COLORFF00FF;
百日地量:LLV(VOL,100)=VOL,COLORwhite,pRECIS0;
stickline(百日地量,0,v,7,0),COLORwhite,pRECIS0;
三十地量:LLV(VOL,30)=VOL,pRECIS0,COLORFFDE00;
stickline(三十地量,0,v,7,0),COLOR003300;
倍缩量:VOL/REF(VOL,1)<0.5,COLORyellow,pRECIS0;
stickline(倍缩量,0,v,7,0),COLORyellow;
缩量涨:COUNT(C>REF(C,1),2)=2 AND COUNT(VOL<REF(VOL,1),2)=2,pRECIS0,COLORgreen;
stickline(缩量涨,0,v,7,0),COLORgreen;
黑太阳: IF(LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1),0.5,0),pRECIS0,COLORBLUE;
stickline(黑太阳,0,v,7,0),COLORBLUE;
红太阳:IF(LOW>REF(HIGH,1) AND COUNT(OPEN<CLOSE,1),0.5,0),pRECIS0,COLORRED;
stickline(红太阳,0,v,7,0),COLORRED;


本人不用大智慧所以不能上图
 

 

{公式在线提供:www.gszx.com.cn}解答:

N:=3;
BL:=4;
BN:=20;
C2:=REF(C,1);
MA3:MA(C2,3),COLORYELLOW;
MA10:MA(C2,BN),COLORGREEN;
MA13:MA(C2,13),COLORBLUE;
L0:=0.00;
L1:=ABS(L-REF(L,1))<=L0;
L2:=ABS(L-REF(L,2))<=L0;
L3:=ABS(L-REF(L,3))<=L0;
L4:=ABS(L-REF(L,4))<=L0;
L5:=ABS(L-REF(L,5))<=L0;
首次:=L1 OR L2 OR L3 {OR L4 OR L5};
中点:=(H+L)/2;
本日跌率:=(O-C)*100/O;
比前跌率:=(REF(C,1)-C)*100/REF(C,1);
左大阴K:=FILTER(比前跌率>BL,N) ;
天数:=BARSLAST(左大阴K);
JC:=REF(C,天数);
下:=HHV(中点,天数)<REF(中点,天数);
MAVOL1:=MA(V,5);
JJ:=(3*C+H+L+O)/6;
VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1 AND C>REF(C,1);
LJL:=FILTER(TJ1,5);
TJ2:=IF(BARSLAST(LJL)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(LJL)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(LJL)=3 AND CLOSE>REF(HIGH,3),1,0)));
TP:=TJ2=1;
STICKLINE(CLOSE,REF(LOW,BARSLAST(LJL)),REF(LOW,BARSLAST(LJL)),6,0),COLORYELLOW;
TJ3:=IF(BARSLAST(LJL)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(LJL)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(LJL)=3 AND CLOSE>REF(LOW,3),1,0)));
STFZ:=TJ3=1;
CL:=STFZ AND TP;
TJCL:=FILTER(CL,3);
STICKLINE(LJL,OPEN,CLOSE,5,0),COLORYELLOW;
DRAWTEXT(LJL,L*0.99,'黄金柱'),COLORF00FF0;
涨停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(涨停,OPEN,CLOSE,3,0),COLORRED;
跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(跌停,OPEN,CLOSE,2,0),COLORGREEN;

======================
今日:VOL,VOLSTICK;
MA5:MA(VOL,5);
MA10:MA(VOL,10);
MA20:MA(VOL,20);
倍量:(VOL/REF(VOL,1)>2 AND COUNT(CLOSE>OPEN,1)) OR (LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1) AND VOL/REF(VOL,1)>2),COLORFF00FF;
STICKLINE(倍量,0,V,3,0),COLORFF00FF;
百日地量:LLV(VOL,100)=VOL,COLORWHITE;
STICKLINE(百日地量,0,V,3,0),COLORWHITE;
三十地量:LLV(VOL,30)=VOL,COLORFFDE00;
STICKLINE(三十地量,0,V,3,0),COLOR003300;
倍缩量:VOL/REF(VOL,1)<0.5,COLORYELLOW;
STICKLINE(倍缩量,0,V,3,0),COLORYELLOW;
缩量涨:COUNT(C>REF(C,1),2)=2 AND COUNT(VOL<REF(VOL,1),2)=2,COLORGREEN;
STICKLINE(缩量涨,0,V,3,0),COLORGREEN;
黑太阳: IF(LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1),0.5,0),COLORBLUE;
STICKLINE(黑太阳,0,V,3,0),COLORBLUE;
红太阳:IF(LOW>REF(HIGH,1) AND COUNT(OPEN<CLOSE,1),0.5,0),COLORRED;
STICKLINE(红太阳,0,V,3,0),COLORRED;

 

 



网站搜索:  



Copyright © 2009-2010 gszb.com ™,All Rights Reserved. 
公式网-www.gszx.com.cn-股票指标公式网