Needs Help to build a Screener. Thanks

• 05/18/2020 at 3:28 AM #132052
  Khaled

  Hi, I’ve found a useful Indictor courtesy of “kallaganne” which provides Buy and Sell signals.

  I’d like to build a Screener based on the same selection methodology. Can you please HELP!!!

  Much appreciated.

  Indicator code:

  once rr=1 mb=average[20](typicalprice) k=48 n=(k*2)-4 p=(n/2)-1 h1=DPO[n](high) moyh=high-h1 hi=(moyh-moyh[1]+(high[p])/n)*n hi=(round(hi*100))/100 l1=dpo[n](low) moyl=low-l1 lo=(moyl-moyl[1]+(low[p])/n)*n lo=(round(lo*100))/100 clo1=dpo[n](close) moyc=close-clo1 clot=(moyc-moyc[1]+(close[p])/n)*n clot=(round(clot*100))/100 cond1=(high>high[1] and high>high[2]) cond2=(cond1 and high>hi[46]) and (barindex>bari or rr=-1) if cond1 and cond2 then flagg=1 targeth=high targetl=lo[46] else flagg=0 signa=mb endif for zz=0 to 45 if clot[45-zz]<targetl and hi[45-zz]<=targeth and flagg=1  then signa=high+(averagetruerange[20](close))*.5 rr=1 bari=barindex+zz+2 break elsif     hi[45-zz]>targeth then signa=mb break endif next condi=(low<low[1] and low<low[2]) and low<lo[46] and (barindex>bar or rr=1) if condi then fflag=1 target1=low target2=hi[46] else fflag=0 siigna=mb endif for kk=0 to 45 if clot[45-kk]>target2 and lo[45-kk]>=target1 and fflag=1 then siigna=low-(averagetruerange[20](close))*.5 rr=-1 bar=barindex+kk+2 break elsif lo[45-kk]<target1 then siigna=mb break endif next if barindex < 100 then signa=undefined siigna=undefined endif golong = (siigna < mb) goshort = (signa > mb)*-1 atr=AverageTrueRange[14](close) if golong<>0 then drawarrowup(barindex,low-atr/2) coloured(0,200,0) endif if goshort<>0 then drawarrowdown(barindex,high+atr/2) coloured(200,0,0) endif return golong as  "LONG",goshort as "SHORT",0

  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

  once rr=1 mb=average[20](typicalprice) k=48 n=(k*2)-4 p=(n/2)-1     h1=DPO[n](high)     moyh=high-h1 hi=(moyh-moyh[1]+(high[p])/n)*n hi=(round(hi*100))/100 l1=dpo[n](low)     moyl=low-l1 lo=(moyl-moyl[1]+(low[p])/n)*n lo=(round(lo*100))/100 clo1=dpo[n](close)     moyc=close-clo1 clot=(moyc-moyc[1]+(close[p])/n)*n clot=(round(clot*100))/100 cond1=(high>high[1] and high>high[2]) cond2=(cond1 and high>hi[46]) and (barindex>bari or rr=-1) if cond1 and cond2 then flagg=1 targeth=high targetl=lo[46] else flagg=0 signa=mb endif for zz=0 to 45 if clot[45-zz]<targetl and hi[45-zz]<=targeth and flagg=1  then signa=high+(averagetruerange[20](close))*.5 rr=1 bari=barindex+zz+2 break elsif     hi[45-zz]>targeth then signa=mb break endif next condi=(low<low[1] and low<low[2]) and low<lo[46] and (barindex>bar or rr=1) if condi then fflag=1 target1=low target2=hi[46] else fflag=0 siigna=mb endif for kk=0 to 45 if clot[45-kk]>target2 and lo[45-kk]>=target1 and fflag=1 then siigna=low-(averagetruerange[20](close))*.5 rr=-1 bar=barindex+kk+2 break elsif lo[45-kk]<target1 then siigna=mb break endif next if barindex < 100 then signa=undefined siigna=undefined endif golong = (siigna < mb) goshort = (signa > mb)*-1 atr=AverageTrueRange[14](close) if golong<>0 then drawarrowup(barindex,low-atr/2) coloured(0,200,0) endif if goshort<>0 then drawarrowdown(barindex,high+atr/2) coloured(200,0,0) endif     return golong as  "LONG",goshort as "SHORT",0

   

  Moderator’s edit: link to the indicator topic https://www.prorealcode.com/topic/comment-mettre-fleche-sur-graph-pour-signal-plutot-que-signal-sur-histogramme/

  

  Khaled

  Participant

  Topics: 59

  Replies: 314

  Been thanked: 65 times
  05/18/2020 at 6:50 AM #132059
  JC_Bywan

  Welcome, but please help to be helped, by respecting the rules of the yellow box just above the “submit” button of any message :

  – you have posted in the wrong language forum, I now move your topic from French proscreener forum to English proscreener forum as you chose to speak English in your topic

  – you have not used the “insert PRT code” button, and without proper code formatting, the members who help other members just won’t read your message if it doesn’t highlight in appropriate color the prt keywords, not just for eye comfort but also to see bugs faster. See attached image to locate the button if you haven’t found it yet. I’ll spend time reformatting your message this time, but please use the “insert prt code” button without need for moderator intervention next time

  – you have not given your topic a meaningful title. Vast majority of topics are about needing help, but the forum is a huge database for search and in your future searches on titles you will be happy that everybody used words on what the search is about rather than words like “help screener” which would make the search result unusable. Please choose another title and the next moderator reading the message will edit your title

  

  JC_Bywan

  Moderator

  Topics: 20

  Replies: 2544

  Been thanked: 836 times
  05/18/2020 at 10:30 AM #132103
  Nicolas

  The screener code below should work, it gives alerts each time a green or a red arrow is detected.

  once rr=1 mb=average[20](typicalprice) k=48 n=(k*2)-4 p=(n/2)-1 h1=DPO[n](high) moyh=high-h1 hi=(moyh-moyh[1]+(high[p])/n)*n hi=(round(hi*100))/100 l1=dpo[n](low) moyl=low-l1 lo=(moyl-moyl[1]+(low[p])/n)*n lo=(round(lo*100))/100 clo1=dpo[n](close) moyc=close-clo1 clot=(moyc-moyc[1]+(close[p])/n)*n clot=(round(clot*100))/100 cond1=(high>high[1] and high>high[2]) cond2=(cond1 and high>hi[46]) and (barindex>bari or rr=-1) if cond1 and cond2 then flagg=1 targeth=high targetl=lo[46] else flagg=0 signa=mb endif for zz=0 to 45 if clot[45-zz]<targetl and hi[45-zz]<=targeth and flagg=1 then signa=high+(averagetruerange[20](close))*.5 rr=1 bari=barindex+zz+2 break elsif hi[45-zz]>targeth then signa=mb break endif next condi=(low<low[1] and low<low[2]) and low<lo[46] and (barindex>bar or rr=1) if condi then fflag=1 target1=low target2=hi[46] else fflag=0 siigna=mb endif for kk=0 to 45 if clot[45-kk]>target2 and lo[45-kk]>=target1 and fflag=1 then siigna=low-(averagetruerange[20](close))*.5 rr=-1 bar=barindex+kk+2 break elsif lo[45-kk]<target1 then siigna=mb break endif next if barindex < 100 then signa=undefined siigna=undefined endif golong = (siigna < mb) goshort = (signa > mb)*-1 //atr=AverageTrueRange[14](close) //if golong<>0 then //drawarrowup(barindex,low-atr/2) coloured(0,200,0) //endif //if goshort<>0 then //drawarrowdown(barindex,high+atr/2) coloured(200,0,0) //endif screener[golong or goshort]

  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

  once rr=1 mb=average[20](typicalprice) k=48 n=(k*2)-4 p=(n/2)-1     h1=DPO[n](high)     moyh=high-h1 hi=(moyh-moyh[1]+(high[p])/n)*n hi=(round(hi*100))/100 l1=dpo[n](low)     moyl=low-l1 lo=(moyl-moyl[1]+(low[p])/n)*n lo=(round(lo*100))/100 clo1=dpo[n](close)     moyc=close-clo1 clot=(moyc-moyc[1]+(close[p])/n)*n clot=(round(clot*100))/100 cond1=(high>high[1] and high>high[2]) cond2=(cond1 and high>hi[46]) and (barindex>bari or rr=-1) if cond1 and cond2 then flagg=1 targeth=high targetl=lo[46] else flagg=0 signa=mb endif for zz=0 to 45 if clot[45-zz]<targetl and hi[45-zz]<=targeth and flagg=1 then signa=high+(averagetruerange[20](close))*.5 rr=1 bari=barindex+zz+2 break elsif hi[45-zz]>targeth then signa=mb break endif next condi=(low<low[1] and low<low[2]) and low<lo[46] and (barindex>bar or rr=1) if condi then fflag=1 target1=low target2=hi[46] else fflag=0 siigna=mb endif for kk=0 to 45 if clot[45-kk]>target2 and lo[45-kk]>=target1 and fflag=1 then siigna=low-(averagetruerange[20](close))*.5 rr=-1 bar=barindex+kk+2 break elsif lo[45-kk]<target1 then siigna=mb break endif next if barindex < 100 then signa=undefined siigna=undefined endif golong = (siigna < mb) goshort = (signa > mb)*-1 //atr=AverageTrueRange[14](close) //if golong<>0 then //drawarrowup(barindex,low-atr/2) coloured(0,200,0) //endif //if goshort<>0 then //drawarrowdown(barindex,high+atr/2) coloured(200,0,0) //endif     screener[golong or goshort]

   

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20828

  Been thanked: 4738 times
  05/18/2020 at 11:29 AM #132111
  Khaled

  @Noobywan

  Sincèrement désolé d’être passé très rapidement sur les conditions générales et merci encore pour avoir remis le post dans le bon forum.

  Sincerely sorry to have passed very quickly on the general conditions and thank you again for putting the post in the right forum.

  

  Khaled

  Participant

  Topics: 59

  Replies: 314

  Been thanked: 65 times
  05/18/2020 at 11:31 AM #132112
  Khaled

  @Nicolas

  Merci pour ton aide. Je vais l’essayer…

  Thank you for your help. I’m going to try it …

  

  Khaled

  Participant

  Topics: 59

  Replies: 314

  Been thanked: 65 times
  05/18/2020 at 11:50 AM #132118
  Vonasi

  Khaled – Please pay attention to the forum rules! English only in the English language forums…. and French only in the French language forums. Noobywan has already had to remind you of this rule and then in your reply to him you break the rule again! Moderators have better things to do with their time than continuously tidy up after you.

   

  

  Vonasi

  Moderator

  Topics: 192

  Replies: 5088

  Been thanked: 1810 times
  05/18/2020 at 11:58 AM #132124
  Khaled

  @Vonasi

  Really sorry, I got mixed up, I thought i was in the French Forum. Thank you.

  

  Khaled

  Participant

  Topics: 59

  Replies: 314

  Been thanked: 65 times
• Author
  Posts