Screener mit mehr Kriterium-Spalten

• 06/23/2020 at 6:50 AM #136850
  mscholz1978

  Hallo, ich würde gerne eine Art “Dashboard” erstellen, wo im Ergebnis des Screeners Trends angezeigt werden (wöchentlich / Täglich / 4 Stunden) d.h. Das Ergebnis soll eine Tabelle sein, wo 3 Kriteriums-Spalten jeweils anhand des Kriteriums grün oder rot markiert ausgegeben werden (up/downtrend Woche / up/downtrend Tag / up/downtrend 4 Stunden).

  Ist das mit Proscreener möglich?

  mfg Martin Scholz

  

  mscholz1978

  Participant

  Topics: 2

  Replies: 4

  Been thanked: 0 times
  06/23/2020 at 7:38 AM #136861
  robertogozzi

  Unterschiedliche Farben können nicht verwendet werden. Trotz nur eines numerischen Kriteriums ist es möglich, eine Zahl zu erstellen, mit der Sie die Ergebnisse für 3 oder 4 verschiedene Zeitrahmen mit jeweils zwei oder mehr Werten anzeigen können.

  Dies ist ein Beispiel https://www.prorealcode.com/topic/returning-information-from-a-screener/#post-95524 .

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17131

  Been thanked: 4026 times
  06/23/2020 at 7:55 AM #136868
  robertogozzi

  Ein weiteres Beispiel https://www.prorealcode.com/topic/multi-timeframe-screener-needed/#post-85756

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17131

  Been thanked: 4026 times
  06/23/2020 at 1:12 PM #136930
  mscholz1978

  wunderbar, mille grazie, dann werde ich mal sehen, ob das so funktioniert, wie ich denke.

  

  mscholz1978

  Participant

  Topics: 2

  Replies: 4

  Been thanked: 0 times
  07/28/2020 at 7:32 AM #140255
  mscholz1978

  Hallo Roberto,

  ich habe jetzt einen Screener für Heiken Ashi Trends im Wochen – Tages – 4 Stunden und 1 Stunden Chart – nur leider funktioniert der Screener nicht.

  Es sollen nur Ergebnisse angezeigt werden, wenn alle 4 Heikin Ashi Kerzen grün oder alle rot sind – das klappt leider nicht – es werden immer alle Currencies angezeigt.

  Anbei der Code.

  Heiken Ashi Trend detection

  // Heiken Ashi Detection if barindex>1 then xclose=(open+close+low+high)/4 xopen=(xopen[1]+xclose[1])/2 endif Timeframe (weekly) c1w = xClose>xOpen c2w = xClose<xOpen if c1w then xw = 1000 elsif c2w then xw = 2000 else xw = 9000 endif Timeframe (Daily) c1d = xClose>xOpen c2d = xClose<xOpen if c1d then xd = 100 elsif c2d then xd = 200 else xd = 900 endif Timeframe (4 Hour) c1h4 = xClose>xOpen c2h4 = xClose<xOpen if c1H4 then xh4 = 10 elsif c2h4 then xh4 = 20 else xh4 = 90 endif Timeframe (1 Hour) c1h1 = xClose>xOpen c2h1 = xClose<xOpen if c1h1 then xh1 = 1 elsif c2h1 then xh1 = 2 else xh1 = 9 endif Timeframe (default) Result = xw + xd + xh4 + xh1 If result = 999 Then Result = 0 endif SCREENER[Result] (Result AS "wd41")

  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

  // Heiken Ashi Detection if barindex>1 then xclose=(open+close+low+high)/4 xopen=(xopen[1]+xclose[1])/2   endif   Timeframe (weekly) c1w = xClose>xOpen c2w = xClose<xOpen if c1w then xw = 1000 elsif c2w then xw = 2000 else xw = 9000 endif   Timeframe (Daily) c1d = xClose>xOpen c2d = xClose<xOpen if c1d then xd = 100 elsif c2d then xd = 200 else xd = 900 endif   Timeframe (4 Hour) c1h4 = xClose>xOpen c2h4 = xClose<xOpen if c1H4 then xh4 = 10 elsif c2h4 then xh4 = 20 else xh4 = 90 endif   Timeframe (1 Hour) c1h1 = xClose>xOpen c2h1 = xClose<xOpen if c1h1 then xh1 = 1 elsif c2h1 then xh1 = 2 else xh1 = 9 endif   Timeframe (default) Result  = xw + xd + xh4 + xh1 If result = 999 Then Result  = 0 endif SCREENER[Result] (Result AS "wd41")

  Für Hilfe wäre ich sehr dankbar,

  Martin

  

  mscholz1978

  Participant

  Topics: 2

  Replies: 4

  Been thanked: 0 times
  07/28/2020 at 8:49 AM #140268
  robertogozzi

  In Zeile 54 müssen Sie überprüfen, ob die Nummer 9999 ist, da es 4 verschiedene Zeitrahmen gibt.

  Darüber hinaus haben Sie Heikin-Ashi-Kerzen außerhalb des 4 Zeitrahmens definiert, während Sie dies für jede von ihnen unter verschiedenen Namen tun müssen:

  Timeframe (weekly) if barindex>1 then xcloseW=(open+close+low+high)/4 xopenW=(xopenW[1]+xcloseW[1])/2 endif c1w = xCloseW>xOpenW c2w = xCloseW<xOpenW if c1w then xw = 1000 elsif c2w then xw = 2000 else xw = 9000 endif Timeframe (Daily) if barindex>1 then xcloseD=(open+close+low+high)/4 xopenD=(xopenD[1]+xcloseD[1])/2 endif c1d = xCloseD>xOpenD c2d = xCloseD<xOpenD if c1d then xd = 100 elsif c2d then xd = 200 else xd = 900 endif Timeframe (4 Hour) if barindex>1 then xclose4=(open+close+low+high)/4 xopen4=(xopen4[1]+xclose4[1])/2 endif c1h4 = xClose4>xOpen4 c2h4 = xClose4<xOpen4 if c1H4 then xh4 = 10 elsif c2h4 then xh4 = 20 else xh4 = 90 endif Timeframe (1 Hour) if barindex>1 then xclose1=(open+close+low+high)/4 xopen1=(xopen1[1]+xclose1[1])/2 endif c1h1 = xClose1>xOpen1 c2h1 = xClose1<xOpen1 if c1h1 then xh1 = 1 elsif c2h1 then xh1 = 2 else xh1 = 9 endif Timeframe (default) Result = xw + xd + xh4 + xh1 If result = 9999 Then Result = 0 endif SCREENER[Result] (Result AS "wd41")

  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

  Timeframe (weekly) if barindex>1 then    xcloseW=(open+close+low+high)/4    xopenW=(xopenW[1]+xcloseW[1])/2 endif c1w = xCloseW>xOpenW c2w = xCloseW<xOpenW if c1w then    xw = 1000 elsif c2w then    xw = 2000 else    xw = 9000 endif Timeframe (Daily) if barindex>1 then    xcloseD=(open+close+low+high)/4    xopenD=(xopenD[1]+xcloseD[1])/2 endif c1d = xCloseD>xOpenD c2d = xCloseD<xOpenD if c1d then    xd = 100 elsif c2d then    xd = 200 else    xd = 900 endif Timeframe (4 Hour) if barindex>1 then    xclose4=(open+close+low+high)/4    xopen4=(xopen4[1]+xclose4[1])/2 endif c1h4 = xClose4>xOpen4 c2h4 = xClose4<xOpen4 if c1H4 then    xh4 = 10 elsif c2h4 then    xh4 = 20 else    xh4 = 90 endif Timeframe (1 Hour) if barindex>1 then    xclose1=(open+close+low+high)/4    xopen1=(xopen1[1]+xclose1[1])/2 endif c1h1 = xClose1>xOpen1 c2h1 = xClose1<xOpen1 if c1h1 then    xh1 = 1 elsif c2h1 then    xh1 = 2 else    xh1 = 9 endif Timeframe (default) Result  = xw + xd + xh4 + xh1 If result = 9999 Then    Result  = 0 endif SCREENER[Result] (Result AS "wd41")

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17131

  Been thanked: 4026 times
  07/28/2020 at 8:54 AM #140271
  mscholz1978

  Hallo, habs gefunden,

  HA Trend screener W-D-H4-H1

  Timeframe (weekly) if Barindex>1 then xCw = (Open+High+Low+Close)/4 xOw = (xow[1] + xCw[1])/2 endif c1w = xCw>xOw c2w = xCw<xOw if c1w then xw = 1000 elsif c2w then xw = 2000 else xw = 9000 endif Timeframe (Daily) if Barindex>1 then xCd = (Open+High+Low+Close)/4 xOd = (xod[1] + xCd[1])/2 endif c1d = xCd>xOd c2d = xCd<xOd if c1d then xd = 100 elsif c2d then xd = 200 else xd = 900 endif Timeframe (4 Hour) if Barindex>1 then xCh4 = (Open+High+Low+Close)/4 xOh4 = (xoh4[1] + xCh4[1])/2 endif c1h4 = xCh4>xOh4 c2h4 = xCh4<xOh4 if c1H4 then xh4 = 10 elsif c2h4 then xh4 = 20 else xh4 = 90 endif Timeframe (1 Hour) if Barindex>1 then xCh1 = (Open+High+Low+Close)/4 xOh1 = (xoh1[1] + xCh1[1])/2 endif c1h1 = xCh1>xOh1 c2h1 = xCh1<xOh1 if c1h1 then xh1 = 1 elsif c2h1 then xh1 = 2 else xh1 = 9 endif Timeframe (1 Hour) Result = xw + xd + xh4 + xh1 If result = 9999 Then Result = 0 endif SCREENER[Result] (Result AS "wd41")

  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

  Timeframe (weekly) if Barindex>1 then xCw = (Open+High+Low+Close)/4 xOw = (xow[1] + xCw[1])/2 endif c1w = xCw>xOw c2w = xCw<xOw if c1w then xw = 1000 elsif c2w then xw = 2000 else xw = 9000 endif   Timeframe (Daily) if Barindex>1 then xCd = (Open+High+Low+Close)/4 xOd = (xod[1] + xCd[1])/2 endif c1d = xCd>xOd c2d = xCd<xOd if c1d then xd = 100 elsif c2d then xd = 200 else xd = 900 endif   Timeframe (4 Hour) if Barindex>1 then xCh4 = (Open+High+Low+Close)/4 xOh4 = (xoh4[1] + xCh4[1])/2 endif c1h4 = xCh4>xOh4 c2h4 = xCh4<xOh4 if c1H4 then xh4 = 10 elsif c2h4 then xh4 = 20 else xh4 = 90 endif   Timeframe (1 Hour) if Barindex>1 then xCh1 = (Open+High+Low+Close)/4 xOh1 = (xoh1[1] + xCh1[1])/2 endif c1h1 = xCh1>xOh1 c2h1 = xCh1<xOh1 if c1h1 then xh1 = 1 elsif c2h1 then xh1 = 2 else xh1 = 9 endif   Timeframe (1 Hour) Result  = xw + xd + xh4 + xh1 If result = 9999 Then Result  = 0 endif SCREENER[Result] (Result AS "wd41")

  Funktioniert, jetzt würde ich gerne nur die Resultate 1111 und 2222 Anzeigen, ist aber nicht so wichtig.

  Danke.

  

  mscholz1978

  Participant

  Topics: 2

  Replies: 4

  Been thanked: 0 times
  07/28/2020 at 9:02 AM #140275
  robertogozzi

  Timeframe (1 Hour) Result = xw + xd + xh4 + xh1 If result <> 1111 and Result <> 2222 Then Result = 0 endif

  1 2 3 4 5

  Timeframe (1 Hour) Result  = xw + xd + xh4 + xh1 If result <> 1111 and Result <> 2222 Then    Result  = 0 endif

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17131

  Been thanked: 4026 times
  07/28/2020 at 9:39 AM #140279
  mscholz1978

  so, fertiger Screener

  Screener zeigt für Heikin Ashi Kerzen einen möglichen H1 Einstieg in übergeordneter Trendrichtung an.

  Beispiel: W1 = up / D1=up /H4 =dn – dann zeigt der Screener in der H1 das Ende einer Korrektur in Intraday Chart an, und hierdurch mögliche Einstiege in Trendrichtung. Ein Ergebnis 1 entspricht einem Longeinstieg und 2 Shorteinstieg jeweils in Richtung des übergeordneten Trends.

  HA_Trendeinstieg_W_D_H4_H1

  Timeframe (weekly) if Barindex>1 then xCw = (Open+High+Low+Close)/4 xOw = (xow[1] + xCw[1])/2 endif c1w = xCw>xOw c2w = xCw<xOw if c1w then xw = 1000 elsif c2w then xw = 2000 else xw = 9000 endif Timeframe (Daily) if Barindex>1 then xCd = (Open+High+Low+Close)/4 xOd = (xod[1] + xCd[1])/2 endif c1d = xCd>xOd c2d = xCd<xOd if c1d then xd = 100 elsif c2d then xd = 200 else xd = 900 endif Timeframe (4 Hour) if Barindex>1 then xCh4 = (Open+High+Low+Close)/4 xOh4 = (xoh4[1] + xCh4[1])/2 endif c1h4 = xCh4>xOh4 c2h4 = xCh4<xOh4 if c1H4 then xh4 = 10 elsif c2h4 then xh4 = 20 else xh4 = 90 endif Timeframe (1 Hour) if Barindex>1 then xCh1 = (Open+High+Low+Close)/4 xOh1 = (xoh1[1] + xCh1[1])/2 endif c1h1 = xCh1>xOh1 c2h1 = xCh1<xOh1 if c1h1 then xh1 = 1 elsif c2h1 then xh1 = 2 else xh1 = 9 endif Result = xw + xd + xh4 + xh1 If result = 9999 Then Result = 0 elsif result = 1121 then Result =1 elsif result =2212 then Result = 2 else result =0 endif SCREENER[Result] (Result AS "2=dn-1=up")

  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

  Timeframe (weekly) if Barindex>1 then xCw = (Open+High+Low+Close)/4 xOw = (xow[1] + xCw[1])/2 endif c1w = xCw>xOw c2w = xCw<xOw if c1w then xw = 1000 elsif c2w then xw = 2000 else xw = 9000 endif   Timeframe (Daily) if Barindex>1 then xCd = (Open+High+Low+Close)/4 xOd = (xod[1] + xCd[1])/2 endif c1d = xCd>xOd c2d = xCd<xOd if c1d then xd = 100 elsif c2d then xd = 200 else xd = 900 endif   Timeframe (4 Hour) if Barindex>1 then xCh4 = (Open+High+Low+Close)/4 xOh4 = (xoh4[1] + xCh4[1])/2 endif   c1h4 = xCh4>xOh4 c2h4 = xCh4<xOh4 if c1H4 then xh4 = 10 elsif c2h4 then xh4 = 20 else xh4 = 90 endif   Timeframe (1 Hour) if Barindex>1 then xCh1 = (Open+High+Low+Close)/4 xOh1 = (xoh1[1] + xCh1[1])/2 endif c1h1 = xCh1>xOh1 c2h1 = xCh1<xOh1 if c1h1 then xh1 = 1 elsif c2h1 then xh1 = 2 else xh1 = 9 endif   Result  = xw + xd + xh4 + xh1 If result = 9999 Then Result  = 0 elsif result = 1121 then Result =1 elsif result =2212 then Result = 2 else result =0 endif SCREENER[Result] (Result AS "2=dn-1=up")

   

  

  mscholz1978

  Participant

  Topics: 2

  Replies: 4

  Been thanked: 0 times
  07/28/2020 at 10:27 AM #140283
  robertogozzi

  perfekt!

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17131

  Been thanked: 4026 times
• Author
  Posts