FX-Arabia

جديد المواضيع















الملاحظات

منتدى المؤشرات و الاكسبيرتات تعليم برمجة الاكسبيرت ، اكسبيرت مجانى ، برمجة مؤشرات ، مؤشر ، تصميم اكسبيرت مجانا ، اكسبيرتات جديدة ، مؤشرات جديدة ، كل ما يتعلق بالتحليل و الخاص بالمؤشرات الفنية او الرقمية ، Expert advisor ، mql ، mql4 ، دورة برمجة ، برمجة اكسبيرت ، اكسبيرت رابح ، اكسبيرت جيد ، ادارة حسابات ، تداول الى ، ميتاتريدر ، تحميل منصة ، منصة تداول ، برمجة مؤشر ، مكتبة مؤشرات ، مؤشر جديد ، مؤشرات جديدة ، مؤشر حصرى ، احدث مؤشر .


طلب مساعدة في اصلاح اكسبرت

منتدى المؤشرات و الاكسبيرتات


إضافة رد
 
أدوات الموضوع
قديم 29-09-2017, 08:33 AM   المشاركة رقم: 1
الكاتب
nix
عضو جديد

البيانات
تاريخ التسجيل: Sep 2015
رقم العضوية: 27364
المشاركات: 38
بمعدل : 0.01 يوميا

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

المنتدى : منتدى المؤشرات و الاكسبيرتات
افتراضي طلب مساعدة في اصلاح اكسبرت

نهاركم سعيد
فكرة الاكسبرت وضع اوامر بيع و شراء علا الشرت في المكان المراد بواسطة الفارة
buy limit = B + left mouse click in disired place on the chart
sell limit = S + left mouse clic

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



//+------------------------------------------------------------------+
//| BetaTrader1.mq4 |
//| Copyright 2017, MetaQuotes Software Corp. |
//| MQL5: automated forex trading, strategy tester and custom indicators with MetaTrader |
//+------------------------------------------------------------------+
#property copyright "Copyright 2017, MetaQuotes Software Corp."
#property link "https://www.mql5.com"
#property version "1.00"
#property strict
#import "user32.dll"
bool GetAsyncKeyState(int nVirtKey);
#import
#define KEYEVENTF_EXTENDEDKEY 0x0001
#define KEYEVENTF_KEYUP 0x0002

extern double Risk = 5 ;
extern int TakeProfit = 50;
extern int StopLoss = 20 ;
extern int MagicNumber = 1234;
int ticket ;
extern double LotSize = 0.01 ;

double pips;
#define VK_LBUTTON 1 //Left mouse button
#define VK_CONTROL 17 //B key
#define VK_MENU 18 //S key
#define VK_B 66
#define VK_S 83

double prix ;

//+------------------------------------------------------------------+
//| Expert initialization function |
//+------------------------------------------------------------------+
int OnInit()
{
//---

double ticksize=MarketInfo(Symbol(),MODE_TICKSIZE);

if (ticksize==0.00001 || ticksize==0.001)

pips = ticksize*10;


else

pips = ticksize;
//---
return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| Expert deinitialization function |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
//---

}

//+------------------------------------------------------------------+
//| ChartEvent function |
//+------------------------------------------------------------------+
void OnChartEvent(const int id,
const long &lparam,
const double &dparam,
const string &sparam)
{
//---************************************************** *************getting mouse data********************************//
if( id==CHARTEVENT_CLICK && GetAsyncKeyState(VK_B ) )
{
int x =(int)lparam;
int y =(int)dparam;
datetime dt =0;
double price =0;
int window=0;
ChartXYToTimePrice(0,x,y,window,dt,price);
prix = NormalizeDouble(price,5);

//************************************************** ********************Trading*********************** *****************//


ticket = OrderSend(Symbol(),2,LotSize,prix,2,prix-(StopLoss*pips),prix +(TakeProfit*pips),NULL,MagicNumber,0,clrNONE);

if (ticket < 0)
{
Print("open buyLimit error ==",GetLastError());

}
}
// ---************************************************** *************getting mouse data********************************//
if( id==CHARTEVENT_CLICK &&GetAsyncKeyState(VK_S ) )
{
int x =(int)lparam;
int y =(int)dparam;
datetime dt =0;
double price =0;
int window=0;
ChartXYToTimePrice(0,x,y,window,dt,price);
prix = NormalizeDouble(price,5);


//************************************************** ********************Trading*********************** *****************//


ticket = OrderSend(Symbol(),3,LotSize,prix,2,prix+(StopLoss *pips),prix-(TakeProfit*pips),NULL,MagicNumber,0,clrNONE);

if (ticket < 0)
{
Print("open SellLimit error ==",GetLastError());


}

}





}
//+------------------------------------------------------------------+



