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

[first_knight]

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

 extern int     Breakeven_Pips       = 5;      // عدد النقاط التي سيعمل عندها البريك ايفن
extern int     Magic_Number         = 123456;     
//متغير قيمة النقطة
double T;    
 
                                     
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
 
   double Ticksize = MarketInfo (Symbol(),MODE_TICKSIZE);      //كود حساب قيمة النقطة
   if(Ticksize == 0.00001 || 0.001)
   T = Ticksize*10;
   else
   T = Ticksize;   
    
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---
   
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
    if(Breakeven_Pips > 0)BreakEven();   //--- استدعاء دالة البريك ايفن
  
  }
//+------------------------------------------------------------------+
 
 void BreakEven()     //---وظيفة لتحريك البريك ايفن
 { 
        for(int b = OrdersTotal()-1; b >= 0; b--)             // حلقة تكريرية للبحث عن الصفقات المطلوبة
     {
       if(OrderSelect(b,SELECT_BY_POS,MODE_TRADES))         // البحث في الصفقات المفتوحة
       if(OrderSymbol()== Symbol())                        //  البحث عن زروج العملات المشغل علية الاكسبيرت  
       if(OrderMagicNumber()== Magic_Number)              // لها نفس المجك نمر للاكسبيرت
       if(OrderType()== OP_BUY)                          // البحث في صفقات اشراء
       if(Bid-OrderOpenPrice() > Breakeven_Pips*T)      // اذا كان السغر اكبر من عدد نقاط تحريك البريك
       if(OrderOpenPrice() > OrderStopLoss())          // نتاكد من عدم عمل بريك ايفن من قيل
         
       OrderModify(OrderTicket(),OrderOpenPrice(),OrderOpenPrice(),OrderTakeProfit(),0,CLR_NONE); //-امر مودي فاي بريك ايفن
     }
 
 
             for(int i = OrdersTotal()-1; i >= 0; i--)             // حلقة تكريرية للبحث عن الصفقات المطلوبة
          {
             if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))        // البحث في الصفقات المفتوحة
             if(OrderSymbol()== Symbol())                       //  البحث عن زروج العملات المشغل علية الاكسب
             if(OrderMagicNumber()== Magic_Number)             // لها نفس المجك نمر للاكس
             if(OrderType()== OP_SELL)                        // البحث في صفقات البيع
             if(OrderOpenPrice()-Ask > Breakeven_Pips*T)     // اذا كان السغر اكبر من عدد نقاط تحريك البر
             if(OrderOpenPrice() < OrderStopLoss())         // نتاكد من عدم عمل بريك ايفن من قيل
        
             OrderModify(OrderTicket(),OrderOpenPrice(),OrderOpenPrice(),OrderTakeProfit(),0,CLR_NONE); //-امر مودي فاي بريك ايفن
          }
   
 } 
  

[MR.dollar]

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

 extern int     Breakeven_Pips       = 5;      // عدد النقاط التي سيعمل عندها البريك ايفن
extern int     Magic_Number         = 123456;     
//متغير قيمة النقطة
double T;    
 
                                     
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
 
   double Ticksize = MarketInfo (Symbol(),MODE_TICKSIZE);      //كود حساب قيمة النقطة
   if(Ticksize == 0.00001 || 0.001)
   T = Ticksize*10;
   else
   T = Ticksize;   
    
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---
   
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
    if(Breakeven_Pips > 0)BreakEven();   //--- استدعاء دالة البريك ايفن
  
  }
