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

[MR.dollar]

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

  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;
   } 
  

وعليكم السلام ورحمة الله وبركاته
شرط switch تأخذ قيم عدد صحيح فقط لذلك إستخدم الشرط if بدلا من switch بما أن قيمة MarketInfo من نوع double

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

وعليكم السلام ورحمة الله وبركاته
شرط switch تأخذ قيم عدد صحيح فقط لذلك إستخدم الشرط if بدلا من switch بما أن قيمة MarketInfo من نوع double

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

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

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

تم عمل الطريقة
جزاك الله كل خير استاذى الكريم
وكل عام وانت بخير
ومنتظرين دورة برمجة المؤشرات كما وعدتنا من قبل
وعد الحر دين عليه
تحياتى لك

[amazing]

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

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

اخي بكفي ان تقارن بين الهدف او الاستوب و بين اقل قيمة مقبولة و تأخذ الاكبر منها

يعني تشترط

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

ان كانت القيمة المقبولة

فيمكن استخدام الكد التالي:

MarketInfo(Symbol(),MODE _STOPLEVEL)

فتقول

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

[QtrrtQ]

السلام عليكم
اريد كود يقوم بعمل copy للفايل من مجلد الميتاتريدر الى مجلد آخر
مثال
MQL4/file/data.csv
إلى مسار آخر
C:\aaa\data.csv
ولكم جزيل الشكر

[amazing]

عاجل استاذ اسامه طلب واحد فقط و لا اثقل عليك و الاهم:

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

[Jmeel]

السلام عليكم ورحمة الله وبركاتة
اساتذتي المبرمجين
قمت بعمل اكسبيرت لتقاطع اثنين موفينج افرج واحد سريع والاخر بطيئ
واريد فلترت الصفقات بواسطة الموفينج 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); // امر بيع
   }
      //
  }
//+------------------------------------------------------------------+

وعليكم السلام ورحمة الله وبركاته
هذا التعديل لحالة الشراء

    if(FastMA_2<SlowMA_2 &&  FastMA_1>SlowMA_1 && SlowMA_2>MA_200) 
  

وهذا التعديل لحالة البيع

    if(FastMA_2>SlowMA_2 && FastMA_1<SlowMA_1 && SlowMA_2<MA_200) 
  

[first_knight]

شكرا جزيلا استاذي جميل

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

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

[Jmeel]

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

وعليكم السلام أخي سمير ، الخطأ في الداتا على المنصة وليس في الأكسبيرت .

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

وعليكم السلام أخي سمير ، الخطأ في الداتا على المنصة وليس في الأكسبيرت .

السلام عليكم اخى الكريم جميل
كل عام وانت بكل خير
وشكرا على المساعده
جزاك الله كل خير
طيب ماهو حل هذه المشكلة ؟
ولك الشكر والتقدير

[Jmeel]

السلام عليكم اخى الكريم جميل
كل عام وانت بكل خير
وشكرا على المساعده
جزاك الله كل خير
طيب ماهو حل هذه المشكلة ؟
ولك الشكر والتقدير

وعليكم السلام وكل عام أنت و الأسرة الكريمة بخير
تكون المنصة مغلقة وتدخل على الملفات وأي حاجة في الهيستوري أمسحها حتلاقي فولدرين اللي فيهم الملفات ، بعدها شغل المنصة تلقائياً حتلاقي الداتا نزلت ممتازة على الزوج اللي حتشتغل عليه ، لو استمرت رسالة الخطأ ارفق الأكسبيرت ولو معاه مؤشرات ارفقها معاه .

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

وعليكم السلام وكل عام أنت و الأسرة الكريمة بخير
تكون المنصة مغلقة وتدخل على الملفات وأي حاجة في الهيستوري أمسحها حتلاقي فولدرين اللي فيهم الملفات ، بعدها شغل المنصة تلقائياً حتلاقي الداتا نزلت ممتازة على الزوج اللي حتشتغل عليه ، لو استمرت رسالة الخطأ ارفق الأكسبيرت ولو معاه مؤشرات ارفقها معاه .

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

[amazing]

عاجل استاذ اسامه طلب واحد فقط و لا اثقل عليك و الاهم:

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

if(hisacc(l_symbol_28)>0&&use_multi_after_lose==tr ue) {double mlot=hisacc(l_symbol_28)*multi_after_lose; l_lots_84=mlot;}

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

[اعصار ريتا]

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

 extern bool  UseTimeFilter = false;        
 extern int  StartHour = 7;            
 extern int  EndHour = 17;  
 extern int max=1;
 extern string S3=" RSI1 Settings";
extern bool usersi1filter=false;
 extern int timeframe1=0;
 extern int RSIPeriod1=14;
 extern int rsi1buyup=70;
 extern int rsi1buydown=30;
 extern int rsi1sellup=70;
 extern int rsi1selldown=30;
 extern int candl1=0;
 
 extern string S1=" Multiplier Settings";
 extern bool UseMultiplier=false;
 extern double Multiplier=0.9;
 extern double MinLot=0;
 extern double num=0.01;
 extern string  MM_Parameters = " Money Management";
                                       
 extern bool  UseMoneyManagement = false;                                                
 extern int  RiskPercent = 10; 
 extern double Lots=1;
 
