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

[Jmeel]

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

استاذي شكرا لأهتمامك
الفكرة هي مضاعفات والعقد الرابح بعد عقود خاسرة سيغطي الربح ، عملت دالة لتشييك على اخر عقد مغلق فأذا كان اكثر من 1 يعني رقم موجب وضعت امر فالس للبيع وفالس للشراء
لكن الأمر لم يتنفذ ، ارفقت لك الأكسبيرت وملف بريك بوكس الذي يناديه الأكسبيرت ولأختصر عليك الوقت وضعت علامة ///////////// وكتبت بالعربي اضافة 1 و 2 و 3 و 4 . لك خاص احترامي .

[Jmeel]

هل الأوردر sleep () يشتغل في الباك تيست ؟؟

[Fiber]

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

كتبت كود لكن به خطء لا اعرف اين بالضبط
وهذا الخط هو
'{' - expression on global scope not allowed
لكن بالحقيقة فشلت في ايجاده

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

[MR.dollar]

استاذي شكرا لأهتمامك
الفكرة هي مضاعفات والعقد الرابح بعد عقود خاسرة سيغطي الربح ، عملت دالة لتشييك على اخر عقد مغلق فأذا كان اكثر من 1 يعني رقم موجب وضعت امر فالس للبيع وفالس للشراء
لكن الأمر لم يتنفذ ، ارفقت لك الأكسبيرت وملف بريك بوكس الذي يناديه الأكسبيرت ولأختصر عليك الوقت وضعت علامة ///////////// وكتبت بالعربي اضافة 1 و 2 و 3 و 4 . لك خاص احترامي .

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

 void CheckLastOrderResult37()
{
    double profit = 0;
    datetime lastCloseTime = 0;
    int cnt = OrdersHistoryTotal();
    for (int i=0; i < cnt; i++)
    {
        if (!OrderSelect(i, SELECT_BY_POS, MODE_HISTORY)) continue;
        if (OrderSymbol() == Symbol() && lastCloseTime < OrderCloseTime())
        {
            lastCloseTime = OrderCloseTime();
            profit = OrderProfit();
        }
    }
    if (profit > LastOrderResult37)
       {
    //SellLots36=OP_SELL;
   // BuyLots28=OP_BUY;
    SellLots36=false;                           ///////   اضافة  3
    BuyLots28=false;                            ///////   اضافة  4
      }
   // OP_BUY=false;
  //  OP_SELL=false
    
    //////////////////////////////////////////////////////////////////////////////
    
   } 
  

لكن تعريفك للمتغيرات خاطئه فبدلا من إستخدام متغيرات حجم اللوت SellLots36 و BuyLots28 يمكنك عمل متغيرين مستقلين وتحديد توقيت بداية اليوم للبحث في الصفقات
فتصبح الداله

 void CheckLastOrderResult37()
{
    StopEAToday=false;
    double profit = 0;
    datetime lastCloseTime = 0;
    int cnt = OrdersHistoryTotal();
    for (int i=0; i < cnt; i++)
    {
        if (!OrderSelect(i, SELECT_BY_POS, MODE_HISTORY)) continue;
        if (OrderSymbol() == Symbol() && iTime(Symbol(),1440,0) < OrderCloseTime())
        {
            lastCloseTime = OrderCloseTime();
            profit = OrderProfit();
        }
    }
    if (profit > LastOrderResult37)
       {
    //SellLots36=OP_SELL;
   // BuyLots28=OP_BUY;
   StopEAToday=true;
      }
   // OP_BUY=false;
  //  OP_SELL=false
    
    //////////////////////////////////////////////////////////////////////////////
    
   } 
  

ثانيا بالنسبه لإضافة هذا الكود

  SellLots36=OP_SELL;  ///////////////////////////////                        اضافة  1 
    BuyLots28=OP_BUY;    /////////////////////////////////                       اضافة  2 
  

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

 int start()
{
    if (Bars < 10)
    {
        Comment("Not enough bars");
        return (0);
    }
    if (Terminated == true)
    {
        Comment("EA Terminated.");
        return (0);
    }
   CheckLastOrderResult37();
  if(StopEAToday)return;
    OnEveryTick26();
    
} 
  

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

