CrossOver/Under run-time error

Author: ronc

Creation Date: 2/8/2014 9:19 PM

Wealth Lab » WealthScript (.NET) » CrossOver/Under run-time error

ronc

2/8/2014 9:19 PM

This throws a run-time error at the CrossUnder call. How do I fix it? I tried doing the Synchronization calls first, before the calls to CrossUnder/Over, but that also crashed.

CODE:
Please log in to see this code.

Size:

Color:

This throws a run-time error at the CrossUnder call. How do I fix it? I tried doing the Synchronization calls first, before the calls to CrossUnder/Over, but that also crashed.

[code]
using System;
using System.Collections.Generic;
using System.Text;
using System.Drawing;
using WealthLab;
using WealthLab.Indicators;
using Community.Indicators;
using Community.Components;
using TASCIndicators;
namespace WealthLab.Strategies
{
	public class MyStrategy : WealthScript
	{		
		StrategyParameter stochPeriodInput;
		StrategyParameter stochDsmoothPeriodInput;	
		StrategyParameter gainStochLimitInput;	
		StrategyParameter stochThresholdInput;
				
		public MyStrategy() {
			stochPeriodInput = CreateParameter("stochPeriod", 3, 2, 40, 1);
			stochDsmoothPeriodInput = CreateParameter("stochDsmoothPeriod", 3, 2, 30, 1);
			stochThresholdInput = CreateParameter("stochThreshold", 30, 0, 50, 1);
		}
		
		protected override void Execute()
		{					
			int stochDsmoothPeriod = stochDsmoothPeriodInput.ValueInt;
			double stochThreshold = stochThresholdInput.Value;

// create chart panes
			bool abovePricePane = true;
			bool displayGrid = true;
			ChartPane Pane11 = CreatePane(35, abovePricePane, displayGrid); DrawLabel(Pane11, "Pane11", Color.Black);

// Get all data for current symbol to provide lead bars for indicators
			Bars allDataBars = Utility.GetAllDataForSymbol( Bars.Symbol, Bars.Scale, Bars.BarInterval );
			
			// Stochastic
			DataSeries stochK = StochK.Series(allDataBars, stochPeriodInput.ValueInt);
			DataSeries stochD = StochD.Series(allDataBars, stochPeriodInput.ValueInt, stochDsmoothPeriodInput.ValueInt);
			stochK.Description = "stochK";
			stochD.Description = "stochD";
			DataSeries stochCrossScore = new DataSeries(allDataBars, "stochCrossScore");
			
			for (int bar = 1; bar < allDataBars.Count; bar++) {
				if (CrossUnder(bar, stochK, stochD))
					stochCrossScore[bar] = -1.0;
				else if (CrossOver(bar, stochK, stochD))
					stochCrossScore[bar] = 1.0;
			}
			
			// Synchronize all data series
			stochK = Synchronize(stochK);
			stochD = Synchronize(stochD);
			stochCrossScore = Synchronize(stochCrossScore);
			
			PlotSeries(Pane11, stochK, Color.Blue, WealthLab.LineStyle.Solid, 1);
			PlotSeries(Pane11, stochD, Color.Black, WealthLab.LineStyle.Solid, 1);
			DrawHorzLine(Pane11, 50, Color.Black, WealthLab.LineStyle.Dashed, 1 );
			DrawHorzLine(Pane11, 50 + stochThreshold, Color.Red, WealthLab.LineStyle.Solid, 1);
			DrawHorzLine(Pane11, 50 - stochThreshold, Color.Red, WealthLab.LineStyle.Solid, 1);

}
	}
}
[/code]