Request: (Hurst) Cycle Channel Oscillator (LazyBear, Tradingview)

This topic has 11 replies, 3 voices, and was last updated 4 years ago by caoticoPRC.

Viewing 12 posts - 1 through 12 (of 12 total)

03/02/2020 at 4:20 PM #120980

caoticoPRC

Hi!

I’ve been using prorealtime and using work done in ProRealCode Phorum for a while, and I am really grateful for the job. This is my first message and request. I’va fallen in love with an adaptation made in Tradingview of this indicator, https://www.prorealcode.com/prorealtime-indicators/hurst-cycle-channel-clone/.

The same author has created the indicator transformed in an Oscillator (Link here). The thing is that there is an option to apply the code, instead of the price, to another mean or indicator, and I think is a really interesting and useful transformation (transform an average in an oscillator, can smooth and supress noise and pullbacks, etc). Could it be translated to PRT having that option of applying to another indicator or average? Thanks in advance!

(It has also the option of painting candlebars, Maybe is interesting, but for me it wouldn’t be necessary in case means extra work for you).

I attach here the original pinescript code:

// // @author LazyBear // study("Hurst Cycle Channel Clone Oscillator [LazyBear]", shorttitle="HCCCO_LB", overlay=false) scl_t = input(10, title="Short Cycle Length?") mcl_t = input(30, title="Medium Cycle Length?") scm = input(1.0, title="Short Cycle Multiplier?") mcm = input(3.0, title="Medium Cycle Multiplier?") src=input(close, title="Source") scl = scl_t/2, mcl = mcl_t/2 ma_scl=rma(src,scl) ma_mcl=rma(src,mcl) scm_off = scm*atr(scl) mcm_off = mcm*atr(mcl) scl_2=scl/2, mcl_2=mcl/2 sct = nz(ma_scl[scl_2], src)+ scm_off scb = nz(ma_scl[scl_2], src)- scm_off mct = nz(ma_mcl[mcl_2], src)+ mcm_off mcb = nz(ma_mcl[mcl_2], src)- mcm_off scmm=avg(sct,scb) ul=plot(1.0, title="UpperLine", color=gray), ml=plot(0.5, title="MidLine", color=gray), ll=plot(0.0, title="LowerLine", color=gray) fill(ll,ml,color=red), fill(ul,ml,color=green) omed=(scmm-mcb)/(mct-mcb) oshort=(src-mcb)/(mct-mcb) plot(omed>=1.0?omed:na, histbase=1.0, style=histogram, color=purple, linewidth=2, title="MediumCycleOB") plot(omed<=0.0?omed:na, histbase=0.0, style=histogram, color=purple, linewidth=2, title="MediumCycleOS") plot(oshort>=1.0?oshort:na, histbase=1.0, style=histogram, color=purple, linewidth=2, title="ShortCycleOB") plot(oshort<=0.0?oshort:na, histbase=0.0, style=histogram, color=purple, linewidth=2, title="ShortCycleOS") plot(oshort, color=red, linewidth=2, title="FastOsc") plot(omed, color=green, linewidth=2, title="SlowOsc") ebc=input(false, title="Enable bar colors") bc=(oshort>0.5)?(oshort>1.0?purple:(oshort>omed?lime:green)):(oshort<0?purple:(oshort<omed?red:orange)) barcolor(ebc?bc:na)

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