[MR.dollar]

هل الأوردر sleep () يشتغل في الباك تيست ؟؟

تقصد الداله نعم ستعمل في الباك تست

[Jmeel]

شكرا استاذي لدعمك
بخصوص الأوردر Sleep() لاحظتى شغال على الديمو لكن امس جربته باك تيست اثناء توقف السوق فلم يعمل ، سأنتظر افتتاح السوق ربما اكون كتبت شي خطأ ، لك تحياتي

[MR.dollar]

شكرا استاذي لدعمك
بخصوص الأوردر Sleep() لاحظتى شغال على الديمو لكن امس جربته باك تيست اثناء توقف السوق فلم يعمل ، سأنتظر افتتاح السوق ربما اكون كتبت شي خطأ ، لك تحياتي

ربما لن تلاحظ عمله لإنك في الباك تست تقوم بتسريع الباك تست بالتالي حتى إذا إستخدمت Sleep للتوقف 5 ثواني مثلا فقد لا تلاحظها في الباك تست

[spiders101]

استاذ اسامة ، أرجو الرد على مشاركتي السابقة ، بارك الله فيك

https://forum.arabictrader.com/showt...=1#post2472746

[spiders101]

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

قمت بتعريف متغير لتحديد حجم اللوت قبل أمر OrderSend

 int lott=OrderLots(); 
  

ووضعت الشروط كالتالى

 if(orderstotal3()==1&&orderstotal2(OP_BUYSTOP)<1&&Shifting_Pending_Orders==true){
 
int lott=OrderLots(); 
 
int ticket2=OrderSend(Symbol(),OP_BUYSTOP,lott*2,OpenPrice2()+20*point,5*Q,0,0," EA",MagicNumber,0,Blue);}
 
if(OpenPrice(OP_BUYSTOP)-Bid>2*point){
OrderModify(ticket2,Bid+2*point,NormalizeDouble(SL,digits),NormalizeDouble(TP,digits),0);} 
  

وتم وضع الأمر المعلق باى ستوب ولكن لم يتم تحريك الأمر مع تحرك السعر وظهر خطـأ

OrderModify error 4051

invalid ticket for OrderModify function

وأيضا إذا إستخدمت الداله

 double lot=fibo_lots(); 
  

فيجب أن تتأكد أنه يوجد صفقات مفتوحه حتى تعود الداله fibo_lots فحجم اللوت الصحيح ولا تعود بصفر

بالنسبة للدالة fibo_lots ، انا استخدمت الشرط
OpenPrice(OP_BUY)!=0 و OpenPrice(OP_SELL)!=0

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

[MR.dollar]

تم التعديل والآن عرفت سبب عدم إغلاق الصفقات المعلقة بعد تفعيلها على الهدف .

وشروط الأوامر المعلقة الآن اصبحت هكذا

 /////////////////////////////////////// Delete pending Order //////////////////////////
if(orderstotal2(OP_BUY)+orderstotal2(OP_SELL)==0){
orderDelete(OP_BUYLIMIT);orderDelete(OP_SELLLIMIT);orderDelete(OP_BUYSTOP);orderDelete(OP_SELLSTOP);}
/////////////////////////////////////// Additional Buy & SELL Lots //////////////////////////
if(OpenPrice(OP_BUY)-Ask>Space*point && OpenPrice(OP_BUY)!=0 && Additional_Buy_SELL_Lots==true){
if(StopLoss==0){SL=0;}else{SL=Ask-StopLoss*point;}
if(TakeProfit==0){TP=0;}else{TP=Ask+TakeProfit*point;}
OrderSend(Symbol(),OP_BUY,lot*2,NormalizeDouble(Ask,digits),5*Q,NormalizeDouble(SL,digits),NormalizeDouble(TP,digits)," EA",MagicNumber,0,Blue);}

