Hej!
Ser ut som deras kod är så här väl:
stdev = ta.stdev(src, length) * mult
ema = ta.ema(src, length)
upper = ema + stdev
lower = ema - stdev
bullish = math.sum(math.max(src - upper, 0), length)
bearish = math.sum(math.max(lower - src, 0), length)
bull_den = math.sum(math.abs(src - upper), length)
bear_den = math.sum(math.abs(lower - src), length)
bull = bullish/bull_den*100
bear = bearish/bear_den*100
Om source är slutkurs Close, så bör bli i HkScript: (snabbt gjort nu utan test)
-> Lägg till 2 st inparametrar p1 och p2, av typ heltal resp decimaltal.
2 st plot
4 st Globala variabler, av typ Dataserie: Bullish, BullishAbs, Bearish, BearishAbs
local length= p1;
local mult = p2;
local stdev = Close.stdDev(length) * mult;
local ema = Close.ema(length);
local upper = ema + stdev
local lower = ema - stdev
Bullish[0] = max(Close[0]-upper, 0.0);
BullishAbs[0] = fabs(Close[0]-upper);
Bearish[0] = max(lower-Close[0], 0.0);
BearishAbs[0] = fabs(lower-Close[0]);
local bullish = Bullish.sum(length);
local bearish = Bearish.sum(length);
local bull_den = BullishAbs.sum(length);
local bear_den = BearishAbs.sum(length);
plot1[0] = bullish/bull_den*100; // bull
plot2[0] = bearish/bear_den*100 // bear