//
// @author LazyBear
//
study("Hurst Cycle Channel Clone Oscillator [LazyBear]", shorttitle="HCCCO_LB", overlay=false)
scl_t = input(10, title="Short Cycle Length?")
mcl_t = input(30, title="Medium Cycle Length?")
scm = input(1.0, title="Short Cycle Multiplier?")
mcm = input(3.0, title="Medium Cycle Multiplier?")
src=input(close, title="Source")
scl = scl_t/2, mcl = mcl_t/2
ma_scl=rma(src,scl)
ma_mcl=rma(src,mcl)
scm_off = scm*atr(scl)
mcm_off = mcm*atr(mcl)
scl_2=scl/2, mcl_2=mcl/2
sct = nz(ma_scl[scl_2], src)+ scm_off
scb = nz(ma_scl[scl_2], src)- scm_off
mct = nz(ma_mcl[mcl_2], src)+ mcm_off
mcb = nz(ma_mcl[mcl_2], src)- mcm_off
scmm=avg(sct,scb)
ul=plot(1.0, title="UpperLine", color=gray), ml=plot(0.5, title="MidLine", color=gray), ll=plot(0.0, title="LowerLine", color=gray)
fill(ll,ml,color=red), fill(ul,ml,color=green)
omed=(scmm-mcb)/(mct-mcb)
oshort=(src-mcb)/(mct-mcb)
plot(omed>=1.0?omed:na, histbase=1.0, style=histogram, color=purple, linewidth=2, title="MediumCycleOB")
plot(omed<=0.0?omed:na, histbase=0.0, style=histogram, color=purple, linewidth=2, title="MediumCycleOS")
plot(oshort>=1.0?oshort:na, histbase=1.0, style=histogram, color=purple, linewidth=2, title="ShortCycleOB")
plot(oshort<=0.0?oshort:na, histbase=0.0, style=histogram, color=purple, linewidth=2, title="ShortCycleOS")
plot(oshort, color=red, linewidth=2, title="FastOsc")
plot(omed, color=green, linewidth=2, title="SlowOsc")
ebc=input(false, title="Enable bar colors")
bc=(oshort>0.5)?(oshort>1.0?purple:(oshort>omed?lime:green)):(oshort<0?purple:(oshort<omed?red:orange))
barcolor(ebc?bc:na)

caoticoPRC

Participant

Topics: 1

Replies: 5

Been thanked: 1 time

03/02/2020 at 6:19 PM #120998

Nicolas

I’ll try to translate it by tomorrow, please remind me if I don’t!

Nicolas

Keymaster

Topics: 81

Replies: 20863

Been thanked: 4775 times

03/02/2020 at 7:38 PM #121007

supertiti

Hola Caotico

You can try this one :

//PRC_Hurst Cycle Channel Clone | indicator  10.05.2019
//Nicolas @ www.prorealcode.com  //Sharing ProRealTime knowledge  //converted from pinescript

// --- settings
//sclt =  10 //Short Cycle Length
//mclt =  30 //Medium Cycle Length
//scm =  1.0 //Short Cycle Multiplier
//mcm =  3.0 //Medium Cycle Multiplier
// --- end of settings

src=customclose //Source
once scl = round(sclt/2)
once mcl = round(mclt/2)

mascl=wilderaverage[scl](src)
mamcl=wilderaverage[mcl](src)
scmoff = scm*averagetruerange[scl]
mcmoff = mcm*averagetruerange[mcl]
once scl2=round(scl/2)
once mcl2=round(mcl/2)

sct =  mascl[scl2]+ scmoff
scb =  mascl[scl2]- scmoff
mct =  mamcl[mcl2]+ mcmoff
mcb =  mamcl[mcl2]- mcmoff

return sct coloured(232,232,232) as "ShortCycleTop", scb coloured(232,232,232) as "ShortCycleBottom", (sct+scb)/2  as "ShortCycleMedian", mct coloured(232,232,232) as "MediumCycleTop", mcb coloured(232,232,232) as "MedianCycleBottom", (mct+mcb)/2  as "MediumCycleMedian" , customclose as " customclose "

//PRC_Hurst Cycle Channel Clone | indicator 10.05.2019

//Nicolas @ www.prorealcode.com //Sharing ProRealTime knowledge //converted from pinescript

// --- settings

//sclt = 10 //Short Cycle Length

//mclt = 30 //Medium Cycle Length

//scm = 1.0 //Short Cycle Multiplier

//mcm = 3.0 //Medium Cycle Multiplier

// --- end of settings

src=customclose //Source

once scl = round(sclt/2)

once mcl = round(mclt/2)

mascl=wilderaverage[scl](src)

mamcl=wilderaverage[mcl](src)

scmoff = scm*averagetruerange[scl]

mcmoff = mcm*averagetruerange[mcl]

once scl2=round(scl/2)

once mcl2=round(mcl/2)

sct = mascl[scl2]+ scmoff

scb = mascl[scl2]- scmoff

mct = mamcl[mcl2]+ mcmoff

mcb = mamcl[mcl2]- mcmoff

