inputs: sl(700), shortOn(0), longOn(0);

if time = 0 and c > c[1] and marketposition = 0 and shortOn = 1 then sellshort next bar at market;
if time = 800 and marketposition <= 0 then begin 
	buytocover next bar at market;
	if h > h[1] and c < c[1] and longOn = 1 then buy next bar at market;
end;
if time = 2300 and marketposition > 0 then sell next bar at market;


setstoploss_pt(sl);