这样就省心多了~~:lol

效果一流，应该人手一份，再次感谢楼上的大神IMG_6259.PNG

#property indicator_chart_window #property indicator_buffers 4 #property indicator_color1 White #property indicator_color2 Yellow #property indicator_color3 Yellow #property indicator_color4 White extern int 间隔分钟=1; extern int 均线周期1=13; extern int 均线周期2=233; extern int 类型1=1; //类型: 0-SMA; 1-EMA; 2-SMMA; 3-LWMA extern int 类型2=1; //类型: 0-SMA; 1-EMA; 2-SMMA; 3-LWMA extern string 类型说明="0-SMA; 1-EMA; 2-SMMA; 3-LWMA"; extern int 文字水平=0; extern int 文字垂直=0; extern int 文字大小=14; extern string 文字标识="1"; extern color 文字颜色=Yellow; extern int 是否报警=1; extern int 是否发邮件=1; double Ma13; double Ma233; double Up; double Down; int TimeInMinute; int FlagAlert=0; datetime NextTime=0; int init() { IndicatorBuffers(4); SetIndexStyle(0,DRAW_LINE); SetIndexStyle(1,DRAW_LINE); SetIndexStyle(2,DRAW_ARROW); SetIndexStyle(3,DRAW_ARROW); SetIndexBuffer(0,Ma13); SetIndexBuffer(1,Ma233); SetIndexBuffer(2,Up); SetIndexBuffer(3,Down); SetIndexArrow(2,233); SetIndexArrow(3,234); TimeInMinute=0; return(0); } int start() { int i; int limit; string Signal; int counted_bars=IndicatorCounted(); if(counted_bars<0) return(-1); if(counted_bars>0) counted_bars--; limit=Bars-counted_bars; for (i=limit-1;i>=0;i--) { Ma13=iMA(NULL,0,均线周期1,0,类型1,PRICE_CLOSE,i); Ma233=iMA(NULL,0,均线周期2,0,类型2,PRICE_CLOSE,i); if ((Ma13[i+1]Ma233)&&(Close>Ma13)&&(Close>Ma233)) { Signal="["+Period()+"分钟]"+TimeMonth(Time+TimeInMinute)+"月"+TimeDay(Time+TimeInMinute)+"日"+TimeHour(Time+TimeInMinute)+"点"+TimeMinute(Time+TimeInMinute)+"分 "+Symbol()+"在价格"+DoubleToStr(Close,4)+"发生"+均线周期1+"均线上穿"+均线周期2+"均线"; writetext(文字标识,Signal,20+文字水平,40+文字垂直,文字颜色,文字大小); Up=Low-3*Point; if (i==0) { if (FlagAlert==0) { if (是否报警==1) Alert(Signal); if (是否发邮件==1) if( TimeLocal()>NextTime) SendMail(Signal,Signal); NextTime=TimeLocal()+间隔分钟*60; FlagAlert=1; } } } if ((Ma13[i+1]>Ma233[i+1])&&(Ma13NextTime) SendMail(Signal,Signal); NextTime=TimeLocal()+间隔分钟*60; FlagAlert=1; } } }else FlagAlert=0; } return(0); } void writetext(string Labelname,string data,int x,int y,color ColorValue,int FontSize)//通过Object写文字 { ObjectDelete(Labelname); ObjectCreate(Labelname, OBJ_LABEL, 0, 0, 0); ObjectSetText(Labelname, data, FontSize, "Arial", ColorValue); ObjectSet(Labelname, OBJPROP_CORNER, 0); ObjectSet(Labelname, OBJPROP_XDISTANCE, x); ObjectSet(Labelname, OBJPROP_YDISTANCE, y); }

用普通邮箱还是会有发邮件数的限制。。最好自己想办法申请个企业邮

谢谢！ 限制下邮件数后qq邮箱就够用了~

05年注册的老程序猿

这个我也不懂。。。摸索跟搜索很久才找到解决办法

能发给我吗？？？我的发几次有点频繁了。。。不够简洁

我传不了附件~附上代码你自己弄一下吧 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ #property indicator_chart_window #property indicator_buffers 4 #property indicator_color1 Yellow #property indicator_color2 White #property indicator_color3 Yellow #property indicator_color4 White //---- input parameters extern int 均线周期1=2; extern int 均线周期2=21; extern int 类型1=1; //类型: 0-SMA; 1-EMA; 2-SMMA; 3-LWMA extern int 类型2=1; //类型: 0-SMA; 1-EMA; 2-SMMA; 3-LWMA extern string 类型说明="0-SMA; 1-EMA; 2-SMMA; 3-LWMA"; extern int 文字水平=0; extern int 文字垂直=0; extern int 文字大小=14; extern string 文字标识="1"; extern color 文字颜色=Yellow; extern bool 是否报警=true; //extern int 是否报警=1; extern bool 是否发邮件=true; //extern int 是否发邮件=1; extern int 邮件间隔=20; extern int 报警间隔=20; //---- buffers double Ma10; double Ma130; double Up; double Down; int TimeInMinute; int FlagAlert=0; datetime prvEmailTime=0; datetime prvAlertTime=0; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int init() { //---- indicators IndicatorBuffers(4); SetIndexStyle(0,DRAW_LINE); SetIndexStyle(1,DRAW_LINE); SetIndexStyle(2,DRAW_ARROW); SetIndexStyle(3,DRAW_ARROW); SetIndexBuffer(0,Ma10); SetIndexBuffer(1,Ma130); SetIndexBuffer(2,Up); SetIndexBuffer(3,Down); SetIndexArrow(2,233); SetIndexArrow(3,234); TimeInMinute=0; //---- return(0); } int start() { int i; int limit; string Signal; int counted_bars=IndicatorCounted(); //---- check for possible errors if(counted_bars<0) return(-1); //---- the last counted bar will be recounted if(counted_bars>0) counted_bars--; limit=Bars-counted_bars; for (i=limit-1;i>=0;i--) { Ma10=iMA(NULL,0,均线周期1,0,类型1,PRICE_CLOSE,i); Ma130=iMA(NULL,0,均线周期2,0,类型2,PRICE_CLOSE,i); if ((Ma10[i+1]Ma130)&&(Close>Ma10)&&(Close>Ma130)) { Signal="["+Period()+"分钟]"+TimeMonth(Time+TimeInMinute)+"月"+TimeDay(Time+TimeInMinute)+"日"+TimeHour(Time+TimeInMinute)+"点"+TimeMinute(Time+TimeInMinute)+"分 "+Symbol()+"在"+DoubleToStr(Close,4)+"上穿均线"; writetext(文字标识,Signal,20+文字水平,40+文字垂直,文字颜色,文字大小); Up=Low-3*Point; if (i==0) { if (FlagAlert==0) { if (是否报警) { if(prvAlertTime+报警间隔*60 <= TimeCurrent()) { {Alert(Signal);} prvAlertTime=TimeCurrent(); } } if (是否发邮件) { if(prvEmailTime+邮件间隔*60 <= TimeCurrent()) { SendMail(Signal,Signal); prvEmailTime=TimeCurrent(); } } FlagAlert=1; } } } if ((Ma10[i+1]>Ma130[i+1])&&(Ma10

点评

mjp204

运行报错。。。能把 .mq4文件发到我QQ邮箱吗？？？发表于 2017-11-15 10:39