Scribd
Upload
110 views7 pages

SMC Reversal Bands

The document is a Pine Script code for a trading indicator called 'SMC Reversal Bands' that plots reversal bands based on the average true range (ATR) and simple moving average (SMA). It includes user-defined settings for visual customization, swing high/low detection, and supply/demand zone management. The script also features functions for drawing and managing graphical elements on a trading chart, such as labels and boxes for supply and demand zones.

Uploaded by

Cristina Bravo
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
110 views7 pages

SMC Reversal Bands

The document is a Pine Script code for a trading indicator called 'SMC Reversal Bands' that plots reversal bands based on the average true range (ATR) and simple moving average (SMA). It includes user-defined settings for visual customization, swing high/low detection, and supply/demand zone management. The script also features functions for drawing and managing graphical elements on a trading chart, such as labels and boxes for supply and demand zones.

Uploaded by

Cristina Bravo
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd

//@version=5

indicator("<[SMC_REVERSAL BANDS]>", shorttitle="*SMC_REVERSAL BANDS*",


overlay=true, max_labels_count=500)

// Get user settings


showRevBands = [Link](true, "Show Reversal Bands", group="REVERSAL BANDS")
lenRevBands = [Link](30, "Length", group="REVERSAL BANDS")
// Functions
f_kc(src, len, sensitivity) =>

basis = [Link](src, len)


span = [Link](len)
[basis + span * sensitivity, basis - span * sensitivity]

// Get components
[upperKC1, lowerKC1] = f_kc(close, lenRevBands, 3)
[upperKC2, lowerKC2] = f_kc(close, lenRevBands, 4)
[upperKC3, lowerKC3] = f_kc(close, lenRevBands, 5)
[upperKC4, lowerKC4] = f_kc(close, lenRevBands, 6)

//colorrr
cyan = #3179f5, cyan30 = [Link](cyan, 70)
pink = #f23645, pink30 =[Link](pink, 70)
red = #f23645, red30 = [Link](red , 70)

// Plot
zoneupper1=plot(showRevBands ? upperKC1 : na, "[Link] Upper 1", red30)
zoneupper2=plot(showRevBands ? upperKC2 : na, "[Link] Upper 2", red30)
zonelower2=plot(showRevBands ? lowerKC2 : na, "[Link] Lower 2", cyan30)
zonelower1=plot(showRevBands ? lowerKC1 : na, "[Link] Lower 1", cyan30)

fill(zoneupper1, zoneupper2, color = red30)


fill(zonelower1, zonelower2, color = cyan30)

// INDICATOR SETTINGS
swing_length = [Link](10, title = 'Swing High/Low Length', group = 'Settings',
minval = 1, maxval = 50)
history_of_demand_to_keep = [Link](20, title = 'History To Keep', minval = 5,
maxval = 50)
box_width = [Link](2.5, title = 'Supply/Demand Box Width', group = 'Settings',
minval = 1, maxval = 10, step = 0.5)

// INDICATOR VISUAL SETTINGS


