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

[MR.dollar]

استاذ اسامه كيف يمكن اضافة كد التالي او ما يشابه و هو الكد الذي يبحث عن اقرب استوب و هدف تتقبله البروكر لمنع ظهور خطاء 4107 او 130.. في الاكسبيرت المرفق في الموضوع التالي و ايضا المشكله في خيار المضاعفات مش يعمل ارجوا تصحيحه :
https://forum.arabictrader.com/t212681.html

SL=MathMax(SL,l_price_52+(MarketInfo(Symbol(),MODE _STOPLEVEL)+triedN)*g_point_100)

TP=MathMin(TP,l_price_52-(MarketInfo(Symbol(),MODE_STOPLEVEL)+triedN)*g_poi nt_100)

مثال

  int ticket;
     while(ticket<0)
     {
      if(Order_Type==OP_BUY||Order_Type==OP_BUYLIMIT||Order_Type==OP_BUYSTOP)SL=MathMin(SL,Order_Price-triedN)*point;
      else 
        SL=MathMax(SL,Order_Price+triedN)*point;
      if(Order_Type==OP_BUY||Order_Type==OP_BUYLIMIT||Order_Type==OP_BUYSTOP)TP=MathMax(TP,Order_Price+triedN)*point;
      else 
        TP=MathMin(TP,Order_Price-triedN)*point;
       ticket=OrderSend(Order_Symbol,Order_Type,Order_Lots,Order_Price,3*P,SL,TP,IntegerToString(Order_Ticket),MagicNumber,0,White);
      triedN++;
      if(triedN>20||ticket>0)break;
     } 
  

الفكره في أنك كل مره سوف تقوم بزيادة الأستوب أو الهدف نقطه حتى يقبل البروكر وضع الهدف والأستوب الجديد

[193_raafat]

السلام عليكم استاذى الفاضل مستر دولار
ارجوا من سيادتكم والتكرم باضافة بعض الاوامر لاكسيبرت من تصميم حضرتك وهو اكسيبرت رائع اسمة MR.dollar_Nidalo EA V5.1 وانا بستخدم نفس المؤشر من مدة ووجدت الاكسيبرت بتاع حضرتك وبستخدمة لفتح الاوامر . لذلك اردت ان احيك اولا على عطائك وكرم اخلاقك وجعلة الله فى ميزان حسناتك . بالنسبة لى بستخدم المضاعفات لذلك ارجوا اضافة .
1- عند تفعيل مثلا آمر شراء من R1 بقيمة مثلا 0.01 لوت واستمر هبوط السعر فتم فتح آمر شراء من R2 بقيمة 0.02 لوت يتم تغير التاك بريفيت فا R2 تغلق من نفس نقطة R1 و R1 تغلق على نفس مكانها اى صفر ربح وبالتالى مجموع الارباح هو R2 الى R1 لحد كدة تمام طب لو السعر هبط ووصل لخط R3 بقيمة 0.04 لوت وبداء الصعود نفس الشئ بمجرد فتح امر الشراء التاك بريفيت يتغير فيكون R3 تغلق عند خط R2 و R2 تغلق من نفس سعرها اى صفر ربح و R1 تغلق فى سعر R2 بخسارة قيمتها 0.01 لوت وهكذا بالنسبة لباقى الخطوط .
2- نفس الشئ بالنسبة للبيع S1 بيع يغلق في نفس S1 و S2 يغلق في S1 بربح وبدون خسائر . صعد السعر وتم تفعيل بيع S3
وهبط فا S3 يغلق على سعر S2 بربح طبعا 0.04 لوت و S2 تغلق من نفس مكانها اى صفر (سعر دخول الصفقة) و S1 تغلق في خط سعر S2 على خسارة . نفرض السعر بعد فتح البيع من S3 بقيمة 0.04 ظل صاعد ووصل لخط بيع S4 0.08 لوت وبدء الهبوط فا S4 يغلق في خط سعرS3 و S3 يغلق من نفس سعر فتح الصفقة اى على نفسة اى ربح صفر. و S2 يغلق في خط S3 بخسارة و S1 يغلق في خط S2 بخسارة وهكذا باقى الخطوط.
شكرا لسعة صدرك وارجوا ان أكون استطعت التوضيح
السلام عليكم وشكرا لحضرتك

[amazing]

