# NEOTICKER DATA BEGIN ScriptType=Indicator Description=Jeff Cooper 1-2-3-4 System Name=sys_jc_1234 Language=Formula Links=1 MinBars=0 TimerInterval=100 EarlyBinding=0 MetaStyle=Normal ValueRange=Same as Source Placement=New Pane 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 FloatMarker=1 DepthData=0 TradingSystemUI=1 PrimaryLinkOnly=0 NotifyOnRemoval=0 Param_count=1 Param_name_0=entry point Param_inuse_0=1 Param_type_0=real Param_default_0=0.125 Explanation_Lines=0 # NEOTICKER DATA END $entry_point := param1; longstop(jc_1234_signal(data1, 14, 14, 14)>0 and openpositionflat>0, high+$entry_point, defaultordersize, "entry long"); 'Initial protective stop long $longprotectivestop := if(jc_1234_signal(data1, 14, 14, 14)>0 and openpositionflat>0, low, $longprotectivestop); 'if the position is making profit trial the stop price $longprotectivestop := if(openpositionbestpricelevel>openpositionaverageentryprice and openpositionlong>0, low*0.95, $longprotectivestop); longexitstop(openpositionlong>0, $longprotectivestop, defaultordersize, "protective stop"); shortstop(jc_1234_signal(data1, 14, 14, 14)<0 and openpositionflat>0, low-$entry_point, defaultordersize, "entry short"); 'Initial protective stop short $shortprotectivestop := if(jc_1234_signal(data1, 14, 14, 14)<0 and openpositionflat>0, high, $shortprotectivestop); $shortprotectivestop := if(openpositionbestpricelevel0, high*1.05, $shortprotectivestop); shortexitstop(openpositionshort>0, $shortprotectivestop, defaultordersize, "protective stop"); plot1 := currentequity;