عرض البوم صور nix  
رد مع اقتباس


  #1  
قديم 29-09-2017, 08:33 AM
nix nix غير متواجد حالياً
عضو جديد
افتراضي طلب مساعدة في اصلاح اكسبرت

نهاركم سعيد
فكرة الاكسبرت وضع اوامر بيع و شراء علا الشرت في المكان المراد بواسطة الفارة
buy limit = B + left mouse click in disired place on the chart
sell limit = S + left mouse clic

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



//+------------------------------------------------------------------+
//| BetaTrader1.mq4 |
//| Copyright 2017, MetaQuotes Software Corp. |
//| MQL5: automated forex trading, strategy tester and custom indicators with MetaTrader |
//+------------------------------------------------------------------+
#property copyright "Copyright 2017, MetaQuotes Software Corp."
#property link "https://www.mql5.com"
#property version "1.00"
#property strict
#import "user32.dll"
bool GetAsyncKeyState(int nVirtKey);
#import
#define KEYEVENTF_EXTENDEDKEY 0x0001
#define KEYEVENTF_KEYUP 0x0002

extern double Risk = 5 ;
extern int TakeProfit = 50;
extern int StopLoss = 20 ;
extern int MagicNumber = 1234;
int ticket ;
extern double LotSize = 0.01 ;

double pips;
#define VK_LBUTTON 1 //Left mouse button
#define VK_CONTROL 17 //B key
#define VK_MENU 18 //S key
#define VK_B 66
#define VK_S 83

double prix ;

//+------------------------------------------------------------------+
//| Expert initialization function |
//+------------------------------------------------------------------+
int OnInit()
{
//---

double ticksize=MarketInfo(Symbol(),MODE_TICKSIZE);

if (ticksize==0.00001 || ticksize==0.001)

pips = ticksize*10;


else

pips = ticksize;
//---
return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| Expert deinitialization function |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
//---

}

//+------------------------------------------------------------------+
//| ChartEvent function |
//+------------------------------------------------------------------+
void OnChartEvent(const int id,
const long &lparam,
const double &dparam,
const string &sparam)
{
//---************************************************** *************getting mouse data********************************//
if( id==CHARTEVENT_CLICK && GetAsyncKeyState(VK_B ) )
{
int x =(int)lparam;
int y =(int)dparam;
datetime dt =0;
double price =0;
int window=0;
ChartXYToTimePrice(0,x,y,window,dt,price);
prix = NormalizeDouble(price,5);

//************************************************** ********************Trading*********************** *****************//


ticket = OrderSend(Symbol(),2,LotSize,prix,2,prix-(StopLoss*pips),prix +(TakeProfit*pips),NULL,MagicNumber,0,clrNONE);

if (ticket < 0)
{
Print("open buyLimit error ==",GetLastError());

}
}
// ---************************************************** *************getting mouse data********************************//
if( id==CHARTEVENT_CLICK &&GetAsyncKeyState(VK_S ) )
{
int x =(int)lparam;
int y =(int)dparam;
datetime dt =0;
double price =0;
int window=0;
ChartXYToTimePrice(0,x,y,window,dt,price);
prix = NormalizeDouble(price,5);


//************************************************** ********************Trading*********************** *****************//


ticket = OrderSend(Symbol(),3,LotSize,prix,2,prix+(StopLoss *pips),prix-(TakeProfit*pips),NULL,MagicNumber,0,clrNONE);

if (ticket < 0)
{
Print("open SellLimit error ==",GetLastError());


}

}





}
//+------------------------------------------------------------------+




