| //+------------------------------------------------------------------+
|
| //| DinexSpace | Pivot Points |
|
| //| Classic, Fibonacci and Camarilla pivot levels from the previous |
|
| //| day, week or month, one segment per period, with labels. |
|
| //| Values come from closed D1/W1/MN1 bars only. |
|
| //| It only draws levels; it gives no trade signals. |
|
| //+------------------------------------------------------------------+
|
| #property copyright "(c) 2026 DinexSpace"
|
| #property version "1.00"
|
| #property description "Classic, Fibonacci and Camarilla pivots from the previous day, week or month."
|
| #property description "One segment per period with price labels. Draws levels only, no signals."
|
| #property strict
|
| #property indicator_chart_window
|
| #property indicator_buffers 0
|
| #property indicator_plots 0
|
|
|
| enum ENUM_PIVOT_TYPE
|
| {
|
| PIVOT_CLASSIC = 0, // Classic
|
| PIVOT_FIBONACCI = 1, // Fibonacci
|
| PIVOT_CAMARILLA = 2 // Camarilla
|
| };
|
|
|
| enum ENUM_PIVOT_TF
|
| {
|
| PIVOT_DAY = 0, // Previous day
|
| PIVOT_WEEK = 1, // Previous week
|
| PIVOT_MONTH = 2 // Previous month
|
| };
|
|
|
| input group "Pivots"
|
| input ENUM_PIVOT_TYPE InpType = PIVOT_CLASSIC; // Type
|
| input ENUM_PIVOT_TF InpBase = PIVOT_DAY; // Based on
|
| input int InpLevels = 3; // Levels each side (Camarilla up to 4)
|
|
|
| input group "Display"
|
| input color InpColP = C'255,176,0'; // Pivot
|
| input color InpColR = clrSpringGreen; // Resistance (R)
|
| input color InpColS = clrAqua; // Support (S)
|
| input int InpHist = 3; // Periods of history
|
| input ENUM_LINE_STYLE InpStyle = STYLE_SOLID; // Line style
|
| input bool InpLabels = true; // Labels with price (current period)
|
|
|
| const string PFX = "DNXPV_";
|
| datetime g_lastPeriod = 0;
|
|
|
| ENUM_TIMEFRAMES BaseTf()
|
| {
|
| if(InpBase == PIVOT_WEEK) return PERIOD_W1;
|
| if(InpBase == PIVOT_MONTH) return PERIOD_MN1;
|
| return PERIOD_D1;
|
| }
|
|
|
| // Level k of the period `d` periods back: 0 = pivot, +1..+4 = R1..R4, -1..-4 = S1..S4.
|
| // Returns false when the level does not exist for this type or the data is not ready.
|
| bool Level(int k, int d, double &y)
|
| {
|
| ENUM_TIMEFRAMES tf = BaseTf();
|
| double h = iHigh(_Symbol, tf, d + 1), l = iLow(_Symbol, tf, d + 1), c = iClose(_Symbol, tf, d + 1);
|
| if(h <= 0 || l <= 0 || c <= 0 || MathAbs(k) > InpLevels)
|
| return false;
|
| double r = h - l, pp = (h + l + c) / 3.0;
|
| int a = MathAbs(k), sg = (k > 0) ? 1 : -1;
|
| if(k == 0) { y = pp; return true; }
|
| if(InpType == PIVOT_CLASSIC)
|
| {
|
| if(a == 1) { y = (k > 0) ? 2 * pp - l : 2 * pp - h; return true; }
|
| if(a == 2) { y = pp + sg * r; return true; }
|
| if(a == 3) { y = (k > 0) ? h + 2 * (pp - l) : l - 2 * (h - pp); return true; }
|
| return false;
|
| }
|
| if(InpType == PIVOT_FIBONACCI)
|
| {
|
| double f[3] = {0.382, 0.618, 1.0};
|
| if(a > 3) return false;
|
| y = pp + sg * f[a - 1] * r;
|
| return true;
|
| }
|
| double cm[4] = {12.0, 6.0, 4.0, 2.0};
|
| y = c + sg * r * 1.1 / cm[a - 1];
|
| return true;
|
| }
|
|
|
| string Tag(int k) { return (k == 0) ? "P" : ((k > 0) ? "R" : "S") + IntegerToString(MathAbs(k)); }
|
| color Col(int k) { return (k == 0) ? InpColP : (k > 0 ? InpColR : InpColS); }
|
|
|
| void DrawPeriod(int d, datetime t0, datetime t1, bool current)
|
| {
|
| for(int k = -4; k <= 4; k++)
|
| {
|
| string nm = PFX + IntegerToString(d) + "_" + IntegerToString(k + 4);
|
| double y;
|
| if(!Level(k, d, y))
|
| {
|
| ObjectDelete(0, nm);
|
| ObjectDelete(0, nm + "_lbl");
|
| continue;
|
| }
|
| if(ObjectFind(0, nm) < 0)
|
| {
|
| ObjectCreate(0, nm, OBJ_TREND, 0, t0, y, t1, y);
|
| ObjectSetInteger(0, nm, OBJPROP_RAY_RIGHT, false);
|
| ObjectSetInteger(0, nm, OBJPROP_SELECTABLE, false);
|
| ObjectSetInteger(0, nm, OBJPROP_HIDDEN, true);
|
| ObjectSetInteger(0, nm, OBJPROP_BACK, true);
|
| }
|
| ObjectSetInteger(0, nm, OBJPROP_COLOR, Col(k));
|
| ObjectSetInteger(0, nm, OBJPROP_STYLE, InpStyle);
|
| ObjectMove(0, nm, 0, t0, y);
|
| ObjectMove(0, nm, 1, t1, y);
|
| string lb = nm + "_lbl";
|
| if(current && InpLabels)
|
| {
|
| datetime tl = t1 + 2 * PeriodSeconds(_Period);
|
| if(ObjectFind(0, lb) < 0)
|
| {
|
| ObjectCreate(0, lb, OBJ_TEXT, 0, tl, y);
|
| ObjectSetInteger(0, lb, OBJPROP_ANCHOR, ANCHOR_LEFT);
|
| ObjectSetInteger(0, lb, OBJPROP_FONTSIZE, 8);
|
| ObjectSetInteger(0, lb, OBJPROP_SELECTABLE, false);
|
| ObjectSetInteger(0, lb, OBJPROP_HIDDEN, true);
|
| }
|
| ObjectSetInteger(0, lb, OBJPROP_COLOR, Col(k));
|
| ObjectMove(0, lb, 0, tl, y);
|
| ObjectSetString(0, lb, OBJPROP_TEXT, Tag(k) + " " + DoubleToString(y, _Digits));
|
| }
|
| else
|
| ObjectDelete(0, lb);
|
| }
|
| }
|
|
|
| int OnInit()
|
| {
|
| if(InpLevels < 1 || InpLevels > 4 || InpHist < 1 || InpHist > 30)
|
| return INIT_PARAMETERS_INCORRECT;
|
| g_lastPeriod = 0;
|
| return INIT_SUCCEEDED;
|
| }
|
|
|
| void OnDeinit(const int reason)
|
| {
|
| ObjectsDeleteAll(0, PFX);
|
| }
|
|
|
| int OnCalculate(const int rates_total, const int prev_calculated,
|
| const datetime &time[], const double &open[], const double &high[],
|
| const double &low[], const double &close[], const long &tick_volume[],
|
| const long &volume[], const int &spread[])
|
| {
|
| if(rates_total < 2)
|
| return 0;
|
| ENUM_TIMEFRAMES tf = BaseTf();
|
| if(PeriodSeconds(_Period) >= PeriodSeconds(tf))
|
| return rates_total; // pivots need a chart timeframe below the pivot period
|
| ArraySetAsSeries(time, true);
|
| datetime cur = iTime(_Symbol, tf, 0);
|
| if(cur == 0)
|
| return 0; // history not loaded yet: try again next tick
|
| bool full = (prev_calculated == 0 || cur != g_lastPeriod);
|
| if(full)
|
| ObjectsDeleteAll(0, PFX);
|
| for(int d = full ? InpHist - 1 : 0; d >= 0; d--)
|
| {
|
| datetime t0 = iTime(_Symbol, tf, d);
|
| if(t0 == 0)
|
| continue;
|
| datetime t1 = (d == 0) ? time[0] : iTime(_Symbol, tf, d - 1) - PeriodSeconds(_Period);
|
| DrawPeriod(d, t0, t1, d == 0);
|
| }
|
| g_lastPeriod = cur;
|
| return rates_total;
|
| }
|
| //+------------------------------------------------------------------+
|