show_zigzag = [Link](false, title = 'Show Zig Zag', group = 'Visual Settings',
inline = '1')
show_price_action_labels = [Link](false, title = 'Show Price Action Labels',
group = 'Visual Settings', inline = '2')
supply_color = [Link](#b228334d, title = '', group = 'Visual Settings', inline
= '3')
supply_outline_color = [Link](#ff525280, title = 'Outline', group = 'Visual
Settings', inline = '3')
demand_color = [Link](#1848cc4d, title = '', group = 'Visual Settings', inline
= '4')
demand_outline_color = [Link](#2196f380, title = 'Outline', group = 'Visual
Settings', inline = '4')
bos_label_color = [Link](#ffffff, title = 'BOS Label', group = 'Visual
Settings', inline = '5')
poi_label_color = [Link](#363a45, title = 'POI Label', group = 'Visual
Settings', inline = '7')
swing_type_color = [Link](#363a45, title = 'Price Action Label', group =
'Visual Settings', inline = '8')
zigzag_color = [Link](#000000, title = 'Zig Zag', group = 'Visual Settings',
inline = '9')

// FUNCTION TO ADD NEW AND REMOVE LAST IN ARRAY


f_array_add_pop(array, new_value_to_add) =>

[Link](array, new_value_to_add)
[Link](array)

// FUNCTION SWING H & L LABELS


f_sh_sl_labels(array, swing_type) =>
var string label_text = na
if swing_type == 1
if [Link](array, 0) >= [Link](array, 1)
label_text := 'HH'

else

label_text := 'LH'

[Link](bar_index - swing_length, [Link](array,0), text = label_text,


style=label.style_label_down, textcolor = swing_type_color, color =
[Link](swing_type_color, 100), size = [Link])

else if swing_type == -1
if [Link](array, 0) >= [Link](array, 1)
label_text := 'HL'

else

label_text := 'LL'

[Link](bar_index - swing_length, [Link](array,0), text = label_text,


style=label.style_label_up, textcolor = swing_type_color, color =
[Link](swing_type_color, 100), size = [Link])

// FUNCTION MAKE SURE SUPPLY ISNT OVERLAPPING


f_check_overlapping(new_poi, box_array, atr) =>

atr_threshold = atr * 2
okay_to_draw = true

for i = 0 to [Link](box_array) - 1

top = box.get_top([Link](box_array, i))


bottom = box.get_bottom([Link](box_array, i))
poi = (top + bottom) / 2

upper_boundary = poi + atr_threshold


lower_boundary = poi - atr_threshold

if new_poi >= lower_boundary and new_poi <= upper_boundary


okay_to_draw := false

break

else
okay_to_draw := true

okay_to_draw

// FUNCTION TO DRAW SUPPLY OR DEMAND ZONE


f_supply_demand(value_array, bn_array, box_array, label_array, box_type, atr) =>

atr_buffer = atr * (box_width / 10)


box_left = [Link](bn_array, 0)
box_right = bar_index

var float box_top = 0.00


var float box_bottom = 0.00
var float poi = 0.00

if box_type == 1
box_top := [Link](value_array, 0)
box_bottom := box_top - atr_buffer
poi := (box_top + box_bottom) / 2

else if box_type == -1
box_bottom := [Link](value_array, 0)
box_top := box_bottom + atr_buffer
poi := (box_top + box_bottom) / 2

okay_to_draw = f_check_overlapping(poi, box_array, atr)

// okay_to_draw = true

//delete oldest box, and then create a new box and add it to the array
if box_type == 1 and okay_to_draw

[Link]( [Link](box_array, [Link](box_array) - 1) )


f_array_add_pop(box_array, [Link]( left = box_left, top = box_top, right =
box_right, bottom = box_bottom, border_color = supply_outline_color,

bgcolor = supply_color, extend = [Link], text = 'SUPPLY',


text_halign = text.align_center, text_valign = text.align_center, text_color =
poi_label_color, text_size = [Link], xloc = xloc.bar_index))

[Link]( [Link](label_array, [Link](label_array) - 1) )


f_array_add_pop(label_array, [Link]( left = box_left, top = poi, right =
box_right, bottom = poi, border_color = [Link](poi_label_color,90),

bgcolor = [Link](poi_label_color,90), extend = [Link], text =


'POI', text_halign = text.align_left, text_valign = text.align_center, text_color =
poi_label_color, text_size = [Link], xloc = xloc.bar_index))

else if box_type == -1 and okay_to_draw

[Link]( [Link](box_array, [Link](box_array) - 1) )


f_array_add_pop(box_array, [Link]( left = box_left, top = box_top, right =
box_right, bottom = box_bottom, border_color = demand_outline_color,

bgcolor = demand_color, extend = [Link], text = 'DEMAND',


text_halign = text.align_center, text_valign = text.align_center, text_color =
poi_label_color, text_size = [Link], xloc = xloc.bar_index))
[Link]( [Link](label_array, [Link](label_array) - 1) )
f_array_add_pop(label_array, [Link]( left = box_left, top = poi, right =
box_right, bottom = poi, border_color = [Link](poi_label_color,90),

bgcolor = [Link](poi_label_color,90), extend = [Link], text


= 'POI', text_halign = text.align_left, text_valign = text.align_center, text_color
= poi_label_color, text_size = [Link], xloc = xloc.bar_index))

//
f_sd_to_bos(box_array, bos_array, label_array, zone_type) =>
if zone_type == 1
for i = 0 to [Link](box_array) - 1
level_to_break = box.get_top([Link](box_array,i))

// if [Link](close, level_to_break)
if close >= level_to_break
copied_box = [Link]([Link](box_array,i))
f_array_add_pop(bos_array, copied_box)
mid = (box.get_top([Link](box_array,i)) +
box.get_bottom([Link](box_array,i))) / 2
box.set_top([Link](bos_array,0), mid)
box.set_bottom([Link](bos_array,0), mid)
box.set_extend( [Link](bos_array,0), [Link])
box.set_right( [Link](bos_array,0), bar_index)
box.set_text( [Link](bos_array,0), 'BOS' )
box.set_text_color( [Link](bos_array,0), bos_label_color)
box.set_text_size( [Link](bos_array,0), [Link])
box.set_text_halign( [Link](bos_array,0), text.align_center)
box.set_text_valign( [Link](bos_array,0), text.align_center)
[Link]([Link](box_array, i))
[Link]([Link](label_array, i))

if zone_type == -1

for i = 0 to [Link](box_array) - 1
level_to_break = box.get_bottom([Link](box_array,i))
// if [Link](close, level_to_break)
if close <= level_to_break
copied_box = [Link]([Link](box_array,i))
f_array_add_pop(bos_array, copied_box)
mid = (box.get_top([Link](box_array,i)) +
box.get_bottom([Link](box_array,i))) / 2
box.set_top([Link](bos_array,0), mid)
box.set_bottom([Link](bos_array,0), mid)
box.set_extend( [Link](bos_array,0), [Link])
box.set_right( [Link](bos_array,0), bar_index)
box.set_text( [Link](bos_array,0), 'BOS' )
box.set_text_color( [Link](bos_array,0), bos_label_color)
box.set_text_size( [Link](bos_array,0), [Link])
box.set_text_halign( [Link](bos_array,0), text.align_center)
box.set_text_valign( [Link](bos_array,0), text.align_center)
[Link]([Link](box_array, i))
[Link]([Link](label_array, i))
//
f_extend_box_endpoint(box_array) =>

for i = 0 to [Link](box_array) - 1
box.set_right([Link](box_array, i), bar_index + 100)
//
atr = [Link](50)
//
swing_high = [Link](high, swing_length, swing_length)
swing_low = [Link](low, swing_length, swing_length)
//
var swing_high_values = array.new_float(5,0.00)
var swing_low_values = array.new_float(5,0.00)
var swing_high_bns = array.new_int(5,0)
var swing_low_bns = array.new_int(5,0)
//
var current_supply_box = array.new_box(history_of_demand_to_keep, na)
var current_demand_box = array.new_box(history_of_demand_to_keep, na)
//
var current_supply_poi = array.new_box(history_of_demand_to_keep, na)
var current_demand_poi = array.new_box(history_of_demand_to_keep, na)
//
var supply_bos = array.new_box(5, na)
var demand_bos = array.new_box(5, na)
//
if not na(swing_high)
f_array_add_pop(swing_high_values, swing_high)
f_array_add_pop(swing_high_bns, bar_index[swing_length])

if show_price_action_labels
f_sh_sl_labels(swing_high_values, 1)

f_supply_demand(swing_high_values, swing_high_bns, current_supply_box,


current_supply_poi, 1, atr)

// NEW SWING LOW


else if not na(swing_low)
f_array_add_pop(swing_low_values, swing_low)
f_array_add_pop(swing_low_bns, bar_index[swing_length])

if show_price_action_labels
f_sh_sl_labels(swing_low_values, -1)

f_supply_demand(swing_low_values, swing_low_bns, current_demand_box,


current_demand_poi, -1, atr)

f_sd_to_bos(current_supply_box, supply_bos, current_supply_poi, 1)


f_sd_to_bos(current_demand_box, demand_bos, current_demand_poi, -1)

f_extend_box_endpoint(current_supply_box)
f_extend_box_endpoint(current_demand_box)

h = [Link](high, swing_length * 2 + 1)
l = [Link](low, swing_length * 2 + 1)

f_isMin(len) =>
l == low[len]

f_isMax(len) =>
h == high[len]

var dirUp = false


var lastLow = high * 100
var lastHigh = 0.0
var timeLow = bar_index
var timeHigh = bar_index
var line li = na

f_drawLine() =>
_li_color = show_zigzag ? zigzag_color : [Link](#ffffff,100)
[Link](timeHigh - swing_length, lastHigh, timeLow - swing_length, lastLow,
xloc.bar_index, color=_li_color, width=1)

if dirUp

if f_isMin(swing_length) and low[swing_length] < lastLow


lastLow := low[swing_length]
timeLow := bar_index
[Link](li)
li := f_drawLine()
li

if f_isMax(swing_length) and high[swing_length] > lastLow


lastHigh := high[swing_length]
timeHigh := bar_index
dirUp := false
li := f_drawLine()
li

if not dirUp

if f_isMax(swing_length) and high[swing_length] > lastHigh


lastHigh := high[swing_length]
timeHigh := bar_index
[Link](li)
li := f_drawLine()
li

if f_isMin(swing_length) and low[swing_length] < lastHigh

lastLow := low[swing_length]
timeLow := bar_index
dirUp := true
li := f_drawLine()

if f_isMax(swing_length) and high[swing_length] > lastLow

lastHigh := high[swing_length]
timeHigh := bar_index
dirUp := false
li := f_drawLine()
li

// Inputs
p = input(55, "Period")
atr_factor = [Link](1.0, "Factor", step = 0.1)
//
n = [Link](p)
e = atr * atr_factor

afr = close
afr := nz(afr[1], afr)
atr_factoryHigh = close + e
atr_factoryLow = close - e

if atr_factoryLow > afr


afr := atr_factoryLow

if atr_factoryHigh < afr


afr := atr_factoryHigh

col = afr > afr[1] ? #2962ff : #FF0000


col := afr == afr[1] ? col[1] : col

buy = afr > afr[1] and not (afr[1] > afr[2])


sell = afr < afr[1] and not (afr[1] < afr[2])

ls = 0
ls := buy ? 1 : sell ? -1 : ls[1]
// Plottings
plot(afr, "AFR", col, 2)
plotshape(buy and ls != ls[1], "Buy" , [Link] , [Link], #000000,
0, size = [Link])
plotshape(sell and ls != ls[1], "Sell", [Link], [Link], #000000,
0, size = [Link])
// Alerts
alertcondition(buy and ls != ls[1] , "AFR: Buy" , "AFR Buy Signal")
alertcondition(sell and ls != ls[1], "AFR: Sell", "AFR Sell Signal")

//
===================================================================================
======================//

You might also like