LC:= REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),N2,1)/SMA(ABS(CLOSE-LC),N2,1)*100;
买:EMA(RSI1,M1),COLORRED,linethick2;
卖:EMA(RSI2,M2),linethick2,COLORffff00;
Var1:=REF(CLOSE,1);
Var2:=SMA(MAX(CLOSE-Var1,0),6,1)/SMA(ABS(CLOSE-Var1),6,1)*100;
好财神:(CROSS(80,Var2)),colorf00ff0,linethick2;
drawicon(好财神>0,买*1.15,2);
drawtext(好财神>0,买,'财神跑'),color00ff00;
Var3:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
Var4:SMA(SMA(Var3,3,1),3,1),color00ff00;
Var5:=EMA(Var4,5);
var7:3*Var4-2*Var5,colorgreen;
恶财神:CROSS(var7,Var4),coloryellow,stick;
DRAWTEXT(CROSS(var7,Var4) AND var7<21,Var4,'财神到'),coloryellow;
drawicon(CROSS(var7,Var4)>0 and var7<21,var4,1);
分界:45,colorff0000;
顶:90,coloryellow,linethick2;
N1 3 1 60 N2 10 1 90 M1 5 1 60 M2 20 1 90
http://v.youku.com/v_show/id_XMzE2Nzk1MDQ=.html
http://v.youku.com/v_show/id_XMzE2ODI1OTI=.html
http://v.youku.com/v_show/id_XMzE2ODQyMDQ=.html
http://v.youku.com/v_show/id_XMzE2ODYyODA=.html
下面是通达信的源码:
VAR1:=(2*CLOSE+HIGH+LOW)/4;
VAR2:=EXPMA(EXPMA(EXPMA(VAR1,4),4),4);
J: (VAR2-REF(VAR2,1))/REF(VAR2,1)*100, COLORSTICK;
D: MA(J,3);
K: MA(J,1);
请大人改为大智慧2滴`谢谢啦`顺便发个副图指标,是原来那个`强股排序,指标我简单的加了几根线`呵呵,源码:
AMV0:=VOL*(O+C)/2;
生命线:SUM(AMV0,88)/SUM(VOL,88),COLORFF00FF,LINETHICK2;
n1:=barslast(cross(c,MA(c,60)));
n2:=barslast(cross(MA(c,60),c));
强股排序:if(n1<N2,N1+1,0),PRECIS0,COLOR00FFFF,LINETHICK0;
DRAWTEXTABS(650,80,'■股价上穿60均线:'+NUMTOSTRN(强股排序,0)+'天'),Colorgreen,LINETHICK2;
CG:MA(C,17),COLORFF00FF;
E:=(H+L+O+2*C)/5;
zc:=2*E-H;
『重心』:IF(VOL>0,ZC,C),LINETHICK0,colorF80000;
A:『重心』,COLOR00ff00;
X:『重心』>=CG,linethick0,colorblack;
B:CLOSE,COLORffffff;
AA05:MA(C,5),colorff1100;
底撑:LLV(C,21),COLORRED,LINETHICK2,DOTLINE,LAYER1;
{抄底逃顶}
input:p1(5,0,999),p2(10,0,999);
VAR1:=(((CLOSE-LLV(LOW,P1))/(HHV(HIGH,P1)-LLV(LOW,P1)))*100);
VAR2:=EMA(VAR1,P2);
VAR3:=EMA(VAR2,P1);
VAR4:=((3*VAR2)-(2*VAR3));
VAR5:=EMA(VAR4,5);
HY:EMA(VAR5,1),COLORYELLOW,LINETHICK2;
FILLRGN(hy>0,hy,0),COLORff5ea3;
FILLRGN(var4>=hy,hy,var4),COLORaa;
FILLRGN(var4<hy,hy,var4),COLORCYAN;
逃顶线:80,POINTDOT;
抄底线:10,POINTDOT;
k:var2,COLORRED;
d:var3,COLORGREEN;
j:var4,COLORWHITE,LINEDASHDOT;
STICKLINE(cross(j,hy),0,10,8,0),COLORMAGENTA;
STICKLINE(cross(hy,j),0,10,8,0),COLORGREEN;
DRAWICON(cross(j,k) and cross(j,d) and cross(j,hy),k,1),ALIGN;
[
本帖最后由 lisizheng 于 2008-8-13 18:32 编辑 ]