在线检测未来函数

将日线大智慧均线分时主图叠加改成飞狐的

来源:Internet,编辑:股旁网,2012-07-15

编写条件:

以下是休版的大智慧源码,希望老师能改成飞狐可用的,谢谢 {平均线引用}{要跟系统自带的MA公式中的系数一致,自己去调整,没有7条平均线的,自己可以加到7条线} WM1:="ma.ma1#day"(5); WM2:="ma.ma2#day"(10); WM3:="ma.ma3#day"(20); WM4:="ma.ma4#day"(30); WM5:="ma.ma5#day"(60); WM6:="ma.ma6#day"(120); WM7:="ma.ma6#day"(250); {各个平均线与昨天收盘价百分比} ZF1:=(WM1-DYNAINFO(3))/DYNAINFO(3)*100; ZF2:=(WM2-DYNAINFO(3))/DYNAINFO(3)*100; ZF3:=(WM3-DYNAINFO(3))/DYNAINFO(3)*100; ZF4:=(WM4-DYNAINFO(3))/DYNAINFO(3)*100; ZF5:=(WM5-DYNAINFO(3))/DYNAINFO(3)*100; ZF6:=(WM6-DYNAINFO(3))/DYNAINFO(3)*100; ZF7:=(WM7-DYNAINFO(3))/DYNAINFO(3)*100; {限制平均线显示范围 可以改10为10以下的数,缩小平均线显示范围} if abs(ZF1)<10 then begin YR1:=WM1;end; if abs(ZF2)<10 then begin YR2:=WM2;end; if abs(ZF3)<10 then begin YR3:=WM3;end; if abs(ZF4)<10 then begin YR4:=WM4;end; if abs(ZF5)<10 then begin YR5:=WM5;end; if abs(ZF6)<10 then begin YR6:=WM6;end; if abs(ZF7)<10 then begin YR7:=WM7;end; {平均线,价格,百分比显示} MA1:YR1,DOTLINE; DRAWTEXT(BARSTATUS=2,MA1,'5日线:'+NUMTOSTRN( MA1,2)+'('+NUMTOSTRN( ZF1,2)+'%)'),ALIGN2,VALIGN2,coloraaddaa; MA2:YR2,DOTLINE; DRAWTEXT(BARSTATUS=2,MA2,'10日线:'+NUMTOSTRN( MA2,2)+'('+NUMTOSTRN( ZF2,2)+'%)'),ALIGN2,VALIGN2,coloraaddaa; MA3:YR3,DOTLINE; DRAWTEXT(BARSTATUS=2,MA3,'20日线:'+NUMTOSTRN( MA3,2)+'('+NUMTOSTRN( ZF3,2)+'%)'),ALIGN2,VALIGN2,coloraaddaa; MA4:YR4,DOTLINE; DRAWTEXT(BARSTATUS=2,MA4,'30日线:'+NUMTOSTRN( MA4,2)+'('+NUMTOSTRN( ZF4,2)+'%)'),ALIGN2,VALIGN2,coloraaddaa; MA5:YR5,DOTLINE; DRAWTEXT(BARSTATUS=2,MA5,'60日线:'+NUMTOSTRN( MA5,2)+'('+NUMTOSTRN( ZF5,2)+'%)'),ALIGN2,VALIGN2,coloraaddaa; MA6:YR6,DOTLINE; DRAWTEXT(BARSTATUS=2,MA6,'120日线:'+NUMTOSTRN( MA6,2)+'('+NUMTOSTRN( ZF6,2)+'%)'),ALIGN2,VALIGN2,coloraaddaa; MA7:YR7,DOTLINE; DRAWTEXT(BARSTATUS=2,MA7,'250日线:'+NUMTOSTRN( MA7,2)+'('+NUMTOSTRN( ZF7,2)+'%)'),ALIGN2,VALIGN2,coloraaddaa; {信号与提示 不要可以删去} DRAWICON(cross(c>MA1,0.5) or cross(c>MA2,0.5) or cross(c>MA3,0.5) or cross(c>MA4,0.5) or cross(c>MA5,0.5) or cross(c>MA6,0.5) or cross(c>MA7,0.5),c,7); DRAWTEXT(cross(c>MA1,0.5) or cross(c>MA2,0.5) or cross(c>MA3,0.5) or cross(c>MA4,0.5) or cross(c>MA5,0.5) or cross(c>MA6,0.5) or cross(c>MA7,0.5),c,' 上突'),color00ffff; DRAWICON(cross(c编写方法:

&nbsp;
先将系统自带的ma公式的前7条均线的天数按5,10,20,30,60,120,250设置好
 
公式如下:
 
ma1:="ma.m1#day"; ma2:="ma.m2#day"; ma3:="ma.m3#day"; 
ma4:="ma.m4#day"; ma5:="ma.m5#day"; ma6:="ma.m6#day"; ma7:="ma.m7#day";
zf1:=(ma1-dynainfo(3))/dynainfo(3)*100; 
zf2:=(ma2-dynainfo(3))/dynainfo(3)*100; 
zf3:=(ma3-dynainfo(3))/dynainfo(3)*100; 
zf4:=(ma4-dynainfo(3))/dynainfo(3)*100; 
zf5:=(ma5-dynainfo(3))/dynainfo(3)*100; 
zf6:=(ma6-dynainfo(3))/dynainfo(3)*100; 
zf7:=(ma7-dynainfo(3))/dynainfo(3)*100; 
partline(abs(zf1)<10,ma1),linedot,colorffffff;
partline(abs(zf2)<10,ma2),linedot,color666666;
partline(abs(zf3)<10,ma3),linedot,colorffff;
partline(abs(zf4)<10,ma4),linedot,colorff00;
partline(abs(zf5)<10,ma5),linedot,colorff00ff;
partline(abs(zf6)<10,ma6),linedot,colorffff00;
partline(abs(zf7)<10,ma7),linedot,colorff0000;
drawtext(barstatus=2 and abs(zf1)<10,ma1,'5日线:'+numtostr( ma1,2)+'('+numtostr( zf1,2)+'%)'),coloraaddaa,align2;
drawtext(barstatus=2 and abs(zf2)<10,ma2,'10日线:'+numtostr( ma2,2)+'('+numtostr( zf2,2)+'%)'),coloraaddaa,align2;
drawtext(barstatus=2 and abs(zf3)<10,ma3,'20日线:'+numtostr( ma3,2)+'('+numtostr( zf3,2)+'%)'),coloraaddaa,align2;
drawtext(barstatus=2 and abs(zf4)<10,ma4,'30日线:'+numtostr( ma4,2)+'('+numtostr( zf4,2)+'%)'),coloraaddaa,align2;
drawtext(barstatus=2 and abs(zf5)<10,ma5,'60日线:'+numtostr( ma5,2)+'('+numtostr( zf5,2)+'%)'),coloraaddaa,align2;
drawtext(barstatus=2 and abs(zf6)<10,ma6,'120日线:'+numtostr( ma6,2)+'('+numtostr( zf6,2)+'%)'),coloraaddaa,align2;
drawtext(barstatus=2 and abs(zf7)<20,ma7,'250日线:'+numtostr( ma7,2)+'('+numtostr( zf7,2)+'%)'),coloraaddaa,align2;
{信号与提示  不要可以删去
drawicon(cross(c>ma1,0.5) or cross(c>ma2,0.5) or cross(c>ma3,0.5) or cross(c>ma4,0.5) or cross(c>ma5,0.5) or cross(c>ma6,0.5) or cross(c>ma7,0.5),c,7); 
drawtext(cross(c>ma1,0.5) or cross(c>ma2,0.5) or cross(c>ma3,0.5) or cross(c>ma4,0.5) or cross(c>ma5,0.5) or cross(c>ma6,0.5) or cross(c>ma7,0.5),c,'  上突'),color00ffff;  
drawicon(cross(c<ma1,0.5) or cross(c<ma2,0.5) or cross(c<ma3,0.5) or cross(c<ma4,0.5) or cross(c<ma5,0.5) or cross(c<ma6,0.5) or cross(c<ma7,0.5),c,8),color00ff66;
drawtext(cross(c<ma1,0.5) or cross(c<ma2,0.5) or cross(c<ma3,0.5) or cross(c<ma4,0.5) or cross(c<ma5,0.5) or cross(c<ma6,0.5) or cross(c<ma7,0.5),c,'  下突'),color00ff66;
}

相关文章