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

[fxsmartsniper]

استاذنا الغالي
قمت باختبار الاكسبيرت على معظم العملات مع تغيير الماجيك نمبر وتكونت فرص عديدة
لماذا لا يفتح صفقات بشارت الرينكو ؟ مع العلم انه لايوجد أخطاء بالجورنال والاكسبيرت، وكل شيء تمام والغريبة انه بيفتح صفقات بالباكتيست على الرينكو
المنصة المستخدمة منصة 5ECN ارقام
مع العلم أن المؤشر مفعل على الشارت وبه نفس إعدادات الاكسبيرت

الشكر لك
لم تنسي هذه المشاركة مستر دولار

[MR.dollar]

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

#property link      ""

//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
 {
//----
 
//----
  return(0);
 }
//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
int deinit()
 {
//----
 
//----
  return(0);
 }
//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
 {
//----
  MyOrdersProfit();
//----
  return(0);
 }
double MyOrdersProfit()
{
 double c=0;
 int total  = OrdersTotal();
 
 for (int cnt = 0 ; cnt < total ; cnt++)
 {
   OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
   if ( OrderSymbol()==Symbol() && (OrderType()==OP_BUY || OrderType()==OP_SELL))
   {
     c=c+OrderProfit()+OrderCommission()+OrderSwap();
   }
 }
 return(c);
}
//+------------------------------------------------------------------+

وهذا الإكسيبرت الأساسى كيف اكتب الكود لإستدعاء البروفت من الفرعى وليكن اسمه GetProfit

#property link      ""
//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
 {
//----
 
//----
  return(0);
 }
//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
int deinit()
 {
//----
 
//----
  return(0);
 }
//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
 {
//----
double Profit;
Profit=MyOrdersProfit();  //
SetLabel("z10",DoubleToStr(Profit,2)+"   ",1,386,"Arial",12,1,Red);
 
 return(0);
}
 
void SetLabel(string name,string txt,int x,int y,string font,int size,int cor,color clr)
 {
  int idx=0;
 if(ObjectFind(name) == -1)
  {
   ObjectCreate(name, OBJ_LABEL, idx, 0, 0);
   ObjectSetText(name, txt, size, font, clr);
   ObjectSet(name, OBJPROP_XDISTANCE, x);
   ObjectSet(name, OBJPROP_YDISTANCE, y);
   ObjectSet(name, OBJPROP_CORNER, cor);
   ObjectSet(name, OBJPROP_WIDTH,2);
  }
  else
  {
   ObjectSet(name, OBJPROP_XDISTANCE, x);
   ObjectSet(name, OBJPROP_YDISTANCE, y);
   ObjectSetText(name, txt, size, font, clr);
   ObjectSet(name, OBJPROP_CORNER, cor);
   ObjectSet(name, OBJPROP_WIDTH,2);
  } 
 }

معلش عشان انا ماقدرتش افهم - والكود سوف يسهل فهمها - ولك جزيل الشكر

سيكون هذا الإكسبرت النهائي

 
#property link      ""
//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
 {
//----
 
//----
  return(0);
 }
//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
int deinit()
 {
//----
 
//----
  return(0);
 }
//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
 {
//----
double Profit;
Profit=MyOrdersProfit();  //
SetLabel("z10",DoubleToStr(Profit,2)+"   ",1,386,"Arial",12,1,Red);
 
 return(0);
}
 
void SetLabel(string name,string txt,int x,int y,string font,int size,int cor,color clr)
 {
  int idx=0;
 if(ObjectFind(name) == -1)
  {
   ObjectCreate(name, OBJ_LABEL, idx, 0, 0);
   ObjectSetText(name, txt, size, font, clr);
   ObjectSet(name, OBJPROP_XDISTANCE, x);
   ObjectSet(name, OBJPROP_YDISTANCE, y);
   ObjectSet(name, OBJPROP_CORNER, cor);
   ObjectSet(name, OBJPROP_WIDTH,2);
  }
  else
  {
   ObjectSet(name, OBJPROP_XDISTANCE, x);
   ObjectSet(name, OBJPROP_YDISTANCE, y);
   ObjectSetText(name, txt, size, font, clr);
   ObjectSet(name, OBJPROP_CORNER, cor);
   ObjectSet(name, OBJPROP_WIDTH,2);
  } 
 }
 
 double MyOrdersProfit()
{
 double c=0;
 int total  = OrdersTotal();
 
 for (int cnt = 0 ; cnt < total ; cnt++)
 {
   OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
   if ( OrderSymbol()==Symbol() && (OrderType()==OP_BUY || OrderType()==OP_SELL))
   {
     c=c+OrderProfit()+OrderCommission()+OrderSwap();
   }
 }
 return(c);
} 
  

[MR.dollar]

الشكر لك
لم تنسي هذه المشاركة مستر دولار

لا يوجد أي سبب يمنع عمله فقط تأكد أن الشارت لايف والسعر يتحرك حتى يعمل الإكسبرت
إذا ظل الخطأ موجود إستخدم الداله GetLastError بعد كل أمر فتح صفقه لطباعة الخطأ
الأخطاء عند التجربه لايف تكون موجوده في خانة Experts

[fxsmartsniper]

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

رابط المؤشر والإكسبرت (يوجد مشكله عندي في إرفاق الملفات )
http://www.mediafire.com/?1rd13pc23gccryg
http://www.mediafire.com/?k2lgdq7nhg5tmhh

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

[mostafa400]

سيكون هذا الإكسبرت النهائي

  
#property link ""
//+------------------------------------------------------------------+
//| expert initialization function |
//+------------------------------------------------------------------+
int init()
{
//----
 
//----
return(0);
}
//+------------------------------------------------------------------+
//| expert deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
 
