Close All Pending Orders?????

hey guys,

i loaded this EA into my experts and everytime it gives me an error message, can one of the programmers look at the code for me and see what the problem is......thankyou in advance...


int start()
{
int total = OrdersTotal();
for(int i=total-1;i>=0;i--)
{
OrderSelect(i, SELECT_BY_POS);
int type = OrderType();
bool result = false;

switch(type)
{
//Close opened long positions
case OP_BUY : result = OrderClose( OrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, Red );
break;

//Close opened short positions
case OP_SELL : result = OrderClose( OrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_ASK), 5, Red );
break;
//Close pending orders
case OP_BUYLIMIT :
case OP_BUYSTOP :
case OP_SELLLIMIT :
case OP_SELLSTOP : result = OrderDelete( OrderTicket() );
}

if(result == false)
{
Alert("Order " , OrderTicket() , " failed to close. Error:" , GetLastError() );
Sleep(3000);
}
}

return(0);
}

It's not a EA. It is a script and goes in the script folder.

thankyou

i just copied the code and put it into an EA.....hope it works fine....here's the code i put into the EA....


#property copyright "coded by Rolands Auza"
#property link "www.rm-forex.lv"
extern string currencyToDelete="GBPUSD";
int init() {return(0);}
int deinit() {return(0);}
int start() {
int cnt, deleteClose1;
for(cnt=0;cnt<OrdersTotal();cnt++)
{
OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
if (OrderSymbol()==currencyToDelete)
{
if(OrderType()==OP_BUYLIMIT || OrderType()==OP_SELLLIMIT)
{
deleteClose1=OrderDelete(OrderTicket());
if(deleteClose1==true) Comment("Order Deleted");
}
} //if

} //for
return(0);
}