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

[msh3al]

جزاك الله خير اخي اسامه

تفضل:

 

 input double      Lots             = 1;                                                                
 input int         TakeProfit       =0;
 input int         StopLoss         =0;



void OnTick()
  {
//---
   
   
   
   
    if (EnableTimeFilter&&TimeFilter(Start_Hour,End_Hour)==false)return;
    
    double NewLot=Lots;
    if(MoneyManagement) NewLot = LotManage();
    
   
   //------ lots
   
     double NewLot ;
     double pt;
     if(Digits==5||Digits==3)pt=10;
     else pt=1;
     double pip_value= MarketInfo(Symbol(),MODE_TICKVALUE)*pt; 
     
     if(pip_value==0)pip_value=1;
     double stopPips=100; 
     double lots=NormalizeDouble(AccountBalance()/stopPips/pip_value,2);  
  
     if(Lots==0)NewLot=lots;
     else NewLot=Lots;
    
   
   //------ 
    
   
    double SL,TP;   
    int ticket=0;  
   
   //--
   
    if(  High[1] > High[2] )
    {
     if(CloseInReverse)CloseOrders(OP_SELL);
     if(TotalOrders(OP_BUY)<Max_Trades||Max_Trades==0)
     {            
      if(StopLoss==0){SL=0;}else{SL=Ask-StopLoss*point;}
      if(TakeProfit==0){TP=0;}else{TP=Ask+TakeProfit*point;}
      
      ticket=OrderSend(Symbol(),OP_BUY,NormalizeDouble(NewLot,Lot_Decimal),NormalizeDouble(Ask,Digits),3*P,SL,TP,"EA",MagicNumber,0,Blue);
      PlaySound("Alert.wav");
    
     // spread value point
      Print("Spread value in points=",MarketInfo(Symbol(),MODE_SPREAD)); 
      //
      
      Time0=Time[0];
     }
    }
    
   
   
   
   
  } 
  

هل تأكدت وجعلت قيمة Lots=0 في متغيرات الإكسبرت ؟

اي نعم بلا شك , ولم تعمل معي ربي يسعدك




____

هذه دالة لحساب مجموع الصفقات المفتوحه لجميع العملات وليس لعمله محدده فقط

  int TotalOrders()
 {
 int cnt=0;
   for(int i =0;i<OrdersTotal();i++){
     if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)){
       if(OrderMagicNumber()==MagicNumber){
         cnt++;
       }
     }
   }
    return(cnt);
  } 
  

يمكنك أيضا حذف شرط الماجيك نمبر إذا كنت تستخدم ماجيك نمبر مختلف لكل عمله

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

إذاً الاستخدام يكون عند تحقق شرط فتح الاوردر هكذا :

 if( OrdersTotal() < 5 )
{
//
} 
  

5 = اقصى عدد مسموح فيه


----

ولو أردت منع تكرار فتح صفقه من نفس العمله eur/usd في نفس الوقت ؟ اي لايفتح صفقتين من نفس الزوج معاً

[drmahdy]

السلام عليكم .... اريد كود اضافه موفينج افريج لموشر من برمجتي ........يعمل فيsperate window الموشر عباره عن هيستوجرامات في اتجاه واجد اي > 0 بطريقه الداله (on array) وجزاكم الله خيرا

[Walid_ELShereef]

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

جزاك الله خير استاذ أسامة ،،، بانتظارك

[MR.dollar]

السلام عليكم .... اريد كود اضافه موفينج افريج لموشر من برمجتي ........يعمل فيsperate window الموشر عباره عن هيستوجرامات في اتجاه واجد اي > 0 بطريقه الداله (on array) وجزاكم الله خيرا

وعليكم السلام ورحمة الله وبركاته
أرفق المؤشر وأرجو توضيح السؤال بتفصيل أكثر أخي الكريم

[MR.dollar]

اي نعم بلا شك , ولم تعمل معي ربي يسعدك




____


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

إذاً الاستخدام يكون عند تحقق شرط فتح الاوردر هكذا :

 if( OrdersTotal() < 5 )
{
//
} 
  

5 = اقصى عدد مسموح فيه


----

ولو أردت منع تكرار فتح صفقه من نفس العمله eur/usd في نفس الوقت ؟ اي لايفتح صفقتين من نفس الزوج معاً

لو ترفق الإكسبرت كامل الذي قمت بعمله سوف أوضح لك الخطأ . أيضا تأكد من أنك جعلت خيار MoneyManagement=false

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

  int TotalOrders()
 {
 int cnt=0;
   for(int i =0;i<OrdersTotal();i++){
     if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)){
       if(OrderSymbol()==Symbol() && MagicNumber==OrderMagicNumber()){
         cnt++;
       }
     }
   }
    return(cnt);
  } 
  

[drmahdy]

