//+------------------------------------------------------------------+
//|                                                      mIBFXHedge  |
//|                               Copyright © 2008, Julius Figueroa  |
//|                                          trader101@Optonline.net |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2008, Julius Figueroa"
#property link      "trader101@optonline.net"

#property show_inputs
#include <WinUser32.mqh>
#include <stdlib.mqh>

extern double  Lot = 0.01;
extern int     MagicNumber=419;
extern string  TradeComment="";


bool CheckIfTradeAlreadyExists(string symbol)
   {
      if (OrdersTotal()==0) return(false);
      for (int cc=0; cc<OrdersTotal();cc++)
      {
         OrderSelect(cc, SELECT_BY_POS);
         if (OrderSymbol()==symbol && OrderMagicNumber()==MagicNumber) return(true);
      }
      return(false);
   
   }// end bool CheckTrendExists()

//+------------------------------------------------------------------+
//| script program start function                                    |
//+------------------------------------------------------------------+
int start()
  {
   
   int TradesSent=0;
   
   bool TradeExists = CheckIfTradeAlreadyExists("GBPUSDct");
   if (!TradeExists) int ticket = OrderSend("GBPUSDct",OP_SELL, Lot, MarketInfo("GBPUSDct",MODE_BID), 2, NULL, NULL, TradeComment, MagicNumber, 0, CLR_NONE);
   if (ticket > -1) TradesSent++;
   
   TradeExists = CheckIfTradeAlreadyExists("EURGBPct");
   if (!TradeExists) ticket = OrderSend("EURGBPct",OP_SELL, Lot, MarketInfo("EURGBPct",MODE_BID), 2, NULL, NULL, TradeComment, MagicNumber, 0, CLR_NONE);
   if (ticket > -1) TradesSent++;
   
   TradeExists = CheckIfTradeAlreadyExists("GBPCHFct");
   if (!TradeExists) ticket = OrderSend("GBPCHFct",OP_SELL, Lot, MarketInfo("GBPCHFct",MODE_BID), 2, NULL, NULL, TradeComment, MagicNumber, 0, CLR_NONE);
   if (ticket > -1) TradesSent++;
   
   TradeExists = CheckIfTradeAlreadyExists("CHFJPYct");
   if (!TradeExists) ticket = OrderSend("CHFJPYct",OP_SELL, Lot, MarketInfo("CHFJPYct",MODE_BID), 2, NULL, NULL, TradeComment, MagicNumber, 0, CLR_NONE);
   if (ticket > -1) TradesSent++;
   
   TradeExists = CheckIfTradeAlreadyExists("AUDJPYct");
   if (!TradeExists) ticket = OrderSend("AUDJPYct",OP_SELL, Lot, MarketInfo("AUDJPYct",MODE_BID), 2, NULL, NULL, TradeComment, MagicNumber, 0, CLR_NONE);
   if (ticket > -1) TradesSent++;
   
   TradeExists = CheckIfTradeAlreadyExists("EURJPYct");
   if (!TradeExists) ticket = OrderSend("EURJPYct",OP_SELL, Lot, MarketInfo("EURJPYct",MODE_BID), 2, NULL, NULL, TradeComment, MagicNumber, 0, CLR_NONE);
   if (ticket > -1) TradesSent++;
   
   TradeExists = CheckIfTradeAlreadyExists("USDCHFct");
   if (!TradeExists) ticket = OrderSend("USDCHFct",OP_SELL, Lot, MarketInfo("USDCHFct",MODE_BID), 2, NULL, NULL, TradeComment, MagicNumber, 0, CLR_NONE);
   if (ticket > -1) TradesSent++;
   
   
   
   TradeExists = CheckIfTradeAlreadyExists("NZDJPYct");
   if (!TradeExists) ticket = OrderSend("NZDJPYct",OP_SELL, Lot, MarketInfo("NZDJPYct",MODE_BID), 2, NULL, NULL, TradeComment, MagicNumber, 0, CLR_NONE);
   if (ticket > -1) TradesSent++;
   
   TradeExists = CheckIfTradeAlreadyExists("AUDUSDct");
   if (!TradeExists) ticket = OrderSend("AUDUSDct",OP_SELL, Lot, MarketInfo("AUDUSDct",MODE_BID), 2, NULL, NULL, TradeComment, MagicNumber, 0, CLR_NONE);
   if (ticket > -1) TradesSent++;
   
   TradeExists = CheckIfTradeAlreadyExists("USDJPYct");
   if (!TradeExists) ticket = OrderSend("USDJPYct",OP_SELL, Lot, MarketInfo("USDJPYct",MODE_BID), 2, NULL, NULL, TradeComment, MagicNumber, 0, CLR_NONE);
   if (ticket > -1) TradesSent++;
   
   TradeExists = CheckIfTradeAlreadyExists("EURUSDct");
   if (!TradeExists) ticket = OrderSend("EURUSDct",OP_SELL, Lot, MarketInfo("EURUSDct",MODE_BID), 2, NULL, NULL, TradeComment, MagicNumber, 0, CLR_NONE);
   if (ticket > -1) TradesSent++;
   
   TradeExists = CheckIfTradeAlreadyExists("EURCHFct");
   if (!TradeExists) ticket = OrderSend("EURCHFct",OP_SELL, Lot, MarketInfo("EURCHFct",MODE_BID), 2, NULL, NULL, TradeComment, MagicNumber, 0, CLR_NONE);
   if (ticket > -1) TradesSent++;
   
   TradeExists = CheckIfTradeAlreadyExists("GBPJPYct");
   if (!TradeExists) ticket = OrderSend("GBPJPYct",OP_SELL, Lot, MarketInfo("GBPJPYct",MODE_BID), 2, NULL, NULL, TradeComment, MagicNumber, 0, CLR_NONE);
   if (ticket > -1) TradesSent++;
   
   TradeExists = CheckIfTradeAlreadyExists("NZDUSDct");
   if (!TradeExists) ticket = OrderSend("NZDUSDct",OP_SELL, Lot, MarketInfo("NZDUSDct",MODE_BID), 2, NULL, NULL, TradeComment, MagicNumber, 0, CLR_NONE);
   if (ticket > -1) TradesSent++;
   
   
   MessageBox("This script opened " + TradesSent + " trades.","Information");
   
   return(0);
  }
//+------------------------------------------------------------------+