موضوع مخصص للأسئلة البرمجية

**MR.dollar** · 19-12-2016, 06:09 PM

المشاركة الأصلية كتبت بواسطة سمير محمد ارمان

السلام عليكم
استاذى الكريم كل عام وانت بكل خير
لو عندى اكسبيرت يفتح صفقات شراء وبيع كثيره
هل ممكن يتم عمل تريلينج استوب مع كل صفقة ويتحرك التريلينج استوب مع صفقته فقط
ونفس الشئ فى البريك ايفن يكون لكل صفقة بريك ايفن بيه فقط
ولك الشكر والتقدير على المساعده
تحياتى لك

وعليكم السلام ورحمة الله وبركاته
نعم هذا الطبيعي ما يجب أن يحدث بما أنك تستخدم الداله OrderSelect لتحديد كل صفقه ثم تستخدم الأمر OrderModify لتعديل قيم هذا الأمر
أم أن سؤالك تقصد شيء آخر ؟

**adel2415** · 20-12-2016, 01:00 AM

السلام عليكم يا استاذنا الكريم
من فضلك هل يمكنك مسعدتي لاتمام الاكسبرت الذين انا فيه اريد ان اضيف له هذه النقاط:
1-ان يقوم بغلق الصفقات الرابحة من الساعة 20.00 يوم الجمعةويعود للعمل يوم الاثنين.
2-ان تكون الصفقات المفتوحة لا تفوق 2صفقة .
3-ان اقوم بمعادلة لكي طعطيني سعر الاستوب لوز للصفقة المفتوحة.
واشكرك استاذنا الغالي على ردودك

**MR.dollar** · 20-12-2016, 06:09 PM

المشاركة الأصلية كتبت بواسطة endoftime

ممكن اضافة mm في السكربت في المشاركه السابقه للتعلم بلون مختلف
نظرا لوجود اخطاء معي

يمكنك إستخدام هذه الداله لتحديد حجم اللوت

كود PHP:

 double LotManage()
  {
      double lot = MathCeil(AccountFreeMargin() *  Risk / 1000) / 100; 
      
      if(lot<MarketInfo(Symbol(),MODE_MINLOT))lot=MarketInfo(Symbol(),MODE_MINLOT);
      if(lot>MarketInfo(Symbol(),MODE_MAXLOT))lot=MarketInfo(Symbol(),MODE_MAXLOT);
      
       
       return (NormalizeDouble(lot,Lot_Decimal));
  }

قم بتعريفها خارج الداله start ثم إستخدم الداله قبل الأمر OrderSend لتحديد حجم اللوت

**علاءحمدان11** · 20-12-2016, 06:51 PM

مستر دولار هل يوجد شئ او كتاب يعلم البرمجة قد اتعلم واساعدك فى هذا القسم

**adel2415** · 20-12-2016, 07:55 PM

السلام عليكم يا استاذنا الكريم
من فضلك هل يمكنك مسعدتي لاتمام الاكسبرت الذين انا فيه اريد ان اضيف له هذه النقاط:
1-ان يقوم بغلق الصفقات الرابحة من الساعة 20.00 يوم الجمعةويعود للعمل يوم الاثنين.
2-ان تكون الصفقات المفتوحة لا تفوق 2صفقة .
3-ان اقوم بمعادلة لكي طعطيني سعر الاستوب لوز للصفقة المفتوحة.
واشكرك استاذنا الغالي على ردودك

**MR.dollar** · 20-12-2016, 11:32 PM

المشاركة الأصلية كتبت بواسطة abo_samar

السلام عليكم ورحمة الله وبركاته
ارجو تصحيح الداله لحساب التراجع فى الاكيوتى

كود:

 void HiddenTrailingEquity()
{
 double MinEquity=0; 
 if(OrdersTotal()==0||MinEquity==0)MinEquity=AccountEquity();
 
   double Profit=AccountEquity()-MinEquity;
  
  if(Profit>=TrailingEquity&&(GlobalVariableGet("TS Profit")<Profit-TrailingEquity||GlobalVariableGet("TS Profit")==0))
  {
   GlobalVariableSet("TS Profit",Profit-TrailingEquity);   
  }
  if(Profit<=GlobalVariableGet("TS Profit")&&GlobalVariableGet("TS Profit")!=0)
  {
   for(int i=OrdersTotal()-1;i>=0;i--)
   {
    bool select=OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
    if(OrderSymbol()==Symbol())
    {
     if(OrderType()==OP_BUY)
     {
     bool closeB=OrderClose(OrderTicket(),OrderLots(),Bid,3);
     }
     if(OrderType()==OP_SELL)
     {
    bool closeS=OrderClose(OrderTicket(),OrderLots(),Ask,3);
     }
    }
   }
   GlobalVariableDel("TS Profit");
   MinEquity=AccountEquity();
  
   
  } 
}

