Sub DonchianChanBkoutFiltSell(indLength, tradeLength, MALength)

Dim donchianHigh As BarArray
Dim donchianLow As BarArray
Dim MA As BarArray
Dim dH
Dim dL
Dim Value1
Dim EntryName
Dim EntryName2

Dim MinMove
Dim CellRow As Integer

If BarNumber < indLength Then Exit Sub

If BarNumber=FirstBar Then
    dH = 0
    dL = 0
    Value1 = 0
End If

MinMove=GetActiveMinMove()

Value1 = DonchianChannel(indLength, dH, dL)

donchianHigh = dH
donchianLow = dL

If BarsSinceEntry-1=tradeLength And MarketPosition=-1 Then ExitShort("ExitShort",EntryName,1,0,CloseExit,Day)

EntryName = "DonchianBreakoutSell" + "|" + indLength + "|" + tradeLength  + "|" + avgtruerange(indLength)
'Only enter a new trade if the filter condition is true (price < MA and MA declining)
MA = ScriptAve(Close, MALength,0)
If MA < MA[1] And Close < MA Then Sell(EntryName,1,donchianLow-MinMove ,Stop,Day)

MyCustomTBT()

End Sub