Relative Strength chart - Wealth Lab Forum

Relative Strength chart

Author: wphill

Creation Date: 12/10/2010 10:56 AM

Wealth Lab » WealthScript (.NET) » Relative Strength chart

wphill

12/10/2010 10:56 AM

I have cut and paste the following code to in order have a chart that shows relative strength with fast and slow ema's. It worked fine when I used ".spx" as the external signal and added any other stock/index as the regular symbol.

I then substituted "EDV" for the external signal and t placed "VT" as the regular symbol. This worked OK. However, in order to get more historical data I placed "TLT" as the external symbol and "VTI" as the regular symbol. This compiled OK, but the chart only showed a price line for VTI.

How do I get both of these symbols (TLT and VTI) to show in the chart?

My ultimate goal is to use code to add two panes of the following indicators: PPO and RSI, each with their own parameter values.
And, to have additional code to use the above parameter values to enter/exit long the entered signal with back testing on the above parameter values.

I am hoping that you guys can take me a little closer to having a complete relative strength trading strategy based on two symbols.

CODE:
Please log in to see this code.

Size:

Color:

I then substituted "EDV" for the external signal and t placed "VT" as the regular symbol. This worked OK. However, in order to get more historical data I placed "TLT" as the external symbol and "VTI" as the regular symbol. This compiled OK, but the chart only showed a price line for VTI.

How do I get both of these symbols (TLT and VTI) to show in the chart?

My ultimate goal is to use code to add two panes of the following indicators: PPO and RSI, each with their own parameter values.
And, to have additional code to use the above parameter values  to enter/exit long the entered signal with back testing on the above parameter values.

I am hoping that you guys can take me a little closer to having a complete relative strength trading strategy based on two symbols.

[CODE]using System;
using System.Collections.Generic;
using System.Text;
using System.Drawing;
using WealthLab;
using WealthLab.Indicators;

namespace WealthLabCompile
{
	class TotalReturnChart : WealthScript
	{	
		private StrategyParameter FastEMA_RS;
		private StrategyParameter SlowEMA_RS;	
			
		public TotalReturnChart()
		{			
			FastEMA_RS       = CreateParameter("RS FastEMA", 18, 1, 200, 1);
			SlowEMA_RS       = CreateParameter("RS SlowEMA", 72, 1, 300, 1);			
		}
			
		protected override void Execute()			
		{
			HideVolume();			
			//---------------------------------
			// Get Reference Symbol
			//---------------------------------
			Bars SymExt = GetExternalSymbol("edv", true);
			DataSeries RefSym  = SymExt.Close;
			SymExt = Synchronize (SymExt);
			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, SymExt.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(1200, 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");	
			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(1200, 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]

Wealth Lab » WealthScript (.NET) » Relative Strength chart