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

[spiders101]

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

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

 if(Use_USD_Profit_Global==true){//Close Total profit for all pairs >>> ACCount profit ||Close Total profit for one pair >>> profit2(OP_BUY)+profit2(OP_SELL)||***ADD Code to CloseOrders() Function
int triednumber2;
if(OrdersTotal()>0&&triednumber2<20){
while(true)
      {
if(IsTradeContextBusy()){Sleep(1000);} 
else {      
if(AccountProfit()>=USD_Profit && Use_USD_Profit==true){
signalbuy1=false;signalbuy2=false;signalsell1=false;signalsell2=false;
CloseOrders();}
if(AccountProfit()<=-USD_Loss&&Use_USD_Loss==true){
signalbuy1=false;signalbuy2=false;signalsell1=false;signalsell2=false;
CloseOrders();}
if(AccountProfit()<=-(lossratio*AccountBalance()/100)&&LossRatio==true){
signalbuy1=false;signalbuy2=false;signalsell1=false;signalsell2=false;
CloseOrders();}
if(AccountProfit()>=(profitratio*AccountBalance()/100)&&ProfitRatio==true){
signalbuy1=false;signalbuy2=false;signalsell1=false;signalsell2=false;
CloseOrders();}
if(DayOfWeek()==5&&Hour()==CloseHour&&Closeby_EndofWeek==true){
signalbuy1=false;signalbuy2=false;signalsell1=false;signalsell2=false;
CloseOrders();} 
        }
       }
triednumber2++; 
      } 
     } 
  

وبعد حذف الحلقة

 while(true) 
  

عمل بدون مشاكل ولكن لي سؤال ، انا في شروط الشراء داخل نفس الاكسيبرت إستخدمت الحلقة بنفس الطريقة ولم تظهر هذه المشكلة اى الاكسيبرت لم يتوقف عن العمل على الشارت ما السبب !!

 if(signalbuy1==true||signalbuy2==true){
       
if(orderstotal()<MaxTrades){
 
int triednumber;
while(true)
      {
if(IsTradeContextBusy()){Sleep(1000);} 
else { 
int ticket=OrderSend(Symbol(),OP_BUY,Lots,NormalizeDouble(Ask,digits),slippage*Q,0,0," EA",MagicNumber,0,Blue);
//if(ticket<0)Alert("Order Send Error "+GetLastError(),"||","open price for the order"+Ask);***in Future Fix "Order Send Error 146،Order Send Error 129،Order Send Error 128"*** !!   
}
signalbuy1=false;
signalbuy2=false;
GlobalVariableSet("T"+Symbol(),Time[0]);
triednumber++; 
 if(ticket<=0){
   Sleep(500);
     RefreshRates();}
 else 
   break;
   if(triednumber>20)break;
      }                      
    }
  } 
  

[aminefx]

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

 void delete(){
 for(int i=0;i<OrdersTotal()-2;i++){
  OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
  if(OrderSymbol()==Symbol()&&OrderType()>3){
   OrderDelete(OrderTicket());
  }
 }
} 
  

شكرا لك أستاذ أسامة على المساعدة

إنا نسأل الله أن يجعل كل ما تقوم به من مساعدة لإخوانك أن يكون في ميزان حسناتك

[محمد بن حامد]

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

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

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

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

ونضطر الى بدء العمل من جديد بالقيم المبدئية

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

[محمد بن حامد]

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

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

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

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

ونضطر الى بدء العمل من جديد بالقيم المبدئية

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

حاولت استخدام الامران GlobalVariableSet و GlobalVariableGet

ولكن المشكلة التي اواجهها في هذا الامر هي عندما اضع الاكسبرت في اكثر من عملة على المنصة

فلو اعطيت فيمة للمتغير بواسطة GlobalVariableSet في الاكسبرت الموجود لليورو دولار مثلا

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

وهذا يعطي بالتاكيد نتائج غير مرغوبة

[zzeyani]

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

[spiders101]

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

