源码在这里  由 飞翔的花子  老师提供

a1:=(close*vol)/(close*100);
JJ:=(a1+ref(a1,1)+ref(a1,2)+ref(a1,3))/4;
A:=EMA(JJ,10);
B:=REF(A,1);
STICKLINE(A>B,A,B,8,0),COLORaa00bb;
STICKLINE(A>B,A,B,6.6,0),COLORbb11bb;
STICKLINE(A>B,A,B,4.4,0),COLORcc22bb;
STICKLINE(A>B,A,B,3.3,0),COLORdd33bb;
STICKLINE(A>B,A,B,2.2,0),COLORee44bb;
STICKLINE(A>B,A,B,1.1,0),COLORff55bb;
STICKLINE(A<B,A,B,8,0),COLORaaaacc ;
STICKLINE(A<B,A,B,6.6,0),COLORbbbbcc ;
STICKLINE(A<B,A,B,4.4,0),COLORcccccc ;
STICKLINE(A<B,A,B,3.3,0),COLORddddcc ;
STICKLINE(A<B,A,B,2.2,0),COLOReeeecc ;
STICKLINE(A<B,A,B,1.1,0),COLORffffcc ;
ema(a,5),colorwhite;
ema(a,10),coloryellow;
ema(a,20),colorff00ff;
ema(a,60),colorgreen;
STICKLINE( ema(a,250)>ref(ema(a,250),1) , ema(a,250) , ref( ema(a,250),1) , 8 ,0 ),colorred;
STICKLINE( ema(a,250)<ref( ema(a,250),1) , ema(a,250) , ref( ema(a,250),1) , 8 ,0 ),colorCYAN;
lhnh:=BARSLAST(barpos=sysparam(2))+1;
nnl:=barpos=sysparam(3);
qqqq:=BACKSET(barpos=sysparam(3) ,barslast(barpos=sysparam(2)));
hh:=HHV(a ,lhnh);
ll:=llV(a ,lhnh);
q809:=ll+(hh-ll)*0.809;
q618:=ll+(hh-ll)*0.618;
q500:=ll+(hh-ll)*0.5;
q382:=ll+(hh-ll)*0.382;
q191:=ll+(hh-ll)*0.191;
PARTLINE(hh,qqqq),colorred;
PARTLINE(q191,qqqq),coloryellow;
PARTLINE(q382,qqqq),color0066ff;
PARTLINE(q500,qqqq),colormagenta;
PARTLINE(q618,qqqq),colorff9900;
PARTLINE(q809,qqqq),colorwhite;
PARTLINE(ll,qqqq),colorgreen;

DRAWTEXT(nnl,hh*0.998,'最高价：'),Colorgreen;
DRAWnumber(nnl,hh*0.998,hh,1),Colorgreen,shift14;
DRAWTEXT(nnl,q809,'19.1%：'),Colorgreen;
DRAWnumber(nnl,q809,q809,1),Colorgreen,shift14;
DRAWTEXT(nnl,q618,'38.2%：'),Colorgreen;
DRAWnumber(nnl,q618,q618,1),Colorgreen,shift14;
DRAWTEXT(nnl,q500,'50%：'),Colorgreen;
DRAWnumber(nnl,q500,q500,1),Colorgreen,shift14;
DRAWTEXT(nnl,q382,'61.8%：'),Colorgreen;
DRAWnumber(nnl,q382,q382,1),Colorgreen,shift14;
DRAWTEXT(nnl,q191,'80.9%：'),Colorgreen;
DRAWnumber(nnl,q191,q191,1),Colorgreen,shift14;
DRAWTEXT(nnl,ll*1.01,'最低价：'),Colorgreen;
DRAWnumber(nnl,ll*1.01,ll,1),Colorgreen,shift14;

坐沙发喽！

动作真快！！！！！

看到dzh2的后一直期待有飞狐的，想不到这么快就盼到了，真心谢谢！！！

谢谢分享！！！！！！！！！！

谢谢分享

BACKSET有未来函数！

没有啥用

楼主有没有竹林的主图啊，求源码！！！！！！！！谢谢拉！

谢谢楼主，
贴图一个。

谢谢分享！

谢谢分享！

谢谢分享！

主图指标可否分享？

谢谢分享！

谢谢

ddddddddddddddd

顶就要顶源码。

谢谢分享！！！！！！！！！！

谢谢分享

谢谢分享

谢谢分享！

谢谢分享！！

