//+------------------------------------------------------------------+
//| Customized Ard Buy Sell Close V2.mq4 |
//| Copyright © 2008, ARDIANSYAH |
//| dailysignal.co.cc |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2008, Ardiansyah"
#property link "DailySignal.co.cc"
#property show_inputs
extern int code=0; //Code For Order 0 For Close Current, 1 For Buy, 2 For Sell
extern int DealerSell = 10; //Sell Divisor of equity amount
extern int DealerBuy = 10; //Buy Divisor of equity amount
extern double SL = 50; //StopLoss
extern double TP = 50; //TakeProfit
extern int SlipSell =30; //Slippage for Sell
extern int SlipBuy = 30; //Slippage for Buy
extern int SlipClose = 30; //Slipage For Close
extern int IP = 10; //It's for interbank rate 0,x for normal is set to 1
//+------------------------------------------------------------------+
//| script program start function |
//+------------------------------------------------------------------+
int start()
{
int Total = OrdersTotal();
switch(code)
{
case 0:
while(true){
if(close()==true) break;
}
break;
case 1:
while(true){
if(close()==true)
{
if(buy()==true) break;}
}
break;
case 2:
while(true){
if(close()==true)
{
if(sell()==true) break;}
}
break;
default:
Alert("Please Change the Code 0,1,2");// Non Code Empty Code Confirmation
break;
}
return(0);
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++||
//Sell Order Function ||
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++||
bool sell() //you can customized the function
{
int ticket, err,j=0;
double Margin, result, Lots ;
string sell = "selling order";
Margin = AccountFreeMargin( ) ;
result = Margin/DealerSell/1000;
if(result<1)
{
result=result*10;
Lots=MathFloor(result)/10;
}
else Lots=MathFloor(result);
Print("Amount of Lots = ", Lots);
while(true)
{
int limit=0;
RefreshRates();
double bid1=Bid;
ticket = OrderSend(Symbol(),OP_SELL,Lots,Bid,SlipSell,(Ask+SL*Point*IP),(Ask-TP*Point*IP),sell,0,0,White);
Print("Selling Order .........");
if(ticket<0)
{
err=GetLastError();
Print("Selling Order Failed == with error ",err);
if (err==135) {RefreshRates();}
else if(err==129)
{
while(true)
{
if(limit==0) {int bid2=Bid;limit=1;}
RefreshRates();
if(bid2 != Bid) break;
}
}
else {return(false);break;}
}
else
{
Print("Selling Order ->OK .. Price =", result);
return(true);
break;
}
}
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++||
//End Function ||
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++||
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++||
//Close Order Function ||
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++||
bool close()//you cancustomized the function
{
int Total, err;
bool trfls;
bool cls;
double price;
Total = OrdersTotal();
if(Total==0) return(true);
string Symb=Symbol();
for(int i=0; i<Total; i++)
{
int limit=0;
if (OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==true)
{
if(Symb != OrderSymbol()) {trfls=true;}
else
{
RefreshRates();
if (OrderType() == OP_BUY) price=Bid;
if (OrderType() == OP_SELL) price=Ask;
cls=OrderClose(OrderTicket(),OrderLots(),price,SlipClose,CLR_NONE);
Print("Closiing Order .........");
if (cls==false)
{
err = GetLastError();
if (err==135) RefreshRates();
else if(err==129)
{
while(true)
{
if(limit==0) {int bid2=Bid;limit=1;}
RefreshRates();
if(bid2 != Bid) break;
}
}
else
{
Print("Closing Order Failed == with error ",err);
return(false);
}
}
else
{
Print("Closing Order = OK");
trfls=true;
//return(true);
}
}
}
}
return(trfls);
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++||
//End Function ||
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++||
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++||
//Buy Order Function ||
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++||
bool buy()//you can customized the function
{
int ticket, err, j=0;
double Margin, result, Lots ;
string buy = "buying order";
Margin = AccountFreeMargin( ) ;
result = Margin/DealerBuy/1000;
if(result<1)
{
result=result*10;
Lots=MathFloor(result)/10;
}
else Lots=MathFloor(result);
Print("Amount of Lots = ", Lots);
while(true)
{
int limit=0;
RefreshRates();
ticket = OrderSend(Symbol(),OP_BUY,Lots,Ask ,SlipBuy,(Bid-SL*Point*IP),(Bid+TP*Point*IP),buy,0,0,White);
Print("Buying Order .........");
if(ticket<0)
{
err=GetLastError();
Print("Buying Order Failed == with error ",err);
if (err==135) RefreshRates();
else if(err==129)
{
while(true)
{
if(limit==0) {int bid2=Bid;limit=1;}
RefreshRates();
if(bid2 != Bid) break;
}
}
else {return(false);break;}
}
else
{
Print("Buying Order ->OK .. Price =", result);
return(true);
break;
}
}
}
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++||
//End Function ||
//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++||
Sample
Analysis
Market Information Used:
Indicator Curves created:
Indicators Used:
Custom Indicators Used:
Order Management characteristics:
Checks for the total of open orders
It automatically opens orders when conditions are reached
It Closes Orders by itself
Other Features:
It issuies visual alerts to the screen
