Extend Point of Control Line (Volume Profile) For ThinkOrSwim

Y

yardley

New member
Hi,

I need some help redoing the VolumeProfile Indictor that comes with ThinkorSwim. Here's my ask:

I want to present the VolumeProfile indicator on a chart such that the POC of control line extends all the way to the right axis. Here's a pic to demonstrate.
Image

The first image shows a chart that displays the daily Volume Profile with the blue line being the POC. In the second image, I manually drew a line that extends the POC line to the right with the price displayed at the end. Can someone help me replicate this with the existing VolumeProfile indicator that comes with ThinkOrSwim? I'm not very savvy with ThinkOrSwim script. Greatly appreciate any help.
 
Solution
S
yardley said:
Hi,

I need some help redoing the VolumeProfile Indictor that comes with ThinkorSwim. Here's my ask:

I want to present the VolumeProfile indicator on a chart such that the POC of control line extends all the way to the right axis. Here's a pic to demonstrate.
Image

The first image shows a chart that displays the daily Volume Profile with the blue line being the POC. In the second image, I manually drew a line that extends the POC line to the right with the price displayed at the end. Can someone help me replicate this with the existing VolumeProfile indicator that comes with ThinkOrSwim? I'm not very savvy with ThinkOrSwim script. Greatly appreciate any help.
Click to expand...

Just saw your request.

This script combines x number of...
Sort by date Sort by votes
SleepyZ said:
Just saw your request.

This script combines x number of extended plots of the POC of the Volumeprofile indicator, also included in the script. You can add more extended plots by using the logic used to create the 10 included in the script. You could also change the def volp to be one of the other profile plots available in the box to the right when you click on the reference volumeprofile portion of the def volp.
Click to expand...
@SleepyZ If I wanted to show all the POC from the last 365 days would I just adjust the days back in the script or would I need to set the chart to that many days back? The reason I say this is because I've already tried both ways and its not plotting POC that I'm seeing from June that I manually drew out. I would like this to show all POC's only from the entire year unless broken.
 
Upvote 0 Downvote

Join useThinkScript to post your question to a community of 21,000+ developers and traders.

SIGN UP NOW LEARN MORE
TapthatAsk said:
@SleepyZ If I wanted to show all the POC from the last 365 days would I just adjust the days back in the script or would I need to set the chart to that many days back? The reason I say this is because I've already tried both ways and its not plotting POC that I'm seeing from June that I manually drew out. I would like this to show all POC's only from the entire year unless broken.
Click to expand...

The script contains 10 poc plots. You will need to make the remaining 355 plots using the basis to create the 10. It will likely be very resource intensive if you decide to do this.
 
Upvote 0 Downvote
SleepyZ said:
Added HVA, LVA plots to POC plots, all extended to the right unless crossed
Click to expand...

is it possible to have this modified, so that the plots only disappear when crossed or tested during regular trading hours? Because pre-market and after-hours generally have much lower volume and liquidity…
 
Upvote 0 Downvote
AstroBoy said:
is it possible to have this modified, so that the plots only disappear when crossed or tested during regular trading hours? Because pre-market and after-hours generally have much lower volume and liquidity…
Click to expand...

Yes, in the script function, defined high/low to be hi/lo, which is restricted to rthrs.

The image shows the old code on the left and the new on the right.

Screenshot 2024-02-12 112708.png

Code: 
#Extended_POCs_HVAs_LVAs_for_x_Daysback_and_Limited_Plots_when_crossed
#More can be added using the logic below
#Sleepyz - usethinkscript request @yardlay
#Added HVA * LVA Lines and Plot limit when crossed for all 3;

script v {
    input daysback = 1;
    def volp = reference VolumeProfile("time per profile" = "DAY", "on expansion" = no, "price per row height mode" = "TICKSIZE");
    def ymd  = GetYYYYMMDD();
    def y    = if ymd != ymd[1] then y[1] + 1 else y[1];
    def pc   = if IsNaN(close)
                  then pc[1] else
               if y == HighestAll(y) - daysback
                  then volp  else
               pc[1];
    def rth  = secondsfromTime(0930)>=0 and secondsFromTime(1600)<0;
    def hi   = if !rth then double.nan else high;
    def lo   = if !rth then double.nan else low;
    def x    = if y > HighestAll(y) - daysback and Between(pc, lo, hi)
           then BarNumber() else Double.NaN;

    plot poc = if IsNaN(LowestAll(x))
           then pc
           else if BarNumber() > LowestAll(x)
           then Double.NaN
           else pc;
}
script vh {
    input daysback = 1;
    def volh = reference VolumeProfile("time per profile" = "DAY", "on expansion" = no, "price per row height mode" = "TICKSIZE").VAHigh;
    def ymd  = GetYYYYMMDD();
    def y    = if ymd != ymd[1] then y[1] + 1 else y[1];
    def ph   = if IsNaN(close)
                  then ph[1] else
               if y == HighestAll(y) - daysback
                  then volh  else
               ph[1];
    def rth  = secondsfromTime(0930)>=0 and secondsFromTime(1600)<0;
    def hi   = if !rth then double.nan else high;
    def lo   = if !rth then double.nan else low;
    def x    = if y > HighestAll(y) - daysback and Between(ph, lo, hi)
           then BarNumber() else Double.NaN;

    plot hva = if IsNaN(LowestAll(x))
           then ph
           else if BarNumber() > LowestAll(x)
           then Double.NaN
           else ph;
}
script vl {
    input daysback = 1;
    def voll = reference VolumeProfile("time per profile" = "DAY", "on expansion" = no, "price per row height mode" = "TICKSIZE").VALow;
    def ymd  = GetYYYYMMDD();
    def y    = if ymd != ymd[1] then y[1] + 1 else y[1];
    def pl   = if IsNaN(close)
                  then pl[1] else
               if y == HighestAll(y) - daysback
                  then voll  else
               pl[1];
    def rth  = secondsfromTime(0930)>=0 and secondsFromTime(1600)<0;
    def hi   = if !rth then double.nan else high;
    def lo   = if !rth then double.nan else low;
    def x    = if y > HighestAll(y) - daysback and Between(pl, lo, hi)
           then BarNumber() else Double.NaN;

    plot val = if IsNaN(LowestAll(x))
           then pl
           else if BarNumber() > LowestAll(x)
           then Double.NaN
           else pl;
}

defineglobalColor("H", color.yellow);
defineglobalColor("L", color.yellow);

plot v1 =  v(1).poc;
v1.SetDefaultColor(Color.RED);
v1.SetPaintingStrategy(PaintingStrategy.DASHES);
v1.SetLineWeight(2);

plot v2 =  v(2).poc;
v2.SetDefaultColor(Color.RED);
v2.SetPaintingStrategy(PaintingStrategy.DASHES);
v2.SetLineWeight(2);

plot v3 =  v(3).poc;
v3.SetDefaultColor(Color.RED);
v3.SetPaintingStrategy(PaintingStrategy.DASHES);
v3.SetLineWeight(2);

plot v4 =  v(4).poc;
v4.SetDefaultColor(Color.RED);
v4.SetPaintingStrategy(PaintingStrategy.DASHES);
v4.SetLineWeight(2);

plot v5 =  v(5).poc;
v5.SetDefaultColor(Color.RED);
v5.SetPaintingStrategy(PaintingStrategy.DASHES);
v5.SetLineWeight(2);

plot v6 =  v(6).poc;
v6.SetDefaultColor(Color.RED);
v6.SetPaintingStrategy(PaintingStrategy.DASHES);
v6.SetLineWeight(2);

plot v7 =  v(7).poc;
v7.SetDefaultColor(Color.RED);
v7.SetPaintingStrategy(PaintingStrategy.DASHES);
v7.SetLineWeight(2);