if(Bid-OpenPrice(OP_SELL)>Space*point && OpenPrice(OP_SELL)!=0 && Additional_Buy_SELL_Lots==true){
if(StopLoss==0){SL=0;}else{SL=Bid+StopLoss*Point;}
if(TakeProfit==0){TP=0;}else{TP=Bid-TakeProfit*Point;}
OrderSend(Symbol(),OP_SELL,lot*2,NormalizeDouble(Bid,digits),5*Q,NormalizeDouble(SL,digits),NormalizeDouble(TP,digits)," EA",MagicNumber,0,Red);}
/////////////////////////////////////// Additional LIMIT & STOP Lots //////////////////////////  
if(OpenPrice(OP_BUY)!=0 &&orderstotal2(OP_BUYLIMIT)<1 && Additional_LIMIT_STOP_Lots==true){
if(StopLoss==0){SL=0;}else{SL=(OpenPrice(OP_BUY)-Space*point)-StopLoss*point;}
if(TakeProfit==0){TP=0;}else{TP=(OpenPrice(OP_BUY)-Space*point)+TakeProfit*point;}
OrderSend(Symbol(),OP_BUYLIMIT,lot*2,OpenPrice(OP_BUY)-Space*point,5*Q,NormalizeDouble(SL,digits),NormalizeDouble(TP,digits)," EA",MagicNumber,0,Blue);}

if(OpenPrice(OP_SELL)!=0 &&orderstotal2(OP_SELLLIMIT)<1 && Additional_LIMIT_STOP_Lots==true){
if(StopLoss==0){SL=0;}else{SL=(OpenPrice(OP_SELL)+Space*point)+StopLoss*Point;}
if(TakeProfit==0){TP=0;}else{TP=(OpenPrice(OP_SELL)+Space*point)-TakeProfit*Point;}
OrderSend(Symbol(),OP_SELLLIMIT,lot*2,OpenPrice(OP_SELL)+Space*point,5*Q,NormalizeDouble(SL,digits),NormalizeDouble(TP,digits)," EA",MagicNumber,0,Red);}
///////////////////////////////////////NumOF_Additional_LIMITSTOP_Lots ////////////////////////// 
if(Fibo_NumOF_Additional_LIMITSTOP==false){
int i,j;
for(i=0,j=1;i<NumOF_Additional_LIMITSTOPLots;i++,j+=j){

if(OpenPrice(OP_BUY)!=0 &&orderstotal2(OP_BUYLIMIT)<i && NumOF_Additional_LIMITSTOP_Lots==true){
if(StopLoss==0){SL=0;}else{SL=(OpenPrice(OP_BUY)-Space*point*i)-StopLoss*point;}
if(TakeProfit==0){TP=0;}else{TP=(OpenPrice(OP_BUY)-Space*point*i)+TakeProfit*point;}
OrderSend(Symbol(),OP_BUYLIMIT,lot*j,OpenPrice(OP_BUY)-Space*point*i,5*Q,NormalizeDouble(SL,digits),NormalizeDouble(TP,digits)," EA",MagicNumber,0,Blue);}

if(OpenPrice(OP_SELL)!=0 &&orderstotal2(OP_SELLLIMIT)<i && NumOF_Additional_LIMITSTOP_Lots==true){
if(StopLoss==0){SL=0;}else{SL=(OpenPrice(OP_SELL)+Space*point*i)+StopLoss*Point;}
if(TakeProfit==0){TP=0;}else{TP=(OpenPrice(OP_SELL)+Space*point*i)-TakeProfit*Point;}
OrderSend(Symbol(),OP_SELLLIMIT,lot*j,OpenPrice(OP_SELL)+Space*point*i,5*Q,NormalizeDouble(SL,digits),NormalizeDouble(TP,digits)," EA",MagicNumber,0,Red);}
}}//set multiplier by 2,4,8,16 and if we need 2,4,6,8 use j=0 and j++ and lot*2*j
///////////////////////////////////////Fibo_NumOF_Additional_LIMITSTOP_Lots ////////////////////////// 
if(Fibo_NumOF_Additional_LIMITSTOP==true){
for(i=0;i<NumOF_Additional_LIMITSTOPLots;i++){
double lot=fibo_lots(); 

if(OpenPrice(OP_BUY)!=0 &&orderstotal2(OP_BUYLIMIT)<i){
if(StopLoss==0){SL=0;}else{SL=(OpenPrice(OP_BUY)-Space*point*i)-StopLoss*point;}
if(TakeProfit==0){TP=0;}else{TP=(OpenPrice(OP_BUY)-Space*point*i)+TakeProfit*point;}
OrderSend(Symbol(),OP_BUYLIMIT,lot,OpenPrice(OP_BUY)-Space*point*i,5*Q,NormalizeDouble(SL,digits),NormalizeDouble(TP,digits)," EA",MagicNumber,0,Blue);}

if(OpenPrice(OP_SELL)!=0 &&orderstotal2(OP_SELLLIMIT)<i){
if(StopLoss==0){SL=0;}else{SL=(OpenPrice(OP_SELL)+Space*point*i)+StopLoss*Point;}
if(TakeProfit==0){TP=0;}else{TP=(OpenPrice(OP_SELL)+Space*point*i)-TakeProfit*Point;}
OrderSend(Symbol(),OP_SELLLIMIT,lot,OpenPrice(OP_SELL)+Space*point*i,5*Q,NormalizeDouble(SL,digits),NormalizeDouble(TP,digits)," EA",MagicNumber,0,Red);}
}}
/////////////////////////////////////// Reversed Multiplier //////////////////////////  
if(OpenPrice(OP_BUY)-Ask>Space*point&&OpenPrice(OP_BUY)!=0&&LastOrderType()==OP_BUY&&Reversed_Multiplier==true){
if(StopLoss==0){SL=0;}else{SL=Bid+StopLoss*Point;}
if(TakeProfit==0){TP=0;}else{TP=Bid-TakeProfit*Point;}
OrderSend(Symbol(),OP_SELL,lot*2,NormalizeDouble(Bid,digits),5*Q,NormalizeDouble(SL,digits),NormalizeDouble(TP,digits)," EA",MagicNumber,0,Red);}

