
extern string Time_Start="00:00"; extern string Time_End="23:59";
double hour=Hour()+Minute()/100.0; datetime start= StrToTime(TimeToStr(TimeCurrent(), TIME_DATE) + " " + Time_Start); datetime end= StrToTime(TimeToStr(TimeCurrent(), TIME_DATE) + " " + Time_End); bool time=(Time[0]>=start && Time[0]<=end); bool end_time=(Time[0]>=end);
extern int BreakEven=0;
void MoveBreakEven()
{
int cnt,total=OrdersTotal();
for(cnt=0;cnt<total;cnt++)
{
OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
if(OrderType()<=OP_SELL&&OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
{
if(OrderType()==OP_BUY)
{
if(BreakEven>0)
{
if(NormalizeDouble((Bid-OrderOpenPrice()),Digits)>BreakEven*pt)
{
if(NormalizeDouble((OrderStopLoss()-OrderOpenPrice()),Digits)<0)
{
OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(OrderOpenPrice()+movestopto*pt,Digits),OrderTakeProfit(),0,Blue);
}
}
}
}
else
{
if(BreakEven>0)
{
if(NormalizeDouble((OrderOpenPrice()-Ask),Digits)>BreakEven*pt)
{
if(NormalizeDouble((OrderOpenPrice()-OrderStopLoss()),Digits)<0)
{
OrderModify(OrderTicket(),OrderOpenPrice(),NormalizeDouble(OrderOpenPrice()-movestopto*pt,Digits),OrderTakeProfit(),0,Red);
}
}
}
}
}
}
} void CloseDeleteAll()
{
int total = OrdersTotal();
for (int cnt = total-1 ; cnt >=0 ; cnt--)
{
OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
if(OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES))
{
if(OrderSymbol()==Symbol()&&MagicNumber==OrderMagicNumber()){
switch(OrderType())
{
case OP_BUY :
{
if(!OrderClose(OrderTicket(),OrderLots(),MarketInfo(OrderSymbol(),MODE_BID),0,Violet))
return(false);
}break;
case OP_SELL :
{
if(!OrderClose(OrderTicket(),OrderLots(),MarketInfo(OrderSymbol(),MODE_ASK),0,Violet))
return(false);
}break;
}
if(OrderType()==OP_BUYSTOP || OrderType()==OP_SELLSTOP || OrderType()==OP_BUYLIMIT || OrderType()==OP_SELLLIMIT)
if(!OrderDelete(OrderTicket()))
{
Print("Error deleting " + OrderType() + " order : ",GetLastError());
return (false);
} }
}
}
return (true);
المواضيع المتشابهه | ||||
| الموضوع | كاتب الموضوع | المنتدى | مشاركات | آخر مشاركة |
| موضوع جديد لاكسبرت قديم !! | arabianmatrix | منتدى المؤشرات و الاكسبرتات | 7 | 09 - 09 - 2013 02:50 AM |
| طلب عاجل لاكسبرت بسيط | sakana | منتدى المؤشرات و الاكسبرتات | 10 | 22 - 06 - 2013 01:13 PM |
| طلب تحويل مؤشر لاكسبرت | mahmoudh7 | منتدى المؤشرات و الاكسبرتات | 9 | 25 - 03 - 2013 03:19 AM |
| طلب إضافة ال trailing stop لاكسبرت | Onewhen | منتدى المؤشرات و الاكسبرتات | 13 | 25 - 02 - 2013 12:49 AM |
| مطلوب عمل باك تست 99% او 90% لاكسبرت | margin call | منتدى المؤشرات و الاكسبرتات | 0 | 15 - 08 - 2012 09:52 AM |