plot v8 =  v(8).poc;
v8.SetDefaultColor(Color.RED);
v8.SetPaintingStrategy(PaintingStrategy.DASHES);
v8.SetLineWeight(2);

plot v9 =  v(9).poc;
v9.SetDefaultColor(Color.RED);
v9.SetPaintingStrategy(PaintingStrategy.DASHES);
v9.SetLineWeight(2);

plot v10 =  v(10).poc;
v10.SetDefaultColor(Color.RED);
v10.SetPaintingStrategy(PaintingStrategy.DASHES);
v10.SetLineWeight(2);
;


plot vh1 =  vh(1);
vh1.SetDefaultColor(globalColor("H"));
vh1.SetPaintingStrategy(PaintingStrategy.DASHES);
vh1.SetLineWeight(2);

plot vh2 =  vh(2);
vh2.SetDefaultColor(globalColor("H"));
vh2.SetPaintingStrategy(PaintingStrategy.DASHES);
vh2.SetLineWeight(2);

plot vh3 =  vh(3);
v3.SetDefaultColor(globalColor("H"));
v3.SetPaintingStrategy(PaintingStrategy.DASHES);
v3.SetLineWeight(2);

plot vh4 =  vh(4);
vh4.SetDefaultColor(globalColor("H"));
vh4.SetPaintingStrategy(PaintingStrategy.DASHES);
vh4.SetLineWeight(2);

plot vh5 =  vh(5);
vh5.SetDefaultColor(globalColor("H"));
vh5.SetPaintingStrategy(PaintingStrategy.DASHES);
vh5.SetLineWeight(2);

plot vh6 =  vh(6);
vh6.SetDefaultColor(globalColor("H"));
vh6.SetPaintingStrategy(PaintingStrategy.DASHES);
vh6.SetLineWeight(2);

plot vh7 =  vh(7);
vh7.SetDefaultColor(globalColor("H"));
vh7.SetPaintingStrategy(PaintingStrategy.DASHES);
vh7.SetLineWeight(2);

plot vh8 =  vh(8);
vh8.SetDefaultColor(globalColor("H"));
vh8.SetPaintingStrategy(PaintingStrategy.DASHES);
vh8.SetLineWeight(2);

plot vh9 =  vh(9);
vh9.SetDefaultColor(globalColor("H"));
vh9.SetPaintingStrategy(PaintingStrategy.DASHES);
vh9.SetLineWeight(2);

plot vh10 =  vh(10);
vh10.SetDefaultColor(globalColor("H"));
vh10.SetPaintingStrategy(PaintingStrategy.DASHES);
vh10.SetLineWeight(2);
;

plot vl1 =  vl(1);
vl1.SetDefaultColor(globalColor("L"));
vl1.SetPaintingStrategy(PaintingStrategy.DASHES);
vl1.SetLineWeight(2);

plot vl2 =  vl(2);
vl2.SetDefaultColor(globalColor("L"));
vl2.SetPaintingStrategy(PaintingStrategy.DASHES);
vl2.SetLineWeight(2);

plot vl3 =  vl(3);
vl3.SetDefaultColor(globalColor("L"));
vl3.SetPaintingStrategy(PaintingStrategy.DASHES);
vl3.SetLineWeight(2);

plot vl4 =  vl(4);
vl4.SetDefaultColor(globalColor("L"));
vl4.SetPaintingStrategy(PaintingStrategy.DASHES);
vl4.SetLineWeight(2);

plot vl5 =  vl(5);
vl5.SetDefaultColor(globalColor("L"));
vl5.SetPaintingStrategy(PaintingStrategy.DASHES);
vl5.SetLineWeight(2);

plot vl6 =  vl(6);
vl6.SetDefaultColor(globalColor("L"));
vl6.SetPaintingStrategy(PaintingStrategy.DASHES);
vl6.SetLineWeight(2);

plot vl7 =  vl(7);
vl7.SetDefaultColor(globalColor("L"));
vl7.SetPaintingStrategy(PaintingStrategy.DASHES);
vl7.SetLineWeight(2);

plot vl8 =  vl(8);
vl8.SetDefaultColor(globalColor("L"));
vl8.SetPaintingStrategy(PaintingStrategy.DASHES);
vl8.SetLineWeight(2);

plot vl9 =  vl(9);
vl9.SetDefaultColor(globalColor("L"));
vl9.SetPaintingStrategy(PaintingStrategy.DASHES);
vl9.SetLineWeight(2);

plot vl10 =  vl(10);
vl10.SetDefaultColor(globalColor("L"));
vl10.SetPaintingStrategy(PaintingStrategy.DASHES);
vl10.SetLineWeight(2);
;

#Volumeprofile script with Defaults to match extended POC plots x daysback
#
# TD Ameritrade IP Company, Inc. (c) 2010-2022
#

input pricePerRowHeightMode = {AUTOMATIC, default TICKSIZE, CUSTOM};
input customRowHeight = 1.0;
input timePerProfile = {CHART, MINUTE, HOUR, default DAY, WEEK, MONTH, "OPT EXP", BAR};
input multiplier = 1;
input onExpansion = no;
input profiles = 1000;
input showPointOfControl = yes;
input showValueArea = yes;
input valueAreaPercent = 70;
input opacity = 50;

def period;
def yyyymmdd = GetYYYYMMDD();
def seconds = SecondsFromTime(0);
def month = GetYear() * 12 + GetMonth();
def day_number = DaysFromDate(First(yyyymmdd)) + GetDayOfWeek(First(yyyymmdd));
def dom = GetDayOfMonth(yyyymmdd);
def dow = GetDayOfWeek(yyyymmdd - dom + 1);
def expthismonth = (if dow > 5 then 27 else 20) - dow;
def exp_opt = month + (dom > expthismonth);
switch (timePerProfile) {
case CHART:
    period = 0;
case MINUTE:
    period = Floor(seconds / 60 + day_number * 24 * 60);
case HOUR:
    period = Floor(seconds / 3600 + day_number * 24);
case DAY:
    period = CountTradingDays(Min(First(yyyymmdd), yyyymmdd), yyyymmdd) - 1;
case WEEK:
    period = Floor(day_number / 7);
case MONTH:
    period = Floor(month - First(month));
case "OPT EXP":
    period = exp_opt - First(exp_opt);
case BAR:
    period = BarNumber() - 1;
}

def count = CompoundValue(1, if period != period[1] then (count[1] + period - period[1]) % multiplier else count[1], 0);
def cond = count < count[1] + period - period[1];
def height;
switch (pricePerRowHeightMode) {
case AUTOMATIC:
    height = PricePerRow.AUTOMATIC;
case TICKSIZE:
    height = PricePerRow.TICKSIZE;
case CUSTOM:
    height = customRowHeight;
}

profile vol = VolumeProfile("startNewProfile" = cond, "onExpansion" = onExpansion, "numberOfProfiles" = profiles, "pricePerRow" = height, "value area percent" = valueAreaPercent);
def con = CompoundValue(1, onExpansion, no);
def pc = if IsNaN(vol.GetPointOfControl()) and con then pc[1] else vol.GetPointOfControl();
def hVA = if IsNaN(vol.GetHighestValueArea()) and con then hVA[1] else vol.GetHighestValueArea();
def lVA = if IsNaN(vol.GetLowestValueArea()) and con then lVA[1] else vol.GetLowestValueArea();

def hProfile = if IsNaN(vol.GetHighest()) and con then hProfile[1] else vol.GetHighest();
def lProfile = if IsNaN(vol.GetLowest()) and con then lProfile[1] else vol.GetLowest();
def plotsDomain = IsNaN(close) == onExpansion;