مثال

  int ticket;
     while(ticket<0)
     {
      if(Order_Type==OP_BUY||Order_Type==OP_BUYLIMIT||Order_Type==OP_BUYSTOP)SL=MathMin(SL,Order_Price-triedN)*point;
      else 
        SL=MathMax(SL,Order_Price+triedN)*point;
      if(Order_Type==OP_BUY||Order_Type==OP_BUYLIMIT||Order_Type==OP_BUYSTOP)TP=MathMax(TP,Order_Price+triedN)*point;
      else 
        TP=MathMin(TP,Order_Price-triedN)*point;
       ticket=OrderSend(Order_Symbol,Order_Type,Order_Lots,Order_Price,3*P,SL,TP,IntegerToString(Order_Ticket),MagicNumber,0,White);
      triedN++;
      if(triedN>20||ticket>0)break;
     } 
  

الفكره في أنك كل مره سوف تقوم بزيادة الأستوب أو الهدف نقطه حتى يقبل البروكر وضع الهدف والأستوب الجديد

الف شكر استاذ اسامه و لكن يبدوا الكد الاعلى خاص بلصفقات الشراء فقط و لم يتم اضافة كد البيع ايضا في الاكسبيرت الناسخ في الموضوع التالي و ثانيا بعد اضافة التعديلات الاكسبيرت لم يفتح صفقات ارجوا النظر
https://forum.arabictrader.com/t212681.html

[MR.dollar]

السلام عليكم استاذى الفاضل مستر دولار
ارجوا من سيادتكم والتكرم باضافة بعض الاوامر لاكسيبرت من تصميم حضرتك وهو اكسيبرت رائع اسمة MR.dollar_Nidalo EA V5.1 وانا بستخدم نفس المؤشر من مدة ووجدت الاكسيبرت بتاع حضرتك وبستخدمة لفتح الاوامر . لذلك اردت ان احيك اولا على عطائك وكرم اخلاقك وجعلة الله فى ميزان حسناتك . بالنسبة لى بستخدم المضاعفات لذلك ارجوا اضافة .
1- عند تفعيل مثلا آمر شراء من R1 بقيمة مثلا 0.01 لوت واستمر هبوط السعر فتم فتح آمر شراء من R2 بقيمة 0.02 لوت يتم تغير التاك بريفيت فا R2 تغلق من نفس نقطة R1 و R1 تغلق على نفس مكانها اى صفر ربح وبالتالى مجموع الارباح هو R2 الى R1 لحد كدة تمام طب لو السعر هبط ووصل لخط R3 بقيمة 0.04 لوت وبداء الصعود نفس الشئ بمجرد فتح امر الشراء التاك بريفيت يتغير فيكون R3 تغلق عند خط R2 و R2 تغلق من نفس سعرها اى صفر ربح و R1 تغلق فى سعر R2 بخسارة قيمتها 0.01 لوت وهكذا بالنسبة لباقى الخطوط .
2- نفس الشئ بالنسبة للبيع S1 بيع يغلق في نفس S1 و S2 يغلق في S1 بربح وبدون خسائر . صعد السعر وتم تفعيل بيع S3
وهبط فا S3 يغلق على سعر S2 بربح طبعا 0.04 لوت و S2 تغلق من نفس مكانها اى صفر (سعر دخول الصفقة) و S1 تغلق في خط سعر S2 على خسارة . نفرض السعر بعد فتح البيع من S3 بقيمة 0.04 ظل صاعد ووصل لخط بيع S4 0.08 لوت وبدء الهبوط فا S4 يغلق في خط سعرS3 و S3 يغلق من نفس سعر فتح الصفقة اى على نفسة اى ربح صفر. و S2 يغلق في خط S3 بخسارة و S1 يغلق في خط S2 بخسارة وهكذا باقى الخطوط.
شكرا لسعة صدرك وارجوا ان أكون استطعت التوضيح
السلام عليكم وشكرا لحضرتك

وعليكم السلام ورحمة الله وبركاته
ضع رد في نفس موضوع الإكسبرت أخي العزيز حتى يكون التعديل في نفس الموضوع

[صلاح الدين الفوركساوى]

ممكن تلقى نظرة مشرفنا الحبيب على هذا الاكسبيرت

https://forum.arabictrader.com/t212027.html

المطلوب تعديل اقل ما يقال عنه انه بسيط جدا

منتظر دعمك اخى العزيز

[raamee]

الكود صحيح قم بوضعه في بداية الداله start او OnCalculate حسب الداله التي تستخدمها
بالنسبه للعمل على ديمو فقط فقم بإضافة الشرط

 if(IsDemo()==false)return(0); 
  

شكرا جزيلا لك اخي الكريم مستر دولار وجعلها في ميزان حسناتك
طلب اخير اخي الغالي ان لم يكن عليك امرا ًهل ممكن مثال توضيحي لطريقة وضع الامر اعلاه في بداية الدالة start وطريقه حفظ التغيير . ليتسفيد منها اي سائل اخر مستقبلا مع خالص شكري وتقديري

