اقتباس:
المشاركة الأصلية كتبت بواسطة ramzi0007
 لا اعرف كيف ممكن اعملو بصيغة mq4
ادا بامكانك تنزيل برنامج يفتح ملفات ex |
/*
Generated by EX4-TO-MQ4 decompiler V4.0.224.1 []
Website: [عذراً, الأعضاء المسجلين ذوي العضوية النشطة فقط هم المصرح لهم برؤية الروابط. ]
E-mail :
[عذراً, الأعضاء المسجلين ذوي العضوية النشطة فقط هم المصرح لهم برؤية الروابط. ]
*/
#property copyright "eliran 4/12/09"
#property link "no link"
extern int filter = 15;
extern int Length = 45;
extern int pipsTP = 10000;
extern int pipsSL = 1000;
extern double lotToBuy = 0.1;
extern int timeFrame = 60;
bool gi_104;
double g_price_108 = 0.0;
double g_price_116 = 0.0;
double gd_124 = 0.0;
double gd_unused_132 = 100.0;
int g_pos_140 = 0;
int gi_144 = 0;
double gda_156[100][2];
double gda_160[100][2];
int gi_164 = -1;
int gi_168 = -1;
int gi_unused_172 = 0;
int gia_176[100];
int gia_180[100];
int gia_184[100];
double gda_unused_188[100];
int gi_unused_192 = -1;
double gd_unused_196 = 0.0;
double gd_unused_236 = 0.0;
double gd_unused_252 = 0.0;
double gd_268 = D'31.12.2009 04:44:38';
int g_time_276 = 0;
int init() {
for (g_pos_140 = 0; g_pos_140 < 99; g_pos_140++) {
gia_184[g_pos_140] = 0;
gia_176[g_pos_140] = 0;
gia_180[g_pos_140] = 0;
}
if (iCustom(Symbol(), 0, "NonLagAMA", 0, Length, 0, filter, 1, 0, 0, 1, 0) != EMPTY_VALUE) gi_104 = TRUE;
return (0);
}
int deinit() {
return (0);
}
int start() {
if (gd_124 > 0.0) lotToBuy = lotorder();
if (TimeCurrent() > gd_268) return (0);
if (Newbar()) {
if (iCustom(Symbol(), 0, "NonLagAMA", 0, Length, 0, filter, 1, 0, 0, 1, 0) != EMPTY_VALUE && gi_104 == FALSE) {
g_price_116 = Ask - pipsSL * Point;
g_price_108 = Ask + pipsTP * Point;
OrderSend(Symbol(), OP_BUY, lotToBuy, Ask, 3, g_price_116, g_price_108, 0, 0, 0, CLR_NONE);
gi_104 = TRUE;
gi_168++;
gda_156[gi_168][0] = Ask;
if (gi_164 >= 0 && OrdersTotal() != 0) {
for (g_pos_140 = OrdersTotal() - 1; g_pos_140 >= 0; g_pos_140--) {
OrderSelect(g_pos_140, SELECT_BY_POS);
if (OrderSymbol() == Symbol()) {
if (OrderOpenPrice() == gda_160[gi_164][0]) {
if (OrderType() == OP_SELL) {
OrderClose(OrderTicket(), OrderLots(), Ask, 2, CLR_NONE);
gi_164--;
}
}
}
}
} else
if (gi_164 >= 0) gi_164--;
}
if (iCustom(Symbol(), 0, "NonLagAMA", 0, Length, 0, filter, 1, 0, 0, 1, 0) == EMPTY_VALUE && gi_104 == TRUE) {
g_price_116 = Bid + pipsSL * Point;
g_price_108 = Bid - pipsTP * Point;
OrderSend(Symbol(), OP_SELL, lotToBuy, Bid, 3, g_price_116, g_price_108, 0, 0, 0, CLR_NONE);
gi_104 = FALSE;
gi_164++;
gda_160[gi_164][0] = Bid;
if (gi_168 >= 0 && OrdersTotal() != 0) {
for (g_pos_140 = OrdersTotal() - 1; g_pos_140 >= 0; g_pos_140--) {
OrderSelect(g_pos_140, SELECT_BY_POS);
if (OrderSymbol() == Symbol()) {
if (OrderOpenPrice() == gda_156[gi_168][0]) {
if (OrderType() == OP_BUY) {
OrderClose(OrderTicket(), OrderLots(), Bid, 2, CLR_NONE);
gi_168--;
}
}
}
}
} else
if (gi_168 >= 0) gi_168--;
}
}
return (0);
}
double lotorder() {
double ld_0 = AccountBalance() * gd_124;
ld_0 = NormalizeDouble(ld_0, 2);
return (ld_0);
}
bool Newbar() {
datetime l_time_0 = Time[0];
if (gi_144 == FALSE) {
l_time_0 = g_time_276;
gi_144 = TRUE;
}
if (g_time_276 != l_time_0) {
g_time_276 = l_time_0;
return (TRUE);
}
return (FALSE);
}
المواضيع المتشابهه 
رد: استراتجيه nonlagama عملتها اكسبرت 