وعليكم السلام ورحمة الله وبركاته
هل تقصد تريد داله مشابهه لكن تحفظ قيمة أقصى تراجع في الإكوتي ؟

**MR.dollar** · 20-12-2016, 11:34 PM

المشاركة الأصلية كتبت بواسطة ubuntu

شباب قمت بعمل اوامر معلقه شراء وبيع مثلا عند السعر 1.25890 المفروض بمجرد وصول السوق لهذا السعر يتم الشراء والبيع
لكن المشكلة التي تظهر انه قبل الوصول لهذا المستوى بنقطه واحده تقريبا يتم الشراء فقط ولايتم البيع الا في حال وصول السعر له يتم البيع
هل يوجد حل لجعل السوق يشتري ويبيع من نفس السعر بنفس لحظة ؟ لانه ممكن يتفعل سعر الشراء قبل نقطة واحدة وينزل السوق ويبقى عقد البيع غير مفعل !!

يجب أن تضع في الإعتبار فرق الإسبريد بين الأمرين
مثلا لو سعر أمر البيع المعلق هو 1.2589 وكان الإسبريد 3 نقاط فسوف تجعل سعر أمر الشراء المعلق هو 1.2592

**abo_samar** · 21-12-2016, 03:50 AM

المشاركة الأصلية كتبت بواسطة MR.dollar

وعليكم السلام ورحمة الله وبركاته
هل تقصد تريد داله مشابهه لكن تحفظ قيمة أقصى تراجع في الإكوتي ؟

بارك الله فيك استاذنا العزيز
نعم هذا ما اريده وللتوضيح اكثر
الاكيوتى 1000 ووضعت التراجع 100 مثلا
فى البدايه يحسب الاكيوتى 1000
اذا قل عن ذلك يستمر بحفظ القيمه كما هى 1000
واذا زاد ووصل مثلا الى 1250
اريده اذا تراجع الى 1150 وهى 1250 اعلى قيمه - 100 التراجع يغلق كل الصفقات
او بطريقه اخرى المخزن 1000 والتراجع 100
اذا صعد ل 1250 ثم هبط الى 1100 يغلق كل الصفقات (ايهما يصح فى الطريقتين)
بنفس فكرة التراجع فى الربح الذى قمت حضرتك بعمله فى داله سابقه
والتى قمت بالاستعانه بفكرتها فى هذه الداله
وهذه هى الداله الاصليه لك

كود PHP:

  void HiddenTrailingBalancePercent()

{

  double ProfitPercent=AccountProfit();

  

  if(ProfitPercent>=StartTrailingPercent&&(GlobalVariableGet("TS Percent")<ProfitPercent-StartTrailingPercent||GlobalVariableGet("TS Percent")==0))

  {

   GlobalVariableSet("TS Percent",ProfitPercent-StartTrailingPercent);   

  }

  

  if(ProfitPercent<=GlobalVariableGet("TS Percent")&&GlobalVariableGet("TS Percent")!=0)

  {

   for(int i=OrdersTotal()-1;i>=0;i--)

   {

    bool select=OrderSelect(i,SELECT_BY_POS,MODE_TRADES);

    if(OrderSymbol()==Symbol())

    {

     if(OrderType()==OP_BUY)

     {

      

     bool closeB=OrderClose(OrderTicket(),OrderLots(),Bid,3);

      

     }

     if(OrderType()==OP_SELL)

     {

    bool closeS=OrderClose(OrderTicket(),OrderLots(),Ask,3);

     }

    }

   }

   GlobalVariableDel("TS Percent");

  } 

}

**سمير محمد ارمان** · 21-12-2016, 09:36 AM

المشاركة الأصلية كتبت بواسطة MR.dollar

وعليكم السلام ورحمة الله وبركاته
نعم هذا الطبيعي ما يجب أن يحدث بما أنك تستخدم الداله OrderSelect لتحديد كل صفقه ثم تستخدم الأمر OrderModify لتعديل قيم هذا الأمر
أم أن سؤالك تقصد شيء آخر ؟

