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
|
//PRC_BuySell Magic | indicator
//17.04.23
//Sharing ProRealTime knowledge
// — settings
SignalPeriod = 12
ArrowPeriod = 2
// — end of settings
bbup = average[signalperiod]+std[signalperiod]*arrowperiod
bbdn = average[signalperiod]–std[signalperiod]*arrowperiod
if ts=0 then
if close crosses over bbup then
ts=bbdn
trend=1
elsif close crosses under bbdn then
ts=bbup
trend=–1
endif
endif
if trend=1 then
ts=max(ts,bbdn)
elsif trend=–1 then
ts=min(ts,bbup)
endif
if trend=1 and close crosses under ts then
trend=–1
ts=bbup
r=255
g=0
drawarrowdown(barindex,ts) coloured(“red”)
drawsegment(startbar,startts,barindex,ts) style(dottedline2) coloured(“blue”)
startbar=barindex
startts=ts
endif
if trend=–1 and close crosses over ts then
trend=1
ts=bbdn
r=0
g=255
drawarrowup(barindex,ts) coloured(“lime”)
drawsegment(startbar,startts,barindex,ts) style(dottedline2) coloured(“blue”)
startbar=barindex
startts=ts
endif
return ts coloured(r,g,0) style(dottedline,2)
|
Bonjour,
est-il possible d’avoir un screener à partir de cet indicateur ?
Merci.
Bjr,
voici:
//PRC_BuySell Magic | indicator
//17.04.23
//Nicolas @ www.prorealcode.com
//Sharing ProRealTime knowledge
//
// Starting from library: https://www.prorealcode.com/prorealtime-indicators/buysell-magical-trend/
// Screener at user request 05.05.23 JC_Bywan @ www.prorealcode.com
// https://www.prorealcode.com/topic/screener-buy-sell-magic-indicator/
// --- settings
SignalPeriod = 12
ArrowPeriod = 2
// --- end of settings
bbup = average[signalperiod]+std[signalperiod]*arrowperiod
bbdn = average[signalperiod]-std[signalperiod]*arrowperiod
if ts=0 then
if close crosses over bbup then
ts=bbdn
trend=1
elsif close crosses under bbdn then
ts=bbup
trend=-1
endif
endif
if trend=1 then
ts=max(ts,bbdn)
elsif trend=-1 then
ts=min(ts,bbup)
endif
if trend=1 and close crosses under ts then
trend=-1
ts=bbup
//r=255
//g=0
//drawarrowdown(barindex,ts) coloured("red")
//drawsegment(startbar,startts,barindex,ts) style(dottedline2) coloured("blue")
//startbar=barindex
//startts=ts
endif
if trend=-1 and close crosses over ts then
trend=1
ts=bbdn
//r=0
//g=255
//drawarrowup(barindex,ts) coloured("lime")
//drawsegment(startbar,startts,barindex,ts) style(dottedline2) coloured("blue")
//startbar=barindex
//startts=ts
endif
cup= trend[1]=-1 and trend=1
cdown= trend[1]=1 and trend=-1
condition= cup or cdown
//return ts coloured(r,g,0) style(dottedline,2)
screener[condition](trend)
