FX-Arabia

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











الملاحظات

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


تعلم لغة mq4 الدرجة واحد - 1-

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


إضافة رد
 
أدوات الموضوع
قديم 25-09-2011, 05:24 PM   المشاركة رقم: 51
الكاتب
khabini
عضو جديد

البيانات
تاريخ التسجيل: Aug 2011
رقم العضوية: 5363
العمر: 43
المشاركات: 96
بمعدل : 0.02 يوميا

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

كاتب الموضوع : حكيم المنتدى : منتدى المؤشرات و الاكسبيرتات
افتراضي رد: تعلم لغة mq4 الدرجة واحد - 1-

بمعنى أخر نتعلم بالممارسة



عرض البوم صور khabini  
رد مع اقتباس
  #51  
قديم 25-09-2011, 05:24 PM
khabini khabini غير متواجد حالياً
عضو جديد
افتراضي رد: تعلم لغة mq4 الدرجة واحد - 1-

بمعنى أخر نتعلم بالممارسة




رد مع اقتباس
قديم 30-11-2011, 05:29 AM   المشاركة رقم: 52
الكاتب
dentist_hussein
عضو جديد
الصورة الرمزية dentist_hussein

البيانات
تاريخ التسجيل: Sep 2011
رقم العضوية: 5977
العمر: 42
المشاركات: 52
بمعدل : 0.01 يوميا

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

كاتب الموضوع : حكيم المنتدى : منتدى المؤشرات و الاكسبيرتات
افتراضي رد: تعلم لغة mq4 الدرجة واحد - 1-

السلام عليكم
رجاء إخواني ألا يوجد ملف يجمع كل الأكواد للمؤشرات المعروفه و جميع الأكواد التي نحتاجها لصنع الإكسبيرت مع شرح مختصر بسيط ؟؟



التوقيع

نقره لعرض الصورة في صفحة مستقلة

عرض البوم صور dentist_hussein  
رد مع اقتباس
  #52  
قديم 30-11-2011, 05:29 AM
dentist_hussein dentist_hussein غير متواجد حالياً
عضو جديد
افتراضي رد: تعلم لغة mq4 الدرجة واحد - 1-

السلام عليكم
رجاء إخواني ألا يوجد ملف يجمع كل الأكواد للمؤشرات المعروفه و جميع الأكواد التي نحتاجها لصنع الإكسبيرت مع شرح مختصر بسيط ؟؟




رد مع اقتباس
قديم 26-03-2012, 05:23 PM   المشاركة رقم: 53
الكاتب
goody99love
عضو جديد
الصورة الرمزية goody99love

البيانات
تاريخ التسجيل: Aug 2011
رقم العضوية: 5325
العمر: 43
المشاركات: 12
بمعدل : 0.00 يوميا

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

كاتب الموضوع : حكيم المنتدى : منتدى المؤشرات و الاكسبيرتات
افتراضي رد: تعلم لغة mq4 الدرجة واحد - 1-

هل تم اغلاق هذا الموضوع ام سيتم استكماله



عرض البوم صور goody99love  
رد مع اقتباس
  #53  
قديم 26-03-2012, 05:23 PM
goody99love goody99love غير متواجد حالياً
عضو جديد
افتراضي رد: تعلم لغة mq4 الدرجة واحد - 1-

هل تم اغلاق هذا الموضوع ام سيتم استكماله




رد مع اقتباس
قديم 29-03-2012, 11:08 PM   المشاركة رقم: 54
الكاتب
hoda100
عضو جديد

البيانات
تاريخ التسجيل: Mar 2012
رقم العضوية: 9043
المشاركات: 7
بمعدل : 0.00 يوميا

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

كاتب الموضوع : حكيم المنتدى : منتدى المؤشرات و الاكسبيرتات
افتراضي رد: تعلم لغة mq4 الدرجة واحد - 1-

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


</B></I>



عرض البوم صور hoda100  
رد مع اقتباس
  #54  
قديم 29-03-2012, 11:08 PM
hoda100 hoda100 غير متواجد حالياً
عضو جديد
افتراضي رد: تعلم لغة mq4 الدرجة واحد - 1-

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


