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

[MR.dollar]

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

وعليكم السلام ورحمة الله وبركاته
تستخدم الداله ObjectCreate لرسم الأشكال على الشارت. راجع هذا الموضوع بهذه شرح تفصيلي

https://forum.arabictrader.com/t37561-8.html

[MR.dollar]

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

راجع أيضا هذه المشاركه

https://forum.arabictrader.com/t135010.html#post2272507

[ali_shadi]

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

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

لنفرض لدي اكسبيرت يفتح صفقات شراء ... الصفقة الاولى حققت الهدف ولكن الثانية والثالثة ضربت الستوب ...

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

ولكن بعقد مضاعف ... ثم اذا تحقق الهدف يحذف الخطوط وهكذا

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

ارجو التكرم بالرد للاهمية

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

[Walid_ELShereef]

الأخ العزيز استاذ أسامه مستر دولار
كنت قرأت لحضرتك موضوع من فترة عن اكسبيرت ناسخ للصفقات بين المنصات صراحة مش قادر اوصل لهذا الموضوع
ولكن سؤالي الان
كيف يتم نسخ الصفقات بين عدة منصات ميتاتريدر ( ليست بجهاز كمبيوتر واحد )
او بمعنى نسخ الصفقات عبر الانترنت
بحثت كثيرا في استخدام الـ WebRequest ولكني للاسف لم اصل لنتيجة
فلو حضرتك تتكرم كعادتك وتشرح لي طريقة نسخ الصفقات بين المنصات عن بعد وليس نسخ الصفقات بين منصتين على نفس جهاز الكمبيوتر او السرفر
سؤالي الأخر
كيف يتم نقل أو نسخ الصفقات المفتوحة والمغلقة إلى ملف اكسيل نفس التقارير اليومية اللي بتيجي من البروكر على الايميل كل يوم
بحيث يتم النقل لحظي بمجرد فتح او إغلاق الصفقة

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

[samizh]

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

[msh3al]

استاذ اسامه فضلاً أُريد كود دالة لتحديد " أقصى عدد للاوردرات المفتوحه " ...
لدي اكسبريت على عملات كثيره واريد ضبط عدد الصفقات المفتوحه

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

سيصبح الكود

 
void OnTick()
  {
//---
   
   
   
   
    if (EnableTimeFilter&&TimeFilter(Start_Hour,End_Hour)==false)return;
    
    double NewLot=Lots;
    if(MoneyManagement) NewLot = LotManage();
    
   
   //------ lots
   
     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];
     }
    }
    
   
   
   
   
  } 
  

قرأت الكود اكثر من 6 مرات تقريباً محاولاً معرفة التعديل اللي حصل , لم اجد فرق :") لم يعمل معي استاذ اسامه , لعلك قمت بنسخ الكود القديم مره اخرى ربي يسعدك

[drmahdy]

السلام عليكم ....... ممكن كود اكسبيرت تقاطع 2 موفينج بحيث لما يحصل تقاطع شراء يقفل اي بيع والعكس

[ali_shadi]

السلام عليكم ....... ممكن كود اكسبيرت تقاطع 2 موفينج بحيث لما يحصل تقاطع شراء يقفل اي بيع والعكس

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

هذا مثال على تقاطع الموفينج 50 و 21

        if (iMA(NULL, PERIOD_H4,50,0,MODE_SMA,PRICE_CLOSE,1) < iMA(NULL, PERIOD_H4,21,0,MODE_SMA,PRICE_CLOSE,1))
         CloseOrders(OP_SELL);       
           if (iMA(NULL, PERIOD_H4,50,0,MODE_SMA,PRICE_CLOSE,1) > iMA(NULL, PERIOD_H4,21,0,MODE_SMA,PRICE_CLOSE,1))
              CloseOrders(OP_BUY); 
  

ثم دالة الاغلاق خسب تايب الصفقة كالتالي

 void CloseOrders(int type)
{
  for (int cnt=OrdersTotal()-1;cnt>=0;cnt--)
  {
    bool select=OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
    int ticket=OrderTicket();
    double lots=OrderLots();
    if(OrderMagicNumber() == MagicNumber && OrderSymbol()==Symbol()&&(OrderType()==type))
    {
     if(OrderType()==OP_BUY)
      {
       bool closeb=OrderClose(ticket,lots,NormalizeDouble(Bid,Digits),5);      
      }
      if(OrderType()==OP_SELL)
      {
       bool closes=OrderClose(ticket,lots,NormalizeDouble(Ask,Digits),5);
      }
    }
  }
} 
  

بالتوفيق

[MR.dollar]

السلام عليكم ....... ممكن كود اكسبيرت تقاطع 2 موفينج بحيث لما يحصل تقاطع شراء يقفل اي بيع والعكس

وعليكم السلام ورحمة الله وبركاته
هذا مثال لإكسبرت جاهز

[MR.dollar]