return sct coloured(232,232,232) as "ShortCycleTop", scb coloured(232,232,232) as "ShortCycleBottom", (sct+scb)/2 as "ShortCycleMedian", mct coloured(232,232,232) as "MediumCycleTop", mcb coloured(232,232,232) as "MedianCycleBottom", (mct+mcb)/2 as "MediumCycleMedian" , customclose as " customclose "

Here is the IBEX35

Where do you live in Spain ? soy de Medina Sidonia

un saludo

supertiti

Participant

Topics: 123

Replies: 738

Been thanked: 76 times

03/02/2020 at 7:43 PM #121008

supertiti

IBEX35

supertiti

Participant

Topics: 123

Replies: 738

Been thanked: 76 times

03/02/2020 at 9:31 PM #121013

caoticoPRC

Thanks! No rush 🙂

caoticoPRC

Participant

Topics: 1

Replies: 5

Been thanked: 1 time

03/02/2020 at 9:33 PM #121014

caoticoPRC

Thank you! I of the Balearic Islands. I am still starting at this but the indicator has caught my attention after seeing many, and combining it with the price passed by someone else (eg I have tried VIDYA and CCI) greatly improves the oscillators. The idea would be to use the same thing but transformed into an oscillator.

caoticoPRC

Participant

Topics: 1

Replies: 5

Been thanked: 1 time

03/03/2020 at 9:50 AM #121035

Nicolas

Here is the code translated from Pinescript into ProRealTime. You have to change the src variable to inject any type of value, in this version it is the Close.

//PRC_Cycle Channel Oscillator | indicator  03.03.2020
//Nicolas @ www.prorealcode.com  
//Sharing ProRealTime knowledge  
//converted from pinescript

// --- settings
sclt =  10 //Short Cycle Length
mclt =  30 //Medium Cycle Length
scm =  1.0 //Short Cycle Multiplier
mcm =  3.0 //Medium Cycle Multiplier
// --- end of settings

src=customclose //Source
once scl = round(sclt/2)
once mcl = round(mclt/2)

mascl=wilderaverage[scl](src)
mamcl=wilderaverage[mcl](src)
scmoff = scm*averagetruerange[scl]
mcmoff = mcm*averagetruerange[mcl]
once scl2=round(scl/2)
once mcl2=round(mcl/2)

sct =  mascl[scl2]+ scmoff
scb =  mascl[scl2]- scmoff
mct =  mamcl[mcl2]+ mcmoff
mcb =  mamcl[mcl2]- mcmoff

scmm=(sct+scb)/2

omed=(scmm-mcb)/(mct-mcb)
oshort=(src-mcb)/(mct-mcb)

if omed >=1 then 
drawsegment(barindex,1,barindex,omed) coloured(128,0,128)
endif
if omed <=0 then
drawsegment(barindex,0,barindex,omed) coloured(128,0,128)
endif
if oshort >=1 then
drawsegment(barindex,1,barindex,oshort) coloured(128,0,128)
endif
if oshort <=0 then
drawsegment(barindex,0,barindex,oshort) coloured(128,0,128)
endif

return 1.0 coloured(168,168,168) as "UpperLine", 0.5 coloured(168,168,168) as "MidLine", 0.0 coloured(168,168,168) as "LowerLine",oshort coloured(255,0,0) style(line,2) as "FastOsc",omed coloured(0,255,0) style(line,2) as "SlowOsc" 
//plot(omed>=1.0?omed:na, histbase=1.0, style=histogram, color=purple, linewidth=2, title="MediumCycleOB")
//plot(omed<=0.0?omed:na, histbase=0.0, style=histogram, color=purple, linewidth=2, title="MediumCycleOS")
//plot(oshort>=1.0?oshort:na, histbase=1.0, style=histogram, color=purple, linewidth=2, title="ShortCycleOB")
//plot(oshort<=0.0?oshort:na, histbase=0.0, style=histogram, color=purple, linewidth=2, title="ShortCycleOS"

//PRC_Cycle Channel Oscillator | indicator 03.03.2020

//Nicolas @ www.prorealcode.com

//Sharing ProRealTime knowledge

//converted from pinescript

// --- settings

sclt = 10 //Short Cycle Length

mclt = 30 //Medium Cycle Length

scm = 1.0 //Short Cycle Multiplier

mcm = 3.0 //Medium Cycle Multiplier

// --- end of settings

src=customclose //Source

once scl = round(sclt/2)

once mcl = round(mclt/2)