plot POC = if plotsDomain then pc else Double.NaN;
plot ProfileHigh = if plotsDomain then hProfile else Double.NaN;
plot ProfileLow = if plotsDomain then lProfile else Double.NaN;
plot VAHigh = if plotsDomain then hVA else Double.NaN;
plot VALow = if plotsDomain then lVA else Double.NaN;

DefineGlobalColor("Profile", GetColor(1));
DefineGlobalColor("Point Of Control", GetColor(5));
DefineGlobalColor("Value Area", GetColor(8));

vol.Show(GlobalColor("Profile"), if showPointOfControl then GlobalColor("Point Of Control") else Color.CURRENT, if showValueArea then GlobalColor("Value Area") else Color.CURRENT, opacity);
POC.SetDefaultColor(GlobalColor("Point Of Control"));
POC.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
VAHigh.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
VALow.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
VAHigh.SetDefaultColor(GlobalColor("Value Area"));
VALow.SetDefaultColor(GlobalColor("Value Area"));
ProfileHigh.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
ProfileLow.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
ProfileHigh.SetDefaultColor(GetColor(3));
ProfileLow.SetDefaultColor(GetColor(3));
ProfileHigh.Hide();
ProfileLow.Hide();

#
Click to expand...
 
Last edited:
Upvote 0 Downvote
Is there a way to show the last 10 days worth of poc while only looking at the today chart? And is there a way to show 10 days worth of poc without adding 10 iteration of the study and setting each of those study to a different day back? I had been drawing in my poc lines manually and find it interesting how price moves between the pocs from different days back....then I had a thought after so many hours of drawing in lines manually on a dozen or more tickers that surely someone way smarter than me must have created a script to automate the process. At this point, I'm not sure whose script I have loaded and adjusted but I just know that I can only see the poc lines in today's chart ONLY if I load up 10 days worth of charts and then zoom into today. This makes it load even slower since it had to populate 10 days worth of 2 minute bars hahaha. My tos is running slow as it is. If anyone can answer these question for me, I'd appreciate it. I'm not sure if it's just the limitation of tos or it's user error on my part or I have higher expectations than what the script is designed to do. Thanks :)
 
Upvote 0 Downvote
Is there a way to make it work on shorter timeframes with extended POCs? I'd like it to look something like this if possible. Red lines are the extended POCs. 1 minute chart with 30 minute profiles. (Time per profile = Minute, Multiplier = 30) Thank you!
 

Attachments

  • 30-min-POC.PNG
    30-min-POC.PNG
    189.7 KB · Views: 136
Upvote 0 Downvote
thatsben said:
@Sleepy I've been trying to add chart bubbles when the candle brakes the POCs_HVAs_LVAs. Is there a way to add this and/or a chart bubble when it brakes and retest the POCs_HVAs_LVAs?
Click to expand...

This was added to the end of the code
It will display a bubble whenever one of the Volume Profile Lines are crossed in a subsequent day.
The input lookback will limit how many recent days of crossing bubbles to show

Code: 
#Bubbles @ Crosses
DefineGlobalColor("HC", Color.light_red);
DefineGlobalColor("LC", Color.light_green);
DefineGlobalColor("PC", Color.orange);

input lookback = 2;
def ymd  = GetYYYYMMDD();
def y    = if ymd != ymd[1] then y[1] + 1 else y[1];

addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v1[-1]) and v1, v1, "P1", globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v2[-1]) and v2, v2, "P2",  globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v3[-1]) and v3, v3, "P3",  globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v4[-1]) and v4, v4, "P4",  globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v5[-1]) and v5, v5, "P5",  globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v6[-1]) and v6, v6, "P6",  globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v7[-1]) and v7, v7, "P7",  globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v8[-1]) and v8, v8, "P8",  globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v9[-1]) and v9, v9, "P9",  globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v10[-1]) and v10, v10, "P10",  globalcolor("PC"));


addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh1[-1]) and vh1, vh1, "H1", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh2[-1]) and vh2, vh2, "H2", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh3[-1]) and vh3, vh3, "H3", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh4[-1]) and vh4, vh4, "H4", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh5[-1]) and vh5, vh5, "H5", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh6[-1]) and vh6, vh6, "H6", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh7[-1]) and vh7, vh7, "H7", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh8[-1]) and vh8, vh8, "H8", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh9[-1]) and vh9, vh9, "H9", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh10[-1]) and vh10, vh10, "H10", globalColor("HC"));


addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl1[-1]) and vl1, vl1, "L1", globalColor("LC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl2[-1]) and vl2, vl2, "L2", globalColor("LC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl3[-1]) and vl3, vl3, "L3", globalColor("LC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl4[-1]) and vl4, vl4, "L4", globalColor("LC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl5[-1]) and vl5, vl5, "L5", globalColor("LC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl6[-1]) and vl6, vl6, "L6", globalColor("LC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl7[-1]) and vl7, vl7, "L7", globalColor("LC"))
;addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl8[-1]) and vl8, vl8, "L8", globalColor("LC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl9[-1]) and vl9, vl9, "L9", globalColor("LC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl10[-1]) and vl10, vl10, "L10", globalColor("LC"));
Click to expand...
Full Code with additional crossing bubbles
Screenshot 2024-07-21 132245.png
Code: 
#VolumeProfile_Extended_POCs_HVAs_LVAs_for_x_Daysback_and_Limited_Plots_when_crossed
#More can be added using the logic below
#Sleepyz - usethinkscript request @yardlay
#Added HVA * LVA Lines and Plot limit when crossed for all 3;
#Added Price to Most Recent Naked Labels

script v {
    input daysback = 1;
    def volp = reference VolumeProfile("time per profile" = "DAY", "on expansion" = no, "price per row height mode" = "TICKSIZE");
    def ymd  = GetYYYYMMDD();
    def y    = if ymd != ymd[1] then y[1] + 1 else y[1];
    def pc   = if IsNaN(close)
                  then pc[1] else
               if y == HighestAll(y) - daysback
                  then volp  else
               pc[1];
    plot x    = if y > HighestAll(y) - daysback and Between(pc, low, high)
           then BarNumber() else Double.NaN;

    plot poc = if IsNaN(LowestAll(x))
           then pc
           else if BarNumber() > LowestAll(x)
           then Double.NaN
           else pc;
}
script vh {
    input daysback = 1;
    def volh = reference VolumeProfile("time per profile" = "DAY", "on expansion" = no, "price per row height mode" = "TICKSIZE").VAHigh;
    def ymd  = GetYYYYMMDD();
    def y    = if ymd != ymd[1] then y[1] + 1 else y[1];
    def ph   = if IsNaN(close)
                  then ph[1] else
               if y == HighestAll(y) - daysback
                  then volh  else
               ph[1];
    plot x    = if y > HighestAll(y) - daysback and Between(ph, low, high)
           then BarNumber() else Double.NaN;

    plot hva = if IsNaN(LowestAll(x))
           then ph
           else if BarNumber() > LowestAll(x)
           then Double.NaN
           else ph;
}
script vl {
    input daysback = 1;
    def voll = reference VolumeProfile("time per profile" = "DAY", "on expansion" = no, "price per row height mode" = "TICKSIZE").VALow;
    def ymd  = GetYYYYMMDD();
    def y    = if ymd != ymd[1] then y[1] + 1 else y[1];
    def pl   = if IsNaN(close)
                  then pl[1] else
               if y == HighestAll(y) - daysback
                  then voll  else
               pl[1];
    plot x    = if y > HighestAll(y) - daysback and Between(pl, low, high)
           then BarNumber() else Double.NaN;

    plot val = if IsNaN(LowestAll(x))
           then pl
           else if BarNumber() > LowestAll(x)
           then Double.NaN
           else pl;
}

