//+------------------------------------------------------------------+
//| òðàë.mq4 |
//| Copyright © 2008, Äåì¸õèí Âèòàëèé Åâãåíüåâè÷ |
//| vitalya_1983@list.ru |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2008, Äåì¸õèí Âèòàëèé Åâãåíüåâè÷"
#property link "vitalya_1983@list.ru"
extern double percent_of_profit =33;
extern double minimum_profit = 1000;
double profit,profit_off,result;
bool trail_enable=false,close_start=false;
int init()
{
profit_off=0;
result = 0;
Comment ("");
return(0);
}
int start()
{
while (IsExpertEnabled())
{
Sleep (50);
RefreshRates();
//----
if (close_start)
{
for (int i=OrdersTotal();i>=1;i--)
{
OrderSelect (i-1,SELECT_BY_POS,MODE_TRADES);
{
if (OrderType()==OP_BUY)
{
double price = MarketInfo (OrderSymbol(),MODE_BID);
OrderClose (OrderTicket(),OrderLots(),price,3,0);
result = OrderProfit()+result;
}
if (OrderType()==OP_SELL)
{
price = MarketInfo (OrderSymbol(),MODE_ASK);
OrderClose (OrderTicket(),OrderLots(),price,3,0);
result = OrderProfit()+result;
}
}
}
}
for (i=OrdersTotal();i>=1;i--)
{
OrderSelect(i-1,SELECT_BY_POS,MODE_TRADES);
profit = OrderProfit()+OrderSwap()+profit;
}
if (close_start&&OrdersTotal()==0)
{
trail_enable=false;
close_start= false;
Alert ("Ñîâåòíèê çàêðûë ïîçèöèè ñ ðåçóëüòàòîì ", result);
profit_off=0;
result = 0;
}
if (!trail_enable&&OrdersTotal()!=0)
{
Comment ("Ðåæèì òðàëà âûêëþ÷åí." ,"\n","Ñîâåòíèê íà÷íåò ñîïðîâîæäàòü îðäåðà ïðè ðîñòå ïðèáûëè äî ",minimum_profit,
" òåêóùàÿ ïðèáûëü ", profit);
}
if ((profit_off==0&&minimum_profit < profit)||(profit_off!=0&&profit_off<profit-profit*(percent_of_profit/100)))
{
trail_enable=true;
profit_off=profit-profit*(percent_of_profit/100);
Comment("Ðåæèì òðàëà âêëþ÷åí." ,"\n","Ñîâåòíèê çàêðîåò îðäåðà ïðè ïàäåíèè ïðèáûëè äî ",profit_off,
" ìàêñèìàëüíàÿ ïðèáûëü ", profit);
}
if (trail_enable&&profit_off>profit)
{
close_start=true;
}
profit =0;
}
//----
return(0);
}
//+------------------------------------------------------------------+
Sample
Analysis
Market Information Used:
Indicator Curves created:
Indicators Used:
Custom Indicators Used:
Order Management characteristics:
Checks for the total of open orders
Other Features: