主题：海龟经典软件-TRADING BLOX策略

 

Exit Orders;

VARIABLES: brokerPrice, exitPrice, unitCurrentStopPrice TYPE: Price

VARIABLES: unitsOn, unitIndex TYPE: Integer

 

unitsOn = instrument.totalUnits

 

' If long...

IF ( instrument.position = LONG ) THEN

 

    ' Get the best exit price based on exit low and entry low.

    exitPrice = max( offsetAdjustedExitLow, offsetAdjustedEntryLow )

    

    ' Loop over the units and place stop order at the best price,

    ' including current stop price.

    FOR unitIndex = 1 TO unitsOn

        unitCurrentStopPrice = instrument.unitExitStop[ unitIndex ]

        brokerPrice = max( exitPrice, unitCurrentStopPrice )

        broker.ExitUnitOnStop( unitIndex, brokerPrice )

    NEXT

ENDIF

 

' If short...

IF ( instrument.position = SHORT ) THEN

 

    ' Get the best exit price based on exit high and entry high.

    exitPrice = min( offsetAdjustedExitHigh, offsetAdjustedEntryHigh )

    

    'Loop over units and place stop order at best price,

    ' including curreen stop price.

    FOR unitIndex = 1 TO unitsOn

        unitCurrentStopPrice = instrument.unitExitStop[ unitIndex ]

        brokerPrice = min( exitPrice, unitCurrentStopPrice )

        broker.ExitUnitOnStop( unitIndex, brokerPrice )

    NEXT

ENDIF

 

 

Adjust Stops:

VARIABLES: stopPrice, bestExitPrice, unitCurrentStopPrice TYPE: Price

VARIABLES: unitsOn, unitIndex TYPE: Integer

 

' Get the total units on.

unitsOn = instrument.totalUnits

 

' If long...

IF ( instrument.position = LONG ) THEN

 

    ' Get the best exit price based on exit low and entry low.

    bestExitPrice = max( offsetAdjustedExitLow, offsetAdjustedEntryLow )

    

    ' Loop over the units and set the stop to the best price,

    ' including current stop price.

    FOR unitIndex = 1 TO unitsOn

    

        ' Get the current exit stop.

        unitCurrentStopPrice = instrument.unitExitStop[ unitIndex ]

        

        ' If the best stop is better than our current stop then

        ' exit on this stop.

        IF bestExitPrice > unitCurrentStopPrice THEN

            instrument.SetExitStop( unitIndex, bestExitPrice )

            broker.exitUnitOnStop( unitIndex, bestExitPrice )

        ENDIF

    NEXT

ENDIF

 

' If short...

IF ( instrument.position = SHORT ) THEN

 

    ' Get the best exit price based on exit high and entry high.

    bestExitPrice = min( offsetAdjustedExitHigh, offsetAdjustedEntryHigh )

    

    ' Loop over the units and set the stop to the best price,

    ' including curreen stop price.

    FOR unitIndex = 1 TO unitsOn

    

        ' Get the current exit stop.

        unitCurrentStopPrice = instrument.unitExitStop[ unitIndex ]

        

        ' If the best stop is better than our current stop then

        ' exit on this stop.

        IF bestExitPrice < unitCurrentStopPrice THEN

            instrument.SetExitStop( unitIndex, bestExitPrice )

            broker.exitUnitOnStop( unitIndex, bestExitPrice )

        ENDIF

    NEXT

ENDIF