#property copyright "Copyright © Matrix NN expert"
#property link ""
extern int MA_length = 10;
extern int MA_timeframe = 30;
extern int MAtype = 0;
extern double Percent = 0.1;
extern int TradeOnFriday = 0;
extern int slip = 100;
extern bool UseMM = FALSE;
extern double Risk = 5.0;
extern double Lots = 0.1;
extern int TakeProfit = 50;
extern int Stoploss = 150;
extern double TrailingStop = 0.0;
extern int MaxOpenOrders = 1;
extern double MinMarginLevel = 250.0;
extern int Fast_Period = 23;
extern int Fast_Price = 1;
extern int Slow_Period = 84;
extern int Slow_Price = 1;
extern double DivergenceLimit = 0.002;
extern bool Use_V63D_Divergence = TRUE;
extern int PipStep = 30;
extern double IncreasementType = 0.0;
double g_price_192 = 0.0;
double g_ord_stoploss_200 = 0.0;
double gd_208;
double gd_216;
double gd_224 = 0.0;
double gd_232;
int gi_240 = 0;
int gi_244 = 0;
int g_ord_total_248 = 0;
extern int DVLimit = 10;
extern int PipsGoal = 500;
extern int PipsLoss = 500;
int g_color_264 = DodgerBlue;
int gi_unused_268 = 16748574;
int gi_unused_272 = 16748574;
int g_color_276 = Red;
int gi_unused_280 = 255;
int gi_unused_284 = 255;
int gi_unused_288 = 16777215;
string gs_292 = "MATRIX NN 4.0";
string gs_unused_300 = "expert.wav";
int gi_unused_308 = 0;
int gi_unused_312 = 1;
int gi_unused_316 = 2;
extern int GMT = 1;
extern int DST = 1;
extern int OpeningHour = 0;
extern int ClosingHour = 23;
extern int writelog = 0;
int g_magic_340;
int gi_344;
double gd_348;
double g_price_356;
double gd_364;
int init() {
LogWrite(Symbol() + ",M" + Period());
return (0);
}
int start() {
int li_8;
int li_12;
int l_ord_total_16;
int li_20;
int l_day_of_year_32;
int li_0 = 684873;
LogWrite(TimeToStr(TimeCurrent()) + " - " + "Bid=" + Bid);
g_magic_340 = MagicfromSymbol();
Comment(g_magic_340);
if (UseMM == TRUE) {
Lots = AccountEquity() * Risk / 100.0 / 1000.0;
if (Lots > 0.1) NormalizeDouble(Lots, 1);
else NormalizeDouble(Lots, 2);
}
SetupGlobalVariables();
double ld_24 = iATR(NULL, PERIOD_D1, 21, 0);
if (Point == 0.01) ld_24 = 100.0 * ld_24;
if (Point == 0.0001) ld_24 = 10000.0 * ld_24;
TakeProfit = 2.0 * ld_24 / 10.0;
Stoploss = 2.0 * ld_24;
PipStep = ld_24 / 10.0;
if (DayOfWeek() == 6 && Hour() >= 20) {
Comment("weekend");
return (0);
}
if (!(IsTesting() || IsDemo())) {
if (LossCheck()) {
Alert("excessive loss!");
PlaySound("alert.wav");
return (0);
}
}
if (AccountBalance() - AccountEquity() > gi_244) gi_244 = AccountBalance() - AccountEquity();
if (MyOrdersTotal() > g_ord_total_248) g_ord_total_248 = OrdersTotal();
double ld_36 = divergence(Fast_Period, Slow_Period, Fast_Price, Slow_Price, 0);
Comment("maxDrawDown=", gi_244, " maxOrdersOpen=", g_ord_total_248, " Current Divergence = ", ld_36);
gd_232 = PipStep;
if (IncreasementType > 0.0) {
gd_232 = MathSqrt(MyOrdersTotal()) * PipStep;
gd_232 = MathPow(MyOrdersTotal(), IncreasementType) * PipStep;
}
LogWrite("CurrentPipStep=" + gd_232);
gi_344 = 0;
if (Day() != 5 || TradeOnFriday > 0) {
l_ord_total_16 = OrdersTotal();
li_20 = MyOrdersTotal();
LogWrite("OrdersTotal=" + l_ord_total_16);
LogWrite("MyOrdersTotal=" + li_20);
if (li_20 == 0) l_day_of_year_32 = DayOfYear();
if (li_20 > 0) gd_348 = GetPreviousOpenPrice();
else LogWrite("LastPrice=" + gd_348);
li_8 = CheckJustClosedOrder();
if (li_8 != 1) {
gi_240 = FALSE;
gd_348 = GetPreviousOpenPrice();
LogWrite("LastPrice=" + gd_348);
if (MathAbs(ld_36) <= DivergenceLimit) {
if (Hour() < OpeningHour + GMT + DST || Hour() > ClosingHour + GMT + DST) Comment("bad hours.");
else {
if (MAtype == FALSE) {
li_12 = EnterPositionBasedOnOpen();
if (li_12 == 1) {
gi_240 = TRUE;
gi_344 = 2;
}
if (li_12 == 2) {
gi_240 = TRUE;
gi_344 = 1;
}
}
if (MAtype == TRUE) {
li_12 = EnterPositionBasedOnHL();
if (li_12 == 1) {
gi_240 = TRUE;
gi_344 = 2;
}
if (li_12 == 2) {
gi_240 = TRUE;
gi_344 = 1;
}
}
}
}
}
li_20 = MyOrdersTotal();
if (li_20 > 0 && gi_240 == TRUE) {
gd_364 = CalculateAverageOpeningPrice(li_20);
Comment("AveragePrice: ", gd_364, " myTotal: ", li_20);
}
if (gi_240 == TRUE && li_20 > 1) ChangeOpenOrders(0, li_20, gd_364);
if (li_20 > 0) KeepTrackOfStopLoss(gd_364);
}
return (0);
}
void SetupGlobalVariables() {
switch (g_magic_340) {
case 26910:
Percent = 0.15;
TradeOnFriday = 1;
slip = 100;
PipStep = 5;
IncreasementType = 0.0;
DVLimit = 8;
OpeningHour = 6;
ClosingHour = 14;
return;
case 25803:
Percent = 0.25;
TradeOnFriday = 1;
slip = 100;
PipStep = 5;
IncreasementType = 0.0;
DVLimit = 8;
OpeningHour = 7;
ClosingHour = 15;
return;
case 26715:
MA_length = 18;
MA_timeframe = 30;
MAtype = FALSE;
Percent = 0.1;
TradeOnFriday = 1;
slip = 100;
Lots = 0.05;
TakeProfit = 50;
Stoploss = 150;
PipStep = 7;
IncreasementType = 0.0;
DVLimit = 6;
OpeningHour = 6;
ClosingHour = 14;
return;
return;
}
}
double GetPreviousOpenPrice() {
double l_ord_open_price_4;
for (int l_pos_0 = OrdersTotal() - 1; l_pos_0 >= 0; l_pos_0--) {
if(OrderSelect(l_pos_0, SELECT_BY_POS, MODE_TRADES));else;
if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_340 && OrderComment() == GetCommentForOrder()) {
l_ord_open_price_4 = OrderOpenPrice();
break;
}
}
return (l_ord_open_price_4);
}
int CheckJustClosedOrder() {
int l_datetime_4;
string ls_8;
int l_str2time_16;
int li_24;
int l_hist_total_20 = OrdersHistoryTotal();
bool li_ret_28 = FALSE;
for (int l_pos_0 = 0; l_pos_0 < l_hist_total_20; l_pos_0++) {
if (OrderSelect(l_pos_0, SELECT_BY_POS, MODE_HISTORY) == TRUE) {
if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_340 && OrderComment() == GetCommentForOrder()) {
l_datetime_4 = OrderCloseTime();
ls_8 = Year() + "-" + Month() + "-" + Day() + " " + Hour() + ":" + Minute() + ":" + Seconds();
l_str2time_16 = StrToTime(ls_8);
li_24 = l_str2time_16 - l_datetime_4;
if ((60 * Period()) << 1 > li_24) {
li_ret_28 = TRUE;
break;
}
}
}
}
return (li_ret_28);
}
int EnterPositionBasedOnOpen() {
int li_ret_0;
double l_ima_4 = iMA(NULL, MA_timeframe, MA_length, 0, MODE_SMA, PRICE_OPEN, 0);
double ld_12 = iRVI(NULL, 0, 10, MODE_MAIN, 0) - iRVI(NULL, 0, 10, MODE_MAIN, 1);
if (MyOrdersTotal() < MaxOpenOrders && AccountEquity() / (AccountMargin() + 0.0001) > MinMarginLevel / 100.0) {
if (l_ima_4 * (Percent / 100.0 + 1.0) < Bid && gi_344 != 22 && Bid >= gd_348 + gd_232 * Point || MyOrdersTotal() == 0&& ld_12 < 0.0) {
if (OrderSend(Symbol(), OP_SELL, Lots, Bid, slip, Bid + Stoploss * Point, Bid - TakeProfit * Point, GetCommentForOrder(), g_magic_340, 0, g_color_276));else;
li_ret_0 = 1;
PlaySound("ricochet.wav");
}
if (l_ima_4 * (1 - Percent / 100.0) > Ask && gi_344 != 11 && Ask <= gd_348 - gd_232 * Point || MyOrdersTotal() == 0 && ld_12 > 0.0) {
if(OrderSend(Symbol(), OP_BUY, Lots, Ask, slip, Ask - Stoploss * Point, Ask + TakeProfit * Point, GetCommentForOrder(), g_magic_340, 0, g_color_264));else;
li_ret_0 = 2;
PlaySound("ricochet.wav");
}
}
int l_ord_total_24 = OrdersTotal();
for (int l_pos_20 = 0; l_pos_20 < l_ord_total_24; l_pos_20++) {
if(OrderSelect(l_pos_20, SELECT_BY_POS, MODE_TRADES));else;
if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_340 && OrderComment() == GetCommentForOrder()) {
if (OrderType() == OP_BUY) {
if (TrailingStop > 0.0) {
if (Bid - OrderOpenPrice() > Point * TrailingStop) {
if (OrderStopLoss() < Bid - Point * TrailingStop) {
if(OrderModify(OrderTicket(), OrderOpenPrice(), Bid - 5.0 * Point, OrderTakeProfit(), 0, GreenYellow));else;
return (0);
}
}
}
}
if (OrderType() == OP_SELL) {
if (TrailingStop > 0.0) {
if (OrderOpenPrice() - Ask > Point * TrailingStop) {
if (OrderStopLoss() > Ask + Point * TrailingStop) {
if(OrderModify(OrderTicket(), OrderOpenPrice(), Ask + 5.0 * Point, OrderTakeProfit(), 0, Red));else ;
return (0);
}
}
}
}
}
}
return (li_ret_0);
}
int EnterPositionBasedOnHL() {
int li_ret_0;
if (MyOrdersTotal() < MaxOpenOrders && AccountEquity() / (AccountMargin() + 0.0001) > MinMarginLevel / 100.0) {
if (iMA(NULL, MA_timeframe, MA_length, 0, MODE_SMA, PRICE_HIGH, 0) * (Percent / 100.0 + 1.0) < Bid && gi_344 != 22 && Bid >= gd_348 + gd_232 * Point || MyOrdersTotal() == 0) {
if(OrderSend(Symbol(), OP_SELL, Lots, Bid, slip, Bid + Stoploss * Point, Bid - TakeProfit * Point, GetCommentForOrder(), g_magic_340, 0, g_color_276));else;
li_ret_0 = 1;
}
if (iMA(NULL, MA_timeframe, MA_length, 0, MODE_SMA, PRICE_LOW, 0) * (1 - Percent / 100.0) > Ask && gi_344 != 11 && Ask <= gd_348 - gd_232 * Point || MyOrdersTotal() == 0) {
if(OrderSend(Symbol(), OP_BUY, Lots, Ask, slip, Ask - Stoploss * Point, Ask + TakeProfit * Point, GetCommentForOrder(), g_magic_340, 0, g_color_264));else;
li_ret_0 = 2;
}
}
int l_ord_total_8 = OrdersTotal();
for (int l_pos_4 = 0; l_pos_4 < l_ord_total_8; l_pos_4++) {
if(OrderSelect(l_pos_4, SELECT_BY_POS, MODE_TRADES));else;
if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_340 && OrderComment() == GetCommentForOrder()) {
if (OrderType() == OP_BUY) {
if (TrailingStop > 0.0) {
if (Bid - OrderOpenPrice() > Point * TrailingStop) {
if (OrderStopLoss() < Bid - Point * TrailingStop) {
if(OrderModify(OrderTicket(), OrderOpenPrice(), Bid - 5.0 * Point, OrderTakeProfit(), 0, GreenYellow));else;
return (0);
}
}
}
}
if (OrderType() == OP_SELL) {
if (TrailingStop > 0.0) {
if (OrderOpenPrice() - Ask > Point * TrailingStop) {
if (OrderStopLoss() > Ask + Point * TrailingStop) {
if(OrderModify(OrderTicket(), OrderOpenPrice(), Ask + 5.0 * Point, OrderTakeProfit(), 0, Red));else;
return (0);
}
}
}
}
}
}
return (li_ret_0);
}
double CalculateAverageOpeningPrice(int ai_0) {
double ld_ret_8 = 0;
for (int l_pos_4 = OrdersTotal() - 1; l_pos_4 >= 0; l_pos_4--) {
if(OrderSelect(l_pos_4, SELECT_BY_POS, MODE_TRADES));else;
if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_340 && OrderComment() == GetCommentForOrder()) ld_ret_8 += OrderOpenPrice();
}
ld_ret_8 /= MathMax(ai_0, 1);
return (ld_ret_8);
}
void ChangeOpenOrders(bool ai_0, int ai_4, double ad_8) {
int l_ord_total_20 = OrdersTotal();
for (int l_pos_16 = 0; l_pos_16 < l_ord_total_20; l_pos_16++) {
if(OrderSelect(l_pos_16, SELECT_BY_POS, MODE_TRADES));else;
if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_340 && OrderComment() == GetCommentForOrder()) {
if (OrderType() == OP_BUY) {
g_price_356 = ad_8 + TakeProfit * Point;
g_price_192 = ad_8 - Stoploss * Point / ai_4;
}
if (OrderType() == OP_SELL) {
g_price_356 = ad_8 - TakeProfit * Point;
g_price_192 = ad_8 + Stoploss * Point / ai_4;
}
if (ai_0) if(OrderModify(OrderTicket(), 0, g_price_192, g_price_356, 0, Yellow));else;
}
}
}
void KeepTrackOfStopLoss(double ad_0) {
int l_cmd_8 = -1;
int l_ord_total_12 = OrdersTotal();
for (int l_pos_16 = 0; l_pos_16 < l_ord_total_12; l_pos_16++) {
if(OrderSelect(l_pos_16, SELECT_BY_POS, MODE_TRADES));else;
if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_340 && OrderComment() == GetCommentForOrder()) {
g_ord_stoploss_200 = OrderStopLoss();
l_cmd_8 = OrderType();
}
}
gd_208 = ad_0;
gi_344 = 0;
if (l_cmd_8 == OP_BUY) gi_344 = 1;
else
if (l_cmd_8 == OP_SELL) gi_344 = 2;
if (g_ord_stoploss_200 != 0.0) {
gd_224 = MathAbs(gd_208 - g_ord_stoploss_200) / 2.0;
gd_216 = (Bid + Ask) / 2.0;
if (g_ord_stoploss_200 < gd_216 + gd_224 && g_ord_stoploss_200 > gd_216 - gd_224) {
if (gi_344 == 1) gi_344 = 11;
if (gi_344 == 2) gi_344 = 22;
}
g_ord_stoploss_200 = 0;
}
}
int MagicfromSymbol() {
int li_ret_0 = 0;
for (int li_4 = 0; li_4 < 5; li_4++) li_ret_0 = 3 * li_ret_0 + StringGetChar(Symbol(), li_4);
li_ret_0 = 3 * li_ret_0 + Period();
return (li_ret_0);
}
double divergence(int a_period_0, int a_period_4, int a_applied_price_8, int a_applied_price_12, int ai_16) {
double ld_64;
double l_ima_24 = iMA(Symbol(), 0, a_period_0, 0, MODE_SMA, a_applied_price_8, ai_16);
double l_ima_40 = iMA(Symbol(), 0, a_period_4, 0, MODE_SMA, a_applied_price_12, ai_16);
double ld_56 = l_ima_24 - l_ima_40;
double l_ima_32 = iMA(Symbol(), 0, a_period_0, 0, MODE_SMA, a_applied_price_8, ai_16 + 1);
double l_ima_48 = iMA(Symbol(), 0, a_period_4, 0, MODE_SMA, a_applied_price_12, ai_16 + 1);
if (Use_V63D_Divergence) ld_64 = l_ima_24 - l_ima_40 - (l_ima_32 - l_ima_48);
else ld_64 = l_ima_32 - l_ima_48;
if (Symbol() == "EURJPY" || Symbol() == "USDJPY" || Symbol() == "CHFJPY" || Symbol() == "AUDJPY" || Symbol() == "CADJPY" || Symbol() == "NZDJPY" || Symbol() == "GBPJPY" ||
Symbol() == "SGDJPY") return ((ld_56 - ld_64) / 100.0);
return (ld_56 - ld_64);
}
bool LossCheck() {
bool li_4;
int l_file_0 = FileOpen(LogFileName(), FILE_CSV|FILE_READ, ";");
if (l_file_0 > 0) {
li_4 = FileReadNumber(l_file_0);
FileClose(l_file_0);
} else li_4 = FALSE;
if (li_4 == 0) {
l_file_0 = FileOpen(LogFileName(), FILE_CSV|FILE_WRITE, ";");
FileWrite(l_file_0, AccountEquity());
FileClose(l_file_0);
}
if (li_4 - AccountEquity() >= PipsLoss * GetSizeLot()) return (TRUE);
return (FALSE);
}
string LogFileName() {
string l_dbl2str_0 = DoubleToStr(Year(), 0);
string l_dbl2str_8 = DoubleToStr(Month(), 0);
if (StringLen(l_dbl2str_8) < 2) l_dbl2str_8 = "0" + l_dbl2str_8;
string l_dbl2str_16 = DoubleToStr(Day(), 0);
if (StringLen(l_dbl2str_16) < 2) l_dbl2str_16 = "0" + l_dbl2str_16;
return (l_dbl2str_0 + l_dbl2str_8 + l_dbl2str_16 + ".log");
}
void LogWrite(string as_0) {
int l_file_8;
if (writelog == 1) {
l_file_8 = FileOpen(gs_292 + ".log", FILE_CSV|FILE_WRITE, ";");
FileSeek(l_file_8, 0, SEEK_END);
FileWrite(l_file_8, as_0);
FileFlush(l_file_8);
FileClose(l_file_8);
}
}
int MyOrdersTotal() {
int l_count_0 = 0;
for (int l_pos_4 = 0; l_pos_4 < OrdersTotal(); l_pos_4++) {
if (OrderSelect(l_pos_4, SELECT_BY_POS, MODE_TRADES))
if (OrderSymbol() == Symbol() && OrderMagicNumber() == MagicfromSymbol() && OrderComment() == GetCommentForOrder()) l_count_0++;
}
return (l_count_0);
}
string GetCommentForOrder() {
return (gs_292);
}
double GetSizeLot() {
return (Lots);
}
FX-Arabia
|
|
جديد المواضيع |
لوحة التحكم
روابط هامة
|
||||||
| منتدى المؤشرات و الاكسبيرتات تعليم برمجة الاكسبيرت ، اكسبيرت مجانى ، برمجة مؤشرات ، مؤشر ، تصميم اكسبيرت مجانا ، اكسبيرتات جديدة ، مؤشرات جديدة ، كل ما يتعلق بالتحليل و الخاص بالمؤشرات الفنية او الرقمية ، Expert advisor ، mql ، mql4 ، دورة برمجة ، برمجة اكسبيرت ، اكسبيرت رابح ، اكسبيرت جيد ، ادارة حسابات ، تداول الى ، ميتاتريدر ، تحميل منصة ، منصة تداول ، برمجة مؤشر ، مكتبة مؤشرات ، مؤشر جديد ، مؤشرات جديدة ، مؤشر حصرى ، احدث مؤشر . |
 |