رد مع اقتباس

قديم 29-09-2017, 08:36 AM   المشاركة رقم: 2
الكاتب
nix
عضو جديد

البيانات
تاريخ التسجيل: Sep 2015
رقم العضوية: 27364
المشاركات: 38
بمعدل : 0.01 يوميا

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

كاتب الموضوع : nix المنتدى : منتدى المؤشرات و الاكسبيرتات
افتراضي طلب مساعدة في اصلاح اكسبرت

نهاركم سعيد
فكرة الاكسبرت وضع اوامر بيع و شراء علا الشرت في المكان المراد بواسطة الفارة
buy limit = B + left mouse click in disired place on the chart
sell limit = S + left mouse clic

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


كود:
//+------------------------------------------------------------------+
//|                                                  BetaTrader1.mq4 |
//|                        Copyright 2017, MetaQuotes Software Corp. |
//|                                             https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "Copyright 2017, MetaQuotes Software Corp."
#property link      "https://www.mql5.com"
#property version   "1.00"
#property strict
#import "user32.dll"
    bool      GetAsyncKeyState(int nVirtKey);
#import
#define KEYEVENTF_EXTENDEDKEY          0x0001
#define KEYEVENTF_KEYUP                0x0002

extern double Risk = 5 ;
extern int TakeProfit = 50;
extern int StopLoss = 20 ;
extern int MagicNumber = 1234;
int ticket ;
extern double LotSize = 0.01 ;

double pips;
#define VK_LBUTTON         1     //Left mouse button
#define VK_CONTROL         17   //CONTROL key
#define VK_MENU            18   //ALT key
#define VK_B   66
#define VK_S   83

double prix ;

//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
 
    double ticksize=MarketInfo(Symbol(),MODE_TICKSIZE);
  
  if (ticksize==0.00001 || ticksize==0.001)
 
  pips = ticksize*10;
 
  
  else
 
   pips = ticksize;
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---
   
  }

//+------------------------------------------------------------------+
//| ChartEvent function                                              |
//+------------------------------------------------------------------+
void OnChartEvent(const int id,
                  const long &lparam,
                  const double &dparam,
                  const string &sparam)
  {
//---***************************************************************getting mouse data********************************//
   if( id==CHARTEVENT_CLICK && GetAsyncKeyState(VK_B ) )
  {
      int      x     =(int)lparam;
      int      y     =(int)dparam;
      datetime dt    =0;
      double   price =0;
      int      window=0;
      ChartXYToTimePrice(0,x,y,window,dt,price); 
      prix =  NormalizeDouble(price,5);
    
 //**********************************************************************Trading****************************************//
 
 
    ticket = OrderSend(Symbol(),2,LotSize,prix,2,prix-(StopLoss*pips),prix +(TakeProfit*pips),NULL,MagicNumber,0,clrNONE);
    
     if (ticket < 0) 
  {
  Print("open buyLimit error ==",GetLastError());
    
   } 
   }
  // ---***************************************************************getting mouse data********************************//
   if( id==CHARTEVENT_CLICK &&GetAsyncKeyState(VK_S ) )
     {
      int      x     =(int)lparam;
      int      y     =(int)dparam;
      datetime dt    =0;
      double   price =0;
      int      window=0;
      ChartXYToTimePrice(0,x,y,window,dt,price); 
      prix =  NormalizeDouble(price,5);
    
   
   //**********************************************************************Trading****************************************//
 
   
    ticket = OrderSend(Symbol(),3,LotSize,prix,2,prix+(StopLoss*pips),prix-(TakeProfit*pips),NULL,MagicNumber,0,clrNONE);
    
    if (ticket < 0) 
  {
  Print("open SellLimit error ==",GetLastError());
    
   
   }
   
   }
 
 
 
 
    
  }
