Support Resistance DataSeries

Author: kbellare

Creation Date: 10/1/2014 8:26 PM

Wealth Lab » WealthScript (.NET) » Support Resistance DataSeries

kbellare

10/1/2014 8:26 PM

I'm using the Support Resistence Zones utility at http://www.wealth-lab.com/Strategy/Details/65

This utility draws multiple support/resistence lines at the same bar - i'm using this to create 2 DataSeries (Support and Resistence) that are closest to the price at any given bar, so i can Buy and Sell when the price touches these 2 series.

Having trouble creating this Series, as can be seen in the plot of these two series on the price chart - they don't overlap with the Support/Resistence boxes closest to the price. Please advise what i'm doing wrong with the code below (i've commented my code inserts as //my code) and how i could fix it.

CODE:
Please log in to see this code.

Size:

Color:

I'm using the Support Resistence Zones utility at [link]http://www.wealth-lab.com/Strategy/Details/65[/link]

This utility draws multiple support/resistence lines at the same bar - i'm using this to create 2 DataSeries (Support and Resistence) that are closest to the price at any given bar, so i can Buy and Sell when the price touches these 2 series.

Having trouble creating this Series, as can be seen in the plot of these two series on the price chart - they don't overlap with the Support/Resistence boxes closest to the price.  Please advise what i'm doing wrong with the code below (i've commented my code inserts as //my code) and how i could fix it.

[code]

DataSeries support = Lowest.Series(Low, 100); //  my code - starting point, to be updated by actual Support levels in the for loop below
         DataSeries resistence = Highest.Series(High,100); // my code - starting point, to be modified by actual Resistence levels in the for loop below

PlotSeries(paneMACDEx1,macd,Color.Green,LineStyle.Histogram,1);
         PlotSeriesOscillator(paneStochK1,sto,75,25,Color.FromArgb(63,0,0,255),Color.FromArgb(63,255,0,0),Color.FromArgb(255,107,142,35),LineStyle.Solid,2);
         PlotSeries(PricePane,sma,Color.Purple,LineStyle.Solid,2);
         PlotSeries(paneATR1,atr,Color.FromArgb(255,0,64,128),LineStyle.Solid,1);
         PlotSeries(paneATR1,smaSlope,Color.Orange,LineStyle.Solid,1);         
         
         for(int bar = 12; bar < Bars.Count; bar++)
         {
            if( ( High[bar - 2] < High[bar - 1] ) & ( High[bar - 1] > High[bar] )
               & ( Close[bar] > Close[bar - 10] ) )
            {
               ZH = High[bar - 1];
               ZL = High[bar];
               Drawn = false; 
               for(int bar2 = bar+1; bar2 < Bars.Count; bar2++)
               {
                  if( Close[bar2] > ZH )
                  {
                     double[] rectangle = { bar, ZL, bar, ZH, bar2, ZH, bar2, ZL };
                     DrawPolygon( PricePane, Color.Transparent, Color.FromArgb(40, Color.Red), 
                        LineStyle.Solid, 2, true, rectangle );
                     Drawn = true;
                     resistence[bar2]=Math.Min(ZH,resistence[bar2]); //  my code
                     break;
                  }
               }
               
               if( !Drawn )
               {
                  double[] rectangle2 = { bar, ZL, bar, ZH, Bars.Count-1, ZH, Bars.Count-1, ZL };
                  DrawPolygon( PricePane, Color.Transparent, Color.FromArgb(40, Color.Red), 
                     LineStyle.Solid, 2, true, rectangle2 );
                  resistence[bar]=Math.Min(ZH,resistence[bar]); // my code
               }
            } 
         }
         
         for(int bar = 12; bar < Bars.Count; bar++)
         {
            if( ( Low[bar - 2] > Low[bar - 1] ) & ( Low[bar - 1] < Low[bar] ) 
               & ( Close[bar] < Close[bar - 10] ) )
            {
               SH = Low[bar - 1]; 
               SL = Low[bar]; 
               Drawn = false; 
               for(int bar2 = bar+1; bar2 < Bars.Count; bar2++)
               {
                  if( Close[bar2] < SL)
                  {
                     double[] rectangle3 = { bar, SL, bar, SH, bar2, SH, bar2, SL };
                     DrawPolygon( PricePane, Color.Transparent, Color.FromArgb(40, Color.Green), 
                        LineStyle.Solid, 2, true, rectangle3 );
                     Drawn = true; 
                     support[bar2]=Math.Max(support[bar2],SH); // my code   
                     break; 
                  }
               }
               if( !Drawn )
               {
                  double[] rectangle4 = { bar, SL, bar, SH, Bars.Count-1, SH, Bars.Count-1, SL };
                  DrawPolygon( PricePane, Color.Transparent, Color.FromArgb(40, Color.Green), 
                     LineStyle.Solid, 2, true, rectangle4 );
                  support[bar]=Math.Max(support[bar],SH); //my code   
               }
            }
         }
         PlotSeries(PricePane, support, Color.DarkSeaGreen, LineStyle.Dotted, 2); //my code
         PlotSeries(PricePane, resistence, Color.OrangeRed, LineStyle.Dotted, 2); //my code

[/code]

Eugene

10/2/2014 4:13 AM

Is this closer?

CODE:
Please log in to see this code.

Size:

Color:

Is this closer?

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

namespace WealthLab.Strategies
{
	public class MyStrategy : WealthScript
	{
		protected override void Execute()
		{
			double ZH, ZL;
			bool Drawn = false;
			DataSeries support = Lowest.Series(Low, 100); //  my code - starting point, to be updated by actual Support levels in the for loop below
			DataSeries resistence = Highest.Series(High,100); // my code - starting point, to be modified by actual Resistence levels in the for loop below
			PlotSeries(PricePane, support, Color.DarkSeaGreen, LineStyle.Dotted, 2); //my code
			PlotSeries(PricePane, resistence, Color.OrangeRed, LineStyle.Dotted, 2); //my code
			
			for(int bar = 12; bar < Bars.Count; bar++)
			{
				if( ( High[bar - 2] < High[bar - 1] ) & ( High[bar - 1] > High[bar] )
					& ( Close[bar] > Close[bar - 10] ) )
				{
					ZH = High[bar - 1];
					ZL = High[bar];
					Drawn = false; 
					for(int bar2 = bar+1; bar2 < Bars.Count; bar2++)
					{
						if( Close[bar2] > ZH )
						{
							double[] rectangle = { bar, ZL, bar, ZH, bar2, ZH, bar2, ZL };
							DrawPolygon( PricePane, Color.Transparent, Color.FromArgb(40, Color.Red), 
								LineStyle.Solid, 2, true, rectangle );
							Drawn = true; 
							break; 
						}
					}
					
					if( !Drawn )
					{
						double[] rectangle2 = { bar, ZL, bar, ZH, Bars.Count-1, ZH, Bars.Count-1, ZL };
						DrawPolygon( PricePane, Color.Transparent, Color.FromArgb(40, Color.Red), 
							LineStyle.Solid, 2, true, rectangle2 );
						resistence[bar]=Math.Min(ZH,resistence[bar]); // my code
						if( resistence[bar] != resistence[bar-1] )
							resistence[bar] = resistence[bar-1];
					}
				} 
			}
			
			for(int bar = 12; bar < Bars.Count; bar++)
			{
				if( ( Low[bar - 2] > Low[bar - 1] ) & ( Low[bar - 1] < Low[bar] ) 
					& ( Close[bar] < Close[bar - 10] ) )
				{
					ZH = Low[bar - 1]; 
					ZL = Low[bar]; 
					Drawn = false; 
					for(int bar2 = bar+1; bar2 < Bars.Count; bar2++)
					{
						if( Close[bar2] < ZL )
						{
							double[] rectangle3 = { bar, ZL, bar, ZH, bar2, ZH, bar2, ZL };
							DrawPolygon( PricePane, Color.Transparent, Color.FromArgb(40, Color.Green), 
								LineStyle.Solid, 2, true, rectangle3 );
							Drawn = true; 
							break; 
						}
					}
					if( !Drawn )
					{
						double[] rectangle4 = { bar, ZL, bar, ZH, Bars.Count-1, ZH, Bars.Count-1, ZL };
						DrawPolygon( PricePane, Color.Transparent, Color.FromArgb(40, Color.Green), 
							LineStyle.Solid, 2, true, rectangle4 );
						support[bar]=Math.Max(support[bar],ZH); //my code
						if( support[bar] != support[bar-1] )
							support[bar] = support[bar-1];
					}
				}
			}
		}
	}
}
[/code]

Wealth Lab » WealthScript (.NET) » Support Resistance DataSeries