Combine two strategies together

Author: moja166

Creation Date: 5/20/2020 1:58 AM

Wealth Lab » Trading Strategies » Combine two strategies together

moja166

5/20/2020 1:58 AM

Hello

Dear I am glad to use Wealth Lab and find it useful program that by your efforts

what need there is two strategy i want combine it together

to be one strategy

1- Automatic trendline

CODE:
Please log in to see this code.

[b]2- Support and Resistance Zones

CODE:
Please log in to see this code.

===================

thank you

Size:

Color:

Hello

Dear I am glad to use Wealth Lab and find it useful program that  by your efforts

what need there is two strategy  i want combine it together

to be one  strategy

[b]1- Automatic trendline[/b]

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

namespace WealthLab.Strategies
{
	public class MyStrategy4 : WealthScript
	{
		protected override void Execute()
		{
			HideVolume();
			LineStyle ls = LineStyle.Solid;
			
			int bar = Bars.Count - 1;
			while (bar > 0) 
			{
				DrawActiveTrendLine(bar, Close, 3.3, false, PricePane, Color.Blue, ls); 
				bar--;
			}			
		}
		
		#region Methods
		
		bool UpwardTrendLine(int bar, DataSeries ds, int bar1, int bar3 )
		{
			bool result = false;
			
			// adjust Bar1 and Bar3 such that a proper upward trendline can be drawn

// if an intermediate bar crosses the line (Bar1,Bar3), advance Bar1
			for( int b = bar1 + 1; b < bar3; b++ )
			{
				if( ds[b] < LineExtendY(bar1, ds[bar1], bar3, ds[bar3], b) ) 
					bar1 = b;
			}
			// if a subsequent bar crosses the [right-extended] line (Bar1,Bar2), advance Bar3
			for( int b = bar3 + 1; b < bar; b++ )
			{				
				if( ds[b] < LineExtendY(bar1, ds[bar1], bar3, ds[bar3], b) )
					bar3 = b;
			}
			// require higher highs and higher lows
			if( (bar3 < bar) && (ds[bar1] < ds[bar3]) )
				result = ( Highest.Series(ds, bar3 - bar1 + 1)[bar3] < Highest.Series(ds, bar - bar3 + 1)[bar] );
			
			return result;
		}
		
		bool DownwardTrendLine(int bar, DataSeries ds, int bar1, int bar3 )
		{
			bool result = false;
			
			// adjust Bar1 and Bar3 such that a proper downward trendline can be drawn

// if an intermediate bar crosses the line (Bar1,Bar3), advance Bar1
			for( int b = bar1 + 1; b < bar3; b++ )
			{
				if( ds[b] > LineExtendY(bar1, ds[bar1], bar3, ds[bar3], b) ) 
					bar1 = b;
			}
			// if a subsequent bar crosses the [right-extended] line (Bar1,Bar2), advance Bar3
			for( int b = bar3 + 1; b < bar; b++ )
			{				
				if( ds[b] > LineExtendY(bar1, ds[bar1], bar3, ds[bar3], b) )
					bar3 = b;
			}
			// require lower highs and lower lows
			if( (bar3 < bar) && (ds[bar1] > ds[bar3]) )
				result = ( Lowest.Series(ds, bar3 - bar1 + 1)[bar3] < Lowest.Series(ds, bar - bar3 + 1)[bar] );
			
			return result;
		}
		