//+------------------------------------------------------------------+



عرض البوم صور nix  
رد مع اقتباس
  #2  
قديم 29-09-2017, 08:36 AM
nix nix غير متواجد حالياً
عضو جديد
افتراضي طلب مساعدة في اصلاح اكسبرت

نهاركم سعيد
فكرة الاكسبرت وضع اوامر بيع و شراء علا الشرت في المكان المراد بواسطة الفارة
buy limit = B + left mouse click in disired place on the chart
sell limit = S + left mouse clic

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


كود:
//+------------------------------------------------------------------+
//|                                                  BetaTrader1.mq4 |
//|                        Copyright 2017, MetaQuotes Software Corp. |
//|                                             https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "Copyright 2017, MetaQuotes Software Corp."
#property link      "https://www.mql5.com"
#property version   "1.00"
#property strict
#import "user32.dll"
    bool      GetAsyncKeyState(int nVirtKey);
#import
#define KEYEVENTF_EXTENDEDKEY          0x0001
#define KEYEVENTF_KEYUP                0x0002

extern double Risk = 5 ;
extern int TakeProfit = 50;
extern int StopLoss = 20 ;
extern int MagicNumber = 1234;
int ticket ;
extern double LotSize = 0.01 ;

double pips;
#define VK_LBUTTON         1     //Left mouse button
#define VK_CONTROL         17   //CONTROL key
#define VK_MENU            18   //ALT key
#define VK_B   66
#define VK_S   83

double prix ;

//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
 
    double ticksize=MarketInfo(Symbol(),MODE_TICKSIZE);
  
  if (ticksize==0.00001 || ticksize==0.001)
 
  pips = ticksize*10;
 
  
  else
 
   pips = ticksize;
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---
   
  }

//+------------------------------------------------------------------+
//| ChartEvent function                                              |
//+------------------------------------------------------------------+
void OnChartEvent(const int id,
                  const long &lparam,
                  const double &dparam,
                  const string &sparam)
  {
//---***************************************************************getting mouse data********************************//
   if( id==CHARTEVENT_CLICK && GetAsyncKeyState(VK_B ) )
  {
      int      x     =(int)lparam;
      int      y     =(int)dparam;
      datetime dt    =0;
      double   price =0;
      int      window=0;
      ChartXYToTimePrice(0,x,y,window,dt,price); 
      prix =  NormalizeDouble(price,5);
    
 //**********************************************************************Trading****************************************//
 
 
    ticket = OrderSend(Symbol(),2,LotSize,prix,2,prix-(StopLoss*pips),prix +(TakeProfit*pips),NULL,MagicNumber,0,clrNONE);
    
     if (ticket < 0) 
  {
  Print("open buyLimit error ==",GetLastError());
    
   } 
   }
  // ---***************************************************************getting mouse data********************************//
   if( id==CHARTEVENT_CLICK &&GetAsyncKeyState(VK_S ) )
     {
      int      x     =(int)lparam;
      int      y     =(int)dparam;
      datetime dt    =0;
      double   price =0;
      int      window=0;
      ChartXYToTimePrice(0,x,y,window,dt,price); 
      prix =  NormalizeDouble(price,5);
    
   
   //**********************************************************************Trading****************************************//
 
   
    ticket = OrderSend(Symbol(),3,LotSize,prix,2,prix+(StopLoss*pips),prix-(TakeProfit*pips),NULL,MagicNumber,0,clrNONE);
    
    if (ticket < 0) 
  {
  Print("open SellLimit error ==",GetLastError());
    
   
   }
   
   }
 
 
 
 
    
  }
//+------------------------------------------------------------------+




رد مع اقتباس
قديم 29-09-2017, 11:51 AM   المشاركة رقم: 3
الكاتب
م.جمانه
عضو ماسي
الصورة الرمزية م.جمانه

البيانات
تاريخ التسجيل: Jun 2012
رقم العضوية: 9964
المشاركات: 25,024
بمعدل : 5.80 يوميا

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

