PG Screener

• 06/23/2018 at 2:01 PM #74172
  JohnScher

  Hallo

   

  Ich habe heute einen PG -Indicator fertig gestellt.

  Ich wollte fragen, ob jemand das als Screener umprogrammieren kann?

   

  PG Indicator

  // PopGun Indikator // coded by JohnScher //for the graphics PIP = 10*pipsize LIN = 3 //percentrenage = Support or Resistance in Percent og the Range High-Low = 25% default Support = (High-Low)*percentrange/100 Resistance = (High-Low)*percentrange/100 //indicator PopGun PG = High[2]>High[1] and Low[2]<Low[1] and High>High[1] and Low<Low[1] // the second outside candle PGLong = PG and Close>open // greencandle = long , as rerversal short PGShort = PG and Close<Open //redcandle = short, as reversal long IF PGLong Then rL=0 gL=0 bL=250 DRAWARROWUP(barindex,LOW-PIP)coloured(rL,gL,bL) DRAWSEGMENT(barindex,LOW-SUPPORT,barindex+LIN, LOW-SUPPORT )coloured(rL,gL,bL) // to trade as reversal red candle = Long rL=250 gL=0 bL=250 DRAWARROWDOWN(barindex,HIGH+PIP)coloured(rs,gs,bs) DRAWSEGMENT(barindex,High+Resistance,barindex+LIN, High+Resistance )coloured(rs,gs,bs) Endif IF PGShort then rS=250 gS=0 bS=00 DRAWARROWDOWN(barindex,HIGH+PIP)coloured(rs,gs,bs) DRAWSEGMENT(barindex,High+Resistance,barindex+LIN, High+Resistance )coloured(rs,gs,bs) // to trade as reversal red candle = Long rL=0 gL=0 bL=250 DRAWARROWUP(barindex,LOW-PIP)coloured(rL,gL,bL) DRAWSEGMENT(barindex,LOW-SUPPORT,barindex+LIN, LOW-SUPPORT )coloured(rL,gL,bL) ENDIF return

  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

  // PopGun Indikator // coded by JohnScher   //for the graphics PIP = 10*pipsize LIN = 3   //percentrenage = Support or Resistance in Percent og the Range High-Low = 25% default Support = (High-Low)*percentrange/100 Resistance = (High-Low)*percentrange/100 //indicator PopGun PG = High[2]>High[1] and Low[2]<Low[1] and High>High[1] and Low<Low[1]   // the second outside candle PGLong = PG and Close>open // greencandle = long , as rerversal short PGShort = PG and Close<Open //redcandle = short, as reversal long       IF PGLong Then rL=0 gL=0 bL=250 DRAWARROWUP(barindex,LOW-PIP)coloured(rL,gL,bL) DRAWSEGMENT(barindex,LOW-SUPPORT,barindex+LIN, LOW-SUPPORT )coloured(rL,gL,bL) // to trade as reversal red candle = Long rL=250 gL=0 bL=250 DRAWARROWDOWN(barindex,HIGH+PIP)coloured(rs,gs,bs) DRAWSEGMENT(barindex,High+Resistance,barindex+LIN, High+Resistance )coloured(rs,gs,bs) Endif   IF PGShort then rS=250 gS=0 bS=00 DRAWARROWDOWN(barindex,HIGH+PIP)coloured(rs,gs,bs) DRAWSEGMENT(barindex,High+Resistance,barindex+LIN, High+Resistance )coloured(rs,gs,bs) // to trade as reversal red candle = Long rL=0 gL=0 bL=250 DRAWARROWUP(barindex,LOW-PIP)coloured(rL,gL,bL) DRAWSEGMENT(barindex,LOW-SUPPORT,barindex+LIN, LOW-SUPPORT )coloured(rL,gL,bL)   ENDIF   return

  Gefunden werden sollen, PGShort und PGLong.

   

  Freundliche Grüße

  JohnScher

  

  JohnScher

  Participant

  Topics: 44

  Replies: 336

  Been thanked: 85 times
  06/23/2018 at 3:20 PM #74174
  robertogozzi

  Ich hoffe, das geht gut, offensichtlich habe ich nur was benötigt.
  Der grafische Teil, den Sie in den Grafiken sehen können.

  PG screener

  // PopGun Indikator // coded by JohnScher PG = High[2]>High[1] and Low[2]<Low[1] and High>High[1] and Low<Low[1] PGLong = PG and Close>open PGShort = PG and Close<Open x = 0 IF PGLong Then x = 1 Endif IF PGShort then x = -1 ENDIF SCREENER[x](x as "PG")

  1 2 3 4 5 6 7 8 9 10 11 12 13

  // PopGun Indikator // coded by JohnScher PG      = High[2]>High[1] and Low[2]<Low[1] and High>High[1] and Low<Low[1] PGLong  = PG and Close>open PGShort = PG and Close<Open x = 0 IF PGLong Then    x = 1 Endif IF PGShort then    x = -1 ENDIF SCREENER[x](x as "PG")

  1 user thanked author for this post.

  JohnScher

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17188

  Been thanked: 4064 times
  06/24/2018 at 9:41 AM #74212
  JohnScher

  Hello Roberto.
  The Screener works, very well!
  See pictures attached.
  Thank you very much!!
  regards
  JohScher

   

  http://prntscr.com/jynm9q

   

  http://prntscr.com/jynmdd

  

  JohnScher

  Participant

  Topics: 44

  Replies: 336

  Been thanked: 85 times
• Author
  Posts