九毛八公式指标
以下是休版的大智慧源码，希望老师能改成飞狐可用的，谢谢 {平均线引用}{要跟系统自带的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 yr2: =WM2;end;if abs(zf3)<10 yr3:=WM3;end;if abs(zf4)<10 yr4: =WM4;end;if abs(zf5)<10 yr5:=WM5;end;if abs(zf6)<10 yr6: =WM6;end;if abs(zf7)<10 yr7:=WM7;end;{平均线，价格，百分比显示}MA1:YR1,DOTLINE; drawtext(barstatus =2,MA1,'5日线：'+NUMTOSTRN( ma1,2)+'('+numtostrn( zf1,2)+'%)'),align2,valign2,coloraaddaa; ma2:yr2,dotline; drawtext(barstatus31=2,MA2,'10日线：'+NUMTOSTRN( ma2,2)+'('+numtostrn( zf2,2)+'%)'),align2,valign2,coloraaddaa; ma3:yr3,dotline; drawtext(barstatus34 =2,MA3,'20日线：'+NUMTOSTRN( ma3,2)+'('+numtostrn( zf3,2)+'%)'),align2,valign2,coloraaddaa; ma4:yr4,dotline; drawtext(barstatus37 =2,MA4,'30日线：'+NUMTOSTRN( ma4,2)+'('+numtostrn( zf4,2)+'%)'),align2,valign2,coloraaddaa; ma5:yr5,dotline; drawtext(barstatus40=2,MA5,'60日线：'+NUMTOSTRN( ma5,2)+'('+numtostrn( zf5,2)+'%)'),align2,valign2,coloraaddaa; ma6:yr6,dotline; drawtext(barstatus43=2,MA6,'120日线：'+NUMTOSTRN( ma6,2)+'('+numtostrn( zf6,2)+'%)'),align2,valign2,coloraaddaa; ma7:yr7,dotline; drawtext(barstatus46=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公式模块：
先将系统自带的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; }