if(Bid-OpenPrice(OP_SELL)>Space*point&&OpenPrice(OP_SELL)!=0&&LastOrderType()==OP_SELL&&Reversed_Multiplier==true){
if(StopLoss==0){SL=0;}else{SL=Ask-StopLoss*point;}
if(TakeProfit==0){TP=0;}else{TP=Ask+TakeProfit*point;}
OrderSend(Symbol(),OP_BUY,lot*2,NormalizeDouble(Ask,digits),5*Q,NormalizeDouble(SL,digits),NormalizeDouble(TP,digits)," EA",MagicNumber,0,Blue);}
/////////////////////////////////////// Reversed Multiplier2 //////////////////////////  
if(OpenPrice(OP_BUY)!=0&&orderstotal2(OP_SELLSTOP)<1&&LastOrderType()==OP_BUY&&Reversed_Multiplier2==true){
if(StopLoss==0){SL=0;}else{SL=(OpenPrice(OP_BUY)-Space*point)+StopLoss*Point;}
if(TakeProfit==0){TP=0;}else{TP=(OpenPrice(OP_BUY)-Space*point)-TakeProfit*Point;}
OrderSend(Symbol(),OP_SELLSTOP,lot*2,OpenPrice(OP_BUY)-Space*point,5*Q,NormalizeDouble(SL,digits),NormalizeDouble(TP,digits)," EA",MagicNumber,0,Red);}

if(OpenPrice(OP_SELL)!=0&&orderstotal2(OP_BUYSTOP)<1&&LastOrderType()==OP_SELL&&Reversed_Multiplier2==true){
if(StopLoss==0){SL=0;}else{SL=(OpenPrice(OP_SELL)+Space*point)-StopLoss*point;}
if(TakeProfit==0){TP=0;}else{TP=(OpenPrice(OP_SELL)+Space*point)+TakeProfit*point;}
OrderSend(Symbol(),OP_BUYSTOP,lot*2,OpenPrice(OP_SELL)+Space*point,5*Q,NormalizeDouble(SL,digits),NormalizeDouble(TP,digits)," EA",MagicNumber,0,Blue);}
//Hint:OrderOpenPrice For Pending Orders>Current price -- orders-->(OP_BUYSTOP&&OP_SELLLIMIT)
//Hint:OrderOpenPrice For Pending Orders<Current price -- orders-->(OP_BUYLIMIT&&OP_SELLSTOP)   
/////////////////////////////////////////////////////////////////////////////////////////// 
  

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

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

