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

[cher90]

السلام عليكم ورحمة الله استاذ أسامة

أرجو أن تساعدني في تصحيح هذا الإكسبريت الذي عملتوا الأسبوع الماضي https://forum.arabictrader.com/t139020.html
كنت أضن أنه يشتغل بالشكل الصحيح لاكني كنت مخطيء

يفترض أن يحذف الأمر المعلق الثاني بتفعيل الأول لاكنه لا يفعل ذلك

رغم وجود هذا الكود

 if(MyOrdersTotal(MagicNumber)>0 && (Bid>=xPrice3 || Bid<=yPrice3))              // Delete Pending Orders
      {
      DeletePendingOrders(MagicNumber);
      } 
  

وهذا

 int DeletePendingOrders(int Magic)
{
int total = OrdersTotal()-1;
 
for (int cnt=total ; cnt>0 ;cnt--)
{
OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
if(OrderMagicNumber() == Magic && OrderSymbol()==Symbol() && (OrderType()!=OP_BUY || OrderType()!=OP_SELL))
  {
   OrderDelete(OrderTicket());
  }
}
  return(0);
} 
  

ويفترض أن يفتح صفقة معاكسة للصفقة الماضية إذا كانت خاسرة و يفتح نفس الصفقة إذا كانت رابحة

لاكن لا يفعل ذالك

أرجو التصحيح وبارك الله فيك

[MR.dollar]

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

يمكنك رسم مستوى أفقي من الميتاتريدر من خلال
Insert --------->Lines------->Horizontal Line

بالنسبه لكيفية إستدعاء الخط كمثال

 double line=ObjectGet("name",OBJPROP_PRICE1); 
  

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

 if(Close[1]>line) 
  

[MR.dollar]

السلام عليكم ورحمة الله استاذ أسامة

أرجو أن تساعدني في تصحيح هذا الإكسبريت الذي عملتوا الأسبوع الماضي https://forum.arabictrader.com/t139020.html
كنت أضن أنه يشتغل بالشكل الصحيح لاكني كنت مخطيء

يفترض أن يحذف الأمر المعلق الثاني بتفعيل الأول لاكنه لا يفعل ذلك

رغم وجود هذا الكود

 if(MyOrdersTotal(MagicNumber)>0 && (Bid>=xPrice3 || Bid<=yPrice3))              // Delete Pending Orders
      {
      DeletePendingOrders(MagicNumber);
      } 
  

وهذا

 int DeletePendingOrders(int Magic)
{
int total = OrdersTotal()-1;

for (int cnt=total ; cnt>0 ;cnt--)
{
OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
if(OrderMagicNumber() == Magic && OrderSymbol()==Symbol() && (OrderType()!=OP_BUY || OrderType()!=OP_SELL))
  {
   OrderDelete(OrderTicket());
  }
}
  return(0);
} 
  

ويفترض أن يفتح صفقة معاكسة للصفقة الماضية إذا كانت خاسرة و يفتح نفس الصفقة إذا كانت رابحة

لاكن لا يفعل ذالك

أرجو التصحيح وبارك الله فيك

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

 if(MyPendingOrdersTotal(MagicNumber)<2 )              // Delete Pending Orders
      {
      DeletePendingOrders(MagicNumber);
      } 
  

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

   string last,Blast,Slast; 
  

إجعلها بداخل الداله start حتى تصفر قيم المتغيرات بعد فتح الصفقات فمثلا حسب ما قمت بتعريفها أنت خارج الداله start
فإذا تم فتح صفقة شراء وأغلقت على خساره سوف تصبح قيمة

 Blast="Sloss"; 
  

ثم فتحت صفقة بيع وأغلقت على خساره سوف تصبح قيمة

 Slast="Sloss"; 
  

لكن هل قيمة Blast سوف تتغير لأ سوف تبقى ثابته بقيمة Sloss لذلك يجب أن تقوم بحذف قيمتها أو أن تقوم بتعريفها داخل الداله start حتى تحذف تلقائيها

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

[dentist_hussein]

يمكنك رسم مستوى أفقي من الميتاتريدر من خلال
Insert --------->Lines------->Horizontal Line

بالنسبه لكيفية إستدعاء الخط كمثال

 double line=ObjectGet("name",OBJPROP_PRICE1); 
  

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

 if(Close[1]>line) 
  

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

double line1=ObjectGet("name",OBJPROP_PRICE1);
double line2=ObjectGet("name",OBJPROP_PRICE1);
double line3=ObjectGet("name",OBJPROP_PRICE1);

وبالنسبه ل كلمة PRICE1 هل هي ثابته ولا أقوم بتغيير الرقم الموجود بها .
وإستدعاء الترند يكون بنفس الطريقه أيضا >>??

double trend=ObjectGet("name",OBJPROP_PRICE1);

