TimeFrameSet(inDaily);
P = ((H + L + C) / 3);
R1 = ((2 * P) -
L);
S1 = ((2 * P) -
H);
R2 = ((P - S1) + R1);
R3 = (P -S1)+ R2;
S3 = P - (R2 - S1);
S2 = (P - (R1 - S1));
TimeFrameRestore();
Daily_Pivot = TimeFrameExpand( P, inDaily );
Pivot_Approach_Alert1=(H-Daily_Pivot) < 0.0010 AND (H-Daily_Pivot) > 0;
Pivot_Approach_Alert2=(L-Daily_Pivot) < 0.0010 AND (L-Daily_Pivot) >
0 AND C >
Daily_Pivot;
AlertIf(barcomplete AND Pivot_Approach_Alert1, "EMAIL", " Pivot_Approach_Alert1 BuyStop =" + WriteVal
(Daily_Pivot+0.0020,15.4) + " 21P_Low is =
" + WriteVal(LLV( Low, 21 ),1.4) + " Pivot is " + WriteVal (Daily_Pivot,15.4) + " Difference is " +WriteVal((L-Daily_Pivot),1.4) + WriteIf(m1 >0," Uptrend"," DownTrend") +WriteIf(IsPrime( Number_Low
)," Prime_Low"," "), 1 );
AlertIf(barcomplete AND
Pivot_Approach_Alert2, "EMAIL", " Pivot_Approach_Alert2 BuyStop =" +
WriteVal
(High+0.0010,15.4)+" 21P_Low is =
" + WriteVal(LLV( Low, 21 ),1.4) + " Pivot is " + WriteVal (Daily_Pivot,15.4) + " Difference is " +
WriteVal((L-Daily_Pivot),1.4) +WriteIf(m1 >0," Pullback in Uptrend","-") +WriteIf(IsPrime( Number_Low
)," Prime_Low"," "), 4 );