[MR.dollar]

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

لديك خطأ آخر في هذه الحلقات

     string firstM ; 
for(int iii=OrdersHistoryTotal();iii<=1;iii--) 
 {
   OrderSelect(iii, SELECT_BY_POS,MODE_HISTORY);  
   if(OrderSymbol()==Symbol() && OrderMagicNumber()==MagicNumber)
     
    {
    
    double firstM_lots,firstM_SL,firstM_openprice, firstM_ordertype; 
    
       //for buy order
       if(OrderType()==OP_BUY   && OrderClosePrice()>=OrderOpenPrice()) firstM="profit";
       if(OrderType()==OP_BUY   && OrderClosePrice()<=OrderOpenPrice()) firstM="loss";
        
  
       //for SELL order
       if(OrderType()==OP_SELL  && OrderClosePrice()<=OrderOpenPrice()) firstM="profit";
       if(OrderType()==OP_SELL  && OrderClosePrice()>=OrderOpenPrice()) firstM="loss";
       
       firstM_lots=OrderLots();
       firstM_SL=OrderStopLoss();
       firstM_openprice=OrderOpenPrice();
       firstM_ordertype=OrderType() ;
       break;
    }
  }
//===========================   
       ////// HISTORICAL FIRST ONES FOR PENDING ORDERS BY MAGIC ///  
       
      
          string firstP ; 
for(int iiii=OrdersHistoryTotal();iiii<=1;iiii--) 
 {
   OrderSelect(iiii, SELECT_BY_POS,MODE_HISTORY);  
   if(OrderSymbol()==Symbol() && OrderMagicNumber()==MagicNumberP)
     
    {
    
    double firstP_lots,firstP_SL,firstP_openprice, firstP_ordertype; 
    
       //for buy order
       if(OrderType()==OP_BUY   && OrderClosePrice()>=OrderOpenPrice()) firstP="profit";
       if(OrderType()==OP_BUY   && OrderClosePrice()<=OrderOpenPrice()) firstP="loss";
       
       //for SELL order
       if(OrderType()==OP_SELL  && OrderClosePrice()<=OrderOpenPrice()) firstP="profit";
       if(OrderType()==OP_SELL  && OrderClosePrice()>=OrderOpenPrice()) firstP="loss";
      
       firstP_lots=OrderLots();
       firstP_SL=OrderStopLoss();
       firstP_openprice=OrderOpenPrice();
       firstP_ordertype=OrderType() ;
       break;
    }
  } 
  

لاحظ بمجرد بداية عمل الإكسبرت سوف يدخل الإكسبرت في الحلقه

 for(int iii=OrdersHistoryTotal();iii<=1;iii--) 
  

ولن يتوقف أبدا لأن الأمر Break لن يتنفذ لأنه لا يوجد صفقات فتحت بعد وأيضا شروط الحلقه لن تنتهي

[MR.dollar]

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

 if(Use_USD_Profit_Global==true){//Close Total profit for all pairs >>> ACCount profit ||Close Total profit for one pair >>> profit2(OP_BUY)+profit2(OP_SELL)||***ADD Code to CloseOrders() Function
int triednumber2;
if(OrdersTotal()>0&&triednumber2<20){
while(true)
      {
if(IsTradeContextBusy()){Sleep(1000);} 
else {      
if(AccountProfit()>=USD_Profit && Use_USD_Profit==true){
signalbuy1=false;signalbuy2=false;signalsell1=false;signalsell2=false;
CloseOrders();}
if(AccountProfit()<=-USD_Loss&&Use_USD_Loss==true){
signalbuy1=false;signalbuy2=false;signalsell1=false;signalsell2=false;
CloseOrders();}
if(AccountProfit()<=-(lossratio*AccountBalance()/100)&&LossRatio==true){
signalbuy1=false;signalbuy2=false;signalsell1=false;signalsell2=false;
CloseOrders();}
if(AccountProfit()>=(profitratio*AccountBalance()/100)&&ProfitRatio==true){
signalbuy1=false;signalbuy2=false;signalsell1=false;signalsell2=false;
CloseOrders();}
if(DayOfWeek()==5&&Hour()==CloseHour&&Closeby_EndofWeek==true){
signalbuy1=false;signalbuy2=false;signalsell1=false;signalsell2=false;
CloseOrders();} 
        }
       }
triednumber2++; 
      } 
     } 
  

