Use Lower/Higher Low/ High as Trend signal

• 10/28/2020 at 3:07 PM #148792
  Luciole

  Sure, here we go

  add cp as variable

  defparam calculateonlastbars=3000 cp = 10 once lastpoint = 0 if high[cp] >= highest[2*cp+1](high) then PEAK = 1 else PEAK = 0 endif if low[cp] <= lowest[2*cp+1](low) then TROUGH = 1 else TROUGH = 0 endif if PEAK then prevtop = topy TOPy = high[cp] TOPx = barindex[cp] endif if TROUGH then prevbot = boty BOTy = low[cp] BOTx = barindex[cp] endif if PEAK and (lastpoint=-1 or lastpoint=0) then DRAWSEGMENT(lastX,lastY,TOPx,TOPy) COLOURED(200,0,0,255) DRAWTEXT("■",TOPx,TOPy,Dialog,Bold,10) coloured(200,0,0,255) lastpoint = 1 lastX = TOPx lastY = TOPy endif if TROUGH and (lastpoint=1 or lastpoint=0) then DRAWSEGMENT(lastX,lastY,BOTx,BOTy) COLOURED(0,200,0,255) DRAWTEXT("■",BOTx,BOTy,Dialog,Bold,10) coloured(0,200,0,255) lastpoint = -1 lastX = BOTx lastY = BOTy endif // 1 bullish trend is starting if boty>prevbot and close>topy and lasty<>lasty[1] and not trendup then trendup = 1 endif // 1.1 bullish trend is ending //if trough and boty<prevbot and lasty<>lasty[1] and trendup then //Nicolas if Close < boty then trendup=0 endif // 2 bearish trend is starting if topy<prevtop and close<boty and lasty<>lasty[1] and not trenddown then trenddown = 1 endif // 2.1 bearish trend is ending if Close > topy then trenddown=0 endif //trend background color if trendup then backgroundcolor(0,200,0,30) endif if trenddown then backgroundcolor(250,0,0,30) endif RETURN //TOPy as "TOPy", BOTY as "BOTy", trendup as "trendup"

  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

  defparam calculateonlastbars=3000 cp = 10   once lastpoint = 0   if high[cp] >= highest[2*cp+1](high) then PEAK = 1 else PEAK = 0 endif   if low[cp] <= lowest[2*cp+1](low)  then TROUGH = 1 else TROUGH = 0 endif   if PEAK then prevtop = topy TOPy = high[cp] TOPx = barindex[cp] endif   if TROUGH then prevbot = boty BOTy = low[cp] BOTx = barindex[cp] endif   if PEAK and (lastpoint=-1 or lastpoint=0) then DRAWSEGMENT(lastX,lastY,TOPx,TOPy) COLOURED(200,0,0,255) DRAWTEXT("■",TOPx,TOPy,Dialog,Bold,10) coloured(200,0,0,255) lastpoint = 1 lastX = TOPx lastY = TOPy endif   if TROUGH and (lastpoint=1 or lastpoint=0) then DRAWSEGMENT(lastX,lastY,BOTx,BOTy) COLOURED(0,200,0,255) DRAWTEXT("■",BOTx,BOTy,Dialog,Bold,10) coloured(0,200,0,255) lastpoint = -1 lastX = BOTx lastY = BOTy endif     // 1 bullish trend is starting if boty>prevbot and close>topy and lasty<>lasty[1] and not trendup then trendup = 1 endif // 1.1 bullish trend is ending //if trough and boty<prevbot and lasty<>lasty[1] and trendup then   //Nicolas if Close < boty then trendup=0 endif   // 2 bearish trend is starting if topy<prevtop and close<boty and lasty<>lasty[1] and not trenddown then trenddown = 1 endif // 2.1 bearish trend is ending if Close > topy then trenddown=0 endif     //trend background color if trendup then backgroundcolor(0,200,0,30) endif if trenddown then backgroundcolor(250,0,0,30) endif   RETURN //TOPy as "TOPy", BOTY as "BOTy", trendup as "trendup"

   

  1 user thanked author for this post.

  PLermite

  

  Luciole

  Participant

  Topics: 6

  Replies: 43

  Been thanked: 6 times
  02/21/2021 at 4:01 PM #162226
  clemencejesse

  Great stuff here! Thanks for the code. I have been looking for something to identify L, H, HL, HH trends. The code works perfectly for me.

  

  clemencejesse

  Participant

  Topics: 4

  Replies: 10

  Been thanked: 0 times
  08/09/2021 at 2:40 PM #174972
  murre87

  Anyone got backtestpicture

  

  murre87

  Participant

  Topics: 17

  Replies: 162

  Been thanked: 21 times
• Author
  Posts