TrendMeLeaveMe,sjp改

//+------------------------------------------------------------------+
//|                                               TrendMeLeaveMe.mq4 |
//|                               Copyright ?2006, Eng. Waddah Attar |
//|                                           waddahattar@hotmail.com |
//+------------------------------------------------------------------+
#property copyright "Copyright ?2007,Eng Waddah Attar"
#property link       "waddahattar@hotmail.com"
//----
extern string BuyStop_Trend_Info = "_______________________";
extern string BuyStop_TrendName = "buystop";
extern int     BuyStop_TakeProfit = 50;
extern int     BuyStop_StopLoss = 30;
extern double BuyStop_Lot = 0.01;
extern int     BuyStop_StepUpper = 10;
extern int     BuyStop_StepLower = 50;
extern string SellStop_Trend_Info = "_______________________";
extern string SellStop_TrendName = "sellstop";
extern int     SellStop_TakeProfit = 50;
extern int     SellStop_StopLoss = 30;
extern double SellStop_Lot = 0.01;
extern int     SellStop_StepUpper = 50;
extern int     SellStop_StepLower = 10;
//------
int MagicBuyStop = 1101;
int MagicSellStop = 1102;
int glbOrderType;
int glbOrderTicket;
//+------------------------------------------------------------------+
//|                                                                   |
//+------------------------------------------------------------------+
int init()
  {
    Comment("TrendMeLeaveMe by Waddah Attar");
    return(0);
  }
//+------------------------------------------------------------------+
//|                                                                   |
//+------------------------------------------------------------------+
int deinit()
  {
    Comment("");
    return(0);
  }
