A dip buyer script compiles with errors after WSTL

Author: Carova

Creation Date: 1/15/2015 2:55 PM

Wealth Lab » WealthScript Translator » A dip buyer script compiles with errors after WSTL

Carova

1/15/2015 2:55 PM

I am not off to a good start. :( The first script that I tried to translate has a problem.

Original WL4 script

CODE:
Please log in to see this code.

WL6 Code from the Translator

CODE:
Please log in to see this code.

I can't seem to copy the error messages from WLP but it appears that it does not like these lines of code

CODE:
Please log in to see this code.

Any thoughts? Thanks!

Vince

Size:

Color:

I am not off to a good start. :(  The first script that I tried to translate has a problem.

Original WL4 script
[code]{#OptVar1 3;1;100;1}
{#OptVar2 358;10;1000;1}
{#OptVar3 38;1;50;1}
{#OptVar4 29;4;30;1}

const Timeout = #OptVar1;
const Lookback = #OptVar2;
const Fall = #OptVar3;
InstallStopLoss(#OptVar4);

var Bar: integer;
InstallTimeBasedExit(Timeout);
for Bar := Lookback to BarCount - 1 do
begin
  ApplyAutoStops(Bar + 1);
  if PriceClose(Bar) <= Highest(Bar, #High, 10) * (100 - Fall) / 100 then
  begin
    var Priority: float = ROC(Bar, #Close, Lookback);
    if BuyAtMarket(Bar + 1, FormatFloat('#,##0.00', Priority)) then
      SetPositionPriority(LastPosition, Priority);
  end;
end;
[/code]

WL6 Code from the Translator
[code]using System;
using System.Collections.Generic;
using System.Text;
using System.Drawing;
using System.Threading; // Sleep()
using System.Windows.Forms;
using WealthLab;
using WealthLab.Indicators;
using finantic.TL; // WealthScriptTL

namespace WealthLabCompile2
{
    class Strategy : WealthScriptTL
    {
    // OptVars
    private StrategyParameter OptVar1, OptVar2, OptVar3, OptVar4;
    public Strategy()
    {
      OptVar1 = CreateParameter("OptVar1", 3, 1, 100, 1);
      OptVar2 = CreateParameter("OptVar2", 358, 10, 1000, 1);
      OptVar3 = CreateParameter("OptVar3", 38, 1, 50, 1);
      OptVar4 = CreateParameter("OptVar4", 29, 4, 30, 1);
    }
#region file ChartScript

// start of prolog: This is a comment at the top of each file
		public new void Init(){
			base.Init();
			//optional settings
			UseUpdatedEMA(true);
			SetStdDevCalculation(StdDevCalculation.Population);
		}
// end of prolog: This is a comment at the top of each file

public  /**const*/ int Timeout = WL_OPTVAR1;
public  /**const*/ int Lookback = WL_OPTVAR2;
public  /**const*/ int Fall = WL_OPTVAR3;
public int BAR = 0;
public double Priority = 0.0;

/** This method contains the meat of your script,
    i.e, any statements that are not inside a user defined class or function/procedure. */
protected override void Execute(){
    Init();
    // [declaration for class ChartScript used to be here] 
    
    InstallStopLoss((int) OptVar4.Value);
    InstallTimeBasedExit(Timeout);
    for (BAR = Lookback; BAR <= (Bars.Count - 1); BAR++) {
        ApplyAutoStops((BAR + 1));
        if ((PriceClose(BAR) <= ((Highest(BAR, WL_HIGH, 10) * ((100 - Fall))) / 100))) {
            Priority = (double)ROC(BAR, WL_CLOSE, Lookback);
            if (BuyAtMarket((BAR + 1), FormatFloat("#,##0.00", Priority))) SetPositionPriority(LastPosition, Priority);
            
        }
        
    }
    
}

// start of epilog: This is a comment at the end of each file
	} // class Strategy
} // namespace
// end of epilog

#endregion file ChartScript
[/code]

I can't seem to copy the error messages from WLP but it appears that it does not like these lines of code
[code]		public  /**const*/ int Timeout = WL_OPTVAR1;
		public  /**const*/ int Lookback = WL_OPTVAR2;
		public  /**const*/ int Fall = WL_OPTVAR3;
[/code]

Any thoughts?  Thanks!

Vince