كاتب الموضوع : nix المنتدى : منتدى المؤشرات و الاكسبيرتات
افتراضي رد: طلب مساعدة في اصلاح اكسبرت

عذرا اخي الفاضل الخدمات في القسم متوقفه في الوقت الحالي



عرض البوم صور م.جمانه  
رد مع اقتباس
  #3  
قديم 29-09-2017, 11:51 AM
م.جمانه م.جمانه غير متواجد حالياً
عضو ماسي
افتراضي رد: طلب مساعدة في اصلاح اكسبرت

عذرا اخي الفاضل الخدمات في القسم متوقفه في الوقت الحالي




رد مع اقتباس
قديم 30-09-2017, 09:41 AM   المشاركة رقم: 4
الكاتب
RoboCoder
عضو

البيانات
تاريخ التسجيل: Jul 2017
رقم العضوية: 35969
المشاركات: 82
بمعدل : 0.03 يوميا

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

كاتب الموضوع : nix المنتدى : منتدى المؤشرات و الاكسبيرتات
افتراضي رد: طلب مساعدة في اصلاح اكسبرت

الحطا هنا هذه الدالة يجب أن تتغير


//+------------------------------------------------------------------+
int OnInit()
{
//---

double ticksize=MarketInfo(Symbol(),MODE_TICKSIZE);

if (ticksize==0.00001 || ticksize==0.001)

pips = ticksize*10;


else

pips = ticksize;
//---
return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+



عرض البوم صور RoboCoder  
رد مع اقتباس
  #4  
قديم 30-09-2017, 09:41 AM
RoboCoder RoboCoder غير متواجد حالياً
عضو
افتراضي رد: طلب مساعدة في اصلاح اكسبرت

الحطا هنا هذه الدالة يجب أن تتغير


//+------------------------------------------------------------------+
int OnInit()
{
//---

double ticksize=MarketInfo(Symbol(),MODE_TICKSIZE);

if (ticksize==0.00001 || ticksize==0.001)

pips = ticksize*10;


else

pips = ticksize;
//---
return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+




رد مع اقتباس
قديم 01-10-2017, 06:52 PM   المشاركة رقم: 5
الكاتب
nix
عضو جديد

البيانات
تاريخ التسجيل: Sep 2015
رقم العضوية: 27364
المشاركات: 38
بمعدل : 0.01 يوميا

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

كاتب الموضوع : nix المنتدى : منتدى المؤشرات و الاكسبيرتات
افتراضي رد: طلب مساعدة في اصلاح اكسبرت

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



عرض البوم صور nix  
رد مع اقتباس
  #5  
قديم 01-10-2017, 06:52 PM
nix nix غير متواجد حالياً
عضو جديد
افتراضي رد: طلب مساعدة في اصلاح اكسبرت

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




رد مع اقتباس
إضافة رد

مواقع النشر (المفضلة)

الكلمات الدلالية (Tags)
مساعدة, اصلاح, اكسبرت

أدوات الموضوع

تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code is متاحة
كود [IMG] متاحة
كود HTML معطلة



الساعة الآن 09:47 PM



جميع الحقوق محفوظة الى اف اكس ارابيا www.fx-arabia.com

تحذير المخاطرة

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

تنبيه هام

موقع اف اكس ارابيا هو موقع تعليمي خالص يهدف الي توعية المستثمر العربي مبادئ الاستثمار و التداول الناجح ولا يتحصل علي اي اموال مقابل ذلك ولا يقوم بادارة محافظ مالية وان ادارة الموقع غير مسؤولة عن اي استغلال من قبل اي شخص لاسمها وتحذر من ذلك.

اتصل بنا

البريد الإلكتروني للدعم الفنى : support@fx-arabia.com
جميع الحقوق محفوظة اف اكس ارابيا – احدى مواقع Inwestopedia Sp. Z O.O. للاستشارات و التدريب – جمهورية بولندا الإتحادية.
Powered by vBulletin® Copyright ©2000 - 2024 , Designed by Fx-Arabia Team