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
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 .
wunderbar, mille grazie, dann werde ich mal sehen, ob das so funktioniert, wie ich denke.
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 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
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")
Hallo, habs gefunden,
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.
Timeframe (1 Hour)
Result = xw + xd + xh4 + xh1
If result <> 1111 and Result <> 2222 Then
Result = 0
endif
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.
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")