[first_knight]

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

//+------------------------------------------------------------------+
//|                                              Moving Avreg EA.mq4 |
//|                        Copyright 2014, MetaQuotes Software Corp. |
//|                                             https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "Copyright 2014, MetaQuotes Software Corp."
#property link      "https://www.mql5.com"
#property version   "1.00"
#property strict


//اعدادات الموفينج السريع
extern string  Fast_Moving_Average_Setting;      
extern int     FastMA_Period        = 5;
extern int     FastMA_Shift         = 0;
extern int     FastMA_Method        = 3;
extern int     FastMA_AppliedPrice  = 0;

//اعدادات الموفينج البيطئ
extern string  Slow_Moving_Average_Setting;
extern int     SlowMA_Period        = 14;
extern int     SlowMA_Shift         = 3;
extern int     SlowMA_Method        = 1;
extern int     SlowMA_AppliedPrice  = 0;

// اعدادات موفينج الفلترة
extern string  Filter_Moving_Average_Setting;
extern int     MA_200_Period        = 200;
extern int     MA_200_Shift         = 0;
extern int     MA_200_Method        = 2;
extern int     MA_200_AppliedPrice  = 0;


//اخذ الربح ووقف الخسارة وحجم العقد
extern string  Order_Management;
extern int     Take_Profit           = 4;
extern int     Stop_loss             = 22;
extern double  Manual_Lot                  = 0.1;

// رقم الماجيك للاكسبيرت
extern int     Magic_Number         = 12345; 
         
//متغير قيمة النقطة
double A;                                   
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
    A = 1;                                 //--- قيمة النقطة في المنصة الرباعية = 1
   if(Digits == 5 || Digits == 3)(A=10);  //--- قيمة النقطة في المنصة الخماسية = 10
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---
   
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {

   //---
   double FastMA_1  = iMA(Symbol(), 0, FastMA_Period, FastMA_Shift, FastMA_Method, FastMA_AppliedPrice, 1);  // قيمة الموفينج السريع للشمعة رقم 1
   double FastMA_2  = iMA(Symbol(), 0, FastMA_Period, FastMA_Shift, FastMA_Method, FastMA_AppliedPrice, 2);  // قيمة الموفينج السريع للشمعة رقم 2
   
   double SlowMA_1  = iMA(Symbol(), 0, SlowMA_Period, SlowMA_Shift, SlowMA_Method, SlowMA_AppliedPrice, 1);  // قيمة الموفينج البطيئ للشمعة رقم 1
   double SlowMA_2  = iMA(Symbol(), 0, SlowMA_Period, SlowMA_Shift, SlowMA_Method, SlowMA_AppliedPrice, 2);  // قيمة الموفينج البطيئ للشمعة رقم 2 
  
   double MA_200    = iMA(Symbol(), 0, MA_200_Period, MA_200_Shift, MA_200_Method, MA_200_AppliedPrice, 1);  // قيمة الموفينج 200
   
   if(FastMA_2<SlowMA_2 &&  FastMA_1>SlowMA_1)           
   if(OrdersTotal() == 0) 
   {                                                               
     bool asd = OrderSend(Symbol(),OP_BUY,Manual_Lot,Ask,3,Ask-(Stop_loss*A),Ask+(Take_Profit*A),"Abukareem",Magic_Number,0,Blue); // امر شراء
   }
   if(FastMA_2>SlowMA_2 && FastMA_1<SlowMA_1)            
   if(OrdersTotal() == 0)
   {                                   
     bool asd = OrderSend(Symbol(),OP_SELL,Manual_Lot,Bid,3,Bid+(Stop_loss*A),Bid-(Take_Profit*A),"Abukareem",Magic_Number,0,Red); // امر بيع
   }
      //
  }
//+------------------------------------------------------------------+

[amazing]

تم معرفة سبب توقف الاكسبيرت عن العمل

بتاع الموضوع التالي:

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

int triedN; int ticket;
while(ticket<0)
{
if(Order_Type==OP_BUY||Order_Type==OP_BUYLIMIT||Or der_Type==OP_BUYSTOP)SL=MathMin(SL,Order_Price-triedN)*point;
else
SL=MathMax(SL,Order_Price+triedN)*point;
if(Order_Type==OP_BUY||Order_Type==OP_BUYLIMIT||Or der_Type==OP_BUYSTOP)TP=MathMax(TP,Order_Price+tri edN)*point;
else
TP=MathMin(TP,Order_Price-triedN)*point;
ticket=OrderSend(Order_Symbol,Order_Type,Order_Lot s,Order_Price,3*P,SL,TP,IntegerToString(Order_Tick et),MagicNumber,0,White);
triedN++;
if(triedN>20||ticket>0)break;
}