a1:=(close*vol)/(close*100);
JJ:=(a1+ref(a1,1)+ref(a1,2)+ref(a1,3))/4;
A:=EMA(JJ,10);
B:=REF(A,1);
STICKLINE(A>B,A,B,8,0),COLORaa00bb;
STICKLINE(A>B,A,B,6.6,0),COLORbb11bb;
STICKLINE(A>B,A,B,4.4,0),COLORcc22bb;
STICKLINE(A>B,A,B,3.3,0),COLORdd33bb;
STICKLINE(A>B,A,B,2.2,0),COLORee44bb;
STICKLINE(A>B,A,B,1.1,0),COLORff55bb;
STICKLINE(A<B,A,B,8,0),COLORaaaacc ;
STICKLINE(A<B,A,B,6.6,0),COLORbbbbcc ;
STICKLINE(A<B,A,B,4.4,0),COLORcccccc ;
STICKLINE(A<B,A,B,3.3,0),COLORddddcc ;
STICKLINE(A<B,A,B,2.2,0),COLOReeeecc ;
STICKLINE(A<B,A,B,1.1,0),COLORffffcc ;
ema(a,5),colorwhite;
ema(a,10),coloryellow;
ema(a,20),colorff00ff;
ema(a,60),colorgreen;
STICKLINE( ema(a,250)>ref(ema(a,250),1) , ema(a,250) , ref( ema(a,250),1) , 8 ,0 ),colorred;
STICKLINE( ema(a,250)<ref( ema(a,250),1) , ema(a,250) , ref( ema(a,250),1) , 8 ,0 ),colorCYAN;
lhnh:=BARSLAST(barpos=sysparam(2))+1;
nnl:=barpos=sysparam(3);
qqqq:=BACKSET(barpos=sysparam(3) ,barslast(barpos=sysparam(2)));
hh:=HHV(a ,lhnh);
ll:=llV(a ,lhnh);
q809:=ll+(hh-ll)*0.809;
q618:=ll+(hh-ll)*0.618;
q500:=ll+(hh-ll)*0.5;
q382:=ll+(hh-ll)*0.382;
q191:=ll+(hh-ll)*0.191;
PARTLINE(hh,qqqq),colorred;
PARTLINE(q191,qqqq),coloryellow;
PARTLINE(q382,qqqq),color0066ff;
PARTLINE(q500,qqqq),colormagenta;
PARTLINE(q618,qqqq),colorff9900;
PARTLINE(q809,qqqq),colorwhite;
PARTLINE(ll,qqqq),colorgreen;

DRAWTEXT(nnl,hh*0.998,'最高价：'),Colorgreen;
DRAWnumber(nnl,hh*0.998,hh,1),Colorgreen,shift14;
DRAWTEXT(nnl,q809,'19.1%：'),Colorgreen;
DRAWnumber(nnl,q809,q809,1),Colorgreen,shift14;
DRAWTEXT(nnl,q618,'38.2%：'),Colorgreen;
DRAWnumber(nnl,q618,q618,1),Colorgreen,shift14;
DRAWTEXT(nnl,q500,'50%：'),Colorgreen;
DRAWnumber(nnl,q500,q500,1),Colorgreen,shift14;
DRAWTEXT(nnl,q382,'61.8%：'),Colorgreen;
DRAWnumber(nnl,q382,q382,1),Colorgreen,shift14;
DRAWTEXT(nnl,q191,'80.9%：'),Colorgreen;
DRAWnumber(nnl,q191,q191,1),Colorgreen,shift14;
DRAWTEXT(nnl,ll*1.01,'最低价：'),Colorgreen;
DRAWnumber(nnl,ll*1.01,ll,1),Colorgreen,shift14;

引用:

原帖由 韵翔 于 2008-8-3 09:40 发表
主图指标可否分享？

主图：
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;
STICKLINE(BB05>30 and AA05>ref(AA05,1), AA05,REF(AA05,1),8,1),colorcyan;
AA10:MA(C,10);AA20:=MA(c,20);
BB10:=atan((aa10/ref(aa10,1)-1)*100)*180/3.1416;
STICKLINE(BB05<0 and AA05<ref(AA05,1), AA05,REF(AA05,1),8,1),coloryellow;
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;
STICKLINE(BB30>15 and AA30>ref(AA30,1), AA30,REF(AA30,1),8,1),colorff00ff;
强势狙击:=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;

谢谢分享