وأنا قمت بوضع

 double buys1=Close[1]; 
  

 double SeLLsl=Close[1]; 
  

بعد أوردر سيند ، ووضع الشرط داخل ستارت

 if(Ask==buys1||Ask==SeLLsl||Bid==buys1||Bid==SeLLsl){CloseOrders();} 
  

ولكن لايتم إغلاق الصفقة على سعر إغلاق الشمعة السابقة

المشكله في أنت قمت بتعريف المتغيرات buys1 و SeLLsl مرتين مره خارج الداله start ومره داخلها
وهذا السبب الخطأ قمت بحذف تعريف المتغيرات بداخل الداله ستارت والإغلاق عمل بنجاح \

بالنسبه للكود فأنا ارى أنك جعلته منظم بشكل جيد بحيث يسهل التعديل عليه ومراجعته فلا يحتاج إلى تعديل أو تبسيط

[MR.dollar]

بالنسبة للدالة fibo_lots ، انا استخدمت الشرط
OpenPrice(OP_BUY)!=0 و OpenPrice(OP_SELL)!=0

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

نعم التعديل صحيح
بالنسبه لعمل مودفاي للأوامر
فلديك خطأ في تحديد سعر مكان الأمر الجديد لأن أغلب البروكرات لن تسمح بوضع الأمر المعلق على بعد نقطتين بالتالي سوف يظهر خطأ 130
ثانيا يجب تعديل الهدف والأستوب لوز الجديد بناء على السعر الجديد وتضيف له عدد نقاط الهدف والأستوب
ثالثا إستخدام ticket2 قم بتعريفها خارج الداله start حتى لا يظهر خطأ رقم تيكيت خاطئ
رابعا الأفضل أن تقوم بعمل داله تقوم بالبحث عن الأوامر المعلقه بالشروط التي وضعتها ويقوم بتعديلها
مثال

 void ModifyOrders()
  {
   for(int i=0;i<OrdersTotal();i++){
    OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
    int ticket=OrderTicket();
    if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber&&OrderType()==OP_BUYSTOP){
     if(OrderOpenPrice()-Bid>2*point){
      OrderModify(ticket,Bid+2*point,Bid+2*point-StopLoss*point,Bid+2*point+TakeProfit*point);
     }
    }
   }
  } 
  

[spiders101]

المشكله في أنت قمت بتعريف المتغيرات buys1 و SeLLsl مرتين مره خارج الداله start ومره داخلها
وهذا السبب الخطأ قمت بحذف تعريف المتغيرات بداخل الداله ستارت والإغلاق عمل بنجاح \

بالنسبه للكود فأنا ارى أنك جعلته منظم بشكل جيد بحيث يسهل التعديل عليه ومراجعته فلا يحتاج إلى تعديل أو تبسيط

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

[spiders101]

استاذ اسامة ، انا قمت بعمل مؤشر بسيط لمؤشر الأوتو ريمكوند مع سحابة مؤشر الإيشيموكو ومع إتفاق إشارة مؤشر الأوتو ريمكوند ووجود السعر أسفل سحابة الديلى + 4 ساعات + ساعة يظهر سهم أحمر وبالمثل للسهم الأزرق ، ولكن المؤشر لايحقق شرط سحابة الاربع ساعات ، فقط شرط سحابة الديلى والساعة ، ما سبب الخطـأ !!

[Jmeel]

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

[wahaab]

السلام عليكم ورحمة الله
عملت باك تست بنسبة 99 بالمائة لكن الملاحظ ان الاطار طلع لونه احمر بينما عند بعض الاخوة يطلع لونه اخضر او اصفر .يا ترى ايش معنى هذه الالوان؟
وشكراااااا