//+------------------------------------------------------------------+
 
 void BreakEven()     //---وظيفة لتحريك البريك ايفن
 { 
        for(int b = OrdersTotal()-1; b >= 0; b--)             // حلقة تكريرية للبحث عن الصفقات المطلوبة
     {
       if(OrderSelect(b,SELECT_BY_POS,MODE_TRADES))         // البحث في الصفقات المفتوحة
       if(OrderSymbol()== Symbol())                        //  البحث عن زروج العملات المشغل علية الاكسبيرت  
       if(OrderMagicNumber()== Magic_Number)              // لها نفس المجك نمر للاكسبيرت
       if(OrderType()== OP_BUY)                          // البحث في صفقات اشراء
       if(Bid-OrderOpenPrice() > Breakeven_Pips*T)      // اذا كان السغر اكبر من عدد نقاط تحريك البريك
       if(OrderOpenPrice() > OrderStopLoss())          // نتاكد من عدم عمل بريك ايفن من قيل
         
       OrderModify(OrderTicket(),OrderOpenPrice(),OrderOpenPrice(),OrderTakeProfit(),0,CLR_NONE); //-امر مودي فاي بريك ايفن
     }
 
 
             for(int i = OrdersTotal()-1; i >= 0; i--)             // حلقة تكريرية للبحث عن الصفقات المطلوبة
          {
             if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))        // البحث في الصفقات المفتوحة
             if(OrderSymbol()== Symbol())                       //  البحث عن زروج العملات المشغل علية الاكسب
             if(OrderMagicNumber()== Magic_Number)             // لها نفس المجك نمر للاكس
             if(OrderType()== OP_SELL)                        // البحث في صفقات البيع
             if(OrderOpenPrice()-Ask > Breakeven_Pips*T)     // اذا كان السغر اكبر من عدد نقاط تحريك البر
             if(OrderOpenPrice() < OrderStopLoss())         // نتاكد من عدم عمل بريك ايفن من قيل
        
             OrderModify(OrderTicket(),OrderOpenPrice(),OrderOpenPrice(),OrderTakeProfit(),0,CLR_NONE); //-امر مودي فاي بريك ايفن
          }
   
 } 
  

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

 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 action=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))
               {
                  action=OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(Ask+TrailingStop*point,Digits),OrderTakeProfit(),0,Red);
               }
            }
         }
      }
   }
} 
  

[Jmeel]

شكرا أخي جميل ..
المؤشر كما هو يرسم الكثير من الأسهم و أسهم البيع فقط دون الإلتزام بالشروط
هل الدوال صحيحه ؟ المفروض أن كل داله خارجيه تبحث عن تحقق الشروط الموضوعه بداخلها خلال 5 شمعات سابقه و هم ّأربع دوال
ووضعت شرط رسم السهم لو عادت كل داله بترو يرسم سهم شراء و فولص يرسم سهم بيع .. ولكن المؤشر لا يفعل >لك !!
هل من الممكن مراجعته مره أخرى أخي جميل
وشكرا مره أخرى .

إن شاء الله يساعدك أستاذي مستر دولار

[kingsendbad]

ارجوا منك تعديل المؤشر لكى لا يظهر اى سهم الا فى حاله ضرب الهدف او الاستوب 10 نقاط

بمعنى اذا اكتملت شروط الشراء ورسم السهم ... لا يرسم سهم اخر سواء سهم صاعد او هابط
الا بعد ان يضرب الهدف 10 نقاط او استوب 10 نقاط

وبدلا من ذلك اذا تحققت الشروط ولم يكن قد حقق الهدف او الاستوب يرسم
(علامه اكس خضراء لاشاره الشراء وعلامه اكس حمراء لاشاره البيع)

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

تحياتى

لا اله الا الله

[first_knight]

بارك الله فيك مستر دولار

[MR.dollar]

