/ BANKER SWING YELLOW ONLY 22.09.2023
// L3 BANKER FUND SWING bu Lucasbest 22.09.2023
// © blackcat1402 //@version=4
angel = exponentialaverage[2](close)
len = 21
lrc = LinearRegression[len](close)
lrprev = LinearRegression[len](close[1])
xslValue = (lrc – lrprev)
devil = exponentialaverage[42]((xslValue * 20) + close)
long = angel CROSSES OVER devil
short = angel CROSSES UNDER devil
IF long THEN
DRAWTEXT(“B”, barindex, low – 5, SansSerif, Bold, 25) COLOURED(255, 255, 0) // Using yellow color for “BUY”
ENDIF
IF long THEN
DRAWCANDLE(open, high, low, close) COLOURED(255,255,0) BORDERCOLOR(255,255,0) // Yellow candle when ‘long’ condition (crossover) is true
ENDIF
len = 21
lrc = LinearRegression[len](close)
lrprev = LinearRegression[len](close[1])
xslValue = (lrc – lrprev)
rdevil = exponentialaverage[42]((xslValue * 20) + close)
n = 7 // short term period
m = 5 // middle term period
lbuy = angel CROSSES OVER devil
var1 = (close – lowest[60](low)) / (highest[60](high) – lowest[60](low)) * 100
once ma = undefined
once b = undefined
sum = sum[1] – var1[n] + var1
IF var1[n] > 0 THEN
ma = sum / n
ENDIF
If b[1] = undefined then
b = ma
else
b = (var1 + b[1] * (n – 1)) / n
Endif
//var2 = xsa(b,m,1)
once ma2 = undefined
once var2 = undefined
sum2 = sum2[1] – b[m] + b
IF b[m] > 0 THEN
ma2 = sum2 / m
ENDIF
IF var2[1] = undefined THEN
var2 = ma2
ELSE
var2 = (b + var2[1] * (m – 1)) / m
ENDIF
mar1 = (2*close + high + low + open) / 5
mar2 = LOWEST[34](low)
mar3 = HIGHEST[34](high)
sk = EXPONENTIALAVERAGE[13]((mar1 – mar2) / (mar3 – mar2) * 100)
IF b[1] <> 0 THEN
prevB = b[1]
ELSE
prevB = b
ENDIF
IF sk[1] <> 0 THEN
prevSk = sk[1]
ELSE
prevSk = sk
ENDIF
ldb = (b <= 10) AND (sk <= 10) AND (b > prevB) AND (sk > prevSk)
swingBuy = lbuy AND ldb
IF lbuy THEN
DRAWCANDLE(open, high, low, close) COLOURED(255, 255, 0) BORDERCOLOR(255, 255, 0) // 255, 255, 0 is the RGB code for yellow
ENDIF
RETURN
ESSO stock