Opening Bar Breakout System for Intraday Trading
		var BAR: integer; var TICK, LONGPRICE, SHORTPRICE: float; var LONG, SHORT: boolean; tick := 0.02; if GetSymbol() = 'ES02M' then tick := 0.25; if GetSymbol() = 'NQ02M' then tick := 0.50; if GetSymbol() = 'US02M' then tick := 0.032; for Bar := 20 to BarCount - 1 do BEGIN if BarNum(Bar) = 0 then begin SetBarColor( Bar, #RED ); longprice:= PriceHigh(Bar)+tick; shortprice:= PriceLow(Bar)-tick; long:=(PriceClose(Bar)>PriceOpen(Bar)+tick*4); short:=(PriceClose(Bar)<PriceOpen(Bar)-tick*4); end; { Exit Rules } begin if LastPositionActive then begin if PositionLong(LastPosition) then begin if LastBar(Bar) then SellAtClose(Bar,LastPosition,'MOC Exit') else begin SellAtStop(Bar + 1,shortprice,LastPosition,''); if (GetHour(Bar)<13) then ShortAtStop(Bar + 1,shortprice,'Stop and Reverse'); end end else if PositionShort(LastPosition) then begin if LastBar(Bar) then CoverAtClose(Bar,LastPosition,'MOC Exit') else begin CoverAtStop(Bar + 1,longprice,LastPosition,''); if (GetHour(Bar)<13) then BuyAtStop(Bar + 1,longprice,'Stop and Reverse'); end end end else { Entry Rules } begin if long AND NOT LastBar(Bar) AND (GetHour(Bar) <13) then BuyAtStop(Bar + 1,longprice,''); if short AND NOT LastBar(Bar) AND (GetHour(Bar) <13) then ShortAtStop(Bar + 1,shortprice,''); end end; END;
			This is a simple opening bar breakout system.  Tests OK on the S&P EMINI 60-minute chart..  Needs the WLD2 software + realtime feed to work since the script uses intraday functions. You can see some backtesting results here.  (May take a while to load.)
				Warning:  Use this script at your own risk. Back to the Main Page , Go to the Download Page Comments and questions can be submitted here. If the script works for you and you decide to get the software, remember to get it here !!