</B></I>




رد مع اقتباس
قديم 05-07-2012, 10:18 PM   المشاركة رقم: 55
الكاتب
staroxman
عضو جديد

البيانات
تاريخ التسجيل: Jun 2012
رقم العضوية: 10101
العمر: 34
المشاركات: 9
بمعدل : 0.00 يوميا

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

كاتب الموضوع : حكيم المنتدى : منتدى المؤشرات و الاكسبيرتات
افتراضي رد: تعلم لغة mq4 الدرجة واحد - 1-

مــــــجهود رائــــع ،،،، ارجو ان يعود الموضوع لنشاط أين انت أســـتاذ حـكـــيــم

الرجاء اي حد بيعرف يتواصل معو انو يحكيلو انو احنا متابعين للموضوع الرائع وبنتظار التحديث



عرض البوم صور staroxman  
رد مع اقتباس
  #55  
قديم 05-07-2012, 10:18 PM
staroxman staroxman غير متواجد حالياً
عضو جديد
افتراضي رد: تعلم لغة mq4 الدرجة واحد - 1-

مــــــجهود رائــــع ،،،، ارجو ان يعود الموضوع لنشاط أين انت أســـتاذ حـكـــيــم

الرجاء اي حد بيعرف يتواصل معو انو يحكيلو انو احنا متابعين للموضوع الرائع وبنتظار التحديث




رد مع اقتباس
قديم 05-07-2012, 10:21 PM   المشاركة رقم: 56
الكاتب
staroxman
عضو جديد

البيانات
تاريخ التسجيل: Jun 2012
رقم العضوية: 10101
العمر: 34
المشاركات: 9
بمعدل : 0.00 يوميا

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

كاتب الموضوع : حكيم المنتدى : منتدى المؤشرات و الاكسبيرتات
افتراضي رد: تعلم لغة mq4 الدرجة واحد - 1-

نقره لعرض الصورة في صفحة مستقلة

المشاركة الأصلية كتبت بواسطة staroxman نقره لعرض الصورة في صفحة مستقلة
مــــــجهود رائــــع ،،،، ارجو ان يعود الموضوع لنشاط أين انت أســـتاذ حـكـــيــم

الرجاء اي حد بيعرف يتواصل معو انو يحكيلو انو احنا متابعين للموضوع الرائع وبنتظار التحديث

رقم عضويتي 10101 هههههه مبرمج بالفطره هههههه أرجو عودة الأستاذ حكيم لكي نقلع معه في عالم MQL4
الجميل



عرض البوم صور staroxman  
رد مع اقتباس
  #56  
قديم 05-07-2012, 10:21 PM
staroxman staroxman غير متواجد حالياً
عضو جديد
افتراضي رد: تعلم لغة mq4 الدرجة واحد - 1-

نقره لعرض الصورة في صفحة مستقلة
المشاركة الأصلية كتبت بواسطة staroxman نقره لعرض الصورة في صفحة مستقلة
مــــــجهود رائــــع ،،،، ارجو ان يعود الموضوع لنشاط أين انت أســـتاذ حـكـــيــم

الرجاء اي حد بيعرف يتواصل معو انو يحكيلو انو احنا متابعين للموضوع الرائع وبنتظار التحديث

رقم عضويتي 10101 هههههه مبرمج بالفطره هههههه أرجو عودة الأستاذ حكيم لكي نقلع معه في عالم MQL4
الجميل




رد مع اقتباس
قديم 17-07-2013, 05:13 AM   المشاركة رقم: 57
الكاتب
zzeyani
عضو جديد

البيانات
تاريخ التسجيل: Jul 2013
رقم العضوية: 15813
المشاركات: 1
بمعدل : 0.00 يوميا

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

كاتب الموضوع : حكيم المنتدى : منتدى المؤشرات و الاكسبيرتات
افتراضي رد: تعلم لغة mq4 الدرجة واحد - 1-

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


[PHP]//+------------------------------------------------------------------+
//| This MQL is generated by Expert Advisor Builder |
//| http://sufx.core.t3-ism.net/ExpertAdvisorBuilder/ |
//| |
//| In no event will author be liable for any damages whatsoever. |
//| Use at your own risk. |
//| |
//+------------------- DO NOT REMOVE THIS HEADER --------------------+