|
|
أدوات الموضوع |
26-02-2016, 02:57 PM
|
المشاركة رقم: 1 | ||||||||||||||||||||||||
|
المنتدى :
منتدى المؤشرات و الاكسبيرتات
يرجى من استاذا اسلام تعديل هذا الكود
|
||||||||||||||||||||||||
|
|
||||||||||||||||||||||||
|
#1
26-02-2016, 02:57 PM
|
|
|
|
|
يرجى من استاذا اسلام تعديل هذا الكود
#property copyright "Copyright © Matrix NN expert"
#property link "" extern int MA_length = 10; extern int MA_timeframe = 30; extern int MAtype = 0; extern double Percent = 0.1; extern int TradeOnFriday = 0; extern int slip = 100; extern bool UseMM = FALSE; extern double Risk = 5.0; extern double Lots = 0.1; extern int TakeProfit = 50; extern int Stoploss = 150; extern double TrailingStop = 0.0; extern int MaxOpenOrders = 1; extern double MinMarginLevel = 250.0; extern int Fast_Period = 23; extern int Fast_Price = 1; extern int Slow_Period = 84; extern int Slow_Price = 1; extern double DivergenceLimit = 0.002; extern bool Use_V63D_Divergence = TRUE; extern int PipStep = 30; extern double IncreasementType = 0.0; double g_price_192 = 0.0; double g_ord_stoploss_200 = 0.0; double gd_208; double gd_216; double gd_224 = 0.0; double gd_232; int gi_240 = 0; int gi_244 = 0; int g_ord_total_248 = 0; extern int DVLimit = 10; extern int PipsGoal = 500; extern int PipsLoss = 500; int g_color_264 = DodgerBlue; int gi_unused_268 = 16748574; int gi_unused_272 = 16748574; int g_color_276 = Red; int gi_unused_280 = 255; int gi_unused_284 = 255; int gi_unused_288 = 16777215; string gs_292 = "MATRIX NN 4.0"; string gs_unused_300 = "expert.wav"; int gi_unused_308 = 0; int gi_unused_312 = 1; int gi_unused_316 = 2; extern int GMT = 1; extern int DST = 1; extern int OpeningHour = 0; extern int ClosingHour = 23; extern int writelog = 0; int g_magic_340; int gi_344; double gd_348; double g_price_356; double gd_364; int init() { LogWrite(Symbol() + ",M" + Period()); return (0); } int start() { int li_8; int li_12; int l_ord_total_16; int li_20; int l_day_of_year_32; int li_0 = 684873; LogWrite(TimeToStr(TimeCurrent()) + " - " + "Bid=" + Bid); g_magic_340 = MagicfromSymbol(); Comment(g_magic_340); if (UseMM == TRUE) { Lots = AccountEquity() * Risk / 100.0 / 1000.0; if (Lots > 0.1) NormalizeDouble(Lots, 1); else NormalizeDouble(Lots, 2); } SetupGlobalVariables(); double ld_24 = iATR(NULL, PERIOD_D1, 21, 0); if (Point == 0.01) ld_24 = 100.0 * ld_24; if (Point == 0.0001) ld_24 = 10000.0 * ld_24; TakeProfit = 2.0 * ld_24 / 10.0; Stoploss = 2.0 * ld_24; PipStep = ld_24 / 10.0; if (DayOfWeek() == 6 && Hour() >= 20) { Comment("weekend"); return (0); } if (!(IsTesting() || IsDemo())) { if (LossCheck()) { Alert("excessive loss!"); PlaySound("alert.wav"); return (0); } } if (AccountBalance() - AccountEquity() > gi_244) gi_244 = AccountBalance() - AccountEquity(); if (MyOrdersTotal() > g_ord_total_248) g_ord_total_248 = OrdersTotal(); double ld_36 = divergence(Fast_Period, Slow_Period, Fast_Price, Slow_Price, 0); Comment("maxDrawDown=", gi_244, " maxOrdersOpen=", g_ord_total_248, " Current Divergence = ", ld_36); gd_232 = PipStep; if (IncreasementType > 0.0) { gd_232 = MathSqrt(MyOrdersTotal()) * PipStep; gd_232 = MathPow(MyOrdersTotal(), IncreasementType) * PipStep; } LogWrite("CurrentPipStep=" + gd_232); gi_344 = 0; if (Day() != 5 || TradeOnFriday > 0) { l_ord_total_16 = OrdersTotal(); li_20 = MyOrdersTotal(); LogWrite("OrdersTotal=" + l_ord_total_16); LogWrite("MyOrdersTotal=" + li_20); if (li_20 == 0) l_day_of_year_32 = DayOfYear(); if (li_20 > 0) gd_348 = GetPreviousOpenPrice(); else LogWrite("LastPrice=" + gd_348); li_8 = CheckJustClosedOrder(); if (li_8 != 1) { gi_240 = FALSE; gd_348 = GetPreviousOpenPrice(); LogWrite("LastPrice=" + gd_348); if (MathAbs(ld_36) <= DivergenceLimit) { if (Hour() < OpeningHour + GMT + DST || Hour() > ClosingHour + GMT + DST) Comment("bad hours."); else { if (MAtype == FALSE) { li_12 = EnterPositionBasedOnOpen(); if (li_12 == 1) { gi_240 = TRUE; gi_344 = 2; } if (li_12 == 2) { gi_240 = TRUE; gi_344 = 1; } } if (MAtype == TRUE) { li_12 = EnterPositionBasedOnHL(); if (li_12 == 1) { gi_240 = TRUE; gi_344 = 2; } if (li_12 == 2) { gi_240 = TRUE; gi_344 = 1; } } } } } li_20 = MyOrdersTotal(); if (li_20 > 0 && gi_240 == TRUE) { gd_364 = CalculateAverageOpeningPrice(li_20); Comment("AveragePrice: ", gd_364, " myTotal: ", li_20); } if (gi_240 == TRUE && li_20 > 1) ChangeOpenOrders(0, li_20, gd_364); if (li_20 > 0) KeepTrackOfStopLoss(gd_364); } return (0); } void SetupGlobalVariables() { switch (g_magic_340) { case 26910: Percent = 0.15; TradeOnFriday = 1; slip = 100; PipStep = 5; IncreasementType = 0.0; DVLimit = 8; OpeningHour = 6; ClosingHour = 14; return; case 25803: Percent = 0.25; TradeOnFriday = 1; slip = 100; PipStep = 5; IncreasementType = 0.0; DVLimit = 8; OpeningHour = 7; ClosingHour = 15; return; case 26715: MA_length = 18; MA_timeframe = 30; MAtype = FALSE; Percent = 0.1; TradeOnFriday = 1; slip = 100; Lots = 0.05; TakeProfit = 50; Stoploss = 150; PipStep = 7; IncreasementType = 0.0; DVLimit = 6; OpeningHour = 6; ClosingHour = 14; return; return; } } double GetPreviousOpenPrice() { double l_ord_open_price_4; for (int l_pos_0 = OrdersTotal() - 1; l_pos_0 >= 0; l_pos_0--) { if(OrderSelect(l_pos_0, SELECT_BY_POS, MODE_TRADES));else; if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_340 && OrderComment() == GetCommentForOrder()) { l_ord_open_price_4 = OrderOpenPrice(); break; } } return (l_ord_open_price_4); } int CheckJustClosedOrder() { int l_datetime_4; string ls_8; int l_str2time_16; int li_24; int l_hist_total_20 = OrdersHistoryTotal(); bool li_ret_28 = FALSE; for (int l_pos_0 = 0; l_pos_0 < l_hist_total_20; l_pos_0++) { if (OrderSelect(l_pos_0, SELECT_BY_POS, MODE_HISTORY) == TRUE) { if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_340 && OrderComment() == GetCommentForOrder()) { l_datetime_4 = OrderCloseTime(); ls_8 = Year() + "-" + Month() + "-" + Day() + " " + Hour() + ":" + Minute() + ":" + Seconds(); l_str2time_16 = StrToTime(ls_8); li_24 = l_str2time_16 - l_datetime_4; if ((60 * Period()) << 1 > li_24) { li_ret_28 = TRUE; break; } } } } return (li_ret_28); } int EnterPositionBasedOnOpen() { int li_ret_0; double l_ima_4 = iMA(NULL, MA_timeframe, MA_length, 0, MODE_SMA, PRICE_OPEN, 0); double ld_12 = iRVI(NULL, 0, 10, MODE_MAIN, 0) - iRVI(NULL, 0, 10, MODE_MAIN, 1); if (MyOrdersTotal() < MaxOpenOrders && AccountEquity() / (AccountMargin() + 0.0001) > MinMarginLevel / 100.0) { if (l_ima_4 * (Percent / 100.0 + 1.0) < Bid && gi_344 != 22 && Bid >= gd_348 + gd_232 * Point || MyOrdersTotal() == 0&& ld_12 < 0.0) { if (OrderSend(Symbol(), OP_SELL, Lots, Bid, slip, Bid + Stoploss * Point, Bid - TakeProfit * Point, GetCommentForOrder(), g_magic_340, 0, g_color_276));else; li_ret_0 = 1; PlaySound("ricochet.wav"); } if (l_ima_4 * (1 - Percent / 100.0) > Ask && gi_344 != 11 && Ask <= gd_348 - gd_232 * Point || MyOrdersTotal() == 0 && ld_12 > 0.0) { if(OrderSend(Symbol(), OP_BUY, Lots, Ask, slip, Ask - Stoploss * Point, Ask + TakeProfit * Point, GetCommentForOrder(), g_magic_340, 0, g_color_264));else; li_ret_0 = 2; PlaySound("ricochet.wav"); } } int l_ord_total_24 = OrdersTotal(); for (int l_pos_20 = 0; l_pos_20 < l_ord_total_24; l_pos_20++) { if(OrderSelect(l_pos_20, SELECT_BY_POS, MODE_TRADES));else; if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_340 && OrderComment() == GetCommentForOrder()) { if (OrderType() == OP_BUY) { if (TrailingStop > 0.0) { if (Bid - OrderOpenPrice() > Point * TrailingStop) { if (OrderStopLoss() < Bid - Point * TrailingStop) { if(OrderModify(OrderTicket(), OrderOpenPrice(), Bid - 5.0 * Point, OrderTakeProfit(), 0, GreenYellow));else; return (0); } } } } if (OrderType() == OP_SELL) { if (TrailingStop > 0.0) { if (OrderOpenPrice() - Ask > Point * TrailingStop) { if (OrderStopLoss() > Ask + Point * TrailingStop) { if(OrderModify(OrderTicket(), OrderOpenPrice(), Ask + 5.0 * Point, OrderTakeProfit(), 0, Red));else ; return (0); } } } } } } return (li_ret_0); } int EnterPositionBasedOnHL() { int li_ret_0; if (MyOrdersTotal() < MaxOpenOrders && AccountEquity() / (AccountMargin() + 0.0001) > MinMarginLevel / 100.0) { if (iMA(NULL, MA_timeframe, MA_length, 0, MODE_SMA, PRICE_HIGH, 0) * (Percent / 100.0 + 1.0) < Bid && gi_344 != 22 && Bid >= gd_348 + gd_232 * Point || MyOrdersTotal() == 0) { if(OrderSend(Symbol(), OP_SELL, Lots, Bid, slip, Bid + Stoploss * Point, Bid - TakeProfit * Point, GetCommentForOrder(), g_magic_340, 0, g_color_276));else; li_ret_0 = 1; } if (iMA(NULL, MA_timeframe, MA_length, 0, MODE_SMA, PRICE_LOW, 0) * (1 - Percent / 100.0) > Ask && gi_344 != 11 && Ask <= gd_348 - gd_232 * Point || MyOrdersTotal() == 0) { if(OrderSend(Symbol(), OP_BUY, Lots, Ask, slip, Ask - Stoploss * Point, Ask + TakeProfit * Point, GetCommentForOrder(), g_magic_340, 0, g_color_264));else; li_ret_0 = 2; } } int l_ord_total_8 = OrdersTotal(); for (int l_pos_4 = 0; l_pos_4 < l_ord_total_8; l_pos_4++) { if(OrderSelect(l_pos_4, SELECT_BY_POS, MODE_TRADES));else; if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_340 && OrderComment() == GetCommentForOrder()) { if (OrderType() == OP_BUY) { if (TrailingStop > 0.0) { if (Bid - OrderOpenPrice() > Point * TrailingStop) { if (OrderStopLoss() < Bid - Point * TrailingStop) { if(OrderModify(OrderTicket(), OrderOpenPrice(), Bid - 5.0 * Point, OrderTakeProfit(), 0, GreenYellow));else; return (0); } } } } if (OrderType() == OP_SELL) { if (TrailingStop > 0.0) { if (OrderOpenPrice() - Ask > Point * TrailingStop) { if (OrderStopLoss() > Ask + Point * TrailingStop) { if(OrderModify(OrderTicket(), OrderOpenPrice(), Ask + 5.0 * Point, OrderTakeProfit(), 0, Red));else; return (0); } } } } } } return (li_ret_0); } double CalculateAverageOpeningPrice(int ai_0) { double ld_ret_8 = 0; for (int l_pos_4 = OrdersTotal() - 1; l_pos_4 >= 0; l_pos_4--) { if(OrderSelect(l_pos_4, SELECT_BY_POS, MODE_TRADES));else; if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_340 && OrderComment() == GetCommentForOrder()) ld_ret_8 += OrderOpenPrice(); } ld_ret_8 /= MathMax(ai_0, 1); return (ld_ret_8); } void ChangeOpenOrders(bool ai_0, int ai_4, double ad_8) { int l_ord_total_20 = OrdersTotal(); for (int l_pos_16 = 0; l_pos_16 < l_ord_total_20; l_pos_16++) { if(OrderSelect(l_pos_16, SELECT_BY_POS, MODE_TRADES));else; if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_340 && OrderComment() == GetCommentForOrder()) { if (OrderType() == OP_BUY) { g_price_356 = ad_8 + TakeProfit * Point; g_price_192 = ad_8 - Stoploss * Point / ai_4; } if (OrderType() == OP_SELL) { g_price_356 = ad_8 - TakeProfit * Point; g_price_192 = ad_8 + Stoploss * Point / ai_4; } if (ai_0) if(OrderModify(OrderTicket(), 0, g_price_192, g_price_356, 0, Yellow));else; } } } void KeepTrackOfStopLoss(double ad_0) { int l_cmd_8 = -1; int l_ord_total_12 = OrdersTotal(); for (int l_pos_16 = 0; l_pos_16 < l_ord_total_12; l_pos_16++) { if(OrderSelect(l_pos_16, SELECT_BY_POS, MODE_TRADES));else; if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_340 && OrderComment() == GetCommentForOrder()) { g_ord_stoploss_200 = OrderStopLoss(); l_cmd_8 = OrderType(); } } gd_208 = ad_0; gi_344 = 0; if (l_cmd_8 == OP_BUY) gi_344 = 1; else if (l_cmd_8 == OP_SELL) gi_344 = 2; if (g_ord_stoploss_200 != 0.0) { gd_224 = MathAbs(gd_208 - g_ord_stoploss_200) / 2.0; gd_216 = (Bid + Ask) / 2.0; if (g_ord_stoploss_200 < gd_216 + gd_224 && g_ord_stoploss_200 > gd_216 - gd_224) { if (gi_344 == 1) gi_344 = 11; if (gi_344 == 2) gi_344 = 22; } g_ord_stoploss_200 = 0; } } int MagicfromSymbol() { int li_ret_0 = 0; for (int li_4 = 0; li_4 < 5; li_4++) li_ret_0 = 3 * li_ret_0 + StringGetChar(Symbol(), li_4); li_ret_0 = 3 * li_ret_0 + Period(); return (li_ret_0); } double divergence(int a_period_0, int a_period_4, int a_applied_price_8, int a_applied_price_12, int ai_16) { double ld_64; double l_ima_24 = iMA(Symbol(), 0, a_period_0, 0, MODE_SMA, a_applied_price_8, ai_16); double l_ima_40 = iMA(Symbol(), 0, a_period_4, 0, MODE_SMA, a_applied_price_12, ai_16); double ld_56 = l_ima_24 - l_ima_40; double l_ima_32 = iMA(Symbol(), 0, a_period_0, 0, MODE_SMA, a_applied_price_8, ai_16 + 1); double l_ima_48 = iMA(Symbol(), 0, a_period_4, 0, MODE_SMA, a_applied_price_12, ai_16 + 1); if (Use_V63D_Divergence) ld_64 = l_ima_24 - l_ima_40 - (l_ima_32 - l_ima_48); else ld_64 = l_ima_32 - l_ima_48; if (Symbol() == "EURJPY" || Symbol() == "USDJPY" || Symbol() == "CHFJPY" || Symbol() == "AUDJPY" || Symbol() == "CADJPY" || Symbol() == "NZDJPY" || Symbol() == "GBPJPY" || Symbol() == "SGDJPY") return ((ld_56 - ld_64) / 100.0); return (ld_56 - ld_64); } bool LossCheck() { bool li_4; int l_file_0 = FileOpen(LogFileName(), FILE_CSV|FILE_READ, ";"); if (l_file_0 > 0) { li_4 = FileReadNumber(l_file_0); FileClose(l_file_0); } else li_4 = FALSE; if (li_4 == 0) { l_file_0 = FileOpen(LogFileName(), FILE_CSV|FILE_WRITE, ";"); FileWrite(l_file_0, AccountEquity()); FileClose(l_file_0); } if (li_4 - AccountEquity() >= PipsLoss * GetSizeLot()) return (TRUE); return (FALSE); } string LogFileName() { string l_dbl2str_0 = DoubleToStr(Year(), 0); string l_dbl2str_8 = DoubleToStr(Month(), 0); if (StringLen(l_dbl2str_8) < 2) l_dbl2str_8 = "0" + l_dbl2str_8; string l_dbl2str_16 = DoubleToStr(Day(), 0); if (StringLen(l_dbl2str_16) < 2) l_dbl2str_16 = "0" + l_dbl2str_16; return (l_dbl2str_0 + l_dbl2str_8 + l_dbl2str_16 + ".log"); } void LogWrite(string as_0) { int l_file_8; if (writelog == 1) { l_file_8 = FileOpen(gs_292 + ".log", FILE_CSV|FILE_WRITE, ";"); FileSeek(l_file_8, 0, SEEK_END); FileWrite(l_file_8, as_0); FileFlush(l_file_8); FileClose(l_file_8); } } int MyOrdersTotal() { int l_count_0 = 0; for (int l_pos_4 = 0; l_pos_4 < OrdersTotal(); l_pos_4++) { if (OrderSelect(l_pos_4, SELECT_BY_POS, MODE_TRADES)) if (OrderSymbol() == Symbol() && OrderMagicNumber() == MagicfromSymbol() && OrderComment() == GetCommentForOrder()) l_count_0++; } return (l_count_0); } string GetCommentForOrder() { return (gs_292); } double GetSizeLot() { return (Lots); }
|
|
26-02-2016, 03:27 PM
|
المشاركة رقم: 2 | |||||||||||||||||||||||||||||||||||||||||||||||||
|
كاتب الموضوع :
sal_moh85
المنتدى :
منتدى المؤشرات و الاكسبيرتات
رد: يرجى من استاذا اسلام تعديل هذا الكود
|
|||||||||||||||||||||||||||||||||||||||||||||||||
|
|
|
|||||||||||||||||||||||||||||||||||||||||||||||||
|
#2
26-02-2016, 03:27 PM
|
|||||||||||||||||||||
|
|||||||||||||||||||||
رد: يرجى من استاذا اسلام تعديل هذا الكود
،،،ماهو التعديل المطلوب؟!،،،
|
|||||||||||||||||||||
|
26-02-2016, 04:02 PM
|
المشاركة رقم: 3 | ||||||||||||||||||||||||
|
كاتب الموضوع :
sal_moh85
المنتدى :
منتدى المؤشرات و الاكسبيرتات
رد: يرجى من استاذا اسلام تعديل هذا الكود
وجود خطاء عند م كمبليت |
||||||||||||||||||||||||
|
|
|
||||||||||||||||||||||||
|
26-02-2016, 04:45 PM
|
المشاركة رقم: 4 | |||||||||||||||||||||||||||||||||||||||||||||||||
|
كاتب الموضوع :
sal_moh85
المنتدى :
منتدى المؤشرات و الاكسبيرتات
رد: يرجى من استاذا اسلام تعديل هذا الكود
|
|||||||||||||||||||||||||||||||||||||||||||||||||
|
|
|
|||||||||||||||||||||||||||||||||||||||||||||||||
|
#4
26-02-2016, 04:45 PM
|
|||||||||||||||||||||
|
|||||||||||||||||||||
رد: يرجى من استاذا اسلام تعديل هذا الكود
،،،مايظهر عند عمل كومبيل ليس خطأ ولكنها ملاحظة وبخصوص الخطأ ordersend 130 تأكد من الاستوب لوز الذي تضعه،،،
|
|||||||||||||||||||||
|
26-02-2016, 04:54 PM
|
المشاركة رقم: 5 | ||||||||||||||||||||||||
|
كاتب الموضوع :
sal_moh85
المنتدى :
منتدى المؤشرات و الاكسبيرتات
رد: يرجى من استاذا اسلام تعديل هذا الكود
شكرا لك |
||||||||||||||||||||||||
|
|
|
||||||||||||||||||||||||
|
| مواقع النشر (المفضلة) |
| الكلمات الدلالية (Tags) |
| الكود, اسماء, استاذا, تعديل, يريد |
|
|
