# NEOTICKER DATA BEGIN ScriptType=Indicator Description=Stochastic MidPoint Reversal System Name=StochMidPointRevSys Language=Formula Links=1 MinBars=0 TimerInterval=100 MetaStyle=Normal ValueRange=Same as Source Placement=Smart Multiplot_num_plots=1 Multiplot_color_0=255 Multiplot_style_0=Line Multiplot_width_0=1 Multiplot_enabled_0=1 Multiplot_breakstyle_0=0 UpdateByTick=0 TradingSystemUI=1 PrimaryLinkOnly=1 NotifyOnRemoval=0 Param_count=5 Param_name_0=MAPeriod Param_inuse_0=1 Param_type_0=integer.gt.0 Param_default_0=100 Param_name_1=SlowDPeriod Param_inuse_1=1 Param_type_1=integer.gt.0 Param_default_1=45 Param_name_2=SlowDSmooth Param_inuse_2=1 Param_type_2=integer.gt.0 Param_default_2=5 Param_name_3=SlowDSignal Param_inuse_3=1 Param_type_3=integer.gt.0 Param_default_3=10 Param_name_4=TimeBreak Param_inuse_4=1 Param_type_4=time Param_default_4=12:0:0 Explanation_Lines=0 # NEOTICKER DATA END ' Stochastic MidPoint Reversal System ' written by Lawrence Chan ' Copyright (c) 2005 TickQuest Inc. ' All Rights Reserved plot1 := currentequity; ma_filter := average (data1, param1); stoch_signal := average (slowd (data1, param2, param3), param4); $time_filter := time < param5; longatmarket ( $time_filter > 0 and xaboveconst (stoch_signal, 50) > 0 and data1 > ma_filter, defaultordersize, "Long"); shortatmarket ( $time_filter > 0 and xbelowconst (stoch_signal, 50) > 0 and data1 < ma_filter, defaultordersize, "Short");