Adaptive ATR-ADX Trend-V2 strategy

• 08/17/2018 at 1:55 PM #78464
  groen200

  Hi Roberto

  Can you make from these screener the same backtest?

  Luc

  

  groen200

  Participant

  Topics: 5

  Replies: 16

  Been thanked: 0 times
  08/17/2018 at 1:59 PM #78466
  robertogozzi

  Yes, I’ll try later.

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 16465

  Been thanked: 3641 times
  08/17/2018 at 4:46 PM #78481
  robertogozzi

  As you can see I created a new topic in ProOrder, rather than ProScreener, since it’s a strategy.

  Try this one (I tested it on DAX & NASDAQ daily):

  DEFPARAM CumulateOrders = false atrLen = 21 m1 = 3.5 //"ATR Multiplier - ADX Rising" m2 = 1.75 //"ATR Multiplier - ADX Falling" adxLen = 14 adxThresh = 30 //"ADX Threshold" aboveThresh = 1 //true, title = "ADX Above Threshold uses ATR Falling Multiplier Even if Rising?") useHeiken = 1 //(false, title = "Use Heiken-Ashi Bars (Source will be ohlc4)") source = MedianPrice // DI-Pos, DI-Neg, ADX hR = high-high[1] lR = -(low-low[1]) if hr>lr then dmPos=max(hr,0) else dmPos=0 endif if lr>hr then dmNeg=max(lr,0) else dmNeg=0 endif sTR = (sTR[1] - sTR[1]) / adxLen + tr sDMPos = (sDMPos[1] - sDMPos[1]) / adxLen + dmPos sDMNeg = (sDMNeg[1] - sDMNeg[1]) / adxLen + dmNeg DIP = sDMPos / sTR * 100 DIN = sDMNeg / sTR * 100 DX = abs(DIP - DIN) / (DIP + DIN) * 100 aadx = average[adxLen](DX) // Heiken-Ashi if barindex<2 then xClose = close xOpen = open else xClose = TotalPrice xOpen = (xOpen[1] + close[1]) / 2 endif xHigh = max(high, max(xOpen, xClose)) xLow = min(low, min(xOpen, xClose)) // Trailing ATR v1 = abs(xHigh - xClose[1]) v2 = abs(xLow - xClose[1]) v3 = xHigh - xLow trueRange = max(v1, max(v2, v3)) if useHeiken then atr = WilderAverage[atrLen](trueRange) else atr = AverageTrueRange[atrLen] endif if aadx>aadx[1] and (adx < adxThresh or not aboveThresh) then m=m1 elsif aadx<aadx[1] or (adx > adxThresh and aboveThresh) then m=m2 else m = m[1] endif if DIP >= DIN then mUp=m else mUp=m2 endif if DIN >= DIP then mDn=m else mDn=m2 endif if useHeiken then src=xClose c=Xclose t=(xHigh+xLow)/2 else src=source c=close t=MedianPrice endif up = t - mUp * atr dn = t + mDn * atr if max(src[1], c[1]) > TUp[1] then TUp = max(up,TUp[1]) else TUp = up endif if min(src[1], c[1]) < TDown[1] then TDown = min(dn, TDown[1]) else TDown = dn endif //trend if min(src,min(c,close))>TDown[1] then trend=1 elsif max(src,max(c,close))<TUp[1] then trend=-1 else trend=trend[1] endif if trend=1 then sstop=TUp else sstop=TDown endif Bulls = sstop CROSSES OVER TypicalPrice Bears = sstop CROSSES UNDER TypicalPrice IF Bulls AND Not OnMarket THEN BUY 1 CONTRACT AT MARKET ENDIF IF Bears AND Not OnMarket THEN SELLSHORT 1 CONTRACT AT MARKET ENDIF SET TARGET pPROFIT 100 SET STOP pLOSS 100

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114

  DEFPARAM CumulateOrders = false atrLen = 21 m1 = 3.5 //"ATR Multiplier - ADX Rising" m2 = 1.75 //"ATR Multiplier - ADX Falling" adxLen = 14 adxThresh = 30 //"ADX Threshold" aboveThresh = 1 //true, title = "ADX Above Threshold uses ATR Falling Multiplier Even if Rising?") useHeiken = 1 //(false, title = "Use Heiken-Ashi Bars (Source will be ohlc4)") source = MedianPrice // DI-Pos, DI-Neg, ADX hR = high-high[1] lR = -(low-low[1]) if hr>lr then dmPos=max(hr,0) else dmPos=0 endif if lr>hr then dmNeg=max(lr,0) else dmNeg=0 endif sTR = (sTR[1] - sTR[1]) / adxLen + tr sDMPos = (sDMPos[1] - sDMPos[1]) / adxLen + dmPos sDMNeg = (sDMNeg[1] - sDMNeg[1]) / adxLen + dmNeg DIP = sDMPos / sTR * 100 DIN = sDMNeg / sTR * 100 DX = abs(DIP - DIN) / (DIP + DIN) * 100 aadx = average[adxLen](DX) // Heiken-Ashi if barindex<2 then xClose = close xOpen = open else xClose = TotalPrice xOpen = (xOpen[1] + close[1]) / 2 endif xHigh = max(high, max(xOpen, xClose)) xLow = min(low, min(xOpen, xClose)) // Trailing ATR v1 = abs(xHigh - xClose[1]) v2 = abs(xLow - xClose[1]) v3 = xHigh - xLow trueRange = max(v1, max(v2, v3)) if useHeiken then atr = WilderAverage[atrLen](trueRange) else atr = AverageTrueRange[atrLen] endif if aadx>aadx[1] and (adx < adxThresh or not aboveThresh) then m=m1 elsif aadx<aadx[1] or (adx > adxThresh and aboveThresh) then m=m2 else m = m[1] endif if DIP >= DIN then mUp=m else mUp=m2 endif if DIN >= DIP then mDn=m else mDn=m2 endif if useHeiken then src=xClose c=Xclose t=(xHigh+xLow)/2 else src=source c=close t=MedianPrice endif up = t - mUp * atr dn = t + mDn * atr if max(src[1], c[1]) > TUp[1] then TUp = max(up,TUp[1]) else TUp = up endif if min(src[1], c[1]) < TDown[1] then TDown = min(dn, TDown[1]) else TDown = dn endif //trend if min(src,min(c,close))>TDown[1] then trend=1 elsif max(src,max(c,close))<TUp[1] then trend=-1 else trend=trend[1] endif if trend=1 then sstop=TUp else sstop=TDown endif   Bulls = sstop CROSSES OVER  TypicalPrice Bears = sstop CROSSES UNDER TypicalPrice   IF Bulls AND Not OnMarket THEN BUY 1 CONTRACT AT MARKET ENDIF   IF Bears AND Not OnMarket THEN SELLSHORT 1 CONTRACT AT MARKET ENDIF   SET TARGET pPROFIT 100 SET STOP   pLOSS   100

   

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 16465

  Been thanked: 3641 times
  08/20/2018 at 8:10 AM #78617
  groen200

  Hi Roberto

  The backtest give no results.

   

  

  groen200

  Participant

  Topics: 5

  Replies: 16

  Been thanked: 0 times
  08/20/2018 at 8:30 AM #78622
  robertogozzi

  What instrument, TF and period?

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 16465

  Been thanked: 3641 times
  08/20/2018 at 9:04 AM #78625
  groen200

  only NYSE stocks, daily time, periode max 1 year

  

  groen200

  Participant

  Topics: 5

  Replies: 16

  Been thanked: 0 times
  08/20/2018 at 11:56 AM #78643
  robertogozzi

  I tested it on ACCURAY INC., daily TF, and it works!

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 16465

  Been thanked: 3641 times
  08/20/2018 at 3:27 PM #78659
  groen200

  SET TARGET $PROFIT 1000
  SET STOP   $LOSS   150

  also change: 1 lot  to 5000 cash

  no results

  sorry

  

  groen200

  Participant

  Topics: 5

  Replies: 16

  Been thanked: 0 times
  08/20/2018 at 4:34 PM #78668
  robertogozzi

  You should address PRT assistance, I cannot be of further help, since it works finely on my platform. Sorry.

  1 user thanked author for this post.

  Nicolas

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 16465

  Been thanked: 3641 times
• Author
  Posts