TV_Levels — индикатор от TatianaV

158 просмотров

взят у ChrisMoody, переделан для дневной торговли. Уровни П/С дневные, 4 часа и локальные 90 минут.

study (title="TV_Levels", shorttitle="TV_Levels", overlay=true)
LRG_Channel_TF_mins_D_W_M = input("90", title="Local level")
HI = security(tickerid, LRG_Channel_TF_mins_D_W_M, high)
LO = security(tickerid, LRG_Channel_TF_mins_D_W_M, low)
plot(HI, color=HI!=HI[1]?na:red,style=line, title="Resistance", linewidth=2, transp=0)
plot(LO, color=LO!=LO[1]?na:green,style=line, title="Support ", linewidth=2, transp=0)

sd = input(true, title="Daily levels High Low?")
sw = input(true, title="Clock levels High Low?")
pf = (hlc3) *2
pl = pf - high
ph = pf - low
 
dtime_pf = security(tickerid, 'D', pf[1]) 
dtime_pl = security(tickerid, 'D', pl[1]) 
dtime_ph = security(tickerid, 'D', ph[1]) 
 
pcolor_pl = close < dtime_pl ? red : olive
pcolor_ph = close > dtime_ph ? lime : olive

//Daily Projected High Low
offs_daily = 0 

plot(sd and dtime_ph ? dtime_ph : na, title="Daily High",style=line, color=pcolor_ph ,linewidth=2, transp=0) 
plot(sd and dtime_pl ? dtime_pl : na, title="Daily Low",style=line, color=pcolor_pl ,linewidth=2, transp=0) 


//Weekly Projected High Low 
wtime_pf = security(tickerid, '240', pf[1]) 
wtime_pl = security(tickerid, '240', pl[1]) 
wtime_ph = security(tickerid, '240', ph[1]) 

wcolor_pl = close < wtime_pl ? red : orange
wcolor_ph = close > wtime_ph ? lime : orange

plot(sw and wtime_ph ? wtime_ph : na, title="Clock High",style=line, color=wcolor_ph,linewidth=2, transp=0) 
plot(sw and wtime_pl ? wtime_pl : na, title="Clock Low",style=line, color=wcolor_pl,linewidth=2, transp=0)

Обновлено:
четкие раздельные линии, но без локальных
study (title="TV_Levels_HD", shorttitle="TV_Levels_HD", overlay=true)
LRG1 = input("240", title="H High Low")
LRG2 = input("D", title="D High Low")
LRG = input("W", title="W High Low")

pf = (hlc3)*2
pl = pf - high
ph = pf - low

//240 Projected High Low
ctime_pf = security(tickerid, LRG1, pf)
ctime_pl = security(tickerid, LRG1, pl)
ctime_ph = security(tickerid, LRG1, ph)
plot(ctime_pl, color=ctime_pl!= ctime_pl? na: orange, title="H Hig",style=line, linewidth=2, transp=0)
plot(ctime_ph, color=ctime_ph!= ctime_ph? na: orange, title="H Low",style=line, linewidth=2, transp=0)

//D Projected High Low
dtime_pf = security(tickerid, LRG2, pf)
dtime_pl = security(tickerid, LRG2, pl)
dtime_ph = security(tickerid, LRG2, ph)
plot(dtime_pl, color=dtime_pl!= dtime_pl? na: olive, title="D Low",style=line, linewidth=2, transp=0)
plot(dtime_ph, color=dtime_ph!= dtime_ph? na: olive, title="D High",style=line, linewidth=2, transp=0)

//W Projected High Low
qtime_pf = security(tickerid, LRG, pf)
qtime_pl = security(tickerid, LRG, pl)
qtime_ph = security(tickerid, LRG, ph)
plot(qtime_pl, color=qtime_pl!= qtime_pl? na: green, title="W Hig",style=line, linewidth=2, transp=0)
plot(qtime_ph, color=qtime_ph!= qtime_ph? na: red, title="W Low",style=line, linewidth=2, transp=0)

Ответить

Ницца. Спасибо.

Ответить