عرض مشاركة واحدة
قديم 05-11-2015, 02:08 AM   المشاركة رقم: 1
الكاتب
babouche007
عضو جديد

البيانات
تاريخ التسجيل: Jun 2015
رقم العضوية: 25643
المشاركات: 19
بمعدل : 0.01 يوميا

الإتصالات
الحالة:
babouche007 غير متواجد حالياً
وسائل الإتصال:

المنتدى : منتدى المؤشرات و الاكسبيرتات
5 مشكل عند إنتهاء برمجة اكسبيرت تقاطع موفنجين

السلام عليكم إخواني
لقد بدأت في تطبيق ماتعلمته في لغة mql4
(اكسبيرت تقاطع موفنجين 5 و 14)
أعرف أن المشكل في ordersend
وجدت بعض الشروحات لكن لم أفهم لذا أرجو فقط تصحيح خطئي (أضن أن هكذا سوف أفهم )

كود:
#property copyright "Copyright 2015, Hamza Corp."
#property link      "https://www.mql5.com"
#property version   "1.00"
#property strict

extern string s1 = "Fast Mouving";
extern int FMperiod = 5;
extern int FMshift = 0;
extern int FMmethod = 0;
extern int FMapplied = 0;
extern string s2 = "Low Mouving";
extern int LMperiod = 14;
extern int LMshift = 3;
extern int LMmethod = 0;
extern int LMapplied = 0;
extern string s3 = "Money Manage";
extern int TP = 30;
extern int SL = 10;
extern double lot = 0.1;
extern int magic = 12345;


double t;


//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
double ticksize = MarketInfo (Symbol(),MODE_TICKSIZE);
if ( ticksize == 0.00001 || 0.001 )
   t = ticksize * 10; 
else 
   t = ticksize ;
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---
   
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
  double Fnow = iMA(NULL,0,FMperiod,FMshift,FMmethod,FMapplied,1);
  double Flast = iMA(NULL,0,FMperiod,FMshift,FMmethod,FMapplied,2);
  double Lnow = iMA(NULL,0,LMperiod,LMshift,LMmethod,LMapplied,1);
  double Llast = iMA(NULL,0,LMperiod,LMshift,LMmethod,LMapplied,2);
//---
   if ( Fnow > Lnow && Flast < Llast )
   if (OrdersTotal()==0)
   OrderSend(Symbol(),OP_BUY,lot,Ask,3,Ask-(SL*t),Ask+(TP*t),NULL,magic,0,Blue);
   
   if ( Fnow < Lnow && Flast > Llast )
   if (OrdersTotal()==0)
   OrderSend(Symbol(),OP_SELL,lot,Bid,3,Bid+(SL*t),Bid-(TP*t),NULL,magic,0,Red);
  }
وشكرا



الملفات المرفقة
نوع الملف: mq4 new-Experts.mq4‏ (2.5 كيلوبايت, المشاهدات 5)
عرض البوم صور babouche007  
رد مع اقتباس


  #1  
قديم 05-11-2015, 02:08 AM
babouche007 babouche007 غير متواجد حالياً
عضو جديد
5 مشكل عند إنتهاء برمجة اكسبيرت تقاطع موفنجين

السلام عليكم إخواني
لقد بدأت في تطبيق ماتعلمته في لغة mql4
(اكسبيرت تقاطع موفنجين 5 و 14)
أعرف أن المشكل في ordersend
وجدت بعض الشروحات لكن لم أفهم لذا أرجو فقط تصحيح خطئي (أضن أن هكذا سوف أفهم )

كود:
#property copyright "Copyright 2015, Hamza Corp."
#property link      "https://www.mql5.com"
#property version   "1.00"
#property strict

extern string s1 = "Fast Mouving";
extern int FMperiod = 5;
extern int FMshift = 0;
extern int FMmethod = 0;
extern int FMapplied = 0;
extern string s2 = "Low Mouving";
extern int LMperiod = 14;
extern int LMshift = 3;
extern int LMmethod = 0;
extern int LMapplied = 0;
extern string s3 = "Money Manage";
extern int TP = 30;
extern int SL = 10;
extern double lot = 0.1;
extern int magic = 12345;


double t;


//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
double ticksize = MarketInfo (Symbol(),MODE_TICKSIZE);
if ( ticksize == 0.00001 || 0.001 )
   t = ticksize * 10; 
else 
   t = ticksize ;
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---
   
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
  double Fnow = iMA(NULL,0,FMperiod,FMshift,FMmethod,FMapplied,1);
  double Flast = iMA(NULL,0,FMperiod,FMshift,FMmethod,FMapplied,2);
  double Lnow = iMA(NULL,0,LMperiod,LMshift,LMmethod,LMapplied,1);
  double Llast = iMA(NULL,0,LMperiod,LMshift,LMmethod,LMapplied,2);
//---
   if ( Fnow > Lnow && Flast < Llast )
   if (OrdersTotal()==0)
   OrderSend(Symbol(),OP_BUY,lot,Ask,3,Ask-(SL*t),Ask+(TP*t),NULL,magic,0,Blue);
   
   if ( Fnow < Lnow && Flast > Llast )
   if (OrdersTotal()==0)
   OrderSend(Symbol(),OP_SELL,lot,Bid,3,Bid+(SL*t),Bid-(TP*t),NULL,magic,0,Red);
  }
وشكرا




الملفات المرفقة
نوع الملف: mq4 new-Experts.mq4‏ (2.5 كيلوبايت, المشاهدات 5)
رد مع اقتباس