شكرا أخي جميل ..
المؤشر كما هو يرسم الكثير من الأسهم و أسهم البيع فقط دون الإلتزام بالشروط
هل الدوال صحيحه ؟ المفروض أن كل داله خارجيه تبحث عن تحقق الشروط الموضوعه بداخلها خلال 5 شمعات سابقه و هم ّأربع دوال
ووضعت شرط رسم السهم لو عادت كل داله بترو يرسم سهم شراء و فولص يرسم سهم بيع .. ولكن المؤشر لا يفعل >لك !!
هل من الممكن مراجعته مره أخرى أخي جميل
وشكرا مره أخرى .

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

 for (i=limit;i>=1;i--) { 
  

والداله الثانيه خاصة بالبحث عن الشروط المتحققه

 for(int i=5;i>Bars;i--){ 
  

وهذا خطأ
مرفق المؤشر قمت بتعديله لك

[dentist_hussein]

إن شاء الله يساعدك أستاذي مستر دولار

شكرا جزيلا أخي جميل و جزاك الله كل خير .

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

 for (i=limit;i>=1;i--) { 
  

والداله الثانيه خاصة بالبحث عن الشروط المتحققه

 for(int i=5;i>Bars;i--){ 
  

وهذا خطأ
مرفق المؤشر قمت بتعديله لك

تمام أستاذي العزيز و شكرا جزيلا
لكن المؤشر الآن يقوم برسم أسهم ليس لها علاقه بالشروط .. ارجو الإطلاع عليه بارك الله فيك أستاذي

[MR.dollar]

شكرا جزيلا أخي جميل و جزاك الله كل خير .

تمام أستاذي العزيز و شكرا جزيلا
لكن المؤشر الآن يقوم برسم أسهم ليس لها علاقه بالشروط .. ارجو الإطلاع عليه بارك الله فيك أستاذي

ما هي الشروط التي تقصدها عندما قمت بعمل المؤشر

[dentist_hussein]

ما هي الشروط التي تقصدها عندما قمت بعمل المؤشر

جمعه مباركه باشمهندس أسامه ..
هم أربع شروط وكل داله تبحث عن تحقق شرط في خمس شمعات سابقه ;
- تقاطع الموفينج 4 مع منتصف البولنجر لأعلى ..
- مؤشر القوة النسبيه يقطع مستوى ال50 لأعلى ..
- تكون نقطة بارابوليك اسفل الشمعة ..
- تخترق شمعه منتصف البولنجر ..
و العكس في السهم الأحمر .

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

السلام عليكم الاخوة الكرام
عندى سؤال برمجى
فى المرفقات مؤشر الماكد
كيف يتم عمل تغير لون بار المؤشر عندما يكون اكبر من صفر يكون لونه اخضر وتحت الصفر يكون احمر
ولكم الشكر والتقدير

[MR.dollar]

جمعه مباركه باشمهندس أسامه ..
هم أربع شروط وكل داله تبحث عن تحقق شرط في خمس شمعات سابقه ;
- تقاطع الموفينج 4 مع منتصف البولنجر لأعلى ..
- مؤشر القوة النسبيه يقطع مستوى ال50 لأعلى ..
- تكون نقطة بارابوليك اسفل الشمعة ..
- تخترق شمعه منتصف البولنجر ..
و العكس في السهم الأحمر .

طيب سآخذ دالة واحده فقط كمثال دالة تحقق شرط الآر إس آي

 bool rsi(int shift){
bool CASE;
 for(int i=shift;i>shift-5;i--){
 double rsi1=iRSI(NULL, 0, 14, PRICE_CLOSE,i);
 double rsi2=iRSI(NULL, 0, 14, PRICE_CLOSE,i+1);
 
 if(rsi2<50 && rsi1>50){CASE=true;} 
 else if(rsi2>50 && rsi1<50){CASE=false;}
  }
   
return(CASE);
 } 
  

أنت تريد تحقق الشرط في أي شمعه من الخمس شمعات بالتالي إذا تحقق الشرط سوف ينهي الحلقه وتكون القيمه ترو
سوف تجعل الشروط

 bool rsi(int shift){
bool CASE;
 for(int i=shift;i>shift-5;i--){
 double rsi1=iRSI(NULL, 0, 14, PRICE_CLOSE,i);
 double rsi2=iRSI(NULL, 0, 14, PRICE_CLOSE,i+1);
 
 if(rsi2<50 && rsi1>50){return(true);} 
 else if(rsi2>50 && rsi1<50){CASE=false;}
  }
   
return(CASE);
 } 
  

وطبق المثال على جميع الدوال الأخرى

[MR.dollar]

السلام عليكم الاخوة الكرام
عندى سؤال برمجى
فى المرفقات مؤشر الماكد
كيف يتم عمل تغير لون بار المؤشر عندما يكون اكبر من صفر يكون لونه اخضر وتحت الصفر يكون احمر
ولكم الشكر والتقدير

سوف تقوم بعمل مخزن آخر buffer ويكون لكل مخزن لون محدد فإذا كانت قيمة الماكد أكبر من صفر سوف يأخذ المخزن الأخضر مثلا هذه القيمه ويصبح المخزن الثاني يساوي صفر
وإذا كانت القيمة الماكد أصغر من صفر سوف يأخذ المخزن الأحمر هذه القيمه ويصبح المخزن الأخضر يساوي صفر

مثال راجع المؤشر المرفق

[brahimoooo]

السلام عليكم و رحمة الله وبركاته
اخي و استادي الفاضل لي طلب و اتمنى ان تساعدني فيه و هو :
كيف استطيع ان اجعل الاكسبرت يفتح مجموعة من الصفقات لكن بالترتيب التالي:
عند ظهور الاشارة المعتمدة يفتح ثلات صفقات مثلا
buy 1
buy 2
buy 3
ثم يتوقف و ينتظر ظهور الاشارة مرة اخرى و يفتح :
buy 4
buy 5
buy 6
ثم يتوقف و ينتظر ظهور الاشارة مرة اخرى و يفتح :
buy 7
buy 8
buy 9
ثم يتوقف و ينتظر ظهور الاشارة مرة اخرى و يعيد الكرة من جديد اي يفتح :
buy 1
buy 2
buy 3

* و ان يكون لكل صفقة ماجين نامبر خاص بها

فالكسبرت الدي صنعته لم استطع جعله يفتح الصفقات بهدا الترتيب فيقوم بفتحها كلها عند ظهور الاشارة اول مرة :buy 1-buy 2-buy 3-buy 4-buy 5-buy 6-buy 7-buy 8-buy 9
اتمنى من كل قلبي ان تتكرم علي بالحل
ونفعنا الله بعلمك وشكرا...

[dentist_hussein]

جمعه مباركه باشمهندس أسامه ..
هم أربع شروط وكل داله تبحث عن تحقق شرط في خمس شمعات سابقه ;
- تقاطع الموفينج 4 مع منتصف البولنجر لأعلى ..
- مؤشر القوة النسبيه يقطع مستوى ال50 لأعلى ..
- تكون نقطة بارابوليك اسفل الشمعة ..
- تخترق شمعه منتصف البولنجر ..
و العكس في السهم الأحمر .

طيب سآخذ دالة واحده فقط كمثال دالة تحقق شرط الآر إس آي

 bool rsi(int shift){
bool CASE;
*for(int i=shift;i>shift-5;i--){
*double rsi1=iRSI(NULL, 0, 14, PRICE_CLOSE,i);
*double rsi2=iRSI(NULL, 0, 14, PRICE_CLOSE,i+1);
*
*if(rsi2<50 && rsi1>50){CASE=true;}*
*else if(rsi2>50 && rsi1<50){CASE=false;}
* }
* *
return(CASE);
*}
* 
  

أنت تريد تحقق الشرط في أي شمعه من الخمس شمعات بالتالي إذا تحقق الشرط سوف ينهي الحلقه وتكون القيمه ترو*
سوف تجعل الشروط*

 bool rsi(int shift){
bool CASE;
*for(int i=shift;i>shift-5;i--){
*double rsi1=iRSI(NULL, 0, 14, PRICE_CLOSE,i);
*double rsi2=iRSI(NULL, 0, 14, PRICE_CLOSE,i+1);
*
*if(rsi2<50 && rsi1>50){return(true);}*
*else if(rsi2>50 && rsi1<50){CASE=false;}
* }
* *
return(CASE);
*} 
  

وطبق المثال على جميع الدوال الأخرى

شكرا أستاذ أسامه
و جزاك الله كل خير
بدأ يرسم السهم حسب الشروط و لكن بعض الأحيان لا يرسم السهم رغم توفر الشروط و أحيانا يرسمه متأخر قليلا و يقوم بتكرير الأسهم الحمراء كثيرا و الحمراء فقط !!
حاولت ان أجعل الداله هكذا

 bool rsi(int shift){
 
 for(int i=shift;i>shift-5;i--){
 double rsi1=iRSI(NULL, 0, 14, PRICE_CLOSE,i);
 double rsi2=iRSI(NULL, 0, 14, PRICE_CLOSE,i+1);
 
 if(rsi2<50 && rsi1>50){return(true);} 
 else if(rsi2>50 && rsi1<50){return(false);}
  break ;
  }
return(-3);
 } 
  

ولكن نفس المشكله فأعدتها كما نصحتني بها

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

سوف تقوم بعمل مخزن آخر buffer ويكون لكل مخزن لون محدد فإذا كانت قيمة الماكد أكبر من صفر سوف يأخذ المخزن الأخضر مثلا هذه القيمه ويصبح المخزن الثاني يساوي صفر
وإذا كانت القيمة الماكد أصغر من صفر سوف يأخذ المخزن الأحمر هذه القيمه ويصبح المخزن الأخضر يساوي صفر

مثال راجع المؤشر المرفق

السلام عليكم استاذى الكريم
اولا شكرا على المساعدة الكريمة من شخصك الكريم
وارجو المعذرة
لو ممكن وضع طريقة تغير اللون فى المؤشر الخاص بى
علشان المؤشر الخاص بيك
فى اخطا برمجية ومش عارف اعمل المؤشر
لو ممكن اكون لك شاكر
ولك الشكر والتقدير