tongren 发表于 2008-12-12 22:06:20

一根均线交易法

本帖最后由 熙羽 于 2013-9-19 11:37 编辑

520有个一根均线交易法,能不能麻烦老大做成指标,有箭头,声音窗口提示和邮件提示功能,窗口提示有货币,时间,价格!万分感谢!

狂澜 发表于 2013-10-3 15:44:04

楼主说的,大周期,我个人觉得吧,15分钟图即可交易,大周期,大点位,小周期小点位,个人觉得

kanjacs 发表于 2013-5-26 22:47:52

eeeeeeeeeeeeeeeeeeeeeeeeeeeeee

bull 发表于 2008-12-15 12:24:41

暂时没有时间处理此请求

bull 发表于 2008-12-15 12:24:48

暂时没有时间处理此请求

changkangwei 发表于 2008-12-15 13:21:56

//+------------------------------------------------------------------+
//|MegaTrend   HMA.mq4
//| Copyright ?2006 WizardSerg <wizardserg@mail.ru>, ?? ??????? ForexMagazine #104
//| wizardserg@mail.ru
//| Revised by IgorAD,igorad2003@yahoo.co.uk |   
//|                                       
//| Personalized by iGoR for the Trend Slope Trading method (T_S_T)
//| Link: http://www.strategybuilderfx.com/forums/showthread.php?t=16507
//| contact: igor@igor.cc                                 
//+------------------------------------------------------------------+
#property copyright "MT4 release WizardSerg <wizardserg@mail.ru>, ?? ??????? ForexMagazine #104"
#property link      "wizardserg@mail.ru"

#property indicator_chart_window
#property indicator_buffers 2
#property indicator_color1 Lime
#property indicator_color2 Red
extern int       period=15;
extern int       method=3;   // MODE_SMA
extern int       price=0;    // PRICE_CLOSE
extern bool VoiceAlert = false;   
extern bool email = false;
double Uptrend[];//上行数组
double nptrend[];//下行数组
double ExtMapBuffer[];
int alert;

int init()
{
    IndicatorBuffers(3);
    SetIndexBuffer(0, Uptrend);
    SetIndexBuffer(1, nptrend);
    SetIndexBuffer(2, ExtMapBuffer);
    ArraySetAsSeries(ExtMapBuffer, true);
    SetIndexStyle(0,DRAW_LINE,STYLE_SOLID,2);
    SetIndexStyle(1,DRAW_LINE,STYLE_SOLID,2);
    IndicatorShortName("MegaTrend("+period+")");
    return(0);
}

double WMA(int x, int p)
{    return(iMA(NULL, 0, p, 0, method, price, x)); }

int start()
{
    int counted_bars = IndicatorCounted();
    if(counted_bars < 0)   return(-1);
    int x = 0;
    int p = MathSqrt(period);            
    int e = Bars - counted_bars + period + 1;
    double vect[], trend[];
    if(e > Bars)   e = Bars;   
    ArrayResize(vect, e);
    ArraySetAsSeries(vect, true);
    ArrayResize(trend, e);
    ArraySetAsSeries(trend, true);
   
    for(x = 0; x < e; x++)
    {vect = 2*WMA(x, period/2) - WMA(x, period);}

    for(x = 0; x < e-period; x++)
      ExtMapBuffer = iMAOnArray(vect, 0, p, 0, method, x);      

    for(x = e-period; x >= 0; x--)
    {   
      if (ExtMapBuffer> ExtMapBuffer) //指标线上行
          {
         Uptrend = ExtMapBuffer;      
         Uptrend=ExtMapBuffer;
         nptrend = EMPTY_VALUE;      //下行线赋空值
          }
      else if(ExtMapBuffer< ExtMapBuffer) //指标线下行
          {
         nptrend = ExtMapBuffer;
         nptrend=ExtMapBuffer;
         Uptrend = EMPTY_VALUE;       //上行线赋空值
          }
    }

    if(alert!=1 && Close>ExtMapBuffer && Close<ExtMapBuffer+10*Point && Close<ExtMapBuffer)
      
{   if (VoiceAlert==true) {Alert(Symbol()+Period(),"上穿变色均线"); alert=1;}
    if (email==true)
      {SendMail(Symbol()+Period()+"上穿变色均线"+"****现价 :"+Close,"风精灵 ,祝你好运!");alert=1;
      }}

    if(alert!=2 && Close<ExtMapBuffer && Close>ExtMapBuffer-10*Point && Close>ExtMapBuffer)

{if (VoiceAlert==true)   {Alert(Symbol()+Period(),"下穿变色均线"); alert=2;}
if (email==true)
      {SendMail(Symbol()+Period()+"****现价 :"+Close,"下穿变色均线"+"风精灵 ,祝你好运!");alert=2;} }

    return(0);
}
//+------------------------------------------------------------------+

tongren 发表于 2010-9-10 14:13:34

不能用啊?

jjfcny 发表于 2011-6-15 15:11:02

能不能加注解呀

zjfuwen 发表于 2012-8-8 00:30:35

能稳定吗》?????

kydco 发表于 2012-11-25 00:34:22

多学多看,早日脱白。

小澈°dream 发表于 2012-12-5 12:50:36

小手一斗,金币到手~~~~

wyg399 发表于 2012-12-25 11:25:28

多学多看多学多看

yushui 发表于 2012-12-30 16:10:03

顶贴赚金币

孤独的交易者 发表于 2013-3-7 23:03:56

学习学子

tomwaits 发表于 2013-3-7 23:10:31

:victory::victory::victory::victory:

albertau 发表于 2013-3-9 12:03:19

感谢楼主的分享!

mandela 发表于 2013-3-9 12:18:50

回帖并转播
页: [1] 2 3 4
查看完整版本: 一根均线交易法