DefineGlobalColor("H", Color.YELLOW);
DefineGlobalColor("L", Color.YELLOW);
DefineGlobalColor("P", Color.WHITE);
DefineGlobalColor("NB", Color.MAGENTA);


plot v1 =  v(1).poc;
v1.AssignValueColor(if IsNaN(LowestAll(v(1).x)) then GlobalColor("NB") else GlobalColor("P"));
v1.SetPaintingStrategy(PaintingStrategy.DASHES);
v1.SetLineWeight(1);

plot v2 =  v(2).poc;
v2.AssignValueColor(if IsNaN(LowestAll(v(2).x)) then GlobalColor("NB") else GlobalColor("P"));
v2.SetPaintingStrategy(PaintingStrategy.DASHES);
v2.SetLineWeight(1);

plot v3 =  v(3).poc;
v3.AssignValueColor(if IsNaN(LowestAll(v(3).x)) then GlobalColor("NB") else GlobalColor("P"));
v3.SetPaintingStrategy(PaintingStrategy.DASHES);
v3.SetLineWeight(1);

plot v4 =  v(4).poc;
v4.AssignValueColor(if IsNaN(LowestAll(v(4).x)) then GlobalColor("NB") else GlobalColor("P"));
v4.SetPaintingStrategy(PaintingStrategy.DASHES);
v4.SetLineWeight(1);

plot v5 =  v(5).poc;
v5.AssignValueColor(if IsNaN(LowestAll(v(5).x)) then GlobalColor("NB") else GlobalColor("P"));
v5.SetPaintingStrategy(PaintingStrategy.DASHES);
v5.SetLineWeight(1);

plot v6 =  v(6).poc;
v6.AssignValueColor(if IsNaN(LowestAll(v(6).x)) then GlobalColor("NB") else GlobalColor("P"));
v6.SetPaintingStrategy(PaintingStrategy.DASHES);
v6.SetLineWeight(1);

plot v7 =  v(7).poc;
v7.AssignValueColor(if IsNaN(LowestAll(v(7).x)) then GlobalColor("NB") else GlobalColor("P"));
v7.SetPaintingStrategy(PaintingStrategy.DASHES);
v7.SetLineWeight(1);

plot v8 =  v(8).poc;
v8.AssignValueColor(if IsNaN(LowestAll(v(8).x)) then GlobalColor("NB") else GlobalColor("P"));
v8.SetPaintingStrategy(PaintingStrategy.DASHES);
v8.SetLineWeight(1);

plot v9 =  v(9).poc;
v9.AssignValueColor(if IsNaN(LowestAll(v(9).x)) then GlobalColor("NB") else GlobalColor("P"));
v9.SetPaintingStrategy(PaintingStrategy.DASHES);
v9.SetLineWeight(1);

plot v10 =  v(10).poc;
v10.AssignValueColor(if IsNaN(LowestAll(v(10).x)) then GlobalColor("NB") else GlobalColor("P"));
v10.SetPaintingStrategy(PaintingStrategy.DASHES);
v10.SetLineWeight(1);
;

AddLabel(1, "Most Recent Naked --> POC: " +
if IsNaN(LowestAll(v(1).x)) then "V1: " + v1 else
if IsNaN(LowestAll(v(2).x)) then "V2: " + v2 else
if IsNaN(LowestAll(v(3).x)) then "V3: " + v3 else
if IsNaN(LowestAll(v(4).x)) then "V4: " + v4 else
if IsNaN(LowestAll(v(5).x)) then "V5: " + v5 else
if IsNaN(LowestAll(v(6).x)) then "V6: " + v6 else
if IsNaN(LowestAll(v(7).x)) then "V7: " + v7 else
if IsNaN(LowestAll(v(8).x)) then "V8: " + v8 else
if IsNaN(LowestAll(v(9).x)) then "V9: " + v9 else
if IsNaN(LowestAll(v(10).x)) then "V10: " + v10 else
"NO V", Color.YELLOW) ;

plot vh1 =  vh(1).hva;
vh1.AssignValueColor(if IsNaN(LowestAll(vh(1).x)) then GlobalColor("NB") else GlobalColor("H"));
vh1.SetPaintingStrategy(PaintingStrategy.DASHES);
vh1.SetLineWeight(1);

plot vh2 =  vh(2).hva;
vh2.AssignValueColor(if IsNaN(LowestAll(vh(2).x)) then GlobalColor("NB") else GlobalColor("H"));
vh2.SetPaintingStrategy(PaintingStrategy.DASHES);
vh2.SetLineWeight(1);

plot vh3 =  vh(3).hva;
vh3.AssignValueColor(if IsNaN(LowestAll(vh(3).x)) then GlobalColor("NB") else GlobalColor("H"));
vh3.SetPaintingStrategy(PaintingStrategy.DASHES);
vh3.SetLineWeight(1);

plot vh4 =  vh(4).hva;
vh4.AssignValueColor(if IsNaN(LowestAll(vh(4).x)) then GlobalColor("NB") else GlobalColor("H"));
vh4.SetPaintingStrategy(PaintingStrategy.DASHES);
vh4.SetLineWeight(1);

plot vh5 =  vh(5).hva;
vh5.AssignValueColor(if IsNaN(LowestAll(vh(5).x)) then GlobalColor("NB") else GlobalColor("H"));
vh5.SetPaintingStrategy(PaintingStrategy.DASHES);
vh5.SetLineWeight(1);

plot vh6 =  vh(6).hva;
vh6.AssignValueColor(if IsNaN(LowestAll(vh(6).x)) then GlobalColor("NB") else GlobalColor("H"));
vh6.SetPaintingStrategy(PaintingStrategy.DASHES);
vh6.SetLineWeight(1);

plot vh7 =  vh(7).hva;
vh7.AssignValueColor(if IsNaN(LowestAll(vh(7).x)) then GlobalColor("NB") else GlobalColor("H"));
vh7.SetPaintingStrategy(PaintingStrategy.DASHES);
vh7.SetLineWeight(1);

plot vh8 =  vh(8).hva;
vh8.AssignValueColor(if IsNaN(LowestAll(vh(8).x)) then GlobalColor("NB") else GlobalColor("H"));
vh8.SetPaintingStrategy(PaintingStrategy.DASHES);
vh8.SetLineWeight(1);

plot vh9 =  vh(9).hva;
vh9.AssignValueColor(if IsNaN(LowestAll(vh(9).x)) then GlobalColor("NB") else GlobalColor("H"));
vh9.SetPaintingStrategy(PaintingStrategy.DASHES);
vh9.SetLineWeight(1);

plot vh10 =  vh(10).hva;
vh10.AssignValueColor(if IsNaN(LowestAll(vh(10).x)) then GlobalColor("NB") else GlobalColor("H"));
vh10.SetPaintingStrategy(PaintingStrategy.DASHES);
vh10.SetLineWeight(1);
;

AddLabel(1, " VAH: " +
if IsNaN(LowestAll(vh(1).x)) then "VH1: " + vh1 else
if IsNaN(LowestAll(vh(2).x)) then "VH2: " + vh2 else
if IsNaN(LowestAll(vh(3).x)) then "VH3: " + vh3 else
if IsNaN(LowestAll(vh(4).x)) then "VH4: " + vh4 else
if IsNaN(LowestAll(vh(5).x)) then "VH5: " + vh5 else
if IsNaN(LowestAll(vh(6).x)) then "VH6: " + vh6 else
if IsNaN(LowestAll(vh(7).x)) then "VH7: " + vh7 else
if IsNaN(LowestAll(vh(8).x)) then "VH8: " + vh8 else
if IsNaN(LowestAll(vh(9).x)) then "VH9: " + vh9 else
if IsNaN(LowestAll(vh(10).x)) then "VH10: " + vh10 else
"NO VH", Color.WHITE) ;