السلام عليكم استاذى الكريم
انا محتاج دالة التريلينج استوب والبريك ايفن
تعمل مع كل صفقة لوحده
بمعنى
الاكسبيرت فتح شراء وبعد مسافة فتح شراء ثانى وبعد مسافة فتح صفقة
انا عايز لكل صفقة منهم خط التريلينج استوب مستقل بكل صفقة فقط وليس يعمل على مجموع الصفقات
ونفس الشئ فى البريك ايفن
لكل صفقة عند الوصول على الرقم الموجود فى خانة البريك ايفن يتم وضع الاستوب لهذه الصفقة فقط
هذا هو المطلوب
ولك الشكر والعرفان
تحياتى لك

**hosamnasr** · 21-12-2016, 04:14 PM

السلام عليكم
اريد دالة التريلنج ستوب لتظهر على الشارت على هيئة خطوط

**hosamnasr** · 21-12-2016, 05:26 PM

المشاركة الأصلية كتبت بواسطة hosamnasr

السلام عليكم
اريد دالة التريلنج ستوب لتظهر على الشارت على هيئة خطوط متصلة

بحيث يكون البرويد هو مسافة التريلنج فقط

**MR.dollar** · 21-12-2016, 06:16 PM

المشاركة الأصلية كتبت بواسطة hosamnasr

السلام عليكم
اريد دالة التريلنج ستوب لتظهر على الشارت على هيئة خطوط

وعليكم السلام ورحمة الله وبركاته
بنفس دالة التريلينج ستوب لكن سوف تستخدم الداله ObjectCreate لرسم خط مكان النقطة الأستوب الجديده
مثال

كود PHP:

 void MoveTrailingStop()
{
   for(int cnt=0;cnt<OrdersTotal();cnt++)
   {
      bool select=OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
      if(OrderType()<=OP_SELL&&OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
      {
         if(OrderType()==OP_BUY)
         {
            if(TrailingStop>0&&NormalizeDouble(Ask,Digits)>NormalizeDouble(OrderOpenPrice()+TrailingStop*point,Digits))  
            {                 
               if((NormalizeDouble(OrderStopLoss(),Digits)<NormalizeDouble(Bid-TrailingStop*point,Digits))||(OrderStopLoss()==0))
               {
                  bool modify=OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(Bid-TrailingStop*point,Digits),OrderTakeProfit(),0,Blue);
                  CreateLine("TS"+OrderTicket(),NormalizeDouble(Bid-TrailingStop*point,Digits));
               }
            }
         }
         else 
         {
            if(TrailingStop>0&&NormalizeDouble(Bid,Digits)<NormalizeDouble(OrderOpenPrice()-TrailingStop*point,Digits))  
            {                 
               if((NormalizeDouble(OrderStopLoss(),Digits)>(NormalizeDouble(Ask+TrailingStop*point,Digits)))||(OrderStopLoss()==0))
               {
                   modify=OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(Ask+TrailingStop*point,Digits),OrderTakeProfit(),0,Red);
                   CreateLine("TS"+OrderTicket(),NormalizeDouble(Ask+TrailingStop*point,Digits));
               }
            }
         }
      }
   }
}

void CreateLine(string name,double price)
{
 if(ObjectFind(name)==-1)
 {
  ObjectCreate(name,OBJ_HLINE,0,0,price);
  ObjectSet(name,OBJPROP_COLOR,Red);
 }
 else if(ObjectGet(name,OBJPROP_PRICE1)!=price)
 {
  ObjectSet(name,OBJPROP_PRICE1,price);
 }
}

**MR.dollar** · 21-12-2016, 06:17 PM

المشاركة الأصلية كتبت بواسطة سمير محمد ارمان

السلام عليكم استاذى الكريم
انا محتاج دالة التريلينج استوب والبريك ايفن
تعمل مع كل صفقة لوحده
بمعنى
الاكسبيرت فتح شراء وبعد مسافة فتح شراء ثانى وبعد مسافة فتح صفقة
انا عايز لكل صفقة منهم خط التريلينج استوب مستقل بكل صفقة فقط وليس يعمل على مجموع الصفقات
ونفس الشئ فى البريك ايفن
لكل صفقة عند الوصول على الرقم الموجود فى خانة البريك ايفن يتم وضع الاستوب لهذه الصفقة فقط
هذا هو المطلوب
ولك الشكر والعرفان
تحياتى لك