mascl=wilderaverage[scl](src)

mamcl=wilderaverage[mcl](src)

scmoff = scm*averagetruerange[scl]

mcmoff = mcm*averagetruerange[mcl]

once scl2=round(scl/2)

once mcl2=round(mcl/2)

sct = mascl[scl2]+ scmoff

scb = mascl[scl2]- scmoff

mct = mamcl[mcl2]+ mcmoff

mcb = mamcl[mcl2]- mcmoff

scmm=(sct+scb)/2

omed=(scmm-mcb)/(mct-mcb)

oshort=(src-mcb)/(mct-mcb)

if omed >=1 then

drawsegment(barindex,1,barindex,omed) coloured(128,0,128)

endif

if omed <=0 then

drawsegment(barindex,0,barindex,omed) coloured(128,0,128)

endif

if oshort >=1 then

drawsegment(barindex,1,barindex,oshort) coloured(128,0,128)

endif

if oshort <=0 then

drawsegment(barindex,0,barindex,oshort) coloured(128,0,128)

endif

return 1.0 coloured(168,168,168) as "UpperLine", 0.5 coloured(168,168,168) as "MidLine", 0.0 coloured(168,168,168) as "LowerLine",oshort coloured(255,0,0) style(line,2) as "FastOsc",omed coloured(0,255,0) style(line,2) as "SlowOsc"

//plot(omed>=1.0?omed:na, histbase=1.0, style=histogram, color=purple, linewidth=2, title="MediumCycleOB")

//plot(omed<=0.0?omed:na, histbase=0.0, style=histogram, color=purple, linewidth=2, title="MediumCycleOS")

//plot(oshort>=1.0?oshort:na, histbase=1.0, style=histogram, color=purple, linewidth=2, title="ShortCycleOB")

//plot(oshort<=0.0?oshort:na, histbase=0.0, style=histogram, color=purple, linewidth=2, title="ShortCycleOS"

Nicolas

Keymaster

Topics: 81

Replies: 20863

Been thanked: 4775 times

03/03/2020 at 9:54 AM #121039

Nicolas

VIDYA version

//PRC_Cycle Channel Oscillator | indicator  03.03.2020
//Nicolas @ www.prorealcode.com  
//Sharing ProRealTime knowledge  
//converted from pinescript

// --- settings
sclt =  10 //Short Cycle Length
mclt =  30 //Medium Cycle Length
scm =  1.0 //Short Cycle Multiplier
mcm =  3.0 //Medium Cycle Multiplier
// --- end of settings

nn=3
mm=21
dd=15

PP=totalprice

FF=(std[nn](PP)/std[mm](PP))

if FF<=0 then
for i = 1 to mm do
if FF[i]>0 then
FF1a=FF[i]
break
endif
next
else
FF1a=FF
endif

period = ROUND(dd*FF1a)

if period=0 then
period=1
endif

Filt = ExponentialAverage[period](PP)

src=filt //Source
once scl = round(sclt/2)
once mcl = round(mclt/2)

mascl=wilderaverage[scl](src)
mamcl=wilderaverage[mcl](src)
scmoff = scm*averagetruerange[scl]
mcmoff = mcm*averagetruerange[mcl]
once scl2=round(scl/2)
once mcl2=round(mcl/2)

sct =  mascl[scl2]+ scmoff
scb =  mascl[scl2]- scmoff
mct =  mamcl[mcl2]+ mcmoff
mcb =  mamcl[mcl2]- mcmoff

scmm=(sct+scb)/2

omed=(scmm-mcb)/(mct-mcb)
oshort=(src-mcb)/(mct-mcb)

if omed >=1 then 
drawsegment(barindex,1,barindex,omed) coloured(128,0,128)
endif
if omed <=0 then
drawsegment(barindex,0,barindex,omed) coloured(128,0,128)
endif
if oshort >=1 then
drawsegment(barindex,1,barindex,oshort) coloured(128,0,128)
endif
if oshort <=0 then
drawsegment(barindex,0,barindex,oshort) coloured(128,0,128)
endif

return 1.0 coloured(168,168,168) as "UpperLine", 0.5 coloured(168,168,168) as "MidLine", 0.0 coloured(168,168,168) as "LowerLine",oshort coloured(255,0,0) style(line,2) as "FastOsc",omed coloured(0,255,0) style(line,2) as "SlowOsc"

