联系方式 Contact

云指标公式网

淘宝:zb-mart.taobao.com

电话:18020657357

Q Q:396950280

网址:www.yzhibiao.com

搜索 Search

开心跟踪 大智慧版本(附 倚天版本源码)

2014-12-30 11:41:15点击:

 

 大智慧版本源码如下:

VAR88:=IF((YEAR >= 2308) and (MONTH >= 1),0,1); RSVa:=(((CLOSE - LLV(LOW,21))/(HHV(HIGH,21) - LLV(LOW,21)))*(100))*(VAR88); 
趋势:=(MA((3)*(SMA(RSVa,6,1)) -  (2)*(SMA(SMA(RSVa,5,1),5,1)),2))*(VAR88);  
VAR2a:=(3)*(SMA(((OPEN - LLV(LOW,89))/(HHV(HIGH,89) - LLV(LOW,89)))*(100),20,1)) - (2)*(SMA(SMA(((OPEN -  LLV(LOW,89))/(HHV(HIGH,89) - LLV(LOW,89)))*(100),20,1),15,1)); 
VAR3a:=VAR2a - 100;  
背离:=(FORCAST(((-1))*(VAR3a),21))*(VAR88);  
跟踪天数:(BARSLAST((趋势 < 背离)))*(VAR88),colorred; 
MA15:=EMA(CLOSE,21);   
STICKLINE((MA15 > REF(MA15,1)),MA15,MA15,9,6),LINETHICK2,color0000FF; 
STICKLINE((MA15 < REF(MA15,1)),MA15,MA15,9,6),LINETHICK2,colorFF0000; 


倚天指标版本源码:
参数:n=21,m=6,p=5
源码
RSV:=(C-LLV(L,n))/(HHV(H,n) - LLV(L,n))*100;
趋势:MA((3*SMA(RSV,m,1)-2*SMA(SMA(RSV,5,1),p,1)),2),LINETHICK1,COLORFF00FF;
VAR2:=3*(SMA(((OPEN - LLV(LOW,55))/(HHV(HIGH,55) - LLV(LOW,55)))*(100),20,1))-2*(SMA(SMA(((OPEN - LLV(LOW,55))/(HHV(HIGH,55) - LLV(LOW,55)))*(100),20,1),15,1));
VAR3:=VAR2-100;
背离:FORCAST(-1*VAR3,8),LINETHICK1,COLORwhite;
DRAWTEXT((CROSS(趋势,背离)),背离,'黑马'),COLORE7FCB9;
跟踪天数:BARSLAST(趋势 < 背离),LINETHICK0;
partline(跟踪天数 >REF(跟踪天数,1),跟踪天数),COLORRED,LINETHICK2;
partline(跟踪天数 <REF(跟踪天数,1),跟踪天数),COLORGREEN;
partline(跟踪天数 =REF(跟踪天数,1),跟踪天数),COLORBlack;
100, COLORGREEN; 
Var1:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100; 
Var2:=SMA(Var1,20,1); 
Var3:=SMA(Var2,15,1); 
Var4:=100-3*Var2+2*Var3; 
Var5:=(3*Var2+2*Var3)/4; 
Var6:=ABS(ABS(Var5)-ABS(Var4)); 
Var7:=ABS(ABS(Var5)-ABS(Var6)); 
阴跌区域: Var4-Var7, COLORYELLOW,LINETHICK2;
 
见顶区域: STICKLINE(阴跌区域<0,阴跌区域,0,1,0) , COLORBLUE; 
龙脉: Var5-Var7,{ COLORSTICK}COLORRED; 
见底区域: STICKLINE(龙脉<0,龙脉,0,10,0) , COLORblue; 
DRAWTEXT(CROSS(阴跌区域,龙脉),-10,'阴跌'), COLORGREEN; 
DRAWTEXT(CROSS(阴跌区域,-0.1),-10,'注意顶'), COLORWHITE;
超跌线: 80*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60)),coloryellow,linethick1,LINEDOT;
Var1:=100-100*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60)); 
Var2:=EMA(Var1,55); 
多:  EMA(Var1,10),colorred,linethick1,CROSSDOT;
空:  EMA(Var2,8),colorgreen,LINEDOT;