How to Integrate CooledOff into the Darvas System

Author: mc3273

Creation Date: 8/29/2014 8:53 AM

Wealth Lab » Trading Strategies » How to Integrate CooledOff into the Darvas System

mc3273

8/29/2014 8:53 AM

Hi, would anyone with some coding background be able to help integrate the CooledOff code into the Darvas code. I am looking for the ability to not open a new trade until 3 days after the previous trade closed. Thanks

Eugene

8/29/2014 9:05 AM

All it takes is just a modification of a single line of code:

CODE:
Please log in to see this code.

Try this:

CODE:
Please log in to see this code.

Size:

Color:

All it takes is just a modification of a single line of code:
[code]//if( !IsLastPositionActive )
if( !IsLastPositionActive && this.CooledOff( bar, paramBars.ValueInt ) )[/code]

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

namespace WealthLab.Strategies
{
	public class DarvasBox : WealthScript
	{
		private StrategyParameter paramBars;
		
		public DarvasBox()
		{
			paramBars = CreateParameter("Delay entry", 3, 1, 50, 1);
		}
		
		protected override void Execute()
		{
			double BoxTop, BoxBottom;
			bool BoxBottomDef, BoxTopDef, BoxDef, First;
			int BoxTopCount, BoxBotCount, BoxDays, LastBoxBar;
			WealthLab.LineStyle ls = WealthLab.LineStyle.Solid;

First = true;
			BoxDays = 2;
			LastBoxBar = 0;
			
			// my initialization
			BoxTop = Bars.High[0];
			BoxBottom = Bars.Low[0];
			BoxTopCount = BoxBotCount = 0;
			BoxTopDef = BoxBottomDef = BoxDef = false;

for(int bar = 5; bar < Bars.Count; bar++)
			{
				if( First == true )
				{
					BoxTop = Bars.High[bar];
					First = false;
					BoxTopCount = 0;
					BoxBotCount = 0;
					BoxBottomDef = false;
					BoxTopDef = false;
					LastBoxBar = bar;
				}

if( ( BoxDef == false ) & ( Bars.High[bar] > BoxTop ) )
				{
					BoxTopCount = 0;
					BoxTop = Bars.High[bar];
					// Resets BoxBotCount if New High is made again
					BoxBotCount = 0;
				}

if( ( BoxDef == false ) & ( Bars.High[bar] <= BoxTop ) )
					BoxTopCount++;

if(( BoxDef == false ) & ( BoxTopCount == BoxDays ) & ( Bars.High[bar] <= BoxTop ))
					BoxTopDef = true;

if(( BoxDef == false ) & ( BoxTopDef == true ) & ( BoxBottomDef == false ) & ( BoxTopCount >= BoxDays+1 ))
				{
					if( BoxBotCount == 0 )
						BoxBottom = Bars.Low[bar];

if( Bars.Low[bar] < BoxBottom )
					{
						BoxBotCount = 0;
						BoxBottom = Bars.Low[bar];
					}
					
					if( Bars.Low[bar] >= BoxBottom )
						BoxBotCount++;

if( BoxBotCount == BoxDays+1 )
						BoxBottomDef = true;
				}

// test

if(( BoxDef == false ) & ( BoxTopDef == true ))
				{
					if( Bars.High[bar] > BoxTop )
						First = true;
				}

if(( BoxDef == false ) & ( BoxBottomDef == true ) & ( BoxTopDef == true ) )
				{
					BoxDef = true;
					BoxBottomDef = false;
					BoxTopDef = false;
				}

// Darvas Box defined

if( BoxDef == true )
				{
					DrawLine( PricePane, bar, BoxTop, LastBoxBar, BoxTop, Color.Green, ls, 2 );
					DrawLine( PricePane, bar, BoxBottom, LastBoxBar, BoxBottom, Color.Red, ls, 2 );

if( Bars.High[bar] > BoxTop )
					{
						BoxDef = false;
						
						if( !IsLastPositionActive && this.CooledOff( bar, paramBars.ValueInt ) )
							BuyAtStop( bar+1, BoxTop );

DrawLine( PricePane, LastBoxBar, BoxBottom, LastBoxBar, BoxTop, Color.Green, ls, 2 );
						DrawLine( PricePane, bar, BoxBottom, bar, BoxTop, Color.Green, ls, 2 );

First = true;
						BoxTop = Bars.High[bar];
					}

if( Bars.Low[bar] < BoxBottom )
					{
						BoxDef = false;
						
						if( IsLastPositionActive ) 
							SellAtStop( bar+1, LastPosition, BoxBottom );

DrawLine( PricePane, LastBoxBar, BoxBottom, LastBoxBar, BoxTop, Color.Green, ls, 2 );
						DrawLine( PricePane, bar, BoxBottom, bar, BoxTop, Color.Red, ls, 2 );
						First = true;
						BoxTop = Bars.High[bar];
					}
				}

// second true

if( First == true )
				{
					BoxTop = Bars.High[bar];
					First = false;
					BoxTopCount = 1;
					BoxBotCount = 0;
					BoxBottomDef = false;
					BoxTopDef = false;
					LastBoxBar = bar;
				}
			}
			
		}
	}
}

[/code]

Wealth Lab » Trading Strategies » How to Integrate CooledOff into the Darvas System