//----
return(0);
}
//+------------------------------------------------------------------+
//| expert start function |
//+------------------------------------------------------------------+
int start()
{
//----
double Profit;
Profit=MyOrdersProfit(); //
SetLabel("z10",DoubleToStr(Profit,2)+" ",1,386,"Arial",12,1,Red);
 
return(0);
}
 
void SetLabel(string name,string txt,int x,int y,string font,int size,int cor,color clr)
{
int idx=0;
if(ObjectFind(name) == -1)
{
ObjectCreate(name, OBJ_LABEL, idx, 0, 0);
ObjectSetText(name, txt, size, font, clr);
ObjectSet(name, OBJPROP_XDISTANCE, x);
ObjectSet(name, OBJPROP_YDISTANCE, y);
ObjectSet(name, OBJPROP_CORNER, cor);
ObjectSet(name, OBJPROP_WIDTH,2);
}
else
{
ObjectSet(name, OBJPROP_XDISTANCE, x);
ObjectSet(name, OBJPROP_YDISTANCE, y);
ObjectSetText(name, txt, size, font, clr);
ObjectSet(name, OBJPROP_CORNER, cor);
ObjectSet(name, OBJPROP_WIDTH,2);
} 
}
 
double MyOrdersProfit()
{
double c=0;
int total = OrdersTotal();
 
for (int cnt = 0 ; cnt < total ; cnt++)
{
OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
if ( OrderSymbol()==Symbol() && (OrderType()==OP_BUY || OrderType()==OP_SELL))
{
c=c+OrderProfit()+OrderCommission()+OrderSwap();
}
}
return(c);
} 
  

ما أقصده هو كيف يكون لدينا 2 اكسيبرت ونستدعى الدالة MyOrdersProfit فقط من الإكسيبرت الفرعى فى الإكسيبرت الأساسى دون ان نكتب اكوادها كاملة فى الاكسيبرت الأساسى
يعنى انا عندى 10 دوال عايز اكتبهم فى اكسيبرت منفصل واستدعيهم فى حال توافر شروط معينة بحيث لا اجعل الاكسيبرت الأساسى حجمه كبير .

[MR.dollar]

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

مرفق الإكسبرت

[MR.dollar]

ما أقصده هو كيف يكون لدينا 2 اكسيبرت ونستدعى الدالة MyOrdersProfit فقط من الإكسيبرت الفرعى فى الإكسيبرت الأساسى دون ان نكتب اكوادها كاملة فى الاكسيبرت الأساسى
يعنى انا عندى 10 دوال عايز اكتبهم فى اكسيبرت منفصل واستدعيهم فى حال توافر شروط معينة بحيث لا اجعل الاكسيبرت الأساسى حجمه كبير .

في هذه الحاله لا تستخدم إكسبرت لكن يمكنك إستخدام ملف include تضع به الدوال التي تريدها ثم تقوم بإستدعاء الملف في أول الإكسبرت بإسمه
مثل

 #include  <Name> 
  

[Mr. Nothing]

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

أرجو المساعدة وفقكم الله

[Mr. Nothing]

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

أرجو المساعدة وفقكم الله

هل إضافة هذا الكود يحل المشكلة ؟؟

  static datetime tmp;
  if (tmp!= Time[0]) {
    tmp =  Time[0];

[MR.dollar]

هل إضافة هذا الكود يحل المشكلة ؟؟

  static datetime tmp;
  if (tmp!= Time[0]) {
    tmp =  Time[0];

نعم سوف يحل المشكله
قم بإضافة الشرط إلى شروط الدخول ثم عندما يفتح الصفقه تجعل tmp=Time[0]

[Mr. Nothing]

نعم سوف يحل المشكله
قم بإضافة الشرط إلى شروط الدخول ثم عندما يفتح الصفقه تجعل tmp=Time[0]

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

[Mr. Nothing]

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

 USE_BUY_ONLY = true/false 
  

الآن أريد أن يلغى هذا الشرط وأريد ان يفتح كل العقود معا بيع او شراء لافرق في معاملة الاكسبيرت لهما سواء في الأرباح أو الخسارة و.... إلخ

وشكرا جزيلا

[Mr. Nothing]

طلب آخر
ماهو الكود لخاصية
Close at End of Bar
يعني هو أساسا بيفتح الصفقة عند بداية افتتاح البار وانا عاوز خليه يقفلها مع افتتاح البار اللي بعديه على طول
ماهو الكود وإين يوضع ؟؟

[Mr. Nothing]

طلب آخر
ماهو الكود لخاصية
Close at End of Bar
يعني هو أساسا بيفتح الصفقة عند بداية افتتاح البار وانا عاوز خليه يقفلها مع افتتاح البار اللي بعديه على طول
ماهو الكود وإين يوضع ؟؟

تنبيه : يفتح البار في بداية الصفقة لا يعني بالضرورة إشارة الدخول ظهرت على هذا البار "فربما يكون قد تم برمجته للدخول على أساسا إشارة ظهرت قبل عدة بارات"
يهمني البار اللي فتح عند افتتاحه الصفقة يغلقها مع نهاية البار نفسه أو افتتاح البار التالي

[MR.dollar]

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

 USE_BUY_ONLY = true/false 
  

الآن أريد أن يلغى هذا الشرط وأريد ان يفتح كل العقود معا بيع او شراء لافرق في معاملة الاكسبيرت لهما سواء في الأرباح أو الخسارة و.... إلخ

وشكرا جزيلا

قمت بإلغاء الشرط لك راجع كود الإكسبرت