Strategy window Hangs up WLP when bottom of Chart is dragged downward

Author: johnwlab

Creation Date: 5/12/2009 4:54 PM

Wealth Lab » Wealth-Lab Developer/Pro » Strategy window Hangs up WLP when bottom of Chart is dragged downward

johnwlab

5/12/2009 4:54 PM

There appears to be a code or file sensitive problem with
some Strategy Charts when the bottom of the Chart is manually
dragged downward with the mouse. When you first open a Strategy
the chart displays with no problems. If you maximize it fully
with the maximize button (upper right corner of chart), it displays
correctly. However, with some charts I have if you don't maximize
fully and instead drag the bottom edge of the chart downward to
the bottom of the screen it will hang up WealthLab Pro 5.3 so it
becomes a non responding process.

Below is the code for a Strategy Chart I use which exhibts
this problem. Don't know for sure if its a code problem, a
WealthLab database corruption problem or something else.
Ideally when running Strategies the system should never
hangup without giving some sort of error message indicating
the problem.

CODE:
Please log in to see this code.

Size:

Color:

Below is the code for a Strategy Chart I use which exhibts 
this problem.  Don't know for sure if its a code problem, a 
WealthLab database corruption problem or something else.  
Ideally when running Strategies the system should never 
hangup without giving some sort of error message indicating 
the problem.

[CODE]
namespace WealthLabCompile
{
	class TotalReturnChart : WealthScript
	{	
		private StrategyParameter LeftPole_Bar;
		private StrategyParameter RightPole_Bar;
		private StrategyParameter Ref_Irate;
		private StrategyParameter FastEMA_RS;
		private StrategyParameter SlowEMA_RS;		
		private StrategyParameter Extra;		
			
		public TotalReturnChart()
		{			
			LeftPole_Bar     = CreateParameter("Bar LeftPole",  0, 0, 1000000, 1);
			RightPole_Bar    = CreateParameter("Bar RightPole", 0, 0, 1000000, 1);	
			Ref_Irate        = CreateParameter("%Reference Line", 0, 0, 100, 0.1);
			FastEMA_RS       = CreateParameter("RS FastEMA", 18, 1, 200, 1);
			SlowEMA_RS       = CreateParameter("RS SlowEMA", 72, 1, 300, 1);			
			Extra            = CreateParameter(" ", 0, 0, 100, 1);
		}
			
		protected override void Execute()			
		{
			HideVolume();			
			//---------------------------------
			// Get Reference Symbol
			//---------------------------------
			Bars SymRef = GetExternalSymbol(".SPX", true);
			DataSeries RefSym  = SymRef.Close;
			RefSym = Synchronize (RefSym);

//-----------------------------------------------------------
			// Plot Pane with Symbol and Reference starting at 100 Offset
			//-----------------------------------------------------------
			DataSeries SymOff    = new DataSeries(Bars, Bars.Symbol);			
			DataSeries RefSymOff = new DataSeries(Bars, SymRef.Symbol);
			DataSeries Line100   = new DataSeries(Bars, "   ");
			SymOff[0] = 100;
			RefSymOff[0] =100;
			Line100[0] = 100;
			for ( int bar = 1; bar < Bars.Count; bar++ )
			{
				SymOff[bar] = SymOff[bar-1]*(1 + (Close[bar] - Close[bar-1])/Close[bar-1]);
				RefSymOff[bar] = RefSymOff[bar-1] *
					              (1 + (RefSym[bar] - RefSym[bar-1])/RefSym[bar-1]);
				Line100[bar] = 100;
			}				
			ChartPane  Pane2Sym = CreatePane(1000, true, true);			
			PlotSeries(Pane2Sym, SymOff, Color.Red, LineStyle.Solid, 2);
			PlotSeries(Pane2Sym, RefSymOff, Color.DarkGreen, LineStyle.Solid, 2);
			PlotSeries(Pane2Sym, Line100, Color.Black, LineStyle.Solid, 2);
			
			//------------------------------------------------
			// Create Relative Strength Pane with Offset of 10
			//------------------------------------------------	
			int Period_FastEMA  = FastEMA_RS.ValueInt;
			int Period_SlowEMA  = SlowEMA_RS.ValueInt;
			
			DataSeries RS         = new DataSeries(Bars, "Relative Strength");
			RS = Synchronize(RS);			
			DataSeries Line10   = new DataSeries(Bars, "  ");
			RS[0]     = 10;
			Line10[0] = 10;
			for ( int bar = 1; bar < Bars.Count; bar++ )
			{
				RS[bar] = 10*SymOff[bar]/RefSymOff[bar];
				Line10[bar] = 10;
			}			
			DataSeries RS_FastEMA = EMA.Series(RS, Period_FastEMA, EMACalculation.Modern);
			DataSeries RS_SlowEMA = EMA.Series(RS, Period_SlowEMA, EMACalculation.Modern);
			RS_FastEMA.Description = "EMA(RS," +Period_FastEMA.ToString() +")" ;
			RS_SlowEMA.Description = "EMA(RS," +Period_SlowEMA.ToString() +")" ;			
			
			ChartPane ChartRS = CreatePane(1000, true, true);
			PlotSeries(ChartRS, RS, Color.Blue, LineStyle.Solid, 2);
			PlotSeries(ChartRS, RS_FastEMA, Color.Green, LineStyle.Solid, 2);
			PlotSeries(ChartRS, RS_SlowEMA, Color.Red, LineStyle.Solid, 2);
		    PlotSeries(ChartRS, Line10, Color.Black, LineStyle.Solid, 2);	
		}
	}
}
[/CODE]

Cone

5/12/2009 5:06 PM

I can't duplicate it. Please create a Support Ticket and attach an image of the environment just before you start dragging. From the picture I want to know if you're streaming, the scale in use, the symbol, if log scale is enable, etc. etc.,

By the way,

CODE:
Please log in to see this code.

johnwlab

5/12/2009 11:36 PM

Cone, thanks for your reply. Your comment about wanting to know if the log scale was
enabled helped me find the problem. When the SetLogScale command for the Price pane was
commented out as shown below the problem went away.
// SetLogScale( PricePane, true );

The SetLogScale command for the Price commmand in the above code was a piece of legacy code
from a previous Strategy. For the Strategy code above which had the problem of hanging
Wealthlab the Price pane was forced to be very small only showing the title because it was
not being used. This combination of a very small Price pane with the LogScale set appears
to be what is causing WealthLab to hang (non responding task) on my computer when the
bottom of the Chart is dragged downward with the mouse. Will open a support ticket as you
suggested and send the strategy file.

Also thanks for comments about not needing additional Synchronization statements.