//+------------------------------------------------------------------+
//|                                                                   |
//+------------------------------------------------------------------+
int start()
  {
    double vH, vL, vM, sl, tp;
    double rsisjp=iRSI(NULL,0,14,PRICE_CLOSE,0);
    Print("指标rsi:",rsisjp);
    double kdsjp=iStochastic(NULL,0,5,3,3,MODE_SMA,0,MODE_SIGNAL,0);
    Print("指标kd:",kdsjp);
   
    int SellStop_Lot_Sjp=0;
    int BuyStop_Lot_Sjp=0;
   
    if(ObjectFind(BuyStop_TrendName) == 0)
   

     
      {
        SetObject("High" + BuyStop_TrendName,
                  ObjectGet(BuyStop_TrendName, OBJPROP_TIME1),
                  ObjectGet(BuyStop_TrendName, OBJPROP_PRICE1) + BuyStop_StepUpper*Point,
                  ObjectGet(BuyStop_TrendName, OBJPROP_TIME2),
                  ObjectGet(BuyStop_TrendName, OBJPROP_PRICE2) + BuyStop_StepUpper*Point,
                  ObjectGet(BuyStop_TrendName, OBJPROP_COLOR));
        SetObject("Low" + BuyStop_TrendName,
                  ObjectGet(BuyStop_TrendName, OBJPROP_TIME1),
                  ObjectGet(BuyStop_TrendName, OBJPROP_PRICE1) - BuyStop_StepLower*Point,
                  ObjectGet(BuyStop_TrendName, OBJPROP_TIME2),
                  ObjectGet(BuyStop_TrendName, OBJPROP_PRICE2) - BuyStop_StepLower*Point,
                  ObjectGet(BuyStop_TrendName, OBJPROP_COLOR));
        vH = NormalizeDouble(ObjectGetValueByShift("High"+BuyStop_TrendName,0),Digits);
        vM = NormalizeDouble(ObjectGetValueByShift(BuyStop_TrendName,0),Digits);
        vL = NormalizeDouble(ObjectGetValueByShift("Low"+BuyStop_TrendName,0),Digits);
        sl = vH - BuyStop_StopLoss*Point;
        tp = vH + BuyStop_TakeProfit*Point;
       
       
       
       
       
       
       
        if(Ask <= vM && Ask >= vL && OrderFind(MagicBuyStop) == false)
            if(OrderSend(Symbol(), OP_BUYSTOP, BuyStop_Lot, vH, 3, sl, tp,
              "", MagicBuyStop, 0, Green) < 0)
                Print("Err (", GetLastError(), ") Open BuyStop Price= ", vH, " SL= ", 
                      sl," TP= ", tp);
        if(Ask <= vM && Ask >= vL && OrderFind(MagicBuyStop) == true && 
          glbOrderType == OP_BUYSTOP)
          {
            OrderSelect(glbOrderTicket, SELECT_BY_TICKET, MODE_TRADES);
            if(vH != OrderOpenPrice())
                if(OrderModify(glbOrderTicket, vH, sl, tp, 0, Green) == false)
                    Print("Err (", GetLastError(), ") Modify BuyStop Price= ", vH, 
                          " SL= ", sl, " TP= ", tp);
          }
      }
    if(ObjectFind(SellStop_TrendName) == 0)
      {
        SetObject("High" + SellStop_TrendName,
                  ObjectGet(SellStop_TrendName, OBJPROP_TIME1),
                  ObjectGet(SellStop_TrendName, OBJPROP_PRICE1) + SellStop_StepUpper*Point,
                  ObjectGet(SellStop_TrendName, OBJPROP_TIME2),
                  ObjectGet(SellStop_TrendName, OBJPROP_PRICE2) + SellStop_StepUpper*Point,
                  ObjectGet(SellStop_TrendName, OBJPROP_COLOR));
        SetObject("Low" + SellStop_TrendName, ObjectGet(SellStop_TrendName, OBJPROP_TIME1),
                  ObjectGet(SellStop_TrendName, OBJPROP_PRICE1) - SellStop_StepLower*Point,
                  ObjectGet(SellStop_TrendName, OBJPROP_TIME2),
                  ObjectGet(SellStop_TrendName, OBJPROP_PRICE2) - SellStop_StepLower*Point,
                  ObjectGet(SellStop_TrendName, OBJPROP_COLOR));
        vH = NormalizeDouble(ObjectGetValueByShift("High" + SellStop_TrendName, 0), Digits);
        vM = NormalizeDouble(ObjectGetValueByShift(SellStop_TrendName, 0), Digits);
        vL = NormalizeDouble(ObjectGetValueByShift("Low" +SellStop_TrendName, 0), Digits);
        sl = vL + SellStop_StopLoss*Point;
        tp = vL - SellStop_TakeProfit*Point;
     
     
   
         
       
 
  //突破(趋势)损卖量      
        if((Bid >= vM && Bid <= vH && OrderFind(MagicSellStop) == false)||(Bid >= vM && Bid <= vH && OrderFind(MagicSellStop) == true && 
          glbOrderType == OP_SELLSTOP))
          SellStop_Lot_Sjp=0;
          if (rsisjp>50 || kdsjp>65)         SellStop_Lot_Sjp=SellStop_Lot;
          if (rsisjp>65 || kdsjp>75)         SellStop_Lot_Sjp=SellStop_Lot*2;
          if (rsisjp>75 || kdsjp>85)         SellStop_Lot_Sjp=SellStop_Lot*3;
           
//逆势(通道)限买量
  //         BuyStop_Lot_Sjp=0;
  //         if (rsisjp<30 || kdsjp<20)         BuyStop_Lot_Sjp=SellStop_Lot;
  //         if (rsisjp<20 || kdsjp<10)         BuyStop_Lot_Sjp=SellStop_Lot*2;
        //执行损卖
        if((rsisjp>50 || kdsjp>65) && Bid >= vM && Bid <= vH && OrderFind(MagicSellStop) == false)
       
            if(OrderSend(Symbol(), OP_SELLSTOP, SellStop_Lot_Sjp, vL, 3, sl, tp, "", 
              MagicSellStop, 0, Red) < 0)
               
                Print("Err (", GetLastError(), ") Open SellStop Price= ", vL, " SL= ", sl, 
                      " TP= ", tp);
        if((rsisjp>50 || kdsjp>65) && Bid >= vM && Bid <= vH && OrderFind(MagicSellStop) == true && 
          glbOrderType == OP_SELLSTOP)
          {
            OrderSelect(glbOrderTicket, SELECT_BY_TICKET, MODE_TRADES);
            if(vL != OrderOpenPrice())
                if(OrderModify(glbOrderTicket, vL, sl, tp, 0, Red) == false)
                    Print("Err (", GetLastError(), ") Modify Sell Price= ", vL, " SL= ", sl, 
                          " TP= ", tp);
          }
         
          //执行限买
  //         -------
         
         
      }
    return(0);
  }
//+------------------------------------------------------------------+
//|                                                                   |
//+------------自定义函数OrderFind(int Magic)------------------------------------------------------+
bool OrderFind(int Magic)
  {
    glbOrderType = -1;
    glbOrderTicket = -1;
    int total = OrdersTotal();
    bool res = false;
    for(int cnt = 0 ; cnt < total ; cnt++)
      {
        OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
        if(OrderMagicNumber() == Magic && OrderSymbol() == Symbol())
          {
            glbOrderType = OrderType();
            glbOrderTicket = OrderTicket();
            res = true;
          }
      }
    return(res);
  }
//+------------------------------------------------------------------+
//|                                                                   |
//+------------------------------------------------------------------+
void SetObject(string name,datetime T1,double P1,datetime T2,double P2,color clr)
  {
    if(ObjectFind(name) == -1)
      {
        ObjectCreate(name, OBJ_TREND, 0, T1, P1, T2, P2);
        ObjectSet(name, OBJPROP_COLOR, clr);
        ObjectSet(name, OBJPROP_STYLE, STYLE_DOT);
      }
    else
      {
        ObjectSet(name, OBJPROP_TIME1, T1);
        ObjectSet(name, OBJPROP_PRICE1, P1);
        ObjectSet(name, OBJPROP_TIME2, T2);
        ObjectSet(name, OBJPROP_PRICE2, P2);
        ObjectSet(name, OBJPROP_COLOR, clr);
        ObjectSet(name, OBJPROP_STYLE, STYLE_DOT);
     
  }
//+------------------------------------------------------------------+

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值