#define SIGNAL_NONE 0
#define SIGNAL_BUY 1
#define SIGNAL_SELL 2
#define SIGNAL_CLOSEBUY 3
#define SIGNAL_CLOSESELL 4

#property copyright "Expert Advisor Builder"
#property link "http://sufx.core.t3-ism.net/ExpertAdvisorBuilder/"

extern int MagicNumber = 0;
extern bool SignalMail = False;
extern bool EachTickMode = True;
extern double Lots = 1.0;
extern int Slippage = 3;
extern bool UseStopLoss = True;
extern int StopLoss = 40;
extern bool UseTakeProfit = False;
extern int TakeProfit = 60;
extern bool UseTrailingStop = False;
extern int TrailingStop = 30;

int BarCount;
int Current;
bool TickCheck = False;
//+------------------------------------------------------------------+
//| expert initialization function |
//+------------------------------------------------------------------+
int init() {
BarCount = Bars;

if (EachTickMode) Current = 0; else Current = 1;

return(0);
}
//+------------------------------------------------------------------+
//| expert deinitialization function |
//+------------------------------------------------------------------+
int deinit() {
return(0);
}
//+------------------------------------------------------------------+
//| expert start function |
//+------------------------------------------------------------------+
int start() {
int Order = SIGNAL_NONE;
int Total, Ticket;
double StopLossLevel, TakeProfitLevel;



if (EachTickMode && Bars != BarCount) TickCheck = False;
Total = OrdersTotal();
Order = SIGNAL_NONE;

//+------------------------------------------------------------------+
//| Variable Begin |
//+------------------------------------------------------------------+


double Buy1_1 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_CLOSE, Current + 1);
double Buy1_2 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_OPEN, Current + 1);
double Buy2_1 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_CLOSE, Current + 2);
double Buy2_2 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_OPEN, Current + 2);

double Sell1_1 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_CLOSE, Current + 1);
double Sell1_2 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_OPEN, Current + 1);
double Sell2_1 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_CLOSE, Current + 2);
double Sell2_2 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_OPEN, Current + 2);

double CloseBuy1_1 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_CLOSE, Current + 1);
double CloseBuy1_2 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_OPEN, Current + 1);

double CloseSell1_1 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_CLOSE, Current + 1);
double CloseSell1_2 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_OPEN, Current + 1);


//+------------------------------------------------------------------+
//| Variable End |
//+------------------------------------------------------------------+

//Check position
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) {
//Close

//+------------------------------------------------------------------+
//| Signal Begin(Exit Buy) |
//+------------------------------------------------------------------+

if (CloseBuy1_1 < CloseBuy1_2) Order = SIGNAL_CLOSEBUY;


//+------------------------------------------------------------------+
//| Signal End(Exit Buy) |
//+------------------------------------------------------------------+

if (Order == SIGNAL_CLOSEBUY&&(OrderProfit()<0||OrderProfit()>= TakeProfit)&&(
(EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
OrderClose(OrderTicket(), OrderLots(), Bid, Slippage, MediumSeaGreen);
if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Bid, Digits) + " Close Buy");
if (!EachTickMode) BarCount = Bars;
IsTrade = False;
continue;
}
//Trailing stop
if(UseTrailingStop && TrailingStop > 0) {
if(Bid - OrderOpenPrice() > Point * TrailingStop) {
if(OrderStopLoss() < Bid - Point * TrailingStop) {
OrderModify(OrderTicket(), OrderOpenPrice(), Bid - Point * TrailingStop, OrderTakeProfit(), 0, MediumSeaGreen);
if (!EachTickMode) BarCount = Bars;
continue;
}
}
}
} else {
//Close

//+------------------------------------------------------------------+
//| Signal Begin(Exit Sell) |
//+------------------------------------------------------------------+

if (CloseSell1_1 > CloseSell1_2) Order = SIGNAL_CLOSESELL;


//+------------------------------------------------------------------+
//| Signal End(Exit Sell) |
//+------------------------------------------------------------------+

if (Order == SIGNAL_CLOSESELL&&(OrderProfit()<0||OrderProfit()> =TakeProfit)&&
((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
OrderClose(OrderTicket(), OrderLots(), Ask, Slippage, DarkOrange);
if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Ask, Digits) + " Close Sell");
if (!EachTickMode) BarCount = Bars;
IsTrade = False;
continue;
}
//Trailing stop
if(UseTrailingStop && TrailingStop > 0) {
if((OrderOpenPrice() - Ask) > (Point * TrailingStop)) {
if((OrderStopLoss() > (Ask + Point * TrailingStop)) || (OrderStopLoss() == 0)) {
OrderModify(OrderTicket(), OrderOpenPrice(), Ask + Point * TrailingStop, OrderTakeProfit(), 0, DarkOrange);
if (!EachTickMode) BarCount = Bars;
continue;
}
}
}
}
}
}

