//+------------------------------------------------------------------+
//|                                         Aki0307_OrderTest004.mq4 |
//|                                        Copyright ｩ 2008, Aki0307 |
//|                                  http://aki0307.blog.shinobi.jp/ |
//+------------------------------------------------------------------+
#property copyright "Copyright ｩ 2008, Aki0307"
#property link      "http://aki0307.blog.shinobi.jp/"

// 時間足用
datetime dtTimeFrame = 0;

// 処理フラグ
bool flg1 = false;
bool flg2 = false;
bool flg3 = false;

//チケット番号保存用
int ticket1 = 0;
int ticket2 = 0;
int ticket3 = 0;
int ticket4 = 0;
int ticket5 = 0;
int ticket6 = 0;

int ticket11 = 0;
int ticket12 = 0;
int ticket13 = 0;
int ticket14 = 0;
int ticket15 = 0;
int ticket16 = 0;

int ticket21 = 0;
int ticket22 = 0;
int ticket23 = 0;
int ticket24 = 0;
int ticket25 = 0;
int ticket26 = 0;


//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
  {
//----
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
int deinit()
  {
//----
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
  {
//----
    // 今の時間を取得時間足に変化があると中に入る
    if(dtTimeFrame<iTime(NULL,0,0)) {
        dtTimeFrame=iTime(NULL,0,0);
        if(flg1 == false){
            flg1 = true;
            ticket1 = OrderSend(Symbol(), OP_SELL, 0.1, Bid, 3, 0, 0, "成行売り", 0, 0, CLR_NONE);
            if(ticket1 != 0){
                OrderSelect(ticket1, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

            ticket2 = OrderSend(Symbol(), OP_BUY, 0.1, Ask, 3, 0, 0, "成行買い", 0, 0, CLR_NONE);
            if(ticket2 != 0){
                OrderSelect(ticket2, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

            ticket3 = OrderSend(Symbol(), OP_SELLLIMIT, 0.1, Bid+1, 3, 0, 0, "指値売り注文", 0, 0, CLR_NONE);
            if(ticket3 != 0){
                OrderSelect(ticket3, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

            ticket4 = OrderSend(Symbol(), OP_BUYLIMIT, 0.1, Ask-1, 3, 0, 0, "指値買い注文", 0, 0, CLR_NONE);
            if(ticket4 != 0){
                OrderSelect(ticket4, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

            ticket5 = OrderSend(Symbol(), OP_SELLSTOP, 0.1, Bid-1, 3, 0, 0, "逆指値売り注文", 0, 0, CLR_NONE);
            if(ticket5 != 0){
                OrderSelect(ticket5, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

            ticket6 = OrderSend(Symbol(), OP_BUYSTOP, 0.1, Ask+1, 3, 0, 0, "逆指値買い注文", 0, 0, CLR_NONE);
            if(ticket6 != 0){
                OrderSelect(ticket6, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

            ticket11 = OrderSend(Symbol(), OP_SELL, 0.1, Bid, 3, 0, Bid-1, "成行売りIFDONE", 0, 0, CLR_NONE);
            if(ticket11 != 0){
                OrderSelect(ticket11, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

            ticket12 = OrderSend(Symbol(), OP_BUY, 0.1, Ask, 3, 0, Ask+1, "成行買いIFDONE", 0, 0, CLR_NONE);
            if(ticket12 != 0){
                OrderSelect(ticket12, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

            ticket13 = OrderSend(Symbol(), OP_SELLLIMIT, 0.1, Bid+1, 3, 0, Bid, "指値売り注文IFDONE", 0, 0, CLR_NONE);
            if(ticket13 != 0){
                OrderSelect(ticket13, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

            ticket14 = OrderSend(Symbol(), OP_BUYLIMIT, 0.1, Ask-1, 3, 0, Ask, "指値買い注文IFDONE", 0, 0, CLR_NONE);
            if(ticket14 != 0){
                OrderSelect(ticket14, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

            ticket15 = OrderSend(Symbol(), OP_SELLSTOP, 0.1, Bid-1, 3, 0, Bid-2, "逆指値売り注文IFDONE", 0, 0, CLR_NONE);
            if(ticket15 != 0){
                OrderSelect(ticket15, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

            ticket16 = OrderSend(Symbol(), OP_BUYSTOP, 0.1, Ask+1, 3, 0, Ask+2, "逆指値買い注文IFDONE", 0, 0, CLR_NONE);
            if(ticket16 != 0){
                OrderSelect(ticket16, SELECT_BY_TICKET, 0);
                OrderPrint();
            }


            ticket21 = OrderSend(Symbol(), OP_SELL, 0.1, Bid, 3, Bid+1, Bid-1, "成行売りIF-OCO", 0, 0, CLR_NONE);
            if(ticket21 != 0){
                OrderSelect(ticket21, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

            ticket22 = OrderSend(Symbol(), OP_BUY, 0.1, Ask, 3, Ask-1, Ask+1, "成行買いIF-OCO", 0, 0, CLR_NONE);
            if(ticket22 != 0){
                OrderSelect(ticket22, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

            ticket23 = OrderSend(Symbol(), OP_SELLLIMIT, 0.1, Bid+1, 3, Bid+2, Bid, "指値売り注文IF-OCO", 0, 0, CLR_NONE);
            if(ticket23 != 0){
                OrderSelect(ticket23, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

            ticket24 = OrderSend(Symbol(), OP_BUYLIMIT, 0.1, Ask-1, 3, Ask-2, Ask, "指値買い注文IF-OCO", 0, 0, CLR_NONE);
            if(ticket24 != 0){
                OrderSelect(ticket24, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

            ticket25 = OrderSend(Symbol(), OP_SELLSTOP, 0.1, Bid-1, 3, Bid+1, Bid-2, "逆指値売り注文IF-OCO", 0, 0, CLR_NONE);
            if(ticket25 != 0){
                OrderSelect(ticket25, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

            ticket26 = OrderSend(Symbol(), OP_BUYSTOP, 0.1, Ask+1, 3, Ask-1, Ask+2, "逆指値買い注文IF-OCO", 0, 0, CLR_NONE);
            if(ticket26 != 0){
                OrderSelect(ticket26, SELECT_BY_TICKET, 0);
                OrderPrint();
            }

        }

    }   

    // 12月2日になったら、一度だけ入る
    if(TimeMonth(TimeCurrent()) == 12 && TimeDay(TimeCurrent()) == 2 && flg2 == false){
        flg2 = true;
        int total = OrdersTotal();
        if(total > 0){
            for(int i = total -1; i >= 0; i-- ){
                bool selected = OrderSelect(i, SELECT_BY_POS, MODE_TRADES);
                if(selected){
                    int type = OrderType();
                    switch(type){
                        case OP_BUY:
                            OrderClose(OrderTicket(), OrderLots(), Bid, 3, CLR_NONE);
                            break;
                        case OP_SELL:
                            OrderClose(OrderTicket(), OrderLots(), Ask, 3, CLR_NONE);
                            break;
                        case OP_BUYLIMIT:
                        case OP_BUYSTOP:
                        case OP_SELLLIMIT:
                        case OP_SELLSTOP:
                            OrderDelete(OrderTicket());
                            break;
                    }
                    OrderPrint();
                }
            }
        }
    }

    // 12月19日になったら、一度だけ入る
    if(TimeMonth(TimeCurrent()) == 12 && TimeDay(TimeCurrent()) == 19 && flg3 == false){
        flg3 = true;
        total = OrdersTotal();
        if(total > 0){
            for(i = total -1; i >= 0; i-- ){
                selected = OrderSelect(i, SELECT_BY_POS, MODE_TRADES);
                if(selected){
                    type = OrderType();
                    switch(type){
                        case OP_BUY:
                            OrderClose(OrderTicket(), OrderLots(), Bid, 3, CLR_NONE);
                            break;
                        case OP_SELL:
                            OrderClose(OrderTicket(), OrderLots(), Ask, 3, CLR_NONE);
                            break;
                        case OP_BUYLIMIT:
                        case OP_BUYSTOP:
                        case OP_SELLLIMIT:
                        case OP_SELLSTOP:
                            OrderDelete(OrderTicket());
                            break;
                    }
                    OrderPrint();
                }
            }
        }
    }
//----
   return(0);
  }
//+------------------------------------------------------------------+