# NEOTICKER DATA BEGIN
ScriptType=Indicator
Description=TASC Volume weighted MACD
Name=tasc_vmacd
Language=Formula
Links=1
MinBars=0
TimerInterval=100
EarlyBinding=0
MetaStyle=Normal
ValueRange=Same as Source
Placement=New Pane
Multiplot_num_plots=3
Multiplot_color_0=50266112
Multiplot_style_0=Line
Multiplot_width_0=1
Multiplot_enabled_0=0
Multiplot_name_0=VWMACD 
Multiplot_breakstyle_0=0
Multiplot_color_1=33587200
Multiplot_style_1=Line
Multiplot_width_1=1
Multiplot_enabled_1=0
Multiplot_name_1=Signal line
Multiplot_breakstyle_1=0
Multiplot_color_2=255
Multiplot_style_2=Hist
Multiplot_width_2=1
Multiplot_enabled_2=1
Multiplot_name_2=VW MACD Hist
Multiplot_breakstyle_2=0
UpdateByTick=0
FloatMarker=1
DepthData=0
TradingSystemUI=0
PrimaryLinkOnly=0
NotifyOnRemoval=0
Param_count=3
Param_name_0=Short Period
Param_inuse_0=1
Param_type_0=integer.gte.1
Param_default_0=12
Param_name_1=Long Period
Param_inuse_1=1
Param_type_1=integer.gte.1
Param_default_1=26
Param_name_2=Smoothing Peroid
Param_inuse_2=1
Param_type_2=integer.gte.1
Param_default_2=9
Explanation_Lines=0
# NEOTICKER DATA END

$PeriodL := choose(param1 < 1, 1, param1 > 500, 500, param1);
$PeriodS := choose(param2 < 2, 2, param2 > 501, 501, param2);
$PeriodSig := choose(param3 < 1, 1, param3 > 200, 200, param3);
$LongMA  := $PeriodL*qc_xaverage(v*c, $PeriodL)/
            $PeriodL*qc_xaverage(v, $PeriodL);
$ShortMA := $PeriodS*qc_xaverage(v*c, $PeriodS)/
            $PeriodS*qc_xaverage(v, $PeriodS);
VWMACD := $ShortMA-$LongMA;
plot1 := VWMACD;
plot2 := qc_xaverage(VWMACD, $PeriodSig);
plot3 := plot1-plot2;