وبعد حذف الحلقة

 while(true) 
  

عمل بدون مشاكل ولكن لي سؤال ، انا في شروط الشراء داخل نفس الاكسيبرت إستخدمت الحلقة بنفس الطريقة ولم تظهر هذه المشكلة اى الاكسيبرت لم يتوقف عن العمل على الشارت ما السبب !!

 if(signalbuy1==true||signalbuy2==true){
       
if(orderstotal()<MaxTrades){

int triednumber;
while(true)
      {
if(IsTradeContextBusy()){Sleep(1000);} 
else { 
int ticket=OrderSend(Symbol(),OP_BUY,Lots,NormalizeDouble(Ask,digits),slippage*Q,0,0," EA",MagicNumber,0,Blue);
//if(ticket<0)Alert("Order Send Error "+GetLastError(),"||","open price for the order"+Ask);***in Future Fix "Order Send Error 146،Order Send Error 129،Order Send Error 128"*** !!   
}
signalbuy1=false;
signalbuy2=false;
GlobalVariableSet("T"+Symbol(),Time[0]);
triednumber++; 
 if(ticket<=0){
   Sleep(500);
     RefreshRates();}
 else 
   break;
   if(triednumber>20)break;
      }                      
    }
  } 
  

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

[MR.dollar]

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

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

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

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

ونضطر الى بدء العمل من جديد بالقيم المبدئية

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

وعليكم السلام ورحمة الله وبركاته
نعم يمكن ذلك بإستخدام الداله FileWrite
مثال

 int file=FileOpen("name.csv",FILE_CSV|FILE_READ,";");
      if(file>0)FileWrite("name.csv",15); 
  

الرقم 15 هي البيانات التي أريد حفظها
name.csv هو إسم الملف الذي سيحفظ

[MR.dollar]

حاولت استخدام الامران GlobalVariableSet و GlobalVariableGet

ولكن المشكلة التي اواجهها في هذا الامر هي عندما اضع الاكسبرت في اكثر من عملة على المنصة

فلو اعطيت فيمة للمتغير بواسطة GlobalVariableSet في الاكسبرت الموجود لليورو دولار مثلا

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

وهذا يعطي بالتاكيد نتائج غير مرغوبة

يمكنك مراعاة ذلك بأن تضع إسم العمله مع إسم المتغير
مثال

 GlobalVariableSet("var"+Symbol()+Period(),Value); 
  

وبالتالي سوف يتغير الإسم إذا تم وضع الإكسبرت على أكثر من عمله أو أكثر من تايم فريم

[MR.dollar]

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

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

[MR.dollar]

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

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

 if(UseAverageTP){
         if(orderscnt(OP_BUY)>1)ModifyOrders(OP_BUY);
         if(orderscnt(OP_SELL)>1)ModifyOrders(OP_SELL);
        } 
  

والمتغير

 Av_TP 
  

إذا جعلته 0 فهذا يعني أنه سيغلق على نقطة التعادل

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

 double AvTP(int type){
double Price;double Lots;
for(int i=0;i<=OrdersTotal();i++){
OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber&&OrderType()==type){
Price+=OrderOpenPrice()*OrderLots();
Lots+=OrderLots();
  }
 }

if(Lots!=0) return(Price/Lots);
} 
  

[zzeyani]

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

أخي MR Dolar أحتاج جزء من السريبت فقط و إدا أمكن تعديل هدا السكريبت ليصبح بشكل المطلوب , وشكرا على مساعدتك


bool IsTrade = False;