//PRC_Cycle Channel Oscillator | indicator 03.03.2020

//Nicolas @ www.prorealcode.com

//Sharing ProRealTime knowledge

//converted from pinescript

// --- settings

sclt = 10 //Short Cycle Length

mclt = 30 //Medium Cycle Length

scm = 1.0 //Short Cycle Multiplier

mcm = 3.0 //Medium Cycle Multiplier

// --- end of settings

nn=3

mm=21

dd=15

PP=totalprice

FF=(std[nn](PP)/std[mm](PP))

if FF<=0 then

for i = 1 to mm do

if FF[i]>0 then

FF1a=FF[i]

break

endif

else

FF1a=FF

endif

period = ROUND(dd*FF1a)

if period=0 then

period=1

endif

Filt = ExponentialAverage[period](PP)

src=filt //Source

once scl = round(sclt/2)

once mcl = round(mclt/2)

mascl=wilderaverage[scl](src)

mamcl=wilderaverage[mcl](src)

scmoff = scm*averagetruerange[scl]

mcmoff = mcm*averagetruerange[mcl]

once scl2=round(scl/2)

once mcl2=round(mcl/2)

sct = mascl[scl2]+ scmoff

scb = mascl[scl2]- scmoff

mct = mamcl[mcl2]+ mcmoff

mcb = mamcl[mcl2]- mcmoff

scmm=(sct+scb)/2

omed=(scmm-mcb)/(mct-mcb)

oshort=(src-mcb)/(mct-mcb)

if omed >=1 then

drawsegment(barindex,1,barindex,omed) coloured(128,0,128)

endif

if omed <=0 then

drawsegment(barindex,0,barindex,omed) coloured(128,0,128)

endif

if oshort >=1 then

drawsegment(barindex,1,barindex,oshort) coloured(128,0,128)

endif

if oshort <=0 then

drawsegment(barindex,0,barindex,oshort) coloured(128,0,128)

endif

Nicolas

Keymaster

Topics: 81

Replies: 20863

Been thanked: 4775 times

03/03/2020 at 10:02 AM #121040

caoticoPRC

tHANKS! Works great, now time to play with it.

caoticoPRC

Participant

Topics: 1

Replies: 5

Been thanked: 1 time

03/03/2020 at 2:16 PM #121076

caoticoPRC

Hi again. The VIDYA I am working with is the other version, the merging gives a smoother pattern. I’ve tried myself to add it up but I haven’t been able to code. It seems it’s not so straight forward to apply an indicator to another independent indicator as I thought.

Thanks!

//Vi.Dy.A = (Variable Index Dynamic Average)

//period=14


if barindex>100 then
//(Please note: the analyst can set α to be equal to any value, but the quantity (1-α*k) should always be positive).
k=abs(Chandle[20](close))/100
alfa=2/(period+1)
vidya=(alfa*k*close+(1-alfa*k)*vidya[1])
endif

return vidya

//Vi.Dy.A = (Variable Index Dynamic Average)

//period=14

if barindex>100 then

//(Please note: the analyst can set α to be equal to any value, but the quantity (1-α*k) should always be positive).

k=abs(Chandle[20](close))/100

alfa=2/(period+1)

vidya=(alfa*k*close+(1-alfa*k)*vidya[1])

endif

return vidya

caoticoPRC

Participant

Topics: 1

Replies: 5

Been thanked: 1 time

03/03/2020 at 5:08 PM #121086

Nicolas

Here it is:

//PRC_Cycle Channel Oscillator | indicator  03.03.2020
//Nicolas @ www.prorealcode.com
//Sharing ProRealTime knowledge
//converted from pinescript

// --- settings
sclt =  10 //Short Cycle Length
mclt =  30 //Medium Cycle Length
scm =  1.0 //Short Cycle Multiplier
mcm =  3.0 //Medium Cycle Multiplier
// --- end of settings

//Vi.Dy.A = (Variable Index Dynamic Average)
period=14
if barindex>100 then
//(Please note: the analyst can set α to be equal to any value, but the quantity (1-α*k) should always be positive).
k=abs(Chandle[20](close))/100
alfa=2/(period+1)
vidya=(alfa*k*close+(1-alfa*k)*vidya[1])
endif