		// starting back at any past Bar, draw an "Active TrendLine" on its most recent peaks/troughs
		int DrawActiveTrendLine(int bar, DataSeries ds, double Threshold, bool LogScale, ChartPane Pane, Color color, LineStyle ls)
		{
			int result = 0;
			PTBar PTBs = PTBar.Series(ds, Threshold);
			
			int bar3 = (int)Math.Truncate( PTBs[bar] );
			int bar2 = (int)Math.Truncate( PTBs[bar3] );
			int bar1 = (int)Math.Truncate( PTBs[bar2] );
				
			if( ds[bar3] < ds[bar2] ) // build an upward trendline between troughs
			{
				if( !UpwardTrendLine(bar, ds, bar1, bar3) )
				{
					bar3 = bar2; bar1 = (int)Math.Truncate( PTBs[bar1] ); // build a downward trendline between peaks
					if( !DownwardTrendLine(bar, ds, bar1, bar3) )
						return result;
				}				
			}
			else // build a downward trendline between peaks
			{
				if( !DownwardTrendLine(bar, ds, bar1, bar3) )
				{
					bar3 = bar2; bar1 = (int)Math.Truncate( PTBs[bar1] ); // build an upward trendline between troughs
					if( !UpwardTrendLine(bar, ds, bar1, bar3) )
						return result;
				}
			}
				
			double y = 0;
			y = !LogScale ? ( ds[bar3] - ds[bar1]) * (bar - bar1) / (bar3 - bar1) :
				Math.Exp( Math.Log ( ds[bar3] / ds[bar1]) * (bar - bar1) / (bar3 - bar1));
				
			DrawLine( Pane, bar1, ds[bar1], bar, ds[bar1] + y, color, ls, 2);
			result = bar1;
			
			return result;
		}
		
		#endregion
	}
}[/code]

[b]2- Support and Resistance Zones [/b]

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

namespace WealthLab.Strategies
{
	public class MyStrategy3 : WealthScript
	{
		protected override void Execute()
		{
			double ZH, ZL;
			bool Drawn = false;
			
			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 );
					}
				} 
			}
			
			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 );
					}
				}
			}
		}
	}
}[/code]

===================

thank you

Eugene

5/20/2020 5:43 AM

Here you go:

CODE:
Please log in to see this code.

Size:

Color:

Here you go:

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

namespace WealthLab.Strategies
{
	public class MyStrategy1 : WealthScript
	{
		protected override void Execute()
		{
			//1- Automatic trendline
			HideVolume();
			LineStyle ls = LineStyle.Solid;

int _bar = Bars.Count - 1;
			while (_bar > 0)
			{
				DrawActiveTrendLine(_bar, Close, 3.3, false, PricePane, Color.Blue, ls);
				_bar--;
			}
			
			//2- Support and Resistance Zones 
			double ZH, ZL;
			bool Drawn = false;

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);
					}
				}
			}

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);
					}
				}
			}
		}

#region Methods

bool UpwardTrendLine(int bar, DataSeries ds, int bar1, int bar3)
		{
			bool result = false;

// adjust Bar1 and Bar3 such that a proper upward trendline can be drawn

return result;
		}

bool DownwardTrendLine(int bar, DataSeries ds, int bar1, int bar3)
		{
			bool result = false;

// adjust Bar1 and Bar3 such that a proper downward trendline can be drawn

return result;
		}

// starting back at any past Bar, draw an "Active TrendLine" on its most recent peaks/troughs
		int DrawActiveTrendLine(int bar, DataSeries ds, double Threshold, bool LogScale, ChartPane Pane, Color color, LineStyle ls)
		{
			int result = 0;
			PTBar PTBs = PTBar.Series(ds, Threshold);

int bar3 = (int)Math.Truncate(PTBs[bar]);
			int bar2 = (int)Math.Truncate(PTBs[bar3]);
			int bar1 = (int)Math.Truncate(PTBs[bar2]);

if (ds[bar3] < ds[bar2]) // build an upward trendline between troughs
			{
				if (!UpwardTrendLine(bar, ds, bar1, bar3))
				{
					bar3 = bar2; bar1 = (int)Math.Truncate(PTBs[bar1]); // build a downward trendline between peaks
					if (!DownwardTrendLine(bar, ds, bar1, bar3))
						return result;
				}
			}
			else // build a downward trendline between peaks
			{
				if (!DownwardTrendLine(bar, ds, bar1, bar3))
				{
					bar3 = bar2; bar1 = (int)Math.Truncate(PTBs[bar1]); // build an upward trendline between troughs
					if (!UpwardTrendLine(bar, ds, bar1, bar3))
						return result;
				}
			}

double y = 0;
			y = !LogScale ? (ds[bar3] - ds[bar1]) * (bar - bar1) / (bar3 - bar1) :
			   Math.Exp(Math.Log(ds[bar3] / ds[bar1]) * (bar - bar1) / (bar3 - bar1));

DrawLine(Pane, bar1, ds[bar1], bar, ds[bar1] + y, color, ls, 2);
			result = bar1;

return result;
		}

#endregion
	}
}[/code]