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

[MR.dollar]

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

   double LastBuyPip , LastSellPip ;
  
    
      if(OrdersTotal()>0)
      {
       for(int i =OrdersTotal()-1;i>=0;i--){
      OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
       if(OrderSymbol()==Symbol() &&  MagicNumber==OrderMagicNumber()){
       if(OrderType()==OP_BUY ){
        LastBuyPip=(NormalizeDouble(OrderOpenPrice()-Bid),digits) ;
        }
       if(OrderType()==OP_SELL ){
        LastSellPip=(NormalizeDouble(Ask-OrderOpenPrice()),digits) ;
        }
         
       }
      }
     } 
  

ايضا في الاكسبيرت هناك مضاعفات في حال هناك عقود خاسره ...
لكن الاكسبيرت يستمر في المضاعفات بعد تحقق الهدف والبدء بفتح عقد جديد !

   double Lots=0.1
  double Loty()
  {
             double Lott=0 ;
             if(OrdersTotal()>=1){
      for(int s =0;s<OrdersTotal();s++){
     if(OrderSelect(s,SELECT_BY_POS,MODE_TRADES)){
      if(OrderSymbol()==Symbol() &&  MagicNumber==OrderMagicNumber()){
           Lott=Lott+OrderLots();
           }
          }
          }
          return(Lott);
        }
         
        else return(Lots);
   } 
  

محتاج مساعد لو سمحت يا مستر دولار
وجزاكم الله خيرا

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

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

إجعله بهذا الشكل

   double LastBuyPip , LastSellPip ;
     if(OrdersTotal()>0)
      {
       for(int i =0;i<=OrdersTotal();i++){
      OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
       if(OrderSymbol()==Symbol() &&  MagicNumber==OrderMagicNumber()){
       if(OrderType()==OP_BUY ){
        LastBuyPip=(NormalizeDouble(OrderOpenPrice()-Bid),digits) ;
        }
       if(OrderType()==OP_SELL ){
        LastSellPip=(NormalizeDouble(Ask-OrderOpenPrice()),digits) ;
        }
         
       }
      }
     } 
  

وهذا سيحل المشكله لكن طبعا الكود السابق سوف يكون الفرق على سيكون بالنقاط فمثلا سيكون الفرق 0.0050
وإذا أردت جعله عدد صحيح يجب أن تقسم الناتج على قيمة النقطة LastSellPip/Point

بالنسبه للكود الآخر فهو صحيح لكن ربما المشكله ليست في الداله نفسها تأكد من شروط الدخول التي قمت بوضعها
إستخدم الأمر print لطباعة النتائج عند عمل باك تست وحاول تتبع الأرقام التي تظهر عندك حتى تعلم سبب الخطأ

[MR.dollar]

السلام عليكم
اخي مستر دولار عندي سؤال بسيط :
كيف استخدم الفالس والترو

مثلا

 if(a1==fals){} 
  

كذا ما نفع طيب كيف :

على سبيل المثال

 if(rsi>50)buy=true;
    
    if(buy==true){
    // Open Buy 
    }
    if(buy){
    // Open Buy
    }
    
    if(buy==false){
    // Close Buy
    }
    if(!buy){
    // Close Buy
    } 
  

بالنسبه للشرطين الأولين buy==true هي نفسها إذا كتبتها مباشرة buy
والشرطين الآخرين buy==false هو أيضا نفسه !buy

[stop1]

