皮皮网

1.朋友帮忙发一个双线的双色双色MACD吗？兄弟拜托了！

朋友帮忙发一个双线的公式立有信crm源码MACD吗？兄弟拜托了！

       //[i] 双色双线MACD+报警

       #property indicator_separate_window

       #property indicator_buffers 4

       #property indicator_color1 Magenta

       #property indicator_color2 Aqua

       #property indicator_color3 Green

       #property indicator_color4 Red

       extern bool 使用报警 = true;

       extern bool 使用邮件 = false;

       extern int 快均周 = ;

       extern int 慢均周 = ;

       extern int 信均周 = 9;

       double 紫快线[];

       double 青慢滑[];

       double 绿涨柱[];

       double 红跌柱[];

       bool 已报涨标记= false;

       bool 已报跌标记= false;

       //--------------------------------+

       int init()

        {

        IndicatorDigits(MarketInfo(Symbol(),源码ivx如何导出项目源码 MODE_DIGITS)+1);

        SetIndexStyle(0, DRAW_LINE, STYLE_SOLID);

        SetIndexBuffer(0, 紫快线);

        SetIndexDrawBegin(0, 慢均周);

        SetIndexStyle(1, DRAW_LINE, STYLE_DOT);

        SetIndexBuffer(1, 青慢滑);

        SetIndexDrawBegin(1, 信均周);

        SetIndexStyle(2, DRAW_HISTOGRAM, STYLE_SOLID);

        SetIndexBuffer(2, 绿涨柱);

        SetIndexStyle(3, DRAW_HISTOGRAM, STYLE_SOLID);

        SetIndexBuffer(3, 红跌柱);

        //SetIndexDrawBegin(2, 慢均周 + 信均周);

        IndicatorShortName("MACD("+快均周+", "+慢均周+", "+信均周+")");

        SetIndexLabel(0, "MACD");

        SetIndexLabel(1, "信号线");

        SetIndexLabel(2, "历史柱");

        return(0);

        }

       //--------------------------------+

       int start()

        {

        int 最少计;

        double 差幅;

        int 已计= IndicatorCounted();

        if(已计<0)

        return(-1);

        if(已计>0)

        已计--;

        最少计= Bars-已计;

        for(int i=0; i<最少计; i++)

        紫快线[i]= iMA(NULL,0,快均周, 0, MODE_EMA, PRICE_CLOSE, i)-iMA(NULL, 0, 慢均周, 0, MODE_EMA, PRICE_CLOSE, i);

        for(i= 0; i<最少计; i++)

        青慢滑[i]= iMAOnArray(紫快线, Bars, 信均周, 0, MODE_SMA, i);

        //青慢滑[i]= alpha*紫快线[i] + alpha_1*青慢滑[i+1];

        for(i=0; i<最少计; i++){

        绿涨柱[i]= 0;

        红跌柱[i]= 0;

        差幅= 紫快线[i]-青慢滑[i];

        if(差幅>= 0)

        绿涨柱[i]= 差幅*2;

        else

        红跌柱[i]= 差幅*2;

        if(i==1){

        if(绿涨柱[i]>0 && 红跌柱[i+1]<0)

        //if(绿涨柱[i]>绿涨柱[i+1])

        {

        //--上穿

        if(已报涨标记==false)

        {

        已报涨标记= true;

        已报跌标记= false;

        if(使用报警==true)

        Alert("MACD上穿", "\n 日期= ", TimeToStr(TimeCurrent(), TIME_DATE), " ", TimeHour(TimeCurrent()), ":", TimeMinute(TimeCurrent()), "\n 货币对= ", Symbol(), " 时框= ", Period());

        if(使用邮件==true)

        SendMail("MACD上穿", "MACD上穿, 日期= "+TimeToStr(TimeCurrent(), TIME_DATE)+" "+TimeHour(TimeCurrent())+":"+TimeMinute(TimeCurrent())+" 货币对= "+Symbol()+" 时框= "+Period());

        }

        }

        else

        if(红跌柱[i]<0 && 绿涨柱[i+1]>0)

        //else if(绿涨柱[i]<绿涨柱[i+1] )

        {

        //--下穿

        if(已报跌标记==false)

        {

        已报跌标记= true;

        已报涨标记= false;

        if(使用报警==true)

        Alert("MACD下穿", "\n 日期= ", TimeToStr(TimeCurrent(), TIME_DATE), " ", TimeHour(TimeCurrent()), ":", TimeMinute(TimeCurrent()), "\n 货币对= ", Symbol(), " 时框= ", Period());

        if(使用邮件==true)

        SendMail("MACD下穿", "MACD下穿, 日期= "+TimeToStr(TimeCurrent(), TIME_DATE)+" "+TimeHour(TimeCurrent())+":"+TimeMinute(TimeCurrent())+" 货币对= "+Symbol()+" 时框= "+Period());

        }

        }

        }

        }

        return(0);

        }

       //--------------------------------+

       你也不悬赏点分啥的

       把分看得那么重，我要是指标服务器优化器源码跟你一样把这玩意看的很重……多余不说，下次注意！下载原始传奇小程序版源码