for (int i = 0; i < Total; i ++) {
OrderSelect(i, SELECT_BY_POS, MODE_TRADES);
if(OrderType() <= OP_SELL && OrderSymbol() == Symbol()) {
IsTrade = True;
if(OrderType() == OP_BUY) {

[محمد بن حامد]

وعليكم السلام ورحمة الله وبركاته
نعم يمكن ذلك بإستخدام الداله FileWrite
مثال

 int file=FileOpen("name.csv",FILE_CSV|FILE_READ,";");
      if(file>0)FileWrite("name.csv",15); 
  

الرقم 15 هي البيانات التي أريد حفظها
name.csv هو إسم الملف الذي سيحفظ

يمكنك مراعاة ذلك بأن تضع إسم العمله مع إسم المتغير
مثال

 GlobalVariableSet("var"+Symbol()+Period(),Value); 
  

وبالتالي سوف يتغير الإسم إذا تم وضع الإكسبرت على أكثر من عمله أو أكثر من تايم فريم

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

ما شاء الله عليك

بارك الله فيك وزادك علما ووسع رزقك وادخلك الجنة بغير حساب

تحياتي لك

[dentist_hussein]

لديك خطأ آخر في هذه الحلقات

     string firstM ; 
for(int iii=OrdersHistoryTotal();iii<=1;iii--) 
 {
   OrderSelect(iii, SELECT_BY_POS,MODE_HISTORY);  
   if(OrderSymbol()==Symbol() && OrderMagicNumber()==MagicNumber)
     
    {
    
    double firstM_lots,firstM_SL,firstM_openprice, firstM_ordertype; 
    
       //for buy order
       if(OrderType()==OP_BUY   && OrderClosePrice()>=OrderOpenPrice()) firstM="profit";
       if(OrderType()==OP_BUY   && OrderClosePrice()<=OrderOpenPrice()) firstM="loss";
        
  
       //for SELL order
       if(OrderType()==OP_SELL  && OrderClosePrice()<=OrderOpenPrice()) firstM="profit";
       if(OrderType()==OP_SELL  && OrderClosePrice()>=OrderOpenPrice()) firstM="loss";
       
       firstM_lots=OrderLots();
       firstM_SL=OrderStopLoss();
       firstM_openprice=OrderOpenPrice();
       firstM_ordertype=OrderType() ;
       break;
    }
  }
//===========================   
       ////// HISTORICAL FIRST ONES FOR PENDING ORDERS BY MAGIC ///  
       
      
          string firstP ; 
for(int iiii=OrdersHistoryTotal();iiii<=1;iiii--) 
 {
   OrderSelect(iiii, SELECT_BY_POS,MODE_HISTORY);  
   if(OrderSymbol()==Symbol() && OrderMagicNumber()==MagicNumberP)
     
    {
    
    double firstP_lots,firstP_SL,firstP_openprice, firstP_ordertype; 
    
       //for buy order
       if(OrderType()==OP_BUY   && OrderClosePrice()>=OrderOpenPrice()) firstP="profit";
       if(OrderType()==OP_BUY   && OrderClosePrice()<=OrderOpenPrice()) firstP="loss";
       
       //for SELL order
       if(OrderType()==OP_SELL  && OrderClosePrice()<=OrderOpenPrice()) firstP="profit";
       if(OrderType()==OP_SELL  && OrderClosePrice()>=OrderOpenPrice()) firstP="loss";
      
       firstP_lots=OrderLots();
       firstP_SL=OrderStopLoss();
       firstP_openprice=OrderOpenPrice();
       firstP_ordertype=OrderType() ;
       break;
    }
  } 
  

لاحظ بمجرد بداية عمل الإكسبرت سوف يدخل الإكسبرت في الحلقه

 for(int iii=OrdersHistoryTotal();iii<=1;iii--) 
  

ولن يتوقف أبدا لأن الأمر Break لن يتنفذ لأنه لا يوجد صفقات فتحت بعد وأيضا شروط الحلقه لن تنتهي

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