Lot_line

ÿþ//+------------------------------------------------------------------+

//|                                                      Lot_line    |

//|                                                                  |

//|                                                                  |

//+------------------------------------------------------------------+

int h,k;

double pre_smc,pre_new;



input double n_bar=60,lev_stor,prav_stor;

datetime t1,t1_static,t2,t2_static,ttx;

bool z_mod,log_0=false,log_1=false;

//+------------------------------------------------------------------+

//|                                                                  |

//+------------------------------------------------------------------+

void start()

  {



   t1=iTime(NULL,0,0);





   t2=iTime(NULL,0,n_bar);

   if(log_0==false)

     {

      //int ticket1=OrderSend(Symbol(),OP_BUY,0.01,Ask,3,0,0); 

      t1_static=t1;

      t2_static=t2;

     }

   log_0=true;



   ObjectCreate("tl",OBJ_VLINE,0,t1_static,0);

   ObjectCreate("t2",OBJ_VLINE,0,t2_static,0);

   ObjectCreate("t3",OBJ_VLINE,0,t1,0);





   if(log_1==false){ttx=t1;}log_1=true;

   if(ttx!=t1){h=h+1; ObjectDelete("x2");ObjectDelete("t3"); log_1=false;}



   pre_smc=(lev_stor-prav_stor)/n_bar;



   pre_new=prav_stor-(pre_smc*h);







   ObjectCreate("x1",OBJ_TREND,0,t2_static,lev_stor,t1_static,prav_stor); ObjectSet("x1",OBJPROP_RAY,false);

   ObjectCreate("x2",OBJ_TREND,0,t1_static,prav_stor,t1,pre_new); ObjectSet("x2",OBJPROP_RAY,false); ObjectSet("x2",OBJPROP_COLOR,Aqua);



   if((Ask>pre_new-1*Point && Ask<pre_new+1*Point) && k==0){Print(" >B<5B:0 =0 70:@KB85 "); close_level(); k=1;}



  }

//+------------------------------------------------------------------+

//|                                                                  |

//+------------------------------------------------------------------+

void close_level()

  {



   int w=-1;

   while(w<10)

     {

      w++;

      if(OrderSelect(w,SELECT_BY_POS)==true)

        {

         if(OrderSymbol()==Symbol())

           {



            if(OrderType()==0)

              {

               Print("  0:@KB85 B8? Buy");

               z_mod=OrderClose(OrderTicket(),OrderLots(),Bid,5,Red);

              }

            if(OrderType()==1)

              {

               Print("  0:@KB85 B8? Sell");

               z_mod=OrderClose(OrderTicket(),OrderLots(),Ask,5,Red);

              }



           }

        }

     }



  }



void deinit(){ObjectsDeleteAll();}

//+------------------------------------------------------------------+