//+------------------------------------------------------------------+
//| Signal Begin(Entry) |
//+------------------------------------------------------------------+

if (Buy1_1 > Buy1_2 && Buy2_1 <= Buy2_2) Order = SIGNAL_BUY;

if (Sell1_1 < Sell1_2 && Sell2_1 >= Sell2_2) Order = SIGNAL_SELL;


//+------------------------------------------------------------------+
//| Signal End |
//+------------------------------------------------------------------+

//Buy
if (Order == SIGNAL_BUY && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
if(!IsTrade) {
//Check free margin
if (AccountFreeMargin() < (1000 * Lots)) {
Print("We have no money. Free Margin = ", AccountFreeMargin());
return(0);
}

if (UseStopLoss) StopLossLevel = Ask - StopLoss * Point; else StopLossLevel = 0.0;
if (UseTakeProfit) TakeProfitLevel = Ask + TakeProfit * Point; else TakeProfitLevel = 0.0;

Ticket = OrderSend(Symbol(), OP_BUY, Lots, Ask, Slippage, StopLossLevel, TakeProfitLevel, "Buy(#" + MagicNumber + ")", MagicNumber, 0, DodgerBlue);
if(Ticket > 0) {
if (OrderSelect(Ticket, SELECT_BY_TICKET, MODE_TRADES)) {
Print("BUY order opened : ", OrderOpenPrice());
if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Ask, Digits) + " Open Buy");
} else {
Print("Error opening BUY order : ", GetLastError());
}
}
if (EachTickMode) TickCheck = True;
if (!EachTickMode) BarCount = Bars;
return(0);
}
}

//Sell
if (Order == SIGNAL_SELL && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
if(!IsTrade) {
//Check free margin
if (AccountFreeMargin() < (1000 * Lots)) {
Print("We have no money. Free Margin = ", AccountFreeMargin());
return(0);
}

if (UseStopLoss) StopLossLevel = Bid + StopLoss * Point; else StopLossLevel = 0.0;
if (UseTakeProfit) TakeProfitLevel = Bid - TakeProfit * Point; else TakeProfitLevel = 0.0;

Ticket = OrderSend(Symbol(), OP_SELL, Lots, Bid, Slippage, StopLossLevel, TakeProfitLevel, "Sell(#" + MagicNumber + ")", MagicNumber, 0, DeepPink);
if(Ticket > 0) {
if (OrderSelect(Ticket, SELECT_BY_TICKET, MODE_TRADES)) {
Print("SELL order opened : ", OrderOpenPrice());
if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Bid, Digits) + " Open Sell");
} else {
Print("Error opening SELL order : ", GetLastError());
}
}
if (EachTickMode) TickCheck = True;
if (!EachTickMode) BarCount = Bars;
return(0);
}
}

if (!EachTickMode) BarCount = Bars;

return(0);
}
//+------------------------------------------------------------------+ [/PHP][/QUOTE]



عرض البوم صور zzeyani  
رد مع اقتباس
  #57  
قديم 17-07-2013, 05:13 AM
zzeyani zzeyani غير متواجد حالياً
عضو جديد
افتراضي رد: تعلم لغة mq4 الدرجة واحد - 1-

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