و رجاء لو تدلني على موضوع يشرح إستدعاء المستويات المرسومه على الميتاتريدر من فايبوناتشي وترندات وغيره داخل إكسبيرت .
و جزاك الله كل خير .

[cher90]

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

 if(MyPendingOrdersTotal(MagicNumber)<2 )              // Delete Pending Orders
      {
      DeletePendingOrders(MagicNumber);
      } 
  

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

   string last,Blast,Slast; 
  

إجعلها بداخل الداله start حتى تصفر قيم المتغيرات بعد فتح الصفقات فمثلا حسب ما قمت بتعريفها أنت خارج الداله start
فإذا تم فتح صفقة شراء وأغلقت على خساره سوف تصبح قيمة

 Blast="Sloss"; 
  

ثم فتحت صفقة بيع وأغلقت على خساره سوف تصبح قيمة

 Slast="Sloss"; 
  

لكن هل قيمة Blast سوف تتغير لأ سوف تبقى ثابته بقيمة Sloss لذلك يجب أن تقوم بحذف قيمتها أو أن تقوم بتعريفها داخل الداله start حتى تحذف تلقائيها

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

بارك الله فيك أستاذ أسامة

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

 int MyPendingOrdersTotal(int Magic)
{
int c=0;
int c1=0;
int c2;
int total = OrdersTotal();
 
for (int cnt=0 ; cnt < total ; cnt++)
{
OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
if (OrderMagicNumber() == Magic && OrderSymbol()==Symbol() && OP_BUYSTOP)
 {
 c++;
 }
 if (OrderMagicNumber() == Magic && OrderSymbol()==Symbol() && OP_SELLSTOP)
 {
 c1++;
 }
 c2=c+c1;
}
return(c2);
} 
  

و الإكسبريت لا يفتح صفقة معاكسة بعد خسارة الصفقة الأخيرة بعكس الإتجاه ... رغم أن المتغيرات معرفة داخل start

أرجو من فضلك التوضيح و جزاك الله خيرا

[QtrrtQ]

السلام عليكم ورحمه الله وبركاته

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

[MR.dollar]

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

double line1=ObjectGet("name",OBJPROP_PRICE1);
double line2=ObjectGet("name",OBJPROP_PRICE1);
double line3=ObjectGet("name",OBJPROP_PRICE1);

وبالنسبه ل كلمة PRICE1 هل هي ثابته ولا أقوم بتغيير الرقم الموجود بها .
وإستدعاء الترند يكون بنفس الطريقه أيضا >>??

double trend=ObjectGet("name",OBJPROP_PRICE1);

و رجاء لو تدلني على موضوع يشرح إستدعاء المستويات المرسومه على الميتاتريدر من فايبوناتشي وترندات وغيره داخل إكسبيرت .
و جزاك الله كل خير .

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

 ObjectGetValueByShift("name",shift); 
  

حيث shift هي رقم الشمعه التي تريد معرفة السعر عندها

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

[MR.dollar]

بارك الله فيك أستاذ أسامة

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

 int MyPendingOrdersTotal(int Magic)
{
int c=0;
int c1=0;
int c2;
int total = OrdersTotal();

for (int cnt=0 ; cnt < total ; cnt++)
{
OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
if (OrderMagicNumber() == Magic && OrderSymbol()==Symbol() && OP_BUYSTOP)
 {
 c++;
 }
 if (OrderMagicNumber() == Magic && OrderSymbol()==Symbol() && OP_SELLSTOP)
 {
 c1++;
 }
 c2=c+c1;
}
return(c2);
} 
  

و الإكسبريت لا يفتح صفقة معاكسة بعد خسارة الصفقة الأخيرة بعكس الإتجاه ... رغم أن المتغيرات معرفة داخل start

أرجو من فضلك التوضيح و جزاك الله خيرا

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

 if (OrderMagicNumber() == Magic && OrderSymbol()==Symbol() && OrderType()>OP_SELL) 
  

لديك أخطاء أخرى أيضا في كود البحث عن الصفقات التي أغلقت لاحظ أنت جعلت الكود

  if(OrderType()==OP_BUY && OrderClosePrice()>=OrderOpenPrice()) 
       last="profit";
       Blast="Bprofit";
       X_lots=OrderLots(); 
  

بما أنك وضعت أكثر من جواب للشرط فيجب أن تستخدم الأقواس { }
ليصبح

   if(OrderType()==OP_BUY && OrderClosePrice()>=OrderOpenPrice()){ 
       last="profit";
       Blast="Bprofit";
       X_lots=OrderLots(); 
       }
       if(OrderType()==OP_BUY && OrderClosePrice()<=OrderOpenPrice()){
       last="loss"; 
       Blast="Bloss";   
       X_lots=OrderLots();
       }
       //for SELL order
       if(OrderType()==OP_SELL && OrderClosePrice()<=OrderOpenPrice()){ 
       last="profit";  
       Slast="Sprofit"; 
       X_lots=OrderLots();
       }
       if(OrderType()==OP_SELL && OrderClosePrice()>=OrderOpenPrice()) {
       last="loss";   
       Slast="Sloss";   
       X_lots=OrderLots();
       } 
  

