oakscriptjs 0.7.2 → 0.8.1

package/dist/index.cjs

@@ -22,6 +22,10 @@ var index_exports = {};
 __export(index_exports, {
   BarData: () => BarData,
   LightweightChartsAdapter: () => LightweightChartsAdapter,
+  STRATEGY_CONSTANTS: () => STRATEGY_CONSTANTS,
+  STRATEGY_DEFAULTS: () => STRATEGY_DEFAULTS,
+  STRATEGY_NUMBER_VARIABLES: () => STRATEGY_NUMBER_VARIABLES,
+  STRATEGY_TEXT_VARIABLES: () => STRATEGY_TEXT_VARIABLES,
   Series: () => Series,
   SimpleInputAdapter: () => SimpleInputAdapter,
   VERSION: () => VERSION,
@@ -29,11 +33,13 @@ __export(index_exports, {
   abs: () => abs,
   alertcondition: () => alertcondition,
   array: () => array_exports,
+  at: () => at,
   atr: () => atr2,
   avg: () => avg,
   bb: () => bb2,
   box: () => box_exports,
   calculateZigZag: () => calculateZigZag,
+  callsite: () => callsite_exports,
   ceil: () => ceil,
   change: () => change2,
   chartPoint: () => chartpoint_exports,
@@ -44,9 +50,10 @@ __export(index_exports, {
   compare: () => compare_exports,
   cos: () => cos,
   createPlot: () => createPlot,
-  crossover: () => crossover2,
-  crossunder: () => crossunder2,
+  crossover: () => crossover3,
+  crossunder: () => crossunder3,
   cum: () => cum2,
+  div: () => div,
   ema: () => ema2,
   exp: () => exp,
   fixnan: () => fixnan,
@@ -56,6 +63,7 @@ __export(index_exports, {
   getHigh: () => getHigh,
   getLow: () => getLow,
   getOpen: () => getOpen,
+  getSource: () => getSource,
   getSourceSeries: () => getSourceSeries,
   hline: () => hline,
   indicator: () => indicator,
@@ -193,13 +201,47 @@ __export(ta_exports, {
   wvad: () => wvad,
   zigzag: () => zigzag
 });
+
+// src/compare/index.ts
+var compare_exports = {};
+__export(compare_exports, {
+  EPSILON: () => EPSILON,
+  eq: () => eq,
+  ge: () => ge,
+  gt: () => gt,
+  le: () => le,
+  lt: () => lt,
+  ne: () => ne
+});
+var EPSILON = 1e-10;
+var valid = (a, b2) => !Number.isNaN(a) && !Number.isNaN(b2);
+function eq(a, b2) {
+  return valid(a, b2) && Math.abs(a - b2) <= EPSILON;
+}
+function ne(a, b2) {
+  return valid(a, b2) && Math.abs(a - b2) > EPSILON;
+}
+function lt(a, b2) {
+  return valid(a, b2) && b2 - a > EPSILON;
+}
+function le(a, b2) {
+  return valid(a, b2) && a - b2 <= EPSILON;
+}
+function gt(a, b2) {
+  return valid(a, b2) && a - b2 > EPSILON;
+}
+function ge(a, b2) {
+  return valid(a, b2) && b2 - a <= EPSILON;
+}
+
+// src/ta/index.ts
 function sma(source, length2) {
   const result = [];
   const len = Math.floor(length2);
   const window = [];
   for (let i = 0; i < source.length; i++) {
     const v = source[i];
-    if (v !== void 0 && v !== null && !Number.isNaN(v)) {
+    if (v !== void 0 && v !== null && Number.isFinite(v)) {
       window.push(v);
       if (window.length > len) window.shift();
     }
@@ -384,7 +426,7 @@ function tr(handle_na = false, high, low, close) {
   const result = [];
   for (let i = 0; i < high.length; i++) {
     if (i === 0) {
-      result.push(high[i] - low[i]);
+      result.push(handle_na ? high[i] - low[i] : NaN);
     } else {
       const prevClose = close[i - 1];
       if (isNaN(prevClose)) {
@@ -411,7 +453,7 @@ function atr(length2, high, low, close) {
       "ta.atr() requires high, low, and close series. Either pass them explicitly or use createContext({ chart: { high, low, close } }) for implicit data."
     );
   }
-  const trueRange = tr(false, high, low, close);
+  const trueRange = tr(true, high, low, close);
   return rma(trueRange, length2);
 }
 function supertrend(factor, atrPeriod, high, low, close, wicks = false) {
@@ -543,7 +585,7 @@ function lowest(source, length2) {
 function cum(source) {
   let sum4 = 0;
   return source.map((v) => {
-    if (Number.isNaN(v)) return NaN;
+    if (!Number.isFinite(v)) return NaN;
     sum4 += v;
     return sum4;
   });
@@ -561,41 +603,24 @@ function cross(source1, source2) {
   }
   return result;
 }
-function rising(source, length2) {
+function monotonic(source, length2, step) {
   const result = [];
+  const values2 = [];
   for (let i = 0; i < source.length; i++) {
-    if (i < length2) {
-      result.push(false);
-    } else {
-      let isRising = true;
-      for (let j = 1; j <= length2; j++) {
-        if (source[i - j + 1] <= source[i - j]) {
-          isRising = false;
-          break;
-        }
-      }
-      result.push(isRising);
-    }
+    const v = source[i];
+    if (!Number.isNaN(v)) values2.push(v);
+    const n = values2.length;
+    let ok = n > length2;
+    for (let j = 1; ok && j <= length2; j++) ok = step(values2[n - j], values2[n - j - 1]);
+    result.push(ok);
   }
   return result;
 }
+function rising(source, length2) {
+  return monotonic(source, length2, gt);
+}
 function falling(source, length2) {
-  const result = [];
-  for (let i = 0; i < source.length; i++) {
-    if (i < length2) {
-      result.push(false);
-    } else {
-      let isFalling = true;
-      for (let j = 1; j <= length2; j++) {
-        if (source[i - j + 1] >= source[i - j]) {
-          isFalling = false;
-          break;
-        }
-      }
-      result.push(isFalling);
-    }
-  }
-  return result;
+  return monotonic(source, length2, lt);
 }
 function roc(source, length2) {
   const result = [];
@@ -819,33 +844,16 @@ function correlation(source1, source2, length2) {
 function percentrank(source, length2) {
   const result = [];
   for (let i = 0; i < source.length; i++) {
-    if (i < length2) {
+    const currentValue = source[i];
+    if (i < length2 || Number.isNaN(currentValue)) {
       result.push(NaN);
-    } else {
-      if (isNaN(source[i])) {
-        result.push(NaN);
-        continue;
-      }
-      let hasNaN = false;
-      for (let j = 1; j <= length2; j++) {
-        if (isNaN(source[i - j])) {
-          hasNaN = true;
-          break;
-        }
-      }
-      if (hasNaN) {
-        result.push(NaN);
-      } else {
-        const currentValue = source[i];
-        let countLessOrEqual = 0;
-        for (let j = 1; j <= length2; j++) {
-          if (source[i - j] <= currentValue) {
-            countLessOrEqual++;
-          }
-        }
-        result.push(countLessOrEqual / length2 * 100);
-      }
+      continue;
     }
+    let countLessOrEqual = 0;
+    for (let j = 1; j <= length2; j++) {
+      if (le(source[i - j], currentValue)) countLessOrEqual++;
+    }
+    result.push(countLessOrEqual / length2 * 100);
   }
   return result;
 }
@@ -888,48 +896,26 @@ function mfi(source, length2, volume) {
       "ta.mfi() requires volume series. Either pass it explicitly or use createContext({ chart: { ..., volume } }) for implicit data."
     );
   }
-  const result = [];
-  const changes = [NaN];
-  for (let i = 1; i < source.length; i++) {
-    changes.push(source[i] - source[i - 1]);
-  }
-  const positiveFlow = [];
-  const negativeFlow = [];
+  const upperFlow = [];
+  const lowerFlow = [];
   for (let i = 0; i < source.length; i++) {
-    if (i === 0 || isNaN(changes[i])) {
-      positiveFlow.push(0);
-      negativeFlow.push(0);
-    } else if (changes[i] > 0) {
-      positiveFlow.push(volume[i] * source[i]);
-      negativeFlow.push(0);
-    } else if (changes[i] < 0) {
-      positiveFlow.push(0);
-      negativeFlow.push(volume[i] * source[i]);
-    } else {
-      positiveFlow.push(0);
-      negativeFlow.push(0);
-    }
-  }
-  for (let i = 0; i < source.length; i++) {
-    if (i < length2) {
-      result.push(NaN);
-    } else {
-      let posSum = 0;
-      let negSum = 0;
-      for (let j = 0; j < length2; j++) {
-        posSum += positiveFlow[i - j];
-        negSum += negativeFlow[i - j];
-      }
-      if (negSum === 0) {
-        result.push(100);
-      } else {
-        const moneyRatio = posSum / negSum;
-        const mfiValue = 100 - 100 / (1 + moneyRatio);
-        result.push(mfiValue);
-      }
-    }
-  }
-  return result;
+    const change3 = i === 0 ? NaN : source[i] - source[i - 1];
+    const flow = volume[i] * source[i];
+    upperFlow.push(le(change3, 0) ? 0 : flow);
+    lowerFlow.push(ge(change3, 0) ? 0 : flow);
+  }
+  const sumAt = (flow, i) => {
+    const values2 = lastValues(flow, i, Math.floor(length2));
+    return values2 ? values2.reduce((a, b2) => a + b2, 0) : NaN;
+  };
+  const upper2 = upperFlow.map((_, i) => sumAt(upperFlow, i));
+  const lower2 = lowerFlow.map((_, i) => sumAt(lowerFlow, i));
+  return upper2.map((u, i) => {
+    const l = lower2[i];
+    if (Number.isNaN(u) || Number.isNaN(l)) return NaN;
+    if (l === 0) return 100;
+    return 100 - 100 / (1 + u / l);
+  });
 }
 function hma(source, length2) {
   const halfLength = Math.floor(length2 / 2);
@@ -1093,50 +1079,32 @@ function dmi(diLength, adxSmoothing, high, low, close) {
   const len = Math.max(high.length, low.length, close.length);
   const plusDM = [];
   const minusDM = [];
-  const trueRangeValues = tr(false, high, low, close);
-  for (let i = 0; i < len; i++) {
-    if (i === 0) {
-      plusDM.push(0);
-      minusDM.push(0);
-    } else {
-      const upMove = high[i] - high[i - 1];
-      const downMove = low[i - 1] - low[i];
-      let plusDMVal = 0;
-      let minusDMVal = 0;
-      if (upMove > downMove && upMove > 0) {
-        plusDMVal = upMove;
-      }
-      if (downMove > upMove && downMove > 0) {
-        minusDMVal = downMove;
-      }
-      plusDM.push(plusDMVal);
-      minusDM.push(minusDMVal);
-    }
-  }
-  const smoothedPlusDM = rma(plusDM, diLength);
-  const smoothedMinusDM = rma(minusDM, diLength);
-  const smoothedTR = rma(trueRangeValues, diLength);
-  const plusDI = [];
-  const minusDI = [];
-  for (let i = 0; i < len; i++) {
-    if (smoothedTR[i] === 0) {
-      plusDI.push(0);
-      minusDI.push(0);
-    } else {
-      plusDI.push(smoothedPlusDM[i] / smoothedTR[i] * 100);
-      minusDI.push(smoothedMinusDM[i] / smoothedTR[i] * 100);
-    }
-  }
-  const dx = [];
   for (let i = 0; i < len; i++) {
-    const sum4 = plusDI[i] + minusDI[i];
-    if (sum4 === 0) {
-      dx.push(0);
-    } else {
-      dx.push(Math.abs(plusDI[i] - minusDI[i]) / sum4 * 100);
-    }
-  }
-  const adx = rma(dx, adxSmoothing);
+    const up = i === 0 ? NaN : high[i] - high[i - 1];
+    const down = i === 0 ? NaN : low[i - 1] - low[i];
+    plusDM.push(Number.isNaN(up) ? NaN : gt(up, down) && gt(up, 0) ? up : 0);
+    minusDM.push(Number.isNaN(down) ? NaN : gt(down, up) && gt(down, 0) ? down : 0);
+  }
+  const trur = rma(tr(false, high, low, close), diLength);
+  const smoothedPlus = rma(plusDM, diLength);
+  const smoothedMinus = rma(minusDM, diLength);
+  const directional = (smoothed) => {
+    let last2 = NaN;
+    return smoothed.map((v, i) => {
+      const t2 = trur[i];
+      const value = t2 === 0 ? NaN : 100 * v / t2;
+      if (!Number.isNaN(value)) last2 = value;
+      return last2;
+    });
+  };
+  const plusDI = directional(smoothedPlus);
+  const minusDI = directional(smoothedMinus);
+  const dx = plusDI.map((plus, i) => {
+    const minus = minusDI[i];
+    const sum4 = plus + minus;
+    return Math.abs(plus - minus) / (eq(sum4, 0) ? 1 : sum4);
+  });
+  const adx = rma(dx, adxSmoothing).map((v) => 100 * v);
   return [plusDI, minusDI, adx];
 }
 function tsi(source, shortLength, longLength) {
@@ -1412,63 +1380,36 @@ function mode(source, length2) {
   return result;
 }
 function percentile_linear_interpolation(source, length2, percentage) {
+  return sortedWindow(source, length2, (s) => {
+    const pos2 = percentage / 100 * length2 - 0.5;
+    if (pos2 <= 0) return s[0];
+    if (pos2 >= length2 - 1) return s[length2 - 1];
+    const lo = Math.floor(pos2);
+    return s[lo] + (pos2 - lo) * (s[lo + 1] - s[lo]);
+  });
+}
+function sortedWindow(source, length2, fn) {
   const result = [];
+  const values2 = [];
+  const bars = [];
   for (let i = 0; i < source.length; i++) {
-    if (i < length2 - 1) {
-      result.push(NaN);
-      continue;
-    }
-    const values2 = [];
-    for (let j = 0; j < length2; j++) {
-      const value = source[i - j];
-      values2.push(value);
-    }
-    if (values2.some((v) => isNaN(v))) {
-      result.push(NaN);
-      continue;
-    }
-    const sorted = [...values2].sort((a, b2) => a - b2);
-    const position = percentage / 100 * (sorted.length - 1);
-    const lowerIndex = Math.floor(position);
-    const upperIndex = Math.ceil(position);
-    if (lowerIndex === upperIndex) {
-      result.push(sorted[lowerIndex]);
-    } else {
-      const fraction = position - lowerIndex;
-      const interpolated = sorted[lowerIndex] + fraction * (sorted[upperIndex] - sorted[lowerIndex]);
-      result.push(interpolated);
+    const v = source[i];
+    let k = 0;
+    while (k < values2.length && !(values2[k] >= v)) k++;
+    values2.splice(k, 0, v);
+    bars.splice(k, 0, i);
+    if (i >= length2) {
+      const old = bars.indexOf(i - length2);
+      values2.splice(old, 1);
+      bars.splice(old, 1);
     }
+    result.push(i < length2 - 1 ? NaN : fn(values2));
   }
   return result;
 }
 function percentile_nearest_rank(source, length2, percentage) {
-  const result = [];
-  for (let i = 0; i < source.length; i++) {
-    if (i < length2 - 1) {
-      result.push(NaN);
-      continue;
-    }
-    const values2 = [];
-    for (let j = 0; j < length2; j++) {
-      const value = source[i - j];
-      if (!isNaN(value)) {
-        values2.push(value);
-      }
-    }
-    if (values2.length === 0) {
-      result.push(NaN);
-      continue;
-    }
-    const sorted = [...values2].sort((a, b2) => a - b2);
-    if (percentage >= 100) {
-      result.push(sorted[sorted.length - 1]);
-      continue;
-    }
-    const rank2 = Math.ceil(percentage / 100 * sorted.length);
-    const index = Math.max(0, rank2 - 1);
-    result.push(sorted[index]);
-  }
-  return result;
+  const rank2 = Math.min(length2, Math.max(1, Math.ceil(percentage / 100 * length2)));
+  return sortedWindow(source, length2, (s) => s[rank2 - 1]);
 }
 function rci(source, length2) {
   const result = [];
@@ -1963,38 +1904,6 @@ __export(math_exports, {
   toradians: () => toradians
 });
 
-// src/compare/index.ts
-var compare_exports = {};
-__export(compare_exports, {
-  EPSILON: () => EPSILON,
-  eq: () => eq,
-  ge: () => ge,
-  gt: () => gt,
-  le: () => le,
-  lt: () => lt,
-  ne: () => ne
-});
-var EPSILON = 1e-10;
-var valid = (a, b2) => !Number.isNaN(a) && !Number.isNaN(b2);
-function eq(a, b2) {
-  return valid(a, b2) && Math.abs(a - b2) <= EPSILON;
-}
-function ne(a, b2) {
-  return valid(a, b2) && Math.abs(a - b2) > EPSILON;
-}
-function lt(a, b2) {
-  return valid(a, b2) && b2 - a > EPSILON;
-}
-function le(a, b2) {
-  return valid(a, b2) && a - b2 <= EPSILON;
-}
-function gt(a, b2) {
-  return valid(a, b2) && a - b2 > EPSILON;
-}
-function ge(a, b2) {
-  return valid(a, b2) && b2 - a <= EPSILON;
-}
-
 // src/runtime/series.ts
 var BarData = class _BarData {
   _bars;
@@ -2218,7 +2127,7 @@ var Series = class _Series {
     return new _Series(this.dataSource, (bar, i, data) => {
       const a = this.extractor(bar, i, data);
       const b2 = typeof other === "number" ? other : other.extractor(bar, i, data);
-      return b2 !== 0 ? a / b2 : NaN;
+      return a / b2;
     });
   }
   /**
@@ -3225,15 +3134,27 @@ function percentile_linear_interpolation2(id, percentage) {
   if (id.length === 0) {
     return NaN;
   }
-  const result = percentile_linear_interpolation(id, id.length, percentage);
-  return result[result.length - 1];
+  const s = sortedNaLast(id);
+  const n = s.length;
+  const pos2 = percentage / 100 * n - 0.5;
+  if (pos2 <= 0) return s[0];
+  if (pos2 >= n - 1) return s[n - 1];
+  const lo = Math.floor(pos2);
+  const f = pos2 - lo;
+  if (f === 0) return s[lo];
+  return Number.isNaN(s[n - 1]) ? NaN : s[lo] + f * (s[lo + 1] - s[lo]);
+}
+function sortedNaLast(id) {
+  const numbers = id.filter((v) => !Number.isNaN(v)).sort((a, b2) => a - b2);
+  return [...numbers, ...Array(id.length - numbers.length).fill(NaN)];
 }
 function percentile_nearest_rank2(id, percentage) {
   if (id.length === 0) {
     return NaN;
   }
-  const result = percentile_nearest_rank(id, id.length, percentage);
-  return result[result.length - 1];
+  const s = sortedNaLast(id);
+  const rank2 = Math.min(s.length, Math.max(1, Math.ceil(percentage / 100 * s.length)));
+  return s[rank2 - 1];
 }
 function percentrank2(id, index) {
   if (id.length === 0 || index < 0 || index >= id.length) {
@@ -3944,11 +3865,13 @@ __export(color_exports, {
   white: () => white,
   yellow: () => yellow
 });
+var channel = (v) => v === null || v === void 0 || Number.isNaN(v) ? 0 : Math.max(0, Math.min(255, Math.trunc(v)));
+var alphaOf = (transp) => transp === null || Number.isNaN(transp) ? 0 : 1 - Math.max(0, Math.min(100, transp)) / 100;
 function rgb(red2, green2, blue2, transp) {
-  const r2 = Math.max(0, Math.min(255, red2));
-  const g2 = Math.max(0, Math.min(255, green2));
-  const b2 = Math.max(0, Math.min(255, blue2));
-  const a = transp !== void 0 ? 1 - transp / 100 : 1;
+  const r2 = channel(red2);
+  const g2 = channel(green2);
+  const b2 = channel(blue2);
+  const a = transp !== void 0 ? alphaOf(transp) : 1;
   if (a === 1) {
     return `rgb(${r2}, ${g2}, ${b2})`;
   }
@@ -3975,7 +3898,8 @@ function b(clr) {
   return parseColor(clr).b;
 }
 function t(clr) {
-  return parseColor(clr).t;
+  const alpha = Math.round((1 - parseColor(clr).t / 100) * 255);
+  return Math.round((1 - alpha / 255) * 100);
 }
 function parseColor(clr) {
   if (typeof clr === "string") {
@@ -4028,13 +3952,12 @@ function from_gradient(value, bottom_value, top_value, bottom_color, top_color)
   };
   const c1 = rgba(bottom_color);
   const c2 = rgba(top_color);
-  const w1 = c1.a * (1 - k);
-  const w2 = c2.a * k;
-  const a = w1 + w2;
+  const a = c1.a * (1 - k) + c2.a * k;
   if (a === 0) return transparent;
-  const mix = (x1, x2) => Math.floor((x1 * w1 + x2 * w2) / a);
+  const mix = (x1, x2) => Math.floor((x1 / 255 * c1.a * (1 - k) + x2 / 255 * c2.a * k) / (a / 255));
   const [r2, g2, b2] = [mix(c1.r, c2.r), mix(c1.g, c2.g), mix(c1.b, c2.b)];
-  return a === 255 ? `rgb(${r2}, ${g2}, ${b2})` : `rgba(${r2}, ${g2}, ${b2}, ${a / 255})`;
+  const alpha = Math.floor(a);
+  return alpha === 255 ? `rgb(${r2}, ${g2}, ${b2})` : `rgba(${r2}, ${g2}, ${b2}, ${alpha / 255})`;
 }
 
 // src/time/index.ts
@@ -6242,13 +6165,60 @@ var format_none = 0;
 var format_bold = 1;
 var format_italic = 2;
 
+// src/callsite/index.ts
+var callsite_exports = {};
+__export(callsite_exports, {
+  barssince: () => barssince2,
+  cross: () => cross2,
+  crossover: () => crossover2,
+  crossunder: () => crossunder2,
+  whenCalled: () => whenCalled
+});
+function whenCalled(called, fn, ...sources) {
+  const bars = [];
+  for (let i = 0; i < called.length; i++) if (called[i]) bars.push(i);
+  const result = fn(...sources.map((s) => bars.map((i) => s[i] ?? NaN)));
+  const out = new Array(called.length).fill(NaN);
+  bars.forEach((bar, k) => {
+    out[bar] = result[k];
+  });
+  return out;
+}
+function twoSeriesSite(test) {
+  let prevA = NaN;
+  let prevB = NaN;
+  return (a, b2) => {
+    const result = test(a, b2, prevA, prevB);
+    prevA = a;
+    prevB = b2;
+    return result;
+  };
+}
+function crossover2() {
+  return twoSeriesSite((a, b2, pa, pb) => a > b2 && pa <= pb);
+}
+function crossunder2() {
+  return twoSeriesSite((a, b2, pa, pb) => a < b2 && pa >= pb);
+}
+function barssince2() {
+  let count = NaN;
+  return (condition) => {
+    if (condition && !Number.isNaN(condition)) count = 0;
+    else if (!Number.isNaN(count)) count++;
+    return count;
+  };
+}
+function cross2() {
+  return twoSeriesSite((a, b2, pa, pb) => a > b2 && pa <= pb || a < b2 && pa >= pb);
+}
+
 // src/ta-series.ts
 var ta_series_exports = {};
 __export(ta_series_exports, {
   accdist: () => accdist2,
   alma: () => alma2,
   atr: () => atr2,
-  barssince: () => barssince2,
+  barssince: () => barssince3,
   bb: () => bb2,
   bbw: () => bbw2,
   cci: () => cci2,
@@ -6256,9 +6226,9 @@ __export(ta_series_exports, {
   cmo: () => cmo2,
   cog: () => cog2,
   correlation: () => correlation2,
-  cross: () => cross2,
-  crossover: () => crossover2,
-  crossunder: () => crossunder2,
+  cross: () => cross3,
+  crossover: () => crossover3,
+  crossunder: () => crossunder3,
   cum: () => cum2,
   dev: () => dev2,
   dmi: () => dmi2,
@@ -6424,7 +6394,7 @@ function stoch2(source, high, low, length2) {
   const result = stoch(sourceValues, highValues, lowValues, length2);
   return Series.fromArray(bars, result);
 }
-function crossover2(source1, source2) {
+function crossover3(source1, source2) {
   const bars = source1.bars;
   const vals1 = source1.toArray();
   const vals2 = typeof source2 === "number" ? Array(bars.length).fill(source2) : source2.toArray();
@@ -6432,7 +6402,7 @@ function crossover2(source1, source2) {
   const numResult = result.map((b2) => b2 ? 1 : 0);
   return Series.fromArray(bars, numResult);
 }
-function crossunder2(source1, source2) {
+function crossunder3(source1, source2) {
   const bars = source1.bars;
   const vals1 = source1.toArray();
   const vals2 = typeof source2 === "number" ? Array(bars.length).fill(source2) : source2.toArray();
@@ -6440,7 +6410,7 @@ function crossunder2(source1, source2) {
   const numResult = result.map((b2) => b2 ? 1 : 0);
   return Series.fromArray(bars, numResult);
 }
-function cross2(source1, source2) {
+function cross3(source1, source2) {
   const bars = source1.bars;
   const vals1 = source1.toArray();
   const vals2 = typeof source2 === "number" ? Array(bars.length).fill(source2) : source2.toArray();
@@ -6636,7 +6606,7 @@ function pivotlow2(source, leftbars, rightbars) {
   const result = pivotlow(source.toArray(), leftbars, rightbars);
   return Series.fromArray(bars, result);
 }
-function barssince2(condition) {
+function barssince3(condition) {
   const bars = condition.bars;
   const boolValues = condition.toArray().map((v) => v === 1);
   const result = barssince(boolValues);
@@ -6759,9 +6729,9 @@ var ta = {
   atr: atr2,
   tr: tr2,
   stoch: stoch2,
-  crossover: crossover2,
-  crossunder: crossunder2,
-  cross: cross2,
+  crossover: crossover3,
+  crossunder: crossunder3,
+  cross: cross3,
   change: change2,
   mom: mom2,
   roc: roc2,
@@ -6788,7 +6758,7 @@ var ta = {
   hma: hma2,
   pivothigh: pivothigh2,
   pivotlow: pivotlow2,
-  barssince: barssince2,
+  barssince: barssince3,
   valuewhen: valuewhen2,
   dmi: dmi2,
   tsi: tsi2,
@@ -6820,7 +6790,7 @@ var ta = {
 
 // src/utils/index.ts
 function isNA(value) {
-  return value === null || value === void 0 || Number.isNaN(value) || isDeleted(value);
+  return value === null || value === void 0 || Number.isNaN(value) || value === Infinity || value === -Infinity || isDeleted(value);
 }
 function nz(value, defaultValue = 0) {
   return isNA(value) ? defaultValue : value;
@@ -6829,7 +6799,7 @@ function fixnan(source) {
   let last2;
   let seen = false;
   return source.map((v) => {
-    if (!isNA(v)) {
+    if (!(v === null || v === void 0 || Number.isNaN(v) || isDeleted(v))) {
       last2 = v;
       seen = true;
       return v;
@@ -6837,6 +6807,16 @@ function fixnan(source) {
     return seen ? last2 : v;
   });
 }
+function at(source, i, offset = 0) {
+  if (offset < 0) {
+    throw new RangeError(`at(): the offset must be >= 0 (got ${offset}); a negative offset reads a later bar.`);
+  }
+  const j = i - offset;
+  return j >= 0 && j < source.length ? source[j] ?? NaN : NaN;
+}
+function div(a, b2) {
+  return a / b2;
+}
 function ohlcFromBars(bars) {
   return {
     open: bars.map((b2) => b2.open),
@@ -6857,6 +6837,50 @@ function getLow(ohlc) {
 function getOpen(ohlc) {
   return ohlc.open;
 }
+function getSource(data, source = "close") {
+  const isOHLC = "open" in data && Array.isArray(data.open);
+  if (isOHLC) {
+    const ohlc = data;
+    switch (source) {
+      case "close":
+        return ohlc.close;
+      case "open":
+        return ohlc.open;
+      case "high":
+        return ohlc.high;
+      case "low":
+        return ohlc.low;
+      case "hl2":
+        return ohlc.high.map((h, i) => (h + ohlc.low[i]) / 2);
+      case "hlc3":
+        return ohlc.high.map((h, i) => (h + ohlc.low[i] + ohlc.close[i]) / 3);
+      case "ohlc4":
+        return ohlc.open.map((o, i) => (o + ohlc.high[i] + ohlc.low[i] + ohlc.close[i]) / 4);
+      case "hlcc4":
+        return ohlc.high.map((h, i) => (h + ohlc.low[i] + ohlc.close[i] + ohlc.close[i]) / 4);
+    }
+  } else {
+    const bars = data;
+    switch (source) {
+      case "close":
+        return bars.map((b2) => b2.close);
+      case "open":
+        return bars.map((b2) => b2.open);
+      case "high":
+        return bars.map((b2) => b2.high);
+      case "low":
+        return bars.map((b2) => b2.low);
+      case "hl2":
+        return bars.map((b2) => (b2.high + b2.low) / 2);
+      case "hlc3":
+        return bars.map((b2) => (b2.high + b2.low + b2.close) / 3);
+      case "ohlc4":
+        return bars.map((b2) => (b2.open + b2.high + b2.low + b2.close) / 4);
+      case "hlcc4":
+        return bars.map((b2) => (b2.high + b2.low + b2.close + b2.close) / 4);
+    }
+  }
+}
 function getSourceSeries(bars, source = "close") {
   const open = new Series(bars, (bar) => bar.open);
   const high = new Series(bars, (bar) => bar.high);
@@ -7425,7 +7449,7 @@ function hline(price, title, color, linestyle, linewidth) {
   const options = {
     color,
     lineWidth: linewidth,
-    lineStyle: getLineStyle(linestyle)
+    lineStyle: getLineStyle(linestyle ?? "dashed")
   };
   const seriesHandle = context.chart.addSeries("line", options);
   const data = context.ohlcv.time.map((time) => ({
@@ -7656,6 +7680,73 @@ function getSourceData(ohlcv, sourceName) {
   }
 }
 
+// src/strategy/index.ts
+var STRATEGY_CONSTANTS = {
+  long: "long",
+  short: "short",
+  fixed: "fixed",
+  cash: "cash",
+  percent_of_equity: "percent_of_equity",
+  commission: { percent: "percent", cash_per_contract: "cash_per_contract", cash_per_order: "cash_per_order" },
+  direction: { all: "all", long: "long", short: "short" },
+  oca: { none: "none", cancel: "cancel", reduce: "reduce" }
+};
+var STRATEGY_DEFAULTS = {
+  pyramiding: 0,
+  calc_on_order_fills: false,
+  calc_on_every_tick: false,
+  backtest_fill_limits_assumption: 0,
+  // v6 values; PineScript v5: fixed / 1 / 1000000 and margins 0
+  default_qty_type: "percent_of_equity",
+  default_qty_value: 100,
+  initial_capital: 1e5,
+  slippage: 0,
+  commission_type: "percent",
+  commission_value: 0,
+  process_orders_on_close: false,
+  close_entries_rule: "FIFO",
+  margin_long: 100,
+  margin_short: 100,
+  calc_bars_count: 0,
+  risk_free_rate: 2,
+  use_bar_magnifier: false,
+  fill_orders_on_standard_ohlc: false
+};
+var STRATEGY_NUMBER_VARIABLES = [
+  "position_size",
+  "position_avg_price",
+  "equity",
+  "initial_capital",
+  "netprofit",
+  "netprofit_percent",
+  "openprofit",
+  "openprofit_percent",
+  "grossprofit",
+  "grossprofit_percent",
+  "grossloss",
+  "grossloss_percent",
+  "opentrades",
+  "closedtrades",
+  "wintrades",
+  "losstrades",
+  "eventrades",
+  "avg_trade",
+  "avg_trade_percent",
+  "avg_winning_trade",
+  "avg_winning_trade_percent",
+  "avg_losing_trade",
+  "avg_losing_trade_percent",
+  "max_drawdown",
+  "max_drawdown_percent",
+  "max_runup",
+  "max_runup_percent",
+  "max_contracts_held_all",
+  "max_contracts_held_long",
+  "max_contracts_held_short",
+  "margin_liquidation_price"
+];
+var STRATEGY_TEXT_VARIABLES = ["position_entry_name", "account_currency"];
+
 // src/runtime/adapters/LightweightChartsAdapter.ts
 var LightweightChartsAdapter = class {
   chart;
@@ -7864,7 +7955,7 @@ var SimpleInputAdapter = class {
 };
 
 // src/index.ts
-var VERSION = "0.7.2";
+var VERSION = "0.8.1";
 var info2 = {
   name: "OakScriptJS",
   version: VERSION,