[PHP]//+------------------------------------------------------------------+
//| This MQL is generated by Expert Advisor Builder |
//| http://sufx.core.t3-ism.net/ExpertAdvisorBuilder/ |
//| |
//| In no event will author be liable for any damages whatsoever. |
//| Use at your own risk. |
//| |
//+------------------- DO NOT REMOVE THIS HEADER --------------------+

#define SIGNAL_NONE 0
#define SIGNAL_BUY 1
#define SIGNAL_SELL 2
#define SIGNAL_CLOSEBUY 3
#define SIGNAL_CLOSESELL 4

#property copyright "Expert Advisor Builder"
#property link "http://sufx.core.t3-ism.net/ExpertAdvisorBuilder/"

extern int MagicNumber = 0;
extern bool SignalMail = False;
extern bool EachTickMode = True;
extern double Lots = 1.0;
extern int Slippage = 3;
extern bool UseStopLoss = True;
extern int StopLoss = 40;
extern bool UseTakeProfit = False;
extern int TakeProfit = 60;
extern bool UseTrailingStop = False;
extern int TrailingStop = 30;

int BarCount;
int Current;
bool TickCheck = False;
//+------------------------------------------------------------------+
//| expert initialization function |
//+------------------------------------------------------------------+
int init() {
BarCount = Bars;

if (EachTickMode) Current = 0; else Current = 1;

return(0);
}
//+------------------------------------------------------------------+
//| expert deinitialization function |
//+------------------------------------------------------------------+
int deinit() {
return(0);
}
//+------------------------------------------------------------------+
//| expert start function |
//+------------------------------------------------------------------+
int start() {
int Order = SIGNAL_NONE;
int Total, Ticket;
double StopLossLevel, TakeProfitLevel;



if (EachTickMode && Bars != BarCount) TickCheck = False;
Total = OrdersTotal();
Order = SIGNAL_NONE;

//+------------------------------------------------------------------+
//| Variable Begin |
//+------------------------------------------------------------------+


double Buy1_1 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_CLOSE, Current + 1);
double Buy1_2 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_OPEN, Current + 1);
double Buy2_1 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_CLOSE, Current + 2);
double Buy2_2 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_OPEN, Current + 2);

double Sell1_1 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_CLOSE, Current + 1);
double Sell1_2 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_OPEN, Current + 1);
double Sell2_1 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_CLOSE, Current + 2);
double Sell2_2 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_OPEN, Current + 2);

double CloseBuy1_1 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_CLOSE, Current + 1);
double CloseBuy1_2 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_OPEN, Current + 1);

double CloseSell1_1 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_CLOSE, Current + 1);
double CloseSell1_2 = iMA(NULL, 0, 5, 0, MODE_SMA, PRICE_OPEN, Current + 1);


//+------------------------------------------------------------------+
//| Variable End |
//+------------------------------------------------------------------+

//Check position
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) {
//Close

//+------------------------------------------------------------------+
//| Signal Begin(Exit Buy) |
//+------------------------------------------------------------------+

if (CloseBuy1_1 < CloseBuy1_2) Order = SIGNAL_CLOSEBUY;


//+------------------------------------------------------------------+
//| Signal End(Exit Buy) |
//+------------------------------------------------------------------+

if (Order == SIGNAL_CLOSEBUY&&(OrderProfit()<0||OrderProfit()>= TakeProfit)&&(
(EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
OrderClose(OrderTicket(), OrderLots(), Bid, Slippage, MediumSeaGreen);
if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Bid, Digits) + " Close Buy");
if (!EachTickMode) BarCount = Bars;
IsTrade = False;
continue;
}
//Trailing stop
if(UseTrailingStop && TrailingStop > 0) {
if(Bid - OrderOpenPrice() > Point * TrailingStop) {
if(OrderStopLoss() < Bid - Point * TrailingStop) {
OrderModify(OrderTicket(), OrderOpenPrice(), Bid - Point * TrailingStop, OrderTakeProfit(), 0, MediumSeaGreen);
if (!EachTickMode) BarCount = Bars;
continue;
}
}
}
} else {
//Close

//+------------------------------------------------------------------+
//| Signal Begin(Exit Sell) |
//+------------------------------------------------------------------+

if (CloseSell1_1 > CloseSell1_2) Order = SIGNAL_CLOSESELL;


//+------------------------------------------------------------------+
//| Signal End(Exit Sell) |
//+------------------------------------------------------------------+

if (Order == SIGNAL_CLOSESELL&&(OrderProfit()<0||OrderProfit()> =TakeProfit)&&
((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
OrderClose(OrderTicket(), OrderLots(), Ask, Slippage, DarkOrange);
if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Ask, Digits) + " Close Sell");
if (!EachTickMode) BarCount = Bars;
IsTrade = False;
continue;
}
//Trailing stop
if(UseTrailingStop && TrailingStop > 0) {
if((OrderOpenPrice() - Ask) > (Point * TrailingStop)) {
if((OrderStopLoss() > (Ask + Point * TrailingStop)) || (OrderStopLoss() == 0)) {
OrderModify(OrderTicket(), OrderOpenPrice(), Ask + Point * TrailingStop, OrderTakeProfit(), 0, DarkOrange);
if (!EachTickMode) BarCount = Bars;
continue;
}
}
}
}
}
}

