# Pivot PP Scanner thinkscript - Need help

#### veerasareddy

##### New member
Hello Friends,

Could someone help me to give a think-script scanner for the below conditions?

If today's current price is greater than or less than (Previous day high + Previous day low + previous Day close ) / 3

#### TrueDepth

##### Member
VIP
What about the days before the previous day? Should they be above or below the HLC/3?? Or do you literally want just the previous day greater than HLC3?

#### veerasareddy

##### New member
Hello,

I want just the previous day. Thank you

#### veerasareddy

##### New member
Thank you soomuch.

#### qinking127

##### New member
below is my pivot point script. i want to find stocks from my watclist that the stock price is near pivot points. Need help to convert it to a scanner.

Code:
``````input timeFrame = {DAY, default WEEK, MONTH};
input showOnlyToday = no;

def H = high(period = timeFrame)[1];
def L = low(period = timeFrame)[1];
def C = close(period = timeFrame)[1];

def calc_PP = (H + L + C) / 3;
def calc_R1 =  (2 * calc_PP) - L;
def calc_R2 = calc_PP + H - L;
def calc_R3 = H + 2 * (calc_PP - L);

def calc_S1 = (2 * calc_PP) - H;
def calc_S2 = calc_PP - H + L;
def calc_S3 = L - 2 * (H - calc_PP);

plot R3;
plot R2;
plot R1;
plot PP;
plot S1;
plot S2;
plot S3;

if (showOnlyToday and !IsNaN(close(period = timeFrame)[-1])) or
(getAggregationPeriod() > if timeframe == timeframe.DAY
then AggregationPeriod.DAY
else if timeframe == timeframe.WEEK
then AggregationPeriod.WEEK
else AggregationPeriod.MONTH)

then {

R1 = Double.NaN;

R2 = Double.NaN;

R3 = Double.NaN;

PP = Double.NaN;

S1 = Double.NaN;

S2 = Double.NaN;

S3 = Double.NaN;

}
else {

R1 = calc_R1;

R2 = calc_R2;

R3 = calc_R3;

PP = calc_PP;

S1 = calc_S1;

S2 = calc_S2;

S3 = calc_S3;

}

R1.SetDefaultColor(color.red);
R2.SetDefaultColor(color.red);
R3.SetDefaultColor(color.red);
S1.SetDefaultColor(color.green);
S2.SetDefaultColor(color.green);
S3.SetDefaultColor(color.green);

R1.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
R2.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
R3.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
S1.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
S2.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);
S3.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);;

PP.DefineColor("Color", CreateColor(0, 102, 204));
PP.AssignValueColor(PP.color("Color"));
PP.SetPaintingStrategy(PaintingStrategy.HORIZONTAL);``````