اخواني الكرام
هل لكم طرح بعض الامثلة لكيفية جمع الشموع مع بعضها برمجيا
مثال
امر (اجمع اغلاق الشمعة الاولى مع الشمعة الثانية الخ......
مثال
امر (اجمع شمعة تخطة شمعة او شمعتين الخ.......

[RED.HAT]

وعليكم السلام ورحمة الله وبركاته
تفضل مرفق الإكسبرت مفتوح الكود

ان شاء الله ادعو لك دعوة بالمشاعر المقدسة

[عبدالله الحمد]

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

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

إجعله بهذا الشكل

   double LastBuyPip , LastSellPip ;
     if(OrdersTotal()>0)
      {
       for(int i =0;i<=OrdersTotal();i++){
      OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
       if(OrderSymbol()==Symbol() &&  MagicNumber==OrderMagicNumber()){
       if(OrderType()==OP_BUY ){
        LastBuyPip=(NormalizeDouble(OrderOpenPrice()-Bid),digits) ;
        }
       if(OrderType()==OP_SELL ){
        LastSellPip=(NormalizeDouble(Ask-OrderOpenPrice()),digits) ;
        }
         
       }
      }
     } 
  

وهذا سيحل المشكله لكن طبعا الكود السابق سوف يكون الفرق على سيكون بالنقاط فمثلا سيكون الفرق 0.0050
وإذا أردت جعله عدد صحيح يجب أن تقسم الناتج على قيمة النقطة LastSellPip/Point

بالنسبه للكود الآخر فهو صحيح لكن ربما المشكله ليست في الداله نفسها تأكد من شروط الدخول التي قمت بوضعها
إستخدم الأمر print لطباعة النتائج عند عمل باك تست وحاول تتبع الأرقام التي تظهر عندك حتى تعلم سبب الخطأ

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

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

    double LastBuyPip , LastSellPip ,Step=30
   bool Buy=false , Sell=false ;
   
   if(OrdersTotal()>=1)
     {
 
       for(int i =0;i<=OrdersTotal();i++){
      OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
       if(OrderSymbol()==Symbol()){
        if(OrderType()==OP_BUY ){
        LastBuyPip=(Bid-OrderOpenPrice()) ;
        }
         if(OrderType()==OP_SELL ){
        LastSellPip=(OrderOpenPrice()-Ask) ;
            }
           }
           if((LastBuyPip/Point)<=Step){
        Sell=true ;}
           if((LastSellPip/Point)<=Step){
        Buy=true ;}
       }
      } 
  

الاكسبيرت سوف يشتري اذا كان اخر عقد بيع والعكس صحيح
المتغيرين LastBuyPip و LastSellPip يحتويان على عدد النقاط من السعر الحالي واخر عقد
لو كانت قيمتهما بالسالب يكون العقد خاسر والعكس صحيح

شاكر ومقدر مسبقا

[RED.HAT]

وعليكم السلام ورحمة الله وبركاته
تفضل مرفق الإكسبرت مفتوح الكود

MR.dollar alqahira ea.mq4‏
شكرا اخى يبدو ان حضرتك ارفقت النسخة الاولى v1
ارجو ارفاق النسخة v2 - لانها معدلة و بها تصحيح لبعض الاخطاء فى v1

[MR.dollar]

اخواني الكرام
هل لكم طرح بعض الامثلة لكيفية جمع الشموع مع بعضها برمجيا
مثال
امر (اجمع اغلاق الشمعة الاولى مع الشمعة الثانية الخ......
مثال
امر (اجمع شمعة تخطة شمعة او شمعتين الخ.......

تفضل

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

مثلا أريد جمع آخر عدد محدد من الشموع CandlesNumber وقسمتهم على نفس العدد

  int C;
 for(int i=1;i<CandlesNumber;i++){
 C+=Close[i];
 C/=CandlesNumber;
 } 
  

مثلا تريد جمع شمعه وترك شمعه لآخر 10 شمعات

 int C;
 int V;
 for(int i=1;i<10;i++){
 if(V==1){
 V=0;
 continue;
 }
 if(V==0){
 C+=Close[i];
 C/=CandlesNumber;
 V=1;
 }
} 
  

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

[MR.dollar]

MR.dollar alqahira ea.mq4‏
شكرا اخى يبدو ان حضرتك ارفقت النسخة الاولى v1
ارجو ارفاق النسخة v2 - لانها معدلة و بها تصحيح لبعض الاخطاء فى v1

للأسف النسخه الثانيه غير موجوده عندي لكن إذا أردت الإطلاع على كود الإكسبرت أو إجراء تعديلات عليه يمكنك كسر النسخه رقم 2 الموجوده في نفس الموضوع فلا يوجد مانع لدي

[MR.dollar]

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

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

    double LastBuyPip , LastSellPip ,Step=30
   bool Buy=false , Sell=false ;
   
   if(OrdersTotal()>=1)
     {

       for(int i =0;i<=OrdersTotal();i++){
      OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
       if(OrderSymbol()==Symbol()){
        if(OrderType()==OP_BUY ){
        LastBuyPip=(Bid-OrderOpenPrice()) ;
        }
         if(OrderType()==OP_SELL ){
        LastSellPip=(OrderOpenPrice()-Ask) ;
            }
           }
           if((LastBuyPip/Point)<=Step){
        Sell=true ;}
           if((LastSellPip/Point)<=Step){
        Buy=true ;}
       }
      } 
  

الاكسبيرت سوف يشتري اذا كان اخر عقد بيع والعكس صحيح
المتغيرين LastBuyPip و LastSellPip يحتويان على عدد النقاط من السعر الحالي واخر عقد
لو كانت قيمتهما بالسالب يكون العقد خاسر والعكس صحيح

شاكر ومقدر مسبقا

وعليكم السلام ورحمة الله وبركاته
سوف تجد أغلب إكسبرتات المضاعفات بهذا هذه الطريقه مرفق إكسبرت راجع الكود له خصوصا هذا الجزء

   if(UseMultiplier){
       for(s=0;s<=OrdersTotal();s++){
       OrderSelect(s,SELECT_BY_POS,MODE_TRADES);
       if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber&&OrderType()==OP_BUY){
        openprice=OrderOpenPrice();lots=OrderLots();
       }
        }{
       
        if(X_Multiplier){
         newLot=Multiplier*lots;
        }
        else{newLot=lots+Lots;}
        if(Ask<=openprice-Step*point&&orderscnt(OP_BUY)>=1){
        //if(TakeProfit==0){TP=0;}else{TP=Ask+TakeProfit*point;}
         OrderSend(Symbol(),OP_BUY,newLot,NormalizeDouble(Ask,Digits),3*Q,0,0,"MR.dollar EA",MagicNumber,0,Blue);
         l++;
         }
        }
        for(s=0;s<=OrdersTotal();s++){
       OrderSelect(s,SELECT_BY_POS,MODE_TRADES);
       if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber&&OrderType()==OP_SELL){
        openprice=OrderOpenPrice(); lots=OrderLots();
       }
        }{
          if(X_Multiplier){
         newLot=Multiplier*lots;
        }
        else{newLot=lots+Lots;}
         if(Bid>=openprice+Step*point&&orderscnt(OP_SELL)>=1){
        // if(TakeProfit==0){TP=0;}else{TP=Bid-TakeProfit*point;}
          OrderSend(Symbol(),OP_SELL,newLot,NormalizeDouble(Bid,Digits),3*Q,0,0,"MR.dollar EA",MagicNumber,0,Red);
          ll++;    
        }
         }
          } 
  

إذا وجدت أي صعوبه في الكود أخبرني

[RED.HAT]

[QUOTE=MR.dollar;2235691]للأسف النسخه الثانيه غير موجوده عندي لكن إذا أردت الإطلاع على كود الإكسبرت أو إجراء تعديلات عليه يمكنك كسر النسخه رقم 2 الموجوده في نفس الموضوع فلا يوجد مانع لدي[/QUOTE

شكرا لك وبارك الله فى عملك

[RED.HAT]

للأسف النسخه الثانيه غير موجوده عندي لكن إذا أردت الإطلاع على كود الإكسبرت أو إجراء تعديلات عليه يمكنك كسر النسخه رقم 2 الموجوده في نفس الموضوع فلا يوجد مانع لدي

شكرا لك وبارك الله فى عملك

[MR.dollar]

شكرا لك وبارك الله فى عملك

وبارك الله فيك

[alsafir]

على سبيل المثال

 if(rsi>50)buy=true;
    
    if(buy==true){
    // Open Buy 
    }
    if(buy){
    // Open Buy
    }
    
    if(buy==false){
    // Close Buy
    }
    if(!buy){
    // Close Buy
    } 
  

بالنسبه للشرطين الأولين buy==true هي نفسها إذا كتبتها مباشرة buy
والشرطين الآخرين buy==false هو أيضا نفسه !buy

شكراً جزاك الله خيراً
وكل عام وأنت بخير

[MR.dollar]

شكراً جزاك الله خيراً
وكل عام وأنت بخير

وفقك الله

[عبدالله الحمد]

وعليكم السلام ورحمة الله وبركاته
سوف تجد أغلب إكسبرتات المضاعفات بهذا هذه الطريقه مرفق إكسبرت راجع الكود له خصوصا هذا الجزء

   if(UseMultiplier){
       for(s=0;s<=OrdersTotal();s++){
       OrderSelect(s,SELECT_BY_POS,MODE_TRADES);
       if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber&&OrderType()==OP_BUY){
        openprice=OrderOpenPrice();lots=OrderLots();
       }
        }{
       
        if(X_Multiplier){
         newLot=Multiplier*lots;
        }
        else{newLot=lots+Lots;}
        if(Ask<=openprice-Step*point&&orderscnt(OP_BUY)>=1){
        //if(TakeProfit==0){TP=0;}else{TP=Ask+TakeProfit*point;}
         OrderSend(Symbol(),OP_BUY,newLot,NormalizeDouble(Ask,Digits),3*Q,0,0,"MR.dollar EA",MagicNumber,0,Blue);
         l++;
         }
        }
        for(s=0;s<=OrdersTotal();s++){
       OrderSelect(s,SELECT_BY_POS,MODE_TRADES);
       if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber&&OrderType()==OP_SELL){
        openprice=OrderOpenPrice(); lots=OrderLots();
       }
        }{
          if(X_Multiplier){
         newLot=Multiplier*lots;
        }
        else{newLot=lots+Lots;}
         if(Bid>=openprice+Step*point&&orderscnt(OP_SELL)>=1){
        // if(TakeProfit==0){TP=0;}else{TP=Bid-TakeProfit*point;}
          OrderSend(Symbol(),OP_SELL,newLot,NormalizeDouble(Bid,Digits),3*Q,0,0,"MR.dollar EA",MagicNumber,0,Red);
          ll++;    
        }
         }
          } 
  

إذا وجدت أي صعوبه في الكود أخبرني

جزاك الله كل خير اخ اسامه
وبارك الله فيك