plot vl1 =  vl(1).val;
vl1.AssignValueColor(if IsNaN(LowestAll(vl(1).x)) then GlobalColor("NB") else GlobalColor("L"));
vl1.SetPaintingStrategy(PaintingStrategy.DASHES);
vl1.SetLineWeight(1);

plot vl2 =  vl(2).val;
vl2.AssignValueColor(if IsNaN(LowestAll(vl(2).x)) then GlobalColor("NB") else GlobalColor("L"));
vl2.SetPaintingStrategy(PaintingStrategy.DASHES);
vl2.SetLineWeight(1);

plot vl3 =  vl(3).val;
vl3.AssignValueColor(if IsNaN(LowestAll(vl(3).x)) then GlobalColor("NB") else GlobalColor("L"));
vl3.SetPaintingStrategy(PaintingStrategy.DASHES);
vl3.SetLineWeight(1);

plot vl4 =  vl(4);
vl4.AssignValueColor(if IsNaN(LowestAll(vl(4).x)) then GlobalColor("NB") else GlobalColor("L"));
vl4.SetPaintingStrategy(PaintingStrategy.DASHES);
vl4.SetLineWeight(1);

plot vl5 =  vl(5).val;
vl5.AssignValueColor(if IsNaN(LowestAll(vl(5).x)) then GlobalColor("NB") else GlobalColor("L"));
vl5.SetPaintingStrategy(PaintingStrategy.DASHES);
vl5.SetLineWeight(1);

plot vl6 =  vl(6).val;
vl6.AssignValueColor(if IsNaN(LowestAll(vl(6).x)) then GlobalColor("NB") else GlobalColor("L"));
vl6.SetPaintingStrategy(PaintingStrategy.DASHES);
vl6.SetLineWeight(1);

plot vl7 =  vl(7).val;
vl7.AssignValueColor(if IsNaN(LowestAll(vl(7).x)) then GlobalColor("NB") else GlobalColor("L"));
vl7.SetPaintingStrategy(PaintingStrategy.DASHES);
vl7.SetLineWeight(1);

plot vl8 =  vl(8).val;
vl8.AssignValueColor(if IsNaN(LowestAll(vl(8).x)) then GlobalColor("NB") else GlobalColor("L"));
vl8.SetPaintingStrategy(PaintingStrategy.DASHES);
vl8.SetLineWeight(1);

plot vl9 =  vl(9).val;
vl9.AssignValueColor(if IsNaN(LowestAll(vl(9).x)) then GlobalColor("NB") else GlobalColor("L"));
vl9.SetPaintingStrategy(PaintingStrategy.DASHES);
vl9.SetLineWeight(1);

plot vl10 =  vl(10).val;
vl10.AssignValueColor(if IsNaN(LowestAll(vl(10).x)) then GlobalColor("NB") else GlobalColor("L"));
vl10.SetPaintingStrategy(PaintingStrategy.DASHES);
vl10.SetLineWeight(1);
;

AddLabel(1, " VAL: " +
if IsNaN(LowestAll(vl(1).x)) then "VL1: " + vl1 else
if IsNaN(LowestAll(vl(2).x)) then "VL2: " + vl2 else
if IsNaN(LowestAll(vl(3).x)) then "VL3: " + vl3 else
if IsNaN(LowestAll(vl(4).x)) then "VL4: " + vl4 else
if IsNaN(LowestAll(vl(5).x)) then "VL5: " + vl5 else
if IsNaN(LowestAll(vl(6).x)) then "VL6: " + vl6 else
if IsNaN(LowestAll(vl(7).x)) then "VL7: " + vl7 else
if IsNaN(LowestAll(vl(8).x)) then "VL8: " + vl8 else
if IsNaN(LowestAll(vl(9).x)) then "VL9: " + vl9 else
if IsNaN(LowestAll(vl(10).x)) then "VL10: " + vl10 else
"NO VL", Color.YELLOW) ;


input showbubbles = yes;
input bubblemover = 3;
def b  = bubblemover;
def b1 = b + 1;

AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v1[b], "1P " + v1 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v2[b], "2P " + v2 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v3[b], "3P " + v3 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v4[b], "4P " + v4 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v5[b], "5P " + v5 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v6[b], "6P " + v6 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v7[b], "7P " + v7 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v8[b], "8P " + v8 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v9[b], "9P " + v9 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v10[b], "10P " + v10 , GlobalColor("P"));

AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh1[b], "1H " + vh1 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh2[b], "2H " + vh2 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh3[b], "3H " + vh3 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh4[b], "4H " + vh4 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh5[b], "5H " + vh5 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh6[b], "6H " + vh6 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh7[b], "7H " + vh7 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh8[b], "8H " + vh8 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh9[b], "9H " + vh9 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh10[b], "10H " + vh10 , GlobalColor("H"));

AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl1[b], "1L " + vl1 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl2[b], "2L " + vl2 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl3[b], "3L " + vl3 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl4[b], "4L " + vl4 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl5[b], "5L " + vl5 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl6[b], "6L " + vl6 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl7[b], "7L " + vl7 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl8[b], "8L " + vl8 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl9[b], "9L " + vl9 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl10[b], "10L " + vl10 , GlobalColor("L"));

v1.HideBubble();
v2.HideBubble();
v3.HideBubble();
v4.HideBubble();
v5.HideBubble();
v6.HideBubble();
v7.HideBubble();
v8.HideBubble();
v9.HideBubble();
v10.HideBubble();

vh1.HideBubble();
vh2.HideBubble();
vh3.HideBubble();
vh4.HideBubble();
vh5.HideBubble();
vh6.HideBubble();
vh7.HideBubble();
vh8.HideBubble();
vh9.HideBubble();
vh10.HideBubble();

vl1.HideBubble();
vl2.HideBubble();
vl3.HideBubble();
vl4.HideBubble();
vl5.HideBubble();
vl6.HideBubble();
vl7.HideBubble();
vl8.HideBubble();
vl9.HideBubble();
vl10.HideBubble();

#Bubbles @ Crosses
DefineGlobalColor("HC", Color.light_red);
DefineGlobalColor("LC", Color.light_green);
DefineGlobalColor("PC", Color.orange);

input lookback = 2;
def ymd  = GetYYYYMMDD();
def y    = if ymd != ymd[1] then y[1] + 1 else y[1];

addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v1[-1]) and v1, v1, "P1", globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v2[-1]) and v2, v2, "P2",  globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v3[-1]) and v3, v3, "P3",  globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v4[-1]) and v4, v4, "P4",  globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v5[-1]) and v5, v5, "P5",  globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v6[-1]) and v6, v6, "P6",  globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v7[-1]) and v7, v7, "P7",  globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v8[-1]) and v8, v8, "P8",  globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v9[-1]) and v9, v9, "P9",  globalcolor("PC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(v10[-1]) and v10, v10, "P10",  globalcolor("PC"));


addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh1[-1]) and vh1, vh1, "H1", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh2[-1]) and vh2, vh2, "H2", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh3[-1]) and vh3, vh3, "H3", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh4[-1]) and vh4, vh4, "H4", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh5[-1]) and vh5, vh5, "H5", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh6[-1]) and vh6, vh6, "H6", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh7[-1]) and vh7, vh7, "H7", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh8[-1]) and vh8, vh8, "H8", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh9[-1]) and vh9, vh9, "H9", globalColor("HC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vh10[-1]) and vh10, vh10, "H10", globalColor("HC"));


addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl1[-1]) and vl1, vl1, "L1", globalColor("LC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl2[-1]) and vl2, vl2, "L2", globalColor("LC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl3[-1]) and vl3, vl3, "L3", globalColor("LC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl4[-1]) and vl4, vl4, "L4", globalColor("LC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl5[-1]) and vl5, vl5, "L5", globalColor("LC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl6[-1]) and vl6, vl6, "L6", globalColor("LC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl7[-1]) and vl7, vl7, "L7", globalColor("LC"))
;addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl8[-1]) and vl8, vl8, "L8", globalColor("LC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl9[-1]) and vl9, vl9, "L9", globalColor("LC"));
addchartBubble(if lookback <= highestall(y)-y then double.nan else isnan(vl10[-1]) and vl10, vl10, "L10", globalColor("LC"));
Click to expand...
 
Upvote 0 Downvote
SleepyZ said:
This was added to the end of the code
It will display a bubble whenever one of the Volume Profile Lines are crossed in a subsequent day.
The input lookback will limit how many recent days of crossing bubbles to show


Full Code with additional crossing bubbles
Click to expand...
Love the script, Is there any way to covert this from daily POC, HVA, LVA to hourly?

I tried on my own but failed miserably!

Thanks
 
Upvote 0 Downvote
sonnetss108 said:
Love the script, Is there any way to covert this from daily POC, HVA, LVA to hourly?

I tried on my own but failed miserably!

Thanks
Click to expand...

Here is an Hourly Version

Screenshot 2024-09-05 140945.jpg
Code: 
#VolumeProfile_Extended_POCs_HVAs_LVAs_for_x_Hoursback_and_Limited_Plots_when_crossed
#More can be added using the logic below
#Sleepyz - usethinkscript request @yardlay
#Added HVA * LVA Lines and Plot limit when crossed for all 3;
#Added Price to Most Recent Naked Labels

script v {
    input daysback = 1;
    def volp = reference VolumeProfile("time per profile" = "HOUR", "on expansion" = no, "price per row height mode" = "TICKSIZE");
    def yyyymmdd = GetYYYYMMDD();
    def seconds = SecondsFromTime(0);
    def day_number = DaysFromDate(First(yyyymmdd)) + GetDayOfWeek(First(yyyymmdd));
    def period = Floor(seconds / 3600 + day_number * 24);
    def ymd  = period;
    def y    = if ymd != ymd[1] then y[1] + 1 else y[1];
    def pc   = if IsNaN(close)
                  then pc[1] else
               if y == HighestAll(y) - daysback
                  then volp  else
               pc[1];
    plot x    = if y > HighestAll(y) - daysback and Between(pc, low, high)
           then BarNumber() else Double.NaN;

    plot poc = if IsNaN(LowestAll(x))
           then pc
           else if BarNumber() > LowestAll(x)
           then Double.NaN
           else pc;
}
script vh {
    input daysback = 1;
    def volh = reference VolumeProfile("time per profile" = "HOUR", "on expansion" = no, "price per row height mode" = "TICKSIZE").VAHigh;
    def yyyymmdd = GetYYYYMMDD();
    def seconds = SecondsFromTime(0);
    def day_number = DaysFromDate(First(yyyymmdd)) + GetDayOfWeek(First(yyyymmdd));
    def period = Floor(seconds / 3600 + day_number * 24);
    def ymd  = period;
    def y    = if ymd != ymd[1] then y[1] + 1 else y[1];
    def ph   = if IsNaN(close)
                  then ph[1] else
               if y == HighestAll(y) - daysback
                  then volh  else
               ph[1];
    plot x    = if y > HighestAll(y) - daysback and Between(ph, low, high)
           then BarNumber() else Double.NaN;

    plot hva = if IsNaN(LowestAll(x))
           then ph
           else if BarNumber() > LowestAll(x)
           then Double.NaN
           else ph;
}
script vl {
    input daysback = 1;
    def voll = reference VolumeProfile("time per profile" = "HOUR", "on expansion" = no, "price per row height mode" = "TICKSIZE").VALow;
    def yyyymmdd = GetYYYYMMDD();
    def seconds = SecondsFromTime(0);
    def day_number = DaysFromDate(First(yyyymmdd)) + GetDayOfWeek(First(yyyymmdd));
    def period = Floor(seconds / 3600 + day_number * 24);
    def ymd  = period;
    def y    = if ymd != ymd[1] then y[1] + 1 else y[1];
    def pl   = if IsNaN(close)
                  then pl[1] else
               if y == HighestAll(y) - daysback
                  then voll  else
               pl[1];
    plot x    = if y > HighestAll(y) - daysback and Between(pl, low, high)
           then BarNumber() else Double.NaN;

    plot val = if IsNaN(LowestAll(x))
           then pl
           else if BarNumber() > LowestAll(x)
           then Double.NaN
           else pl;
}

DefineGlobalColor("H", Color.YELLOW);
DefineGlobalColor("L", Color.YELLOW);
DefineGlobalColor("P", Color.WHITE);
DefineGlobalColor("NB", Color.MAGENTA);


plot v1 =  v(1).poc;
v1.AssignValueColor(if IsNaN(LowestAll(v(1).x)) then GlobalColor("NB") else GlobalColor("P"));
v1.SetPaintingStrategy(PaintingStrategy.DASHES);
v1.SetLineWeight(1);

plot v2 =  v(2).poc;
v2.AssignValueColor(if IsNaN(LowestAll(v(2).x)) then GlobalColor("NB") else GlobalColor("P"));
v2.SetPaintingStrategy(PaintingStrategy.DASHES);
v2.SetLineWeight(1);

plot v3 =  v(3).poc;
v3.AssignValueColor(if IsNaN(LowestAll(v(3).x)) then GlobalColor("NB") else GlobalColor("P"));
v3.SetPaintingStrategy(PaintingStrategy.DASHES);
v3.SetLineWeight(1);

plot v4 =  v(4).poc;
v4.AssignValueColor(if IsNaN(LowestAll(v(4).x)) then GlobalColor("NB") else GlobalColor("P"));
v4.SetPaintingStrategy(PaintingStrategy.DASHES);
v4.SetLineWeight(1);

plot v5 =  v(5).poc;
v5.AssignValueColor(if IsNaN(LowestAll(v(5).x)) then GlobalColor("NB") else GlobalColor("P"));
v5.SetPaintingStrategy(PaintingStrategy.DASHES);
v5.SetLineWeight(1);

plot v6 =  v(6).poc;
v6.AssignValueColor(if IsNaN(LowestAll(v(6).x)) then GlobalColor("NB") else GlobalColor("P"));
v6.SetPaintingStrategy(PaintingStrategy.DASHES);
v6.SetLineWeight(1);

plot v7 =  v(7).poc;
v7.AssignValueColor(if IsNaN(LowestAll(v(7).x)) then GlobalColor("NB") else GlobalColor("P"));
v7.SetPaintingStrategy(PaintingStrategy.DASHES);
v7.SetLineWeight(1);

plot v8 =  v(8).poc;
v8.AssignValueColor(if IsNaN(LowestAll(v(8).x)) then GlobalColor("NB") else GlobalColor("P"));
v8.SetPaintingStrategy(PaintingStrategy.DASHES);
v8.SetLineWeight(1);

plot v9 =  v(9).poc;
v9.AssignValueColor(if IsNaN(LowestAll(v(9).x)) then GlobalColor("NB") else GlobalColor("P"));
v9.SetPaintingStrategy(PaintingStrategy.DASHES);
v9.SetLineWeight(1);

plot v10 =  v(10).poc;
v10.AssignValueColor(if IsNaN(LowestAll(v(10).x)) then GlobalColor("NB") else GlobalColor("P"));
v10.SetPaintingStrategy(PaintingStrategy.DASHES);
v10.SetLineWeight(1);
;

AddLabel(1, "Most Recent Naked --> POC: " +
if IsNaN(LowestAll(v(1).x)) then "V1: " + v1 else
if IsNaN(LowestAll(v(2).x)) then "V2: " + v2 else
if IsNaN(LowestAll(v(3).x)) then "V3: " + v3 else
if IsNaN(LowestAll(v(4).x)) then "V4: " + v4 else
if IsNaN(LowestAll(v(5).x)) then "V5: " + v5 else
if IsNaN(LowestAll(v(6).x)) then "V6: " + v6 else
if IsNaN(LowestAll(v(7).x)) then "V7: " + v7 else
if IsNaN(LowestAll(v(8).x)) then "V8: " + v8 else
if IsNaN(LowestAll(v(9).x)) then "V9: " + v9 else
if IsNaN(LowestAll(v(10).x)) then "V10: " + v10 else
"NO V", Color.YELLOW) ;

plot vh1 =  vh(1).hva;
vh1.AssignValueColor(if IsNaN(LowestAll(vh(1).x)) then GlobalColor("NB") else GlobalColor("H"));
vh1.SetPaintingStrategy(PaintingStrategy.DASHES);
vh1.SetLineWeight(1);

plot vh2 =  vh(2).hva;
vh2.AssignValueColor(if IsNaN(LowestAll(vh(2).x)) then GlobalColor("NB") else GlobalColor("H"));
vh2.SetPaintingStrategy(PaintingStrategy.DASHES);
vh2.SetLineWeight(1);

plot vh3 =  vh(3).hva;
vh3.AssignValueColor(if IsNaN(LowestAll(vh(3).x)) then GlobalColor("NB") else GlobalColor("H"));
vh3.SetPaintingStrategy(PaintingStrategy.DASHES);
vh3.SetLineWeight(1);

plot vh4 =  vh(4).hva;
vh4.AssignValueColor(if IsNaN(LowestAll(vh(4).x)) then GlobalColor("NB") else GlobalColor("H"));
vh4.SetPaintingStrategy(PaintingStrategy.DASHES);
vh4.SetLineWeight(1);

plot vh5 =  vh(5).hva;
vh5.AssignValueColor(if IsNaN(LowestAll(vh(5).x)) then GlobalColor("NB") else GlobalColor("H"));
vh5.SetPaintingStrategy(PaintingStrategy.DASHES);
vh5.SetLineWeight(1);

plot vh6 =  vh(6).hva;
vh6.AssignValueColor(if IsNaN(LowestAll(vh(6).x)) then GlobalColor("NB") else GlobalColor("H"));
vh6.SetPaintingStrategy(PaintingStrategy.DASHES);
vh6.SetLineWeight(1);

plot vh7 =  vh(7).hva;
vh7.AssignValueColor(if IsNaN(LowestAll(vh(7).x)) then GlobalColor("NB") else GlobalColor("H"));
vh7.SetPaintingStrategy(PaintingStrategy.DASHES);
vh7.SetLineWeight(1);

plot vh8 =  vh(8).hva;
vh8.AssignValueColor(if IsNaN(LowestAll(vh(8).x)) then GlobalColor("NB") else GlobalColor("H"));
vh8.SetPaintingStrategy(PaintingStrategy.DASHES);
vh8.SetLineWeight(1);

plot vh9 =  vh(9).hva;
vh9.AssignValueColor(if IsNaN(LowestAll(vh(9).x)) then GlobalColor("NB") else GlobalColor("H"));
vh9.SetPaintingStrategy(PaintingStrategy.DASHES);
vh9.SetLineWeight(1);

plot vh10 =  vh(10).hva;
vh10.AssignValueColor(if IsNaN(LowestAll(vh(10).x)) then GlobalColor("NB") else GlobalColor("H"));
vh10.SetPaintingStrategy(PaintingStrategy.DASHES);
vh10.SetLineWeight(1);
;

AddLabel(1, " VAH: " +
if IsNaN(LowestAll(vh(1).x)) then "VH1: " + vh1 else
if IsNaN(LowestAll(vh(2).x)) then "VH2: " + vh2 else
if IsNaN(LowestAll(vh(3).x)) then "VH3: " + vh3 else
if IsNaN(LowestAll(vh(4).x)) then "VH4: " + vh4 else
if IsNaN(LowestAll(vh(5).x)) then "VH5: " + vh5 else
if IsNaN(LowestAll(vh(6).x)) then "VH6: " + vh6 else
if IsNaN(LowestAll(vh(7).x)) then "VH7: " + vh7 else
if IsNaN(LowestAll(vh(8).x)) then "VH8: " + vh8 else
if IsNaN(LowestAll(vh(9).x)) then "VH9: " + vh9 else
if IsNaN(LowestAll(vh(10).x)) then "VH10: " + vh10 else
"NO VH", Color.WHITE) ;


plot vl1 =  vl(1).val;
vl1.AssignValueColor(if IsNaN(LowestAll(vl(1).x)) then GlobalColor("NB") else GlobalColor("L"));
vl1.SetPaintingStrategy(PaintingStrategy.DASHES);
vl1.SetLineWeight(1);

plot vl2 =  vl(2).val;
vl2.AssignValueColor(if IsNaN(LowestAll(vl(2).x)) then GlobalColor("NB") else GlobalColor("L"));
vl2.SetPaintingStrategy(PaintingStrategy.DASHES);
vl2.SetLineWeight(1);

plot vl3 =  vl(3).val;
vl3.AssignValueColor(if IsNaN(LowestAll(vl(3).x)) then GlobalColor("NB") else GlobalColor("L"));
vl3.SetPaintingStrategy(PaintingStrategy.DASHES);
vl3.SetLineWeight(1);

plot vl4 =  vl(4);
vl4.AssignValueColor(if IsNaN(LowestAll(vl(4).x)) then GlobalColor("NB") else GlobalColor("L"));
vl4.SetPaintingStrategy(PaintingStrategy.DASHES);
vl4.SetLineWeight(1);

plot vl5 =  vl(5).val;
vl5.AssignValueColor(if IsNaN(LowestAll(vl(5).x)) then GlobalColor("NB") else GlobalColor("L"));
vl5.SetPaintingStrategy(PaintingStrategy.DASHES);
vl5.SetLineWeight(1);

plot vl6 =  vl(6).val;
vl6.AssignValueColor(if IsNaN(LowestAll(vl(6).x)) then GlobalColor("NB") else GlobalColor("L"));
vl6.SetPaintingStrategy(PaintingStrategy.DASHES);
vl6.SetLineWeight(1);

plot vl7 =  vl(7).val;
vl7.AssignValueColor(if IsNaN(LowestAll(vl(7).x)) then GlobalColor("NB") else GlobalColor("L"));
vl7.SetPaintingStrategy(PaintingStrategy.DASHES);
vl7.SetLineWeight(1);

plot vl8 =  vl(8).val;
vl8.AssignValueColor(if IsNaN(LowestAll(vl(8).x)) then GlobalColor("NB") else GlobalColor("L"));
vl8.SetPaintingStrategy(PaintingStrategy.DASHES);
vl8.SetLineWeight(1);

plot vl9 =  vl(9).val;
vl9.AssignValueColor(if IsNaN(LowestAll(vl(9).x)) then GlobalColor("NB") else GlobalColor("L"));
vl9.SetPaintingStrategy(PaintingStrategy.DASHES);
vl9.SetLineWeight(1);

plot vl10 =  vl(10).val;
vl10.AssignValueColor(if IsNaN(LowestAll(vl(10).x)) then GlobalColor("NB") else GlobalColor("L"));
vl10.SetPaintingStrategy(PaintingStrategy.DASHES);
vl10.SetLineWeight(1);
;

AddLabel(1, " VAL: " +
if IsNaN(LowestAll(vl(1).x)) then "VL1: " + vl1 else
if IsNaN(LowestAll(vl(2).x)) then "VL2: " + vl2 else
if IsNaN(LowestAll(vl(3).x)) then "VL3: " + vl3 else
if IsNaN(LowestAll(vl(4).x)) then "VL4: " + vl4 else
if IsNaN(LowestAll(vl(5).x)) then "VL5: " + vl5 else
if IsNaN(LowestAll(vl(6).x)) then "VL6: " + vl6 else
if IsNaN(LowestAll(vl(7).x)) then "VL7: " + vl7 else
if IsNaN(LowestAll(vl(8).x)) then "VL8: " + vl8 else
if IsNaN(LowestAll(vl(9).x)) then "VL9: " + vl9 else
if IsNaN(LowestAll(vl(10).x)) then "VL10: " + vl10 else
"NO VL", Color.YELLOW) ;


input showbubbles = yes;
input bubblemover = 3;
def b  = bubblemover;
def b1 = b + 1;

AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v1[b], "1P " + v1 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v2[b], "2P " + v2 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v3[b], "3P " + v3 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v4[b], "4P " + v4 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v5[b], "5P " + v5 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v6[b], "6P " + v6 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v7[b], "7P " + v7 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v8[b], "8P " + v8 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v9[b], "9P " + v9 , GlobalColor("P"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), v10[b], "10P " + v10 , GlobalColor("P"));

AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh1[b], "1H " + vh1 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh2[b], "2H " + vh2 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh3[b], "3H " + vh3 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh4[b], "4H " + vh4 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh5[b], "5H " + vh5 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh6[b], "6H " + vh6 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh7[b], "7H " + vh7 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh8[b], "8H " + vh8 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh9[b], "9H " + vh9 , GlobalColor("H"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vh10[b], "10H " + vh10 , GlobalColor("H"));

AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl1[b], "1L " + vl1 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl2[b], "2L " + vl2 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl3[b], "3L " + vl3 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl4[b], "4L " + vl4 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl5[b], "5L " + vl5 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl6[b], "6L " + vl6 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl7[b], "7L " + vl7 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl8[b], "8L " + vl8 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl9[b], "9L " + vl9 , GlobalColor("L"));
AddChartBubble(showbubbles and IsNaN(close[b]) and !IsNaN(close[b1]), vl10[b], "10L " + vl10 , GlobalColor("L"));

v1.HideBubble();
v2.HideBubble();
v3.HideBubble();
v4.HideBubble();
v5.HideBubble();
v6.HideBubble();
v7.HideBubble();
v8.HideBubble();
v9.HideBubble();
v10.HideBubble();

vh1.HideBubble();
vh2.HideBubble();
vh3.HideBubble();
vh4.HideBubble();
vh5.HideBubble();
vh6.HideBubble();
vh7.HideBubble();
vh8.HideBubble();
vh9.HideBubble();
vh10.HideBubble();

