$$ تعالو نبتدي التعلم بتنفيذ برمجة اكسبيرت بسيط $$

[Jmeel]

الحلقات التي حدثنا جزء منها اليوم ، يمكنكم الغاء الحلقات السابقة واضافة الجديدة اذا يصعب عليك التعديل

 TotalOrder=0; dayorderL=0;  profit=0;
for(int i=OrdersTotal()-1 ;i>=0 ;i--){
  if(OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
  if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNo){  
  TotalOrder++; profit+=OrderProfit(); if(OrderOpenTime()>=iTime(NULL,1440,0)) dayorderL=1;
  }
 }
 
for(int i=OrdersTotal()-1 ;i>=0 ;i--){
  if(OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
  if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNo){  
      LastLot=OrderLots();
 
  }
 }
 
dayorderH=0;
for(int i=OrdersHistoryTotal()-1 ;i>=0 ;i--){
  if(OrderSelect(i, SELECT_BY_POS, MODE_HISTORY))
  if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNo){  
  if(OrderOpenTime()>=iTime(NULL,1440,0)) dayorderH=1;
 
  }
 } 
  

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

 extern int MagicNo=2014;
extern double Multi_Factor=2,Lot=0.1;
extern int Stoploss=100,Takeprofit=100,TrailingStop=0,TrailingStep=0,TrailingProfit=0,BreakEven=0,Break_Profits=0;
extern bool Opposite_Signal_Close=1;
 
extern int Step_Point=50;
extern double USD_Profit=10;
double ahi_1,alow_1;
double points;
int cts;
int sdel=0,bdel=0,Del_Pending=0;
int TotalOrder,dayorderL,dayorderH;
double LastProfitH, LastLot, profit;
datetime dnx; 
  

دالة اغلاق الأوردرات تم تعديل متغير اغلاق المعلق فقط

 void Close_Type()
{
           for(int i=OrdersTotal()-1; i>=0; i--)         
           {
            if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
              if(OrderSymbol()==Symbol() && OrderMagicNumber() == MagicNo)
                 {
                  if(OrderType()==OP_BUY && bdel==1)  {bool asd=OrderClose(OrderTicket(),OrderLots(),OrderClosePrice(),30,Red);}   
                  if(OrderType()==OP_SELL && sdel==1) {bool afd=OrderClose(OrderTicket(),OrderLots(),OrderClosePrice(),30,Red);} 
                   if(OrderType()>1 && Del_Pending==1) {bool afg=OrderDelete(OrderTicket());}           
       }
   }
   sdel=0;bdel=0;Del_Pending=0;
  return;
} 
  

هنا تم تغيير شرط الأغلاق

   if(BreakEven>0) MoveBreakEven(); 
  if(TrailingStop>0) TrailingStopp();
  if(profit>=USD_Profit) { Del_Pending=1; sdel=1; bdel=1; Close_Type(); } 
  

اذا وجدتم حاجة لشرح اكثر لأي نقطة في ما اضفناه اليوم سأشرحها .

في انتظار الأكسبيرتات .

[sameh]

أستاذ جميل ها هو الإكسيبرت لكنه لا يفتح صفقات وفى الجورنال مكتوب invalid lots amount ما هو الخطأ؟

[Jmeel]

أستاذ جميل ها هو الإكسيبرت لكنه لا يفتح صفقات وفى الجورنال مكتوب invalid lots amount ما هو الخطأ؟

كبر اللوت النقطة بدولار .

[fxsmartsniper]

يوجد خطاين لدي
وما معني profit +=
ومعني هذا المتغير تحديدا لاني اراة في كثير من الاكسبرتات
cts
مرفق الاكسبرت

https://www.mediafire.com/?v0jn91ygc9sfqrx

عذرا للمرفق علي mediafire
اجد ص

[sameh]

كبر اللوت النقطة بدولار .

جعلت اللوت =1 نفس المشكلة مازالت موجودة invalid lots amount for ordersend function

[sameh]

يوجد خطاين لدي
وما معني profit +=
ومعني هذا المتغير تحديدا لاني اراة في كثير من الاكسبرتات
cts
مرفق الاكسبرت

https://www.mediafire.com/?v0jn91ygc9sfqrx

عذرا للمرفق علي mediafire
اجد ص

تم حل الخطأين عندك لكن نفس المشكلة وهى عدم فتح صفقات بسبب فى الجورنال invalid lots amount for ordersend
حتى بعد تغيير قيمة اللوت

[Jmeel]

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

[fxsmartsniper]

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

[fxsmartsniper]

تم الغاء الدالة

[fxsmartsniper]

ولكني اريد معرفة سبب unexpected end of program

[Jmeel]

ولكني اريد معرفة سبب unexpected end of program

اكيد ناسي اقواس تقفيل .

[sameh]

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

كان ناقص عندك قوسين تقفيل الدالة

 for(int i=OrdersTotal()-1 ;i>=0 ;i--){ 
  if(OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) 
  if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNo){   
      LastLot=OrderLots(); 
}
} 
  

ده كان واحد من الخطأين

الخطأ الثانى

  TotalOrder++; profit+=OrderProfit(); if(OrderOpenTime()>=iTime(NULL,1440,0)) dayorderL=1;
 
  }
 } 
  

orderprofit كانت مكتوبة غلط حرف فيهم صغير والمفروض أن يكون حرف كبير

[hre007]

انا عندي حاجة تانية في الجرنال ..
no history data symbol from (any date to any date )
واضح ان المنصة فقدت الذاكرة معايا

Test ver9 - hi-low.mq4

[fxsmartsniper]

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

[sameh]

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

أخى كان ناقصلك قوس تقفيل شرط الشراء والبيع