مرفق الإكسبرت بعد التعديل

[MR.dollar]

السلام عليكم ورحمه الله وبركاته

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

أولا سوف تحتاج إلى دالة مؤشر الآر إس آي

 double rsi=iRSI(Symbol(),0,14,PRICE_CLOSE,0); 
  

ثم تضع الشرط

 if(rsi>=50){
Alert("RSI Above 50");
} 
  

[بهجت الريس]

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

Open[2]

او

Close[0]

وكما تعلم فأن 0 هى الشمعة الحالية و 2 هى الشمعه قبل قبل الحالية
فكيف سنكتب شمعة الواحدة ليلا ؟

[dentist_hussein]

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

 ObjectGetValueByShift("name",shift); 
  

حيث shift هي رقم الشمعه التي تريد معرفة السعر عندها

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

الله يبارك فيك أخي اسامه و يزيدك من علمه و شكرا جزيلا .
يعني مثلا هل هكذا صحيح :
حيث line1هو إسم المستوى رقم1
و trend1هو إسم الترند رقم1

 int start()
   {
     double line1=ObjectGet("line1",OBJPROP_PRICE1); 
     double trend1= ObjectGetValueByShift("trend1",1);
      
    if(Close[1]>line1)
   
    
    if(Close[1]<trend1)
       
         
             
              return(0);
     } 
  

[cher90]

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

 if (OrderMagicNumber() == Magic && OrderSymbol()==Symbol() && OrderType()>OP_SELL) 
  

لديك أخطاء أخرى أيضا في كود البحث عن الصفقات التي أغلقت لاحظ أنت جعلت الكود

  if(OrderType()==OP_BUY && OrderClosePrice()>=OrderOpenPrice()) 
       last="profit";
       Blast="Bprofit";
       X_lots=OrderLots(); 
  

بما أنك وضعت أكثر من جواب للشرط فيجب أن تستخدم الأقواس { }
ليصبح

   if(OrderType()==OP_BUY && OrderClosePrice()>=OrderOpenPrice()){ 
       last="profit";
       Blast="Bprofit";
       X_lots=OrderLots(); 
       }
       if(OrderType()==OP_BUY && OrderClosePrice()<=OrderOpenPrice()){
       last="loss"; 
       Blast="Bloss";   
       X_lots=OrderLots();
       }
       //for SELL order
       if(OrderType()==OP_SELL && OrderClosePrice()<=OrderOpenPrice()){ 
       last="profit";  
       Slast="Sprofit"; 
       X_lots=OrderLots();
       }
       if(OrderType()==OP_SELL && OrderClosePrice()>=OrderOpenPrice()) {
       last="loss";   
       Slast="Sloss";   
       X_lots=OrderLots();
       } 
  

مرفق الإكسبرت بعد التعديل

بارك الله فيك استاذ أسامة

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

أرجو من فضلك التصحيح و جزاك الله خيرا

[MR.dollar]

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

Open[2]

او

Close[0]

وكما تعلم فأن 0 هى الشمعة الحالية و 2 هى الشمعه قبل قبل الحالية
فكيف سنكتب شمعة الواحدة ليلا ؟

وعليكم السلام ورحمة الله وبركاته
أولا يجب أن تحدد رقم شمعة الساعه 1

 int barshift=iBarShift(Symbol(),0,StrToTime(TimeToStr(iTime(Symbol(),1440,0),TIME_DATE)+" "+"01:00"),false); 
  

ثم بعد ذلك تكون القيم

 Open[barshift];
Close[barshift];
High[barshift];
Low[barshift]; 
  

[MR.dollar]

الله يبارك فيك أخي اسامه و يزيدك من علمه و شكرا جزيلا .
يعني مثلا هل هكذا صحيح :
حيث line1هو إسم المستوى رقم1
و trend1هو إسم الترند رقم1

 int start()
   {
     double line1=ObjectGet("line1",OBJPROP_PRICE1); 
     double trend1= ObjectGetValueByShift("trend1",1);
      
    if(Close[1]>line1)
   
    
    if(Close[1]<trend1)
       
         
             
              return(0);
     } 
  

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

[MR.dollar]

بارك الله فيك استاذ أسامة

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

أرجو من فضلك التصحيح و جزاك الله خيرا

الخطأ لديك في دالة حذف الأوامر المعلقه
إجعلها

 int DeletePendingOrders(int Magic)
{
int total = OrdersTotal();

for (int cnt=total ; cnt>=0 ;cnt--)
{
OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
if(OrderMagicNumber() == Magic && OrderSymbol()==Symbol() && (OrderType()!=OP_BUY && OrderType()!=OP_SELL))
  {
   OrderDelete(OrderTicket());
  }
}
  return(0);
}