هذه الداله ستقوم بعمل التريلينج ستوب والبريك إيفن لكل صفقه على حده

كود PHP:

 void MoveTrailingStop()
{
   for(int cnt=0;cnt<OrdersTotal();cnt++)
   {
      bool select=OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
      if(OrderType()<=OP_SELL&&OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
      {
         if(OrderType()==OP_BUY)
         {
            if(TrailingStop>0&&NormalizeDouble(Ask,Digits)>NormalizeDouble(OrderOpenPrice()+TrailingStop*point,Digits))  
            {                 
               if((NormalizeDouble(OrderStopLoss(),Digits)<NormalizeDouble(Bid-TrailingStop*point,Digits))||(OrderStopLoss()==0))
               {
                  bool modify=OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(Bid-TrailingStop*point,Digits),OrderTakeProfit(),0,Blue);
               }
            }
         }
         else 
         {
            if(TrailingStop>0&&NormalizeDouble(Bid,Digits)<NormalizeDouble(OrderOpenPrice()-TrailingStop*point,Digits))  
            {                 
               if((NormalizeDouble(OrderStopLoss(),Digits)>(NormalizeDouble(Ask+TrailingStop*point,Digits)))||(OrderStopLoss()==0))
               {
                   modify=OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(Ask+TrailingStop*point,Digits),OrderTakeProfit(),0,Red);
               }
            }
         }
      }
   }
}
void MoveBreakEven()
{
   for(int cnt=0;cnt<OrdersTotal();cnt++)
   {
      bool select=OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
      if(OrderType()<=OP_SELL&&OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
      {
         if(OrderType()==OP_BUY)
         {
            if(BreakEven>0)
            {
               if(NormalizeDouble((Bid-OrderOpenPrice()),Digits)>BreakEven*point)
               {
                  if(OrderStopLoss()==0||OrderStopLoss()<OrderOpenPrice()+BreakEvenPips*point)
                  {
                
                    bool modify= OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(OrderOpenPrice()+BreakEvenPips*point,Digits),OrderTakeProfit(),0,Blue);
                  }
               }
            }
         }
         else
         {
            if(BreakEven>0)
            {
               if(NormalizeDouble((OrderOpenPrice()-Ask),Digits)>BreakEven*point)
               {
                  if(OrderStopLoss()==0||OrderStopLoss()>OrderOpenPrice()-BreakEvenPips*point)
                  {
                    
                     modify= OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(OrderOpenPrice()-BreakEvenPips*point,Digits),OrderTakeProfit(),0,Red);
                  }
               }
            }
         }
      }
   }
}

**hosamnasr** · 21-12-2016, 09:11 PM

المشاركة الأصلية كتبت بواسطة MR.dollar

وعليكم السلام ورحمة الله وبركاته
بنفس دالة التريلينج ستوب لكن سوف تستخدم الداله ObjectCreate لرسم خط مكان النقطة الأستوب الجديده
مثال

كود PHP:

 void MoveTrailingStop()

{

   for(int cnt=0;cnt<OrdersTotal();cnt++)

   {

      bool select=OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);

      if(OrderType()<=OP_SELL&&OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)

      {

         if(OrderType()==OP_BUY)

         {

            if(TrailingStop>0&&NormalizeDouble(Ask,Digits)>NormalizeDouble(OrderOpenPrice()+TrailingStop*point,Digits))  

            {                 

               if((NormalizeDouble(OrderStopLoss(),Digits)<NormalizeDouble(Bid-TrailingStop*point,Digits))||(OrderStopLoss()==0))

               {

                  bool modify=OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(Bid-TrailingStop*point,Digits),OrderTakeProfit(),0,Blue);

                  CreateLine("TS"+OrderTicket(),NormalizeDouble(Bid-TrailingStop*point,Digits));

               }

            }

         }

         else 

         {

            if(TrailingStop>0&&NormalizeDouble(Bid,Digits)<NormalizeDouble(OrderOpenPrice()-TrailingStop*point,Digits))  

            {                 

               if((NormalizeDouble(OrderStopLoss(),Digits)>(NormalizeDouble(Ask+TrailingStop*point,Digits)))||(OrderStopLoss()==0))

               {

                   modify=OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(Ask+TrailingStop*point,Digits),OrderTakeProfit(),0,Red);

                   CreateLine("TS"+OrderTicket(),NormalizeDouble(Ask+TrailingStop*point,Digits));

               }

            }

         }

      }

   }

}

 
void CreateLine(string name,double price)

