//test
[IntrabarOrderGeneration=true]
 Inputs:
 Length(10),             //Averange
 contractsize (2),      //number of contracts
 target_0 ( 4 ),         //target_0 value 
 target_1 ( 8 ),         //target_1 value 
 breakeven ( 4 ),      //Breakeven 
 stoploss ( 11 );       //inital stoploss 
 
 variables:
   oneTick ( 0 ),
   RB (0),
   AvgRB ( 0 );
   
   oneTick = MinMove / PriceScale;     // calculate value of 1 tick.
   RB = Close - Open;
   AvgRB = Average(RB, Length);
   condition1 = AvgRB crosses over 0;
   condition2 = AvgRB crosses under 0;
   
   if MarketPosition = 0 then begin 
   if (condition1) then Buy contractsize Contracts next Bar At Close Limit; 
   if (condition2) then SellShort contractsize  Contracts next Bar At Close Limit;
 
   end;
   
   SetStopContract;
   SetStopLoss((stoploss * oneTick) * BigPointValue);                 //Stop set
   Setbreakeven(breakeven);                                                       //breakeven 


    SetExitOnClose;
    if time > 1530 and MarketPosition = 1 then Sell All Contracts This Bar At Close;
    if time > 1530 and MarketPosition = -1 then Buytocover All Contracts This Bar At Close;


   //Long Target
   if MarketPosition = 1 then begin
        Sell 1 Contract next bar At EntryPrice(0) + ((target_0) * oneTick) Limit;
        Sell 1 Contract next Bar At EntryPrice(0) + ((target_0+target_1)  * oneTick) Limit;
    end;
   
    //Short Target    
   if MarketPosition = -1 then begin
        Buytocover 1 Contract next Bar At EntryPrice(0) - ((target_0) * oneTick) Limit;
        Buytocover 1 Contract Next Bar At EntryPrice(0) - ((target_0+target_1) * oneTick) Limit;
    end;

//test
[IntrabarOrderGeneration=true]
 Inputs:
     Length(10),        //Averange
     numContracts (2),   //number of contracts
     target_0 ( 4 ),    //target_0 value in ticks
     target_1 ( 8 ),    //target_1 value in ticks
     breakeven ( 4 ),   //Breakeven in ticks
     stoploss ( 11 );   //inital stoploss in ticks
 
 variables:
    OneTickValue$(iff(GetExchangeName="FOREX", MinMove/PriceScale*BigPointValue*100000, MinMove/PriceScale*BigPointValue)),
    OneTickValue(iff(GetExchangeName="FOREX", MinMove/PriceScale*100000, MinMove/PriceScale)),
    intrabarpersist AvgRB( 0 );
   
    Once SetStopContract;    // Enable stop loss per ontract 
    SetExitOnClose;          // Close postion at end of session
   
    AvgRB = Average( C-O, Length );
       condition1 = AvgRB crosses over 0;
    condition2 = AvgRB crosses under 0;
   
    if ( MarketPosition = 0 ) then begin
    
        if (condition1) then Buy numContracts Contracts next Bar at Close Limit; 
        if (condition2) then SellShort numContracts  Contracts next Bar At Close Limit;
        
    end
    else begin
   
        SetStopLoss( stoploss * OneTickValue$ ); //Stop loss in dollars
        Setbreakeven( breakeven * OneTickValue$ ); //breakeven 
       
        if time > 1530 and MarketPosition = 1 then Sell All Contracts This Bar At Close;
        if time > 1530 and MarketPosition = -1 then Buytocover All Contracts This Bar At Close;
         
        //Long Target
       
        if ( MarketPosition = 1 ) then begin
        
            if ( CurrentContracts = numContracts ) then begin
                Sell("L1") 1 Contract next bar At EntryPrice + (target_0*OneTickValue) Limit;
                Sell("L2") 1 Contract next Bar At EntryPrice + (target_1*OneTickValue) Limit;
            end
            else Sell ("L2 ") 1 Contract next Bar At EntryPrice + (target_1*OneTickValue) Limit;
             
        end;
       
        //Short Target 
           
        if ( MarketPosition = -1 )  then begin
            if ( CurrentContracts = numContracts ) then begin
                Buytocover("S1") 1 Contract next Bar At EntryPrice - (target_0*OneTickValue) Limit;
                Buytocover("S2") 1 Contract Next Bar At EntryPrice - (target_1*OneTickValue) Limit;
            end
            else Buytocover("S2 ") 1 Contract Next Bar At EntryPrice - (target_1*OneTickValue) Limit;
       end;
       
end;