src=vidya //Source
once scl = round(sclt/2)
once mcl = round(mclt/2)

mascl=wilderaverage[scl](src)
mamcl=wilderaverage[mcl](src)
scmoff = scm*averagetruerange[scl]
mcmoff = mcm*averagetruerange[mcl]
once scl2=round(scl/2)
once mcl2=round(mcl/2)

sct =  mascl[scl2]+ scmoff
scb =  mascl[scl2]- scmoff
mct =  mamcl[mcl2]+ mcmoff
mcb =  mamcl[mcl2]- mcmoff

scmm=(sct+scb)/2

omed=(scmm-mcb)/(mct-mcb)
oshort=(src-mcb)/(mct-mcb)

if omed >=1 then
drawsegment(barindex,1,barindex,omed) coloured(128,0,128)
endif
if omed <=0 then
drawsegment(barindex,0,barindex,omed) coloured(128,0,128)
endif
if oshort >=1 then
drawsegment(barindex,1,barindex,oshort) coloured(128,0,128)
endif
if oshort <=0 then
drawsegment(barindex,0,barindex,oshort) coloured(128,0,128)
endif

return 1.0 coloured(168,168,168) as "UpperLine", 0.5 coloured(168,168,168) as "MidLine", 0.0 coloured(168,168,168) as "LowerLine",oshort coloured(255,0,0) style(line,2) as "FastOsc",omed coloured(0,255,0) style(line,2) as "SlowOsc"

//PRC_Cycle Channel Oscillator | indicator 03.03.2020

//Nicolas @ www.prorealcode.com

//Sharing ProRealTime knowledge

//converted from pinescript

// --- settings

sclt = 10 //Short Cycle Length

mclt = 30 //Medium Cycle Length

scm = 1.0 //Short Cycle Multiplier

mcm = 3.0 //Medium Cycle Multiplier

// --- end of settings

//Vi.Dy.A = (Variable Index Dynamic Average)

period=14

if barindex>100 then

//(Please note: the analyst can set α to be equal to any value, but the quantity (1-α*k) should always be positive).

k=abs(Chandle[20](close))/100

alfa=2/(period+1)

vidya=(alfa*k*close+(1-alfa*k)*vidya[1])

endif

src=vidya //Source

once scl = round(sclt/2)

once mcl = round(mclt/2)

mascl=wilderaverage[scl](src)

mamcl=wilderaverage[mcl](src)

scmoff = scm*averagetruerange[scl]

mcmoff = mcm*averagetruerange[mcl]

once scl2=round(scl/2)

once mcl2=round(mcl/2)

sct = mascl[scl2]+ scmoff

scb = mascl[scl2]- scmoff

mct = mamcl[mcl2]+ mcmoff

mcb = mamcl[mcl2]- mcmoff

scmm=(sct+scb)/2

omed=(scmm-mcb)/(mct-mcb)

oshort=(src-mcb)/(mct-mcb)

if omed >=1 then

drawsegment(barindex,1,barindex,omed) coloured(128,0,128)

endif

if omed <=0 then

drawsegment(barindex,0,barindex,omed) coloured(128,0,128)

endif

if oshort >=1 then

drawsegment(barindex,1,barindex,oshort) coloured(128,0,128)

endif

if oshort <=0 then

drawsegment(barindex,0,barindex,oshort) coloured(128,0,128)

endif

Nicolas

Keymaster

Topics: 81

Replies: 20863

Been thanked: 4775 times

03/03/2020 at 6:53 PM #121091

caoticoPRC

Thanks!

As an example, I attach first image on my desktop now, Oil daily futures:

The indicators, for comparing purposes, are: Cycle channel oscillator applied to VIDYA, SUperbandpass filer, Wavetrend, and DSS , all with standars inputs.

In a first impression, I would say, being a relatively slow indicator, it gives clear big picture turning the moving average into an oscillator, signal ranging markets well like the Vidya (in which use another kind of oscillator), and has big divergences in major turning points. Probably it gives interesting results merging with other kind of moving averages, oscillators or price filters.

1 user thanked author for this post.

Nicolas

caoticoPRC

Participant

Topics: 1

Replies: 5

Been thanked: 1 time

Author

Posts

Viewing 12 posts - 1 through 12 (of 12 total)

Find exclusive trading pro-tools on