https://forum.arabictrader.com/t212681.html

[اعصار ريتا]

السلام عليكم
افيدوني كيف يقرا الكود التالي وهل هو صحيح ليعمل الاتي الشراء عندما rsi اكبر من السبعين اوالشراء عندما rsi اصغر من الثلاثين عند تفعيل فلتر الار اس اي

if (( rsi>70 && usersifilter==true) || (rsi<30 && usersifilter==true))=======open buy

[amazing]

اخي مستر اسامه هناك طريقه اخرى لمنع حدوث اخطاء 4107 و 130 و 129و......
بدل اضافة الكدالتالي بتاعك الذي سبب في توقف عمل الاكسبيرت

int triedN; int ticket;
while(ticket<0)
{
if(Order_Type==OP_BUY||Order_Type==OP_BUYLIMIT||Or der_Type==OP_BUYSTOP)SL=MathMin(SL,Order_Price-triedN)*point;
else
SL=MathMax(SL,Order_Price+triedN)*point;
if(Order_Type==OP_BUY||Order_Type==OP_BUYLIMIT||Or der_Type==OP_BUYSTOP)TP=MathMax(TP,Order_Price+tri edN)*point;
else
TP=MathMin(TP,Order_Price-triedN)*point;
ticket=OrderSend(Order_Symbol,Order_Type,Order_Lot s,Order_Price,3*P,SL,TP,IntegerToString(Order_Tick et),MagicNumber,0,White);
triedN++;
if(triedN>20||ticket>0)break;
}

اخي بكفي ان تقارن بين الهدف او الاستوب و بين اقل قيمة مقبولة و تأخذ الاكبر منها
يعني تشترط
لو كان الاستوب اقل من القيمة المقبولة اعتمد القيمة المقبولة
ان كانت القيمة المقبولة
فيمكن استخدام الكد التالي:
MarketInfo(Symbol(),MODE _STOPLEVEL)
فتقول

double sl=SL;
if(sl<MarketInfo(Symbol(),MODE _STOPLEVEL))sl=MarketInfo(Symbol(),MODE _STOPLEVE

ارجوا النظر بلموضوع التالي لازالة الخطاء
https://forum.arabictrader.com/t212681.html

[MR.dollar]

السلام عليكم
افيدوني كيف يقرا الكود التالي وهل هو صحيح ليعمل الاتي الشراء عندما rsi اكبر من السبعين اوالشراء عندما rsi اصغر من الثلاثين عند تفعيل فلتر الار اس اي

if (( rsi>70 && usersifilter==true) || (rsi<30 && usersifilter==true))=======open buy

وعليكم السلام ورحمة الله وبركاته
نعم الكود صحيح أو يمكنك إختصاره ليصبح

 if (( rsi>70 || rsi<30) && usersifilter==true)=======open buy 
  

[صلاح الدين الفوركساوى]

للتذكير بهذا الموضوع للاهميه القصوي مشرفنا الغالي

https://forum.arabictrader.com/t212027.html

[MR.dollar]

اخي مستر اسامه هناك طريقه اخرى لمنع حدوث اخطاء 4107 و 130 و 129و......
بدل اضافة الكدالتالي بتاعك الذي سبب في توقف عمل الاكسبيرت


اخي بكفي ان تقارن بين الهدف او الاستوب و بين اقل قيمة مقبولة و تأخذ الاكبر منها
يعني تشترط
لو كان الاستوب اقل من القيمة المقبولة اعتمد القيمة المقبولة
ان كانت القيمة المقبولة
فيمكن استخدام الكد التالي:
MarketInfo(Symbol(),MODE _STOPLEVEL)
فتقول


ارجوا النظر بلموضوع التالي لازالة الخطاء
https://forum.arabictrader.com/t212681.html

سوف أقوم بتعديله

[amazing]

سوف أقوم بتعديله

بانتظارك ياباشا والله صارلي 4 اشهر انتظرازالة النواقص البسيطه في الناسخ و شكرا

[سمير محمد ارمان]

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

  switch (MarketInfo(Symbol(), MODE_MINLOT)) {
   case 0.001:
      gd_696 = 3;
      break;
   case 0.01:
      gd_696 = 2;
      break;
   case 0.1:
      gd_696 = 1;
      break;
   case 1.0:
      gd_696 = 0;
   }