قرأت الكود اكثر من 6 مرات تقريباً محاولاً معرفة التعديل اللي حصل , لم اجد فرق :") لم يعمل معي استاذ اسامه , لعلك قمت بنسخ الكود القديم مره اخرى ربي يسعدك

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

[MR.dollar]

استاذ اسامه فضلاً أُريد كود دالة لتحديد " أقصى عدد للاوردرات المفتوحه " ...
لدي اكسبريت على عملات كثيره واريد ضبط عدد الصفقات المفتوحه

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

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

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

[MR.dollar]

ارجو التكرم بالرد للاهمية

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

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

أولا دالة لفتح الصفقات مره أخرى

 void CheckOrders()
{
 for(int i=0;i<OrdersHistoryTotal();i++)
 {
  bool select=OrderSelect(i,SELECT_BY_POS,MODE_HISTORY);
  int type=OrderType();
  int ticket=OrderTicket();
  double TP=OrderTakeProfit();
  double SL=OrderStopLoss();
  double Price=OrderOpenPrice();
  double lots=OrderLots();
  if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
  {
   if(OrderClosePrice()==OrderStopLoss())
   {
    if(!OrderReopened(ticket)&&!OrderReopenedAndClosed(ticket))
    {
     if(type==OP_BUY&&Ask==Price)
     {
      OrderSend(Symbol(),OP_BUY,lots,Ask,3,SL,TP,"ReOpened from #"+DoubleToStr(ticket),ticket,0);
     }
     else if(type==OP_SELL&&Bid==Price)
     {
      OrderSend(Symbol(),OP_SELL,lots,Bid,3,SL,TP,"ReOpened from #"+DoubleToStr(ticket),ticket,0);    
     }
    }
   }
  } 
 }
} 
  

ثانيا دالة التأكد من أن الصفقه لم تفتح بعد أو أنها فتحت وأغلقت على ربح

 void OrderReopened(int ticket)
{
 for(int i=0;i<OrdersTotal();i++)
 {
  bool select=OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
  if(OrderSymbol()==Symbol()&&OrderMagicNumber()==ticket)
  {
   return(true);
  } 
 }
 return(false);
}
void OrderReopenedAndClosed(int ticket)
{
 for(int i=0;i<OrdersHistoryTotal();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);
} 
  

[MR.dollar]

الأخ العزيز استاذ أسامه مستر دولار
كنت قرأت لحضرتك موضوع من فترة عن اكسبيرت ناسخ للصفقات بين المنصات صراحة مش قادر اوصل لهذا الموضوع
ولكن سؤالي الان
كيف يتم نسخ الصفقات بين عدة منصات ميتاتريدر ( ليست بجهاز كمبيوتر واحد )
او بمعنى نسخ الصفقات عبر الانترنت
بحثت كثيرا في استخدام الـ WebRequest ولكني للاسف لم اصل لنتيجة
فلو حضرتك تتكرم كعادتك وتشرح لي طريقة نسخ الصفقات بين المنصات عن بعد وليس نسخ الصفقات بين منصتين على نفس جهاز الكمبيوتر او السرفر
سؤالي الأخر
كيف يتم نقل أو نسخ الصفقات المفتوحة والمغلقة إلى ملف اكسيل نفس التقارير اليومية اللي بتيجي من البروكر على الايميل كل يوم
بحيث يتم النقل لحظي بمجرد فتح او إغلاق الصفقة

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

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

[ali_shadi]

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

أولا دالة لفتح الصفقات مره أخرى

 void CheckOrders()
{
 for(int i=0;i<OrdersHistoryTotal();i++)
 {
  bool select=OrderSelect(i,SELECT_BY_POS,MODE_HISTORY);
  int type=OrderType();
  int ticket=OrderTicket();
  double TP=OrderTakeProfit();
  double SL=OrderStopLoss();
  double Price=OrderOpenPrice();
  double lots=OrderLots();
  if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
  {
   if(OrderClosePrice()==OrderStopLoss())
   {
    if(!OrderReopened(ticket)&&!OrderReopenedAndClosed(ticket))
    {
     if(type==OP_BUY&&Ask==Price)
     {
      OrderSend(Symbol(),OP_BUY,lots,Ask,3,SL,TP,"ReOpened from #"+DoubleToStr(ticket),ticket,0);
     }
     else if(type==OP_SELL&&Bid==Price)
     {
      OrderSend(Symbol(),OP_SELL,lots,Bid,3,SL,TP,"ReOpened from #"+DoubleToStr(ticket),ticket,0);    
     }
    }
   }
  } 
 }
} 
  

ثانيا دالة التأكد من أن الصفقه لم تفتح بعد أو أنها فتحت وأغلقت على ربح

 void OrderReopened(int ticket)
{
 for(int i=0;i<OrdersTotal();i++)
 {
  bool select=OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
  if(OrderSymbol()==Symbol()&&OrderMagicNumber()==ticket)
  {
   return(true);
  } 
 }
 return(false);
}
void OrderReopenedAndClosed(int ticket)
{
 for(int i=0;i<OrdersHistoryTotal();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);
} 
  

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