extern string S5875="normal tp-sl";
extern int StopLoss=0;
extern int TakeProfit=50;
extern int Slippage=3;
 extern int MagicNumber=09876;
 datetime Time0;
 double point;int Q;
 int digits;
 int Lot_Digits;
 double LastLot;
 double FirstLot;
int init()
{
FirstLot=Lots;
 if(MarketInfo(Symbol(),MODE_MINLOT)<0.1)Lot_Digits=2;
 else Lot_Digits=1;
 if(Digits==5||Digits==3)
 Q=10;
 else Q=1;
    if(Digits<4)
   {
      point=0.01;digits=2;
   }
   else
   {
   point=0.0001;digits=4;
   }
return(0);
}
 //+------------------------------------------------------------------+
 //| FUNCTION DEFINITIONS    deinitialization function                |
 //+------------------------------------------------------------------+
 void deinit() {
    Comment("");
  }
 int orderscnt(int type){
 int cnt=0;
   for(int i =0;i<OrdersTotal();i++){
     if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)){
       if(OrderSymbol()==Symbol() && MagicNumber==OrderMagicNumber()&&OrderType()==type){
         cnt++;
       }
     }
   }
    return(cnt);
  }
 //+------------------------------------------------------------------+
 //| FUNCTION DEFINITIONS   Start function                            |
 //+------------------------------------------------------------------+
 
 int start()
   {
   Comment("Programmed by MR.dollar"+"\n"+"Idea Created By &Otilde;&Iuml;&Ccedil;&atilde;"+"\n"+"&atilde;&auml;&Ecirc;&Iuml;&igrave; &Ccedil;&aacute;&atilde;&Ecirc;&Iuml;&Ccedil;&aelig;&aacute; &Ccedil;&aacute;&Uacute;&Ntilde;&Egrave;&iacute;"+"\n"+"www.arabictrader.com/vb","--");
 
      if (UseTimeFilter){
       if(!((StartHour < EndHour && TimeHour(TimeCurrent()) >= StartHour && TimeHour(TimeCurrent()) < EndHour) || (StartHour > EndHour && TimeHour(TimeCurrent()) >= StartHour ||
               TimeHour(TimeCurrent()) < EndHour))){
           Comment("Non-Trading Hours!");
           return(0);
         }
       }
     
    
       //////////////////////////////////////////////////
       
      
      double rsi1=iRSI(NULL,timeframe1,RSIPeriod1,PRICE_CLOSE,candl1);
       
   ////////////////////////////////////////////////////
      double SL,TP; 
      
     
     if(UseMoneyManagement) Lots = LotManage();
    
    ////////////////////////////////
   
          
    if (((rsi1>rsi1buyup||!usersi1filter)||(rsi1<rsi1buydown||!usersi1filter))&&
        
     Time0!=Time[0] ){
       
      if(LastOrderType()!=0)  {
       
       if(StopLoss==0){SL=0;}else{SL=Ask-StopLoss*point;}
       if(TakeProfit==0){TP=0;}else{TP=Ask+TakeProfit*point;}
       if(UseMultiplier&&!LP())Lots=LastLot1()+Multiplier;    
            OrderSend(Symbol(),OP_BUY,Lots,NormalizeDouble(Ask,digits),3*Q,SL,TP,"MR.dollar EA",MagicNumber,0,Blue);
             PlaySound("Alert.wav");
             Time0=Time[0];
             Lots=LastLot1()-num;
          }
       }
       
    /////////////////////
    
   if (((rsi1>rsi1sellup||!usersi1filter)||(rsi1<rsi1selldown||!usersi1filter))&&(LastOrderType()!=1)&&
   
   
    Time0!=Time[0]  ){
       
   if(LastOrderType()!=1)   {
     
       if(StopLoss==0){SL=0;}else{SL=Bid+StopLoss*point;}
       if(TakeProfit==0){TP=0;}else{TP=Bid-TakeProfit*point;}  
       if(UseMultiplier&&!LP())Lots=LastLot1()+Multiplier;
            OrderSend(Symbol(),OP_SELL,Lots,NormalizeDouble(Bid,digits),3*Q,SL,TP,"MR.dollar EA",MagicNumber,0,Red); 
             PlaySound("Alert.wav");
            Time0=Time[0]; 
            Lots=LastLot1()-num;
             
          }
       }
    }
   
  
//+------------------------------------------------------------------+
    
  
 //+------------------------------------------------------------------+
 //| FUNCTION DEFINITIONS   Money Managment                           |
 //+------------------------------------------------------------------+ 
  double LotManage()
  {
      double lot = MathCeil(AccountFreeMargin() *  RiskPercent / 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 (lot);
  }
 //+---------------------------------------------------------------------------------+
 
   bool LP(){
 for(int i=OrdersHistoryTotal();i>0;i--){
OrderSelect(i,SELECT_BY_POS,MODE_HISTORY);
if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber){
if(OrderProfit()>=0)return(true);
else return(false);
  }
 }
 return(true);
}
double LastLot1(){
double L;
for(int i=0;i<OrdersHistoryTotal();i++){
OrderSelect(i,SELECT_BY_POS,MODE_HISTORY);
if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber){
 L=OrderLots();
  }
 }
 return(L);
 }
 
 int LastOrderType()
{
for(int i=OrdersTotal()-1;i>=0;i--)
{
OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
return(OrderType());
}
return(-1);
}