وعليكم السلام ورحمة الله وبركاته
أرفق المؤشر وأرجو توضيح السؤال بتفصيل أكثر أخي الكريم

اتتذكر موشرك ma on rsi اريد مثله تماما https://forum.arabictrader.com/t235541.html

[ali_shadi]

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

اخي الكريم دكتور اسامة السلام عليكم

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

ما اريده هو ما ان يتحقق الهدف يتوقف لتمنى ان تكون فهمت قصدي

شكرا لك على سعة صدرك

[MR.dollar]

اتتذكر موشرك ma on rsi اريد مثله تماما https://forum.arabictrader.com/t235541.html

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

[MR.dollar]

اخي الكريم دكتور اسامة السلام عليكم

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

ما اريده هو ما ان يتحقق الهدف يتوقف لتمنى ان تكون فهمت قصدي

شكرا لك على سعة صدرك

نعم خطأ بسيط الداله OrderReopened و OrderReopenedAndClosed إجعلها من نوع bool وليس void

[ali_shadi]

نعم خطأ بسيط الداله OrderReopened و OrderReopenedAndClosed إجعلها من نوع bool وليس void

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

[ali_shadi]

نعم خطأ بسيط الداله OrderReopened و OrderReopenedAndClosed إجعلها من نوع bool وليس void

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

[MR.dollar]

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

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

 void OrderReopenedAndClosed(int ticket)
{
 for(int i=OrdersHistoryTotal()-1;i>=0;i--)
 {
  bool select=OrderSelect(i,SELECT_BY_POS,MODE_HISTORY);
  if(OrderSymbol()==Symbol()&&OrderMagicNumber()==ticket)
  {
   if(OrderProfit()>0)return(true);
   else return(false);
  } 
 }
 return(false);
} 
  

[ali_shadi]

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

 void OrderReopenedAndClosed(int ticket)
{
 for(int i=OrdersHistoryTotal()-1;i>=0;i--)
 {
  bool select=OrderSelect(i,SELECT_BY_POS,MODE_HISTORY);
  if(OrderSymbol()==Symbol()&&OrderMagicNumber()==ticket)
  {
   if(OrderProfit()>0)return(true);
   else return(false);
  } 
 }
 return(false);
} 
  

جزاك الله كل خير استاذي الغالي والف الف شكر على كرمك

تحياتي لك

[ali_shadi]

استاذي الفاضل معاش ازعجك شوية باسئلتي

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

  void CheckOrders()
{
 for(int i=0;i<OrdersHistoryTotal();i++)
 {
  bool select=OrderSelect(i,SELECT_BY_POS,MODE_HISTORY);
  int type=OrderType();
   Ticket_1 = OrderTicket();
  double TP=OrderTakeProfit();
  double SL=OrderStopLoss();
  double Price=OrderOpenPrice();
  double lots=OrderLots();
  if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
  {
   if(OrderClosePrice()==OrderStopLoss())
   {
   if(OrderType()==OP_BUY)
   SetLines("Stopbuy"+i,Time[shift],OrderOpenPrice(),Time[0],OrderOpenPrice(),LINES_Size,Yellow) ;
   if(OrderType()==OP_SELL)
   SetLines("Stopsell"+i,Time[shift],OrderOpenPrice(),Time[0],OrderOpenPrice(),LINES_Size,Green) ;
 
    if(!OrderReopened(Ticket)&&!OrderReopenedAndClosed(Ticket))
    {
     if(type==OP_BUY&&Ask==Price)
     {
      int t1 = OrderSend(Symbol(),OP_BUY,lots,Ask,3,SL,TP,"ReOpened from #"+DoubleToStr(Ticket),Ticket,0);
 
     }
     else if(type==OP_SELL&&Bid==Price)
     {
      int t2 = OrderSend(Symbol(),OP_SELL,lots,Bid,3,SL,TP,"ReOpened from #"+DoubleToStr(Ticket),Ticket,0);    
     }
    }        
   }
 
  } 
 }
 
} 
  

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

[msh3al]

لو ترفق الإكسبرت كامل الذي قمت بعمله سوف أوضح لك الخطأ . أيضا تأكد من أنك جعلت خيار MoneyManagement=false

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

  int TotalOrders()
 {
 int cnt=0;
   for(int i =0;i<OrdersTotal();i++){
     if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)){
       if(OrderSymbol()==Symbol() && MagicNumber==OrderMagicNumber()){
         cnt++;
       }
     }
   }
    return(cnt);
  } 
  

جزاك الله خير استاذ اسامه
ضبط معي التوتال بشكل ممتاز , بارك الله فيك


بالنسبة لدالة أقصى لوت مقابل وقف الخساره ,
تم إفراد طلب خاص بهذا الموضوع : https://forum.arabictrader.com/t238402.html

جزاك الله خير
وعذراً ع كثرة الاسئله والطلبات
لاحرمك الله الاجر
منك ومن الاخوان نتعلم