{

 if(ObjectFind(name)==-1)

 {

  ObjectCreate(name,OBJ_HLINE,0,0,price);

  ObjectSet(name,OBJPROP_COLOR,Red);

 }

 else if(ObjectGet(name,OBJPROP_PRICE1)!=price)

 {

  ObjectSet(name,OBJPROP_PRICE1,price);

 }

}

اخي اقصد دالة مؤشر هاي لو مثل السوبر ترند ولاكن التريلنج يعمل مع كل شمعة ويحتفظ بالمسافة مثل الصورة وعند الكسر تظهر الاشارة العكسية والبرويد يغير المسافة فقط (السوبر ترند لا يعتمد على التريلنج لنه يقوم بعمل ازاحة لعدد من الشموع ومختلف عن الفكرة)

اضغط على الصورة لعرض أكبر

الاســـم: trailing-stop1.jpg
المشاهدات: 138
الحجـــم: 4.4 كيلوبايت
الرقم: 464467

**سمير محمد ارمان** · 22-12-2016, 02:31 PM

المشاركة الأصلية كتبت بواسطة MR.dollar

هذه الداله ستقوم بعمل التريلينج ستوب والبريك إيفن لكل صفقه على حده

كود PHP:

 void MoveTrailingStop()
{
   for(int cnt=0;cnt<OrdersTotal();cnt++)
   {
      bool select=OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
      if(OrderType()<=OP_SELL&&OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
      {
         if(OrderType()==OP_BUY)
         {
            if(TrailingStop>0&&NormalizeDouble(Ask,Digits)>NormalizeDouble(OrderOpenPrice()+TrailingStop*point,Digits))  
            {                 
               if((NormalizeDouble(OrderStopLoss(),Digits)<NormalizeDouble(Bid-TrailingStop*point,Digits))||(OrderStopLoss()==0))
               {
                  bool modify=OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(Bid-TrailingStop*point,Digits),OrderTakeProfit(),0,Blue);
               }
            }
         }
         else 
         {
            if(TrailingStop>0&&NormalizeDouble(Bid,Digits)<NormalizeDouble(OrderOpenPrice()-TrailingStop*point,Digits))  
            {                 
               if((NormalizeDouble(OrderStopLoss(),Digits)>(NormalizeDouble(Ask+TrailingStop*point,Digits)))||(OrderStopLoss()==0))
               {
                   modify=OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(Ask+TrailingStop*point,Digits),OrderTakeProfit(),0,Red);
               }
            }
         }
      }
   }
}
void MoveBreakEven()
{
   for(int cnt=0;cnt<OrdersTotal();cnt++)
   {
      bool select=OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
      if(OrderType()<=OP_SELL&&OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
      {
         if(OrderType()==OP_BUY)
         {
            if(BreakEven>0)
            {
               if(NormalizeDouble((Bid-OrderOpenPrice()),Digits)>BreakEven*point)
               {
                  if(OrderStopLoss()==0||OrderStopLoss()<OrderOpenPrice()+BreakEvenPips*point)
                  {
                
                    bool modify= OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(OrderOpenPrice()+BreakEvenPips*point,Digits),OrderTakeProfit(),0,Blue);
                  }
               }
            }
         }
         else
         {
            if(BreakEven>0)
            {
               if(NormalizeDouble((OrderOpenPrice()-Ask),Digits)>BreakEven*point)
               {
                  if(OrderStopLoss()==0||OrderStopLoss()>OrderOpenPrice()-BreakEvenPips*point)
                  {
                    
                     modify= OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(OrderOpenPrice()-BreakEvenPips*point,Digits),OrderTakeProfit(),0,Red);
                  }
               }
            }
         }
      }
   }
}

الشكر والتقدير لك استاذى الكريم
شكرا على المساعده
تحياتى

الموضوع: موضوع مخصص للأسئلة البرمجية

أدوات الموضوع

مساعدة من فضلكم

المواضيع المتشابهه

موضوع مخصص للاكسبيرتات اللتي يستخدمها الاعضاء على الحقيقي,,عندك اكسبيرت ممتاز ضعه هنا

عااااااااااااجل ( موضوع مخصص للفرص الفورية)!!!

الاوسمة لهذا الموضوع

عروض شركات الفوركس