Pocket pivot screener

• 03/01/2021 at 5:58 PM #162891
  Alfy

  Hi guys, i have a code for the “pocket pivot” indicator that im trying to turn into a screener. The indicator is picking up what i expect but the screener isnt. Ive posted the indicator code and then the screener code. Can you help please??

  pocket pivot indicator and screener

  daystoconfirmuptrend = 50 cPrc1 = (close > Average[daysToConfirmUpTrend](close) AND Close > close [1]) maxDay = 10 maxDownDay = 0 maxdown = 0 FOR d = 1 TO maxDay DO r = Close[d] - close[d+1] IF r <0 and volume[d]> maxDown THEN maxDown = volume[d] maxDownDay = d ENDIF NEXT IF maxDownday = 0 THEN maxDowndayVol=0 ELSE maxDowndayvol = volume[maxdownday] ENDIF cVol2 = (volume > maxDownDayvol) cVol3=(volume > average[50] (volume)) Cprc2 = (close >= Average[20](close)) Cprc3 = (close CROSSES OVER Average[10](close) OR Close CROSSES OVER Average[50](close)) cPrc11 = (close > (high + low) *0.5) ind1 = (cPrc1 AND cPrc2 AND (cPrc3 OR 1) AND cVol2 AND cvol3 and (cPrc11 OR 1)) RETURN ind1 COLOURED (0,0,200) AS "Pivot Pocket Vol50" daystoconfirmuptrend = 50 cPrc1 = (close > Average[daysToConfirmUpTrend](close) AND Close > close [1]) maxDay = 10 maxDownDay = 0 maxdown = 0 FOR d = 1 TO maxDay DO r = Close[d] - close[d+1] IF r <0 and volume[d]> maxDown THEN maxDown = volume[d] maxDownDay = d ENDIF NEXT IF maxDownday = 0 THEN maxDowndayVol=0 ELSE maxDowndayvol = volume[maxdownday] ENDIF cVol2 = (volume > maxDownDayvol) cVol3=(volume > average[50] (volume)) Cprc2 = (close >= Average[20](close)) Cprc3 = (close CROSSES OVER Average[10](close) OR Close CROSSES OVER Average[50](close)) cPrc11 = (close > (high + low) *0.5) ind1 = (cPrc1 AND cPrc2 AND (cPrc3 OR 1) AND cVol2 AND cvol3 and (cPrc11 OR 1)) SCREENER [IND1]

  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

  daystoconfirmuptrend = 50 cPrc1 = (close > Average[daysToConfirmUpTrend](close) AND Close > close [1]) maxDay = 10 maxDownDay = 0 maxdown = 0 FOR d = 1 TO maxDay DO r = Close[d] - close[d+1] IF r <0 and volume[d]> maxDown THEN maxDown = volume[d] maxDownDay = d ENDIF   NEXT   IF maxDownday = 0 THEN maxDowndayVol=0 ELSE maxDowndayvol = volume[maxdownday] ENDIF   cVol2 = (volume > maxDownDayvol) cVol3=(volume > average[50] (volume)) Cprc2 = (close >= Average[20](close)) Cprc3 = (close CROSSES OVER Average[10](close) OR Close CROSSES OVER Average[50](close)) cPrc11 = (close > (high + low) *0.5) ind1 = (cPrc1 AND cPrc2 AND (cPrc3 OR 1) AND cVol2 AND cvol3 and (cPrc11 OR 1)) RETURN ind1 COLOURED (0,0,200) AS "Pivot Pocket Vol50"     daystoconfirmuptrend = 50 cPrc1 = (close > Average[daysToConfirmUpTrend](close) AND Close > close [1]) maxDay = 10 maxDownDay = 0 maxdown = 0 FOR d = 1 TO maxDay DO r = Close[d] - close[d+1] IF r <0 and volume[d]> maxDown THEN maxDown = volume[d] maxDownDay = d ENDIF   NEXT   IF maxDownday = 0 THEN maxDowndayVol=0 ELSE maxDowndayvol = volume[maxdownday] ENDIF   cVol2 = (volume > maxDownDayvol) cVol3=(volume > average[50] (volume)) Cprc2 = (close >= Average[20](close)) Cprc3 = (close CROSSES OVER Average[10](close) OR Close CROSSES OVER Average[50](close)) cPrc11 = (close > (high + low) *0.5) ind1 = (cPrc1 AND cPrc2 AND (cPrc3 OR 1) AND cVol2 AND cvol3 and (cPrc11 OR 1)) SCREENER [IND1]

  

  Alfy

  Participant

  Topics: 34

  Replies: 53

  Been thanked: 5 times
  04/20/2021 at 11:56 AM #167601
  robertogozzi

  It’s working fine for me.

  Make sure you have enough units on your chart. I’d say 10K+ to work fine.

   

  1 user thanked author for this post.

  Alfy

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17277

  Been thanked: 4126 times
  04/22/2021 at 10:29 AM #167774
  Alfy

  Thanks for your reply Roberto

  

  Alfy

  Participant

  Topics: 34

  Replies: 53

  Been thanked: 5 times
• Author
  Posts