vl1.HideBubble();
vl2.HideBubble();
vl3.HideBubble();
vl4.HideBubble();
vl5.HideBubble();
vl6.HideBubble();
vl7.HideBubble();
vl8.HideBubble();
vl9.HideBubble();
vl10.HideBubble();

#Bubbles @ Crosses
DefineGlobalColor("HC", Color.LIGHT_RED);
DefineGlobalColor("LC", Color.LIGHT_GREEN);
DefineGlobalColor("PC", Color.ORANGE);

input lookback = 2;
def ymd  = GetYYYYMMDD();
def y    = if ymd != ymd[1] then y[1] + 1 else y[1];

AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(v1[-1]) and v1, v1, "P1", GlobalColor("PC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(v2[-1]) and v2, v2, "P2",  GlobalColor("PC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(v3[-1]) and v3, v3, "P3",  GlobalColor("PC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(v4[-1]) and v4, v4, "P4",  GlobalColor("PC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(v5[-1]) and v5, v5, "P5",  GlobalColor("PC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(v6[-1]) and v6, v6, "P6",  GlobalColor("PC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(v7[-1]) and v7, v7, "P7",  GlobalColor("PC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(v8[-1]) and v8, v8, "P8",  GlobalColor("PC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(v9[-1]) and v9, v9, "P9",  GlobalColor("PC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(v10[-1]) and v10, v10, "P10",  GlobalColor("PC"));


AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vh1[-1]) and vh1, vh1, "H1", GlobalColor("HC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vh2[-1]) and vh2, vh2, "H2", GlobalColor("HC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vh3[-1]) and vh3, vh3, "H3", GlobalColor("HC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vh4[-1]) and vh4, vh4, "H4", GlobalColor("HC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vh5[-1]) and vh5, vh5, "H5", GlobalColor("HC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vh6[-1]) and vh6, vh6, "H6", GlobalColor("HC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vh7[-1]) and vh7, vh7, "H7", GlobalColor("HC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vh8[-1]) and vh8, vh8, "H8", GlobalColor("HC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vh9[-1]) and vh9, vh9, "H9", GlobalColor("HC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vh10[-1]) and vh10, vh10, "H10", GlobalColor("HC"));


AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vl1[-1]) and vl1, vl1, "L1", GlobalColor("LC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vl2[-1]) and vl2, vl2, "L2", GlobalColor("LC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vl3[-1]) and vl3, vl3, "L3", GlobalColor("LC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vl4[-1]) and vl4, vl4, "L4", GlobalColor("LC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vl5[-1]) and vl5, vl5, "L5", GlobalColor("LC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vl6[-1]) and vl6, vl6, "L6", GlobalColor("LC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vl7[-1]) and vl7, vl7, "L7", GlobalColor("LC"))
;
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vl8[-1]) and vl8, vl8, "L8", GlobalColor("LC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vl9[-1]) and vl9, vl9, "L9", GlobalColor("LC"));
AddChartBubble(if lookback <= HighestAll(y) - y then Double.NaN else IsNaN(vl10[-1]) and vl10, vl10, "L10", GlobalColor("LC"));
Click to expand...
 
Upvote 0 Downvote
You must log in or register to reply here.
Thread starter Similar threads Forum Replies Date
N Extend lines from high Relative Vol and Vwap at close script. Questions 0
T Extend All Time Low study to the right for a specific number of days Questions 0
A Extend calculated level until crossed HL2 Questions 7
C Extend vwap bands from prior time period Questions 8
R How to extend each price line fully to the left and right Questions 2

Similar threads

Not the exact question you're looking for?

Start a new thread and receive assistance from our community.

87k+ Posts
354 Online
Create Post

Similar threads

Similar threads

The Market Trading Game Changer

Join 2,500+ subscribers inside the useThinkScript VIP Membership Club
  • Exclusive indicators
  • Proven strategies & setups
  • Private Discord community
  • ‘Buy The Dip’ signal alerts
  • Exclusive members-only content
  • Add-ons and resources
  • 1 full year of unlimited support
Try VIP Club Today

Frequently Asked Questions

What is useThinkScript?

useThinkScript is the #1 community of stock market investors using indicators and other tools to power their trading strategies. Traders of all skill levels use our forums to learn about scripting and indicators, help each other, and discover new ways to gain an edge in the markets.

How do I get started?

We get it. Our forum can be intimidating, if not overwhelming. With thousands of topics, tens of thousands of posts, our community has created an incredibly deep knowledge base for stock traders. No one can ever exhaust every resource provided on our site.

If you are new, or just looking for guidance, here are some helpful links to get you started.

What are the benefits of VIP Membership?
VIP members get exclusive access to these proven and tested premium indicators: Buy the Dip, Advanced Market Moves 2.0, Take Profit, and Volatility Trading Range. In addition, VIP members get access to over 50 VIP-only custom indicators, add-ons, and strategies, private VIP-only forums, private Discord channel to discuss trades and strategies in real-time, customer support, trade alerts, and much more. Learn all about VIP membership here.
How can I access the premium indicators?
To access the premium indicators, which are plug and play ready, sign up for VIP membership here.
Back
Top