//+------------------------------------------------------------------+
//| Signal Begin(Entry) |
//+------------------------------------------------------------------+

if (Buy1_1 > Buy1_2 && Buy2_1 <= Buy2_2) Order = SIGNAL_BUY;

if (Sell1_1 < Sell1_2 && Sell2_1 >= Sell2_2) Order = SIGNAL_SELL;


//+------------------------------------------------------------------+
//| Signal End |
//+------------------------------------------------------------------+

//Buy
if (Order == SIGNAL_BUY && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
if(!IsTrade) {
//Check free margin
if (AccountFreeMargin() < (1000 * Lots)) {
Print("We have no money. Free Margin = ", AccountFreeMargin());
return(0);
}

if (UseStopLoss) StopLossLevel = Ask - StopLoss * Point; else StopLossLevel = 0.0;
if (UseTakeProfit) TakeProfitLevel = Ask + TakeProfit * Point; else TakeProfitLevel = 0.0;

Ticket = OrderSend(Symbol(), OP_BUY, Lots, Ask, Slippage, StopLossLevel, TakeProfitLevel, "Buy(#" + MagicNumber + ")", MagicNumber, 0, DodgerBlue);
if(Ticket > 0) {
if (OrderSelect(Ticket, SELECT_BY_TICKET, MODE_TRADES)) {
Print("BUY order opened : ", OrderOpenPrice());
if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Ask, Digits) + " Open Buy");
} else {
Print("Error opening BUY order : ", GetLastError());
}
}
if (EachTickMode) TickCheck = True;
if (!EachTickMode) BarCount = Bars;
return(0);
}
}

//Sell
if (Order == SIGNAL_SELL && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
if(!IsTrade) {
//Check free margin
if (AccountFreeMargin() < (1000 * Lots)) {
Print("We have no money. Free Margin = ", AccountFreeMargin());
return(0);
}

if (UseStopLoss) StopLossLevel = Bid + StopLoss * Point; else StopLossLevel = 0.0;
if (UseTakeProfit) TakeProfitLevel = Bid - TakeProfit * Point; else TakeProfitLevel = 0.0;

Ticket = OrderSend(Symbol(), OP_SELL, Lots, Bid, Slippage, StopLossLevel, TakeProfitLevel, "Sell(#" + MagicNumber + ")", MagicNumber, 0, DeepPink);
if(Ticket > 0) {
if (OrderSelect(Ticket, SELECT_BY_TICKET, MODE_TRADES)) {
Print("SELL order opened : ", OrderOpenPrice());
if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Bid, Digits) + " Open Sell");
} else {
Print("Error opening SELL order : ", GetLastError());
}
}
if (EachTickMode) TickCheck = True;
if (!EachTickMode) BarCount = Bars;
return(0);
}
}

if (!EachTickMode) BarCount = Bars;

return(0);
}
//+------------------------------------------------------------------+ [/PHP][/QUOTE]




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

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

الكلمات الدلالية (Tags)
وادي, الدرجة, تعلم


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

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



الساعة الآن 10:15 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