# TICK Interpretation Indicator
# Based on work by Richard Todd (http://www.movethemarkets.com/blog/)
# Adapted for thinkorswim by Sergey@fastmail.net (aka Eternum on http://www.thinkscripter.com/forum/)
# Oct 4, 2009: v1.0 

declare lower;

input low_tick_cutoff = 500;
input high_tick_cutoff = 1100; 

def median_price = (high("$tick") + low("$tick")) / 2;

def tmp1 = if high("$tick") > low_tick_cutoff then high("$tick") - low_tick_cutoff else 0;
def tmp2 = if median_price > low_tick_cutoff then median_price - low_tick_cutoff else 0;
def tmp3 = if high("$tick") > high_tick_cutoff then 2 * (high("$tick") - high_tick_cutoff) else 0;

def tmp4 = if low("$tick") < -low_tick_cutoff then low_tick_cutoff + low("$tick") else 0;
def tmp5 = if median_price < -low_tick_cutoff then low_tick_cutoff + median_price else 0;
def tmp6 = if low("$tick") < -high_tick_cutoff then 2 * (high_tick_cutoff + low("$tick")) else 0;

def tmp7 = tmp1 + tmp2 + tmp3 + tmp4 + tmp5 + tmp6;

plot tick_molester = (tmp7[1] + 2 * tmp7) / 3;
tick_molester.SetDefaultColor(color.light_gray);
tick_molester.SetPaintingStrategy(paintingstrategy.histogram);
tick_molester.SetLineWeight(2);

plot zeroline = 0;
zeroline.SetDefaultColor(color.light_gray);
zeroline.SetStyle(curve.firm);