// Testing it

  int    ticket,ticket_fast,expiration;
  double point,stop,prof,prof_fast,price,current,BuyHigh,StopLow;
  double lots = 0.01;
  double lots_fast = 0.02;
  double down_buffer = 50*Point;
  double up_buffer=50*Point;
  double profsize_fast = 100*Point;
  double profsize = 0*Point;
  string Input = "LineFractals-BSRK";
  int magic = 1100100000500;
   
   
double last_high()
  {
    int j = 3;
    double fractal = 0;
    fractal = iFractals(Symbol(), Period(), MODE_UPPER, j);
    if (fractal == 0) {
      while (fractal == 0) {
        j = j + 1;
        fractal = iFractals(Symbol(), Period(), MODE_UPPER, j);
      }
    }
    return (fractal);
  }


double last_low()
  {
    int j = 3;
    double fractal = 0;
    fractal = iFractals(Symbol(), Period(), MODE_LOWER, j);
    if (fractal == 0) {
      while (fractal == 0) {
        j = j + 1;
        fractal = iFractals(Symbol(), Period(), MODE_LOWER, j);
      }
    }
    return (fractal);
  }

int start()
  {
    BuyHigh=(last_high()+up_buffer);
    StopLow=(last_low()-down_buffer);
    prof_fast=(BuyHigh+profsize_fast);
    if(profsize>0) prof=(BuyHigh+profsize);
    else { prof=0; };
    Print("last_high: "+last_high()," last_low: "+last_low()," BuyHigh: "+BuyHigh," StopLow: "+StopLow," Prof: "+prof," Prof_fast: "+prof_fast);
    expiration=CurTime()+PERIOD_D1*60;
    RefreshRates();
    int dgts = (int)SymbolInfoInteger(Symbol(),SYMBOL_DIGITS);
    ticket_fast=OrderSend(Symbol(),OP_BUYSTOP,lots_fast,BuyHigh,3,NormalizeDouble(StopLow,dgts),NormalizeDouble(prof_fast,dgts),"LineFractals-BSRK",magic,expiration,clrBlue);
    if(ticket_fast<=0) Print("ticket_fast Error = ",GetLastError());
    else { Print("ticket_fast = ",ticket_fast);}
    RefreshRates();
    ticket=OrderSend(Symbol(),OP_BUYSTOP,lots,BuyHigh,3,NormalizeDouble(StopLow,dgts),prof,"LineFractals-BSRK",magic,expiration,clrBlue);
    if(ticket<=0) Print("ticket Error = ",GetLastError());
    else { Print("ticket = ",ticket);}
    return(0);
  }