Script errors in WL editor - Wealth Lab Forum

ikx

#1

5/23/2012 4:13 AM

I translate my code fron WL 4 to 6 with the WScritTranslator but when I compile it within the WL 6.3 it makes me these errors,

Please help me:

46,8 = (Bar, Dup 1=0)
134,16 =(CreatePane)
134,32 =(-1)
134,37 =(-1)
135,17 =(CreatePane)
135,34 =(-2)
135,39 =(-2)

This is my code after translate in C#:

CODE:
Please log in to see this code.

Size:

Color:

I translate my code fron WL 4 to 6 with the WScritTranslator but when I compile it within the WL 6.3 it makes me these errors,

Please help me:

46,8 = (Bar, Dup 1=0)
134,16 =(CreatePane)
134,32 =(-1)
134,37 =(-1)
135,17 =(CreatePane)
135,34 =(-2)
135,39 =(-2)

This is my code after translate in C#:

[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;
    public Strategy()
    {
      OptVar1 = CreateParameter("OptVar1", 5, 10, 500, 10);
      OptVar2 = CreateParameter("OptVar2", 5, 5, 50, 5);
      OptVar3 = CreateParameter("OptVar3", 5, 5, 50, 5);
    }
#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 int EMA1, EMA0, EMA2, EMA3, EMA4, EMA5, EMA6, Diff, Diff1, Diff2, Deviation1, Deviation2, GPXL3, GPXL4, BAR, Series, p = 0;
public double BuyZone, SellZone = 0.0;
public int GPXL = 0;
public  /** lunghezza Dev.  Variabile 1 */ 
int GPXL2 = 0;
public int Deviation = 0;
public double GPXAZ = 0.0;

public int LogReturns (int Series, int Series1, int Period){
    int fnResult = 0;
    fnResult = CreateSeries();

int Bar_dup1 = 0;

for (BAR = 0; BAR <= (Bars.Count - 1); BAR++) {
        try {
            {
                GetSeries(fnResult)[BAR] = (100 * Math.Log((GetSeries(Series)[BAR] / GetSeries(Series1)[(BAR - Period)])));
                
            }
            
        } catch (Exception /*e*/){
            {
                GetSeries(fnResult)[BAR] = 100.0;
                
            }
            
        }
        
    }
    return fnResult;
    
}
public int Yield = 0;
public  /** Yield */ 
int Yield1 = 0;
public  /** Yield High */ 
int Yield2 = 0;
public  /**  variabile 2 Low */ 
int EMA2UpperBB = 0;
public int EMA2LowerBB = 0;
public int AvgEMA2BBand = 0;
public int EMA2UpperBB1 = 0;
public  /**  banda con high */ 
int EMA2LowerBB2 = 0;
public  /** banda con low */ 
int Pane = 0;
public int Pane1 = 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] 
    
    GPXL = (int)20;
    GPXAZ = (double)0.00;
    GPXL = (int)(int) OptVar1.Value;
    EMA5 = (int)(int) OptVar2.Value;
    EMA6 = (int)(int) OptVar3.Value;
    // [declaration for function LogReturns  used to be here] 
    Yield = (int)LogReturns(WL_CLOSE, WL_CLOSE, 1);
    Yield1 = (int)LogReturns(WL_HIGH, WL_HIGH, 7);
    Yield2 = (int)LogReturns(WL_LOW, WL_LOW, 1);
     /** Yield Low //Variabile */ 
    HideVolume();
    EMA1 = (int)EMASeries(Yield, 100);
     /** media of the Yield */ 
    EMA3 = (int)EMASeries(Yield1, 100);
     /** media of the Yield High */ 
    EMA4 = (int)EMASeries(Yield2, 100);
     /** media of the Yield  Low */ 
    Series = (int)WL_CLOSE;
    Diff = (int)SubtractSeries(Yield, EMA1);
     /** diff.from price and media of the prices */ 
    Diff1 = (int)SubtractSeries(Yield1, EMA3);
     /**  High */ 
    Diff2 = (int)SubtractSeries(Yield2, EMA4);
     /**  Low */ 
    Deviation = (int)StdDevSeries(EMA1, GPXL);
     /** Deviazione EMA Yield */ 
    Deviation1 = (int)StdDevSeries(EMA3, GPXL);
     /**  Yield High */ 
    Deviation2 = (int)StdDevSeries(EMA4, GPXL);
     /** Yield Low */ 
    GPXL2 = (int)DivideSeries(Diff, Deviation);
     /** Divisione Diff e Deviazione EMA */ 
    GPXL3 = (int)DivideSeries(Diff1, Deviation1);
     /** Dev Yield High */ 
    GPXL4 = (int)DivideSeries(Diff2, Deviation2);
     /** Dev Yield  Low */ 
    EMA2 = (int)EMASeries(GPXL2, 6);
     /** media ex. of the difference, Variabile 2 */ 
    EMA5 = (int)EMASeries(GPXL3, 20);
     /**  variabile 2 High */ 
    EMA6 = (int)EMASeries(GPXL4, 20);
    EMA2UpperBB = (int)BBandUpperSeries(EMA2, 50, 2.0);
    EMA2LowerBB = (int)BBandLowerSeries(EMA2, 50, 2.0);
    AvgEMA2BBand = (int)EMASeries(EMA2, 50);
    EMA2UpperBB1 = (int)BBandUpperSeries(EMA5, 50, 2.0);
    EMA2LowerBB2 = (int)BBandLowerSeries(EMA6, 50, 2.0);

Pane = (int)CreatePane(50,  -1,  -1);

Pane1 = (int)CreatePane(200,  -2,  -2);

PlotSeries(EMA2, Pane, WL_AQUA, WL_THIN);
    PlotSeries(EMA2UpperBB, Pane, WL_FUCHSIA, WL_THIN);
    PlotSeries(EMA2LowerBB, Pane, WL_LIME, WL_THIN);
    PlotSeries(AvgEMA2BBand, Pane, WL_AQUA, WL_DOTTED);
    PlotSeries(EMA2, Pane1, WL_AQUA, WL_THIN);
    PlotSeries(EMA2UpperBB1, Pane1, WL_FUCHSIA, WL_THIN);
     /**   banda high */ 
    PlotSeries(EMA2LowerBB2, Pane1, WL_LIME, WL_THIN);
     /**   banda low */ 
    PlotSeries(AvgEMA2BBand, Pane1, WL_AQUA, WL_DOTTED);

#endregion file ChartScript[/CODE]

Eugene

#2

5/23/2012 4:36 AM

Could you show us the source code of this ChartScript? It appears short and clear enough for a manual translation.

ikx

#3

5/23/2012 4:50 AM

Thanks Eugene.....script in WL 4:

CODE:
Please log in to see this code.

Size:

Color:

Thanks Eugene.....script in WL 4:
[CODE]Var EMA1,EMA0, EMA2, EMA3,EMA4,EMA5,EMA6, Diff,Diff1,Diff2,Deviation1,Deviation2,GPXL3,GPXL4,  BAR, Series, p: Integer;
Var BuyZone, SellZone: Float;
var GPXL : integer = 20 ;  //lunghezza Dev.  Variabile 1
var GPXL2 : integer;
var Deviation: integer;
var GPXAZ : float = 0.00 ;
{#OptVar1 5;10;500;10}
{#OptVar2 5;5;50;5}
{#OptVar3 5;5;50;5}
GPXL := #OptVar1;
EMA5 := #OptVar2;
EMA6 := #OptVar3;
function LogReturns(Series, Series1, Period: integer): integer;
begin
Result := CreateSeries;
var Bar: integer;
for Bar := 0 to BarCount - 1 do
begin
Try
@Result[Bar] := 100 * LN(@Series[Bar] / @Series1[Bar-Period]);
Except
@Result[Bar] := 100.0;
End;
end;
end;
var Yield: integer = LogReturns(#Close, #Close, 1); //Yield
var Yield1: integer = LogReturns(#High, #High, 7); //Yield High
var Yield2: integer = LogReturns(#Low, #Low, 1); //Yield Low //Variabile
HideVolume;
EMA1 := EMASeries(Yield, 100); //media of the Yield
EMA3 := EMASeries(Yield1, 100); //media of the Yield High
EMA4 := EMASeries(Yield2, 100); //media of the Yield  Low
Series:= #Close;
Diff := SubtractSeries(Yield, EMA1); //diff.from price and media of the prices
Diff1 := SubtractSeries(Yield1, EMA3);  // High
Diff2 := SubtractSeries(Yield2, EMA4);  // Low
Deviation := StdDevSeries( EMA1, GPXL ) ;  //Deviazione EMA Yield
Deviation1 := StdDevSeries( EMA3, GPXL ) ;  // Yield High
Deviation2 := StdDevSeries( EMA4, GPXL ) ;  //Yield Low
GPXL2 := DivideSeries( Diff, Deviation ) ;  //Divisione Diff e Deviazione EMA
GPXL3 := DivideSeries( Diff1, Deviation1 ) ; //Dev Yield High
GPXL4 := DivideSeries( Diff2, Deviation2 ) ; //Dev Yield  Low
EMA2 := EMASeries(GPXL2, 6); //media ex. of the difference, Variabile 2
EMA5 := EMASeries(GPXL3, 20); // variabile 2 High
EMA6 := EMASeries(GPXL4, 20); // variabile 2 Low
var EMA2UpperBB: integer = BBandUpperSeries( EMA2, 50, 2.0 );
var EMA2LowerBB: integer = BBandLowerSeries( EMA2, 50, 2.0 );
var AvgEMA2BBand: integer = EMASeries( EMA2, 50 );
var EMA2UpperBB1: integer = BBandUpperSeries( EMA5, 50, 2.0 );// banda con high
var EMA2LowerBB2: integer = BBandLowerSeries( EMA6, 50, 2.0 );//banda con low
var Pane: integer = CreatePane( 50, -1, -1 );
var Pane1 : integer = CreatePane( 200, -2, -2);
PlotSeries( EMA2, Pane, #aqua, #Thin);
PlotSeries( EMA2UpperBB, Pane, #fuchsia, #Thin );
PlotSeries( EMA2LowerBB, Pane,#lime ,#Thin );
PlotSeries(AvgEMA2BBand , Pane, #aqua, #dotted);
PlotSeries( EMA2, Pane1, #aqua, #Thin);
PlotSeries( EMA2UpperBB1, Pane1, #fuchsia, #Thin );  //  banda high
PlotSeries( EMA2LowerBB2, Pane1, #lime ,#Thin );    //  banda low
PlotSeries(AvgEMA2BBand , Pane1, #aqua, #dotted);
[/CODE]

ikx

#4

5/23/2012 4:53 AM

I changed and put these:

CODE:
Please log in to see this code.

and the errors on panel finish.

ikx

#5

5/23/2012 5:05 AM

Now it gives me only one error:

82,3=====>>>>protected override void Execute.....

CODE:
Please log in to see this code.

Size:

Color:

Now it gives me only one error:

82,3=====>>>>protected override void Execute.....

[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;
		public Strategy()
		{
			OptVar1 = CreateParameter("OptVar1", 5, 10, 500, 10);
			OptVar2 = CreateParameter("OptVar2", 5, 5, 50, 5);
			OptVar3 = CreateParameter("OptVar3", 5, 5, 50, 5);
		}
		#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 int EMA1, EMA0, EMA2, EMA3, EMA4, EMA5, EMA6, Diff, Diff1, Diff2, Deviation1, Deviation2, GPXL3, GPXL4, BAR, Series, p = 0;
		public double BuyZone, SellZone = 0.0;
		public int GPXL = 0;
		public  /** lunghezza Dev.  Variabile 1 */ 
			int GPXL2 = 0;
		public int Deviation = 0;
		public double GPXAZ = 0.0;
		public int Pane = 0;
		public int Pane1 = 0;
		public int LogReturns (int Series, int Series1, int Period){
			int fnResult = 0;
			fnResult = CreateSeries();
			
			for (BAR = 0; BAR <= (Bars.Count - 1); BAR++) {
				try {
				{
					GetSeries(fnResult)[BAR] = (100 * Math.Log((GetSeries(Series)[BAR] / GetSeries(Series1)[(BAR - Period)])));
                
				}
            
				} catch (Exception /*e*/){
				{
					GetSeries(fnResult)[BAR] = 100.0;
                
				}
            
				}
        
			}
			return fnResult;
    
		}
		public int Yield = 0;
		public  /** Yield */ 
			int Yield1 = 0;
		public  /** Yield High */ 
			int Yield2 = 0;
		public  /**  variabile 2 Low */ 
			int EMA2UpperBB = 0;
		public int EMA2LowerBB = 0;
		public int AvgEMA2BBand = 0;
		public int EMA2UpperBB1 = 0;
		public  /**  banda con high */ 
			int EMA2LowerBB2 = 0;
		public  /** banda con low */ 
			/** 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] 
    
			GPXL = (int)20;
			GPXAZ = (double)0.00;
			GPXL = (int)(int) OptVar1.Value;
			EMA5 = (int)(int) OptVar2.Value;
			EMA6 = (int)(int) OptVar3.Value;
			// [declaration for function LogReturns  used to be here] 
			Yield = (int)LogReturns(WL_CLOSE, WL_CLOSE, 1);
			Yield1 = (int)LogReturns(WL_HIGH, WL_HIGH, 7);
			Yield2 = (int)LogReturns(WL_LOW, WL_LOW, 1);
			/** Yield Low //Variabile */ 
			HideVolume();
			EMA1 = (int)EMASeries(Yield, 100);
			/** media of the Yield */ 
			EMA3 = (int)EMASeries(Yield1, 100);
			/** media of the Yield High */ 
			EMA4 = (int)EMASeries(Yield2, 100);
			/** media of the Yield  Low */ 
			Series = (int)WL_CLOSE;
			Diff = (int)SubtractSeries(Yield, EMA1);
			/** diff.from price and media of the prices */ 
			Diff1 = (int)SubtractSeries(Yield1, EMA3);
			/**  High */ 
			Diff2 = (int)SubtractSeries(Yield2, EMA4);
			/**  Low */ 
			Deviation = (int)StdDevSeries(EMA1, GPXL);
			/** Deviazione EMA Yield */ 
			Deviation1 = (int)StdDevSeries(EMA3, GPXL);
			/**  Yield High */ 
			Deviation2 = (int)StdDevSeries(EMA4, GPXL);
			/** Yield Low */ 
			GPXL2 = (int)DivideSeries(Diff, Deviation);
			/** Divisione Diff e Deviazione EMA */ 
			GPXL3 = (int)DivideSeries(Diff1, Deviation1);
			/** Dev Yield High */ 
			GPXL4 = (int)DivideSeries(Diff2, Deviation2);
			/** Dev Yield  Low */ 
			EMA2 = (int)EMASeries(GPXL2, 6);
			/** media ex. of the difference, Variabile 2 */ 
			EMA5 = (int)EMASeries(GPXL3, 20);
			/**  variabile 2 High */ 
			EMA6 = (int)EMASeries(GPXL4, 20);
			EMA2UpperBB = (int)BBandUpperSeries(EMA2, 50, 2.0);
			EMA2LowerBB = (int)BBandLowerSeries(EMA2, 50, 2.0);
			AvgEMA2BBand = (int)EMASeries(EMA2, 50);
			EMA2UpperBB1 = (int)BBandUpperSeries(EMA5, 50, 2.0);
			EMA2LowerBB2 = (int)BBandLowerSeries(EMA6, 50, 2.0);
			
			Pane = (int)CreatePane(50,  -1,  -1);
			Pane1 = (int)CreatePane(200,  -2,  -2);
			
			PlotSeries(EMA2, Pane, WL_AQUA, WL_THIN);
			PlotSeries(EMA2UpperBB, Pane, WL_FUCHSIA, WL_THIN);
			PlotSeries(EMA2LowerBB, Pane, WL_LIME, WL_THIN);
			PlotSeries(AvgEMA2BBand, Pane, WL_AQUA, WL_DOTTED);
			PlotSeries(EMA2, Pane1, WL_AQUA, WL_THIN);
			PlotSeries(EMA2UpperBB1, Pane1, WL_FUCHSIA, WL_THIN);
			/**   banda high */ 
			PlotSeries(EMA2LowerBB2, Pane1, WL_LIME, WL_THIN);
			/**   banda low */ 
			PlotSeries(AvgEMA2BBand, Pane1, WL_AQUA, WL_DOTTED);

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

#endregion file ChartScript[/CODE]

Eugene

#6

5/23/2012 5:14 AM

Try this:

CODE:
Please log in to see this code.

Size:

Color:

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 ikx20120523 : WealthScript
	{
		private StrategyParameter OptVar1, OptVar2, OptVar3;
		
		public ikx20120523()
		{
			OptVar1 = CreateParameter("OptVar1", 5, 10, 500, 10);
			OptVar2 = CreateParameter("OptVar2", 5, 5, 50, 5);
			OptVar3 = CreateParameter("OptVar3", 5, 5, 50, 5);
		}
		
		public DataSeries LogReturns (DataSeries Series, DataSeries Series1, int Period)
		{
			DataSeries fnResult = new DataSeries(Bars,"LogReturns");

int Bar_dup1 = 0;

for (int bar = 0; bar <= Bars.Count - 1; bar++) 
			{
				try 
				{
					fnResult[bar] = (100 * Math.Log( ( Series[bar] / Series1[(bar - Period)]) ));
				} 
				catch
				{
					fnResult[bar] = 100.0;                
				}        
			}
			
			return fnResult;
    
		}
		
		protected override void Execute()
		{
			#region Variables
			
			int GPXL = OptVar1.ValueInt;
			//int EMA5 = OptVar2.ValueInt;
			//int EMA6 = OptVar3.ValueInt;
			EMACalculation m = EMACalculation.Modern;
			LineStyle s = LineStyle.Solid;
			LineStyle d = LineStyle.Dotted;
			Color aqua = Color.Aqua;
			
			#endregion
			
			#region DataSeries
			
			DataSeries Yield = LogReturns(Close, Close, 1); //Yield
			DataSeries Yield1 = LogReturns(High, High, 7); //Yield High
			DataSeries Yield2 = LogReturns(Low, Low, 1); //Variabile
			EMA EMA1 = EMA.Series(Yield, 100, m); //media of the Yield
			EMA EMA3 = EMA.Series(Yield1, 100, m); //media of the Yield High
			EMA EMA4 = EMA.Series(Yield2, 100, m); //media of the Yield Low
			DataSeries Diff = Yield - EMA1; //diff.from price and media of the prices
			DataSeries Diff1 = Yield1 - EMA3;  // High
			DataSeries Diff2 = Yield2 - EMA4;  // Low
			StdDev Deviation = StdDev.Series( EMA1, GPXL, StdDevCalculation.Sample ) ;  //Deviazione EMA Yield
			StdDev Deviation1 = StdDev.Series( EMA3, GPXL, StdDevCalculation.Sample ) ;  // Yield High
			StdDev Deviation2 = StdDev.Series( EMA4, GPXL, StdDevCalculation.Sample ) ;  //Yield Low
			DataSeries GPXL2 = Diff / Deviation;  //Divisione Diff e Deviazione EMA
			DataSeries GPXL3 = Diff1 / Deviation1; //Dev Yield High
			DataSeries GPXL4 = Diff2 / Deviation2; //Dev Yield  Low
			EMA EMA2 = EMA.Series(GPXL2, 6, m); //media ex. of the difference, Variabile 2
			EMA EMA5 = EMA.Series(GPXL3, 20, m); // variabile 2 High
			EMA EMA6 = EMA.Series(GPXL4, 20, m); // variabile 2 Low
			BBandUpper EMA2UpperBB = BBandUpper.Series( EMA2, 50, 2.0 );
			BBandLower EMA2LowerBB = BBandLower.Series( EMA2, 50, 2.0 );
			EMA AvgEMA2BBand = EMA.Series( EMA2, 50, m );
			BBandUpper EMA2UpperBB1 = BBandUpper.Series( EMA5, 50, 2.0 );// banda con high
			BBandLower EMA2LowerBB2 = BBandLower.Series( EMA6, 50, 2.0 );//banda con low
			
			#endregion
			
			#region Plotting
			
			ChartPane Pane = CreatePane( 25, false, false );
			ChartPane Pane1 = CreatePane( 100, false, false);
			PlotSeries( Pane, EMA2, aqua, s, 1 );
			PlotSeries( Pane, EMA2UpperBB, Color.Fuchsia, s, 1 );
			PlotSeries( Pane, EMA2LowerBB, Color.Lime, s, 1 );
			PlotSeries( Pane, AvgEMA2BBand, aqua, d, 1 );
			PlotSeries( Pane1, EMA2, aqua, s, 1 );
			PlotSeries( Pane1, EMA2UpperBB1, Color.Fuchsia, s, 1 );  //  banda high
			PlotSeries( Pane1, EMA2LowerBB2, Color.Lime, s, 1 );    //  banda low
			PlotSeries( Pane1, AvgEMA2BBand, aqua, d, 1 );
			HideVolume();
			
			#endregion
		}
	}
}[/CODE]

ikx

#7

5/23/2012 5:23 AM

Thanks a lot Eugene.....
Could now ADD this exit/entry strategy??

CODE:
Please log in to see this code.

Eugene

#8

5/23/2012 9:48 AM

Make sure you've read the WealthScript Programming Guide > Indicators > Stability of Indicators, because its point applies to your code.

CODE:
Please log in to see this code.

Size:

Color:

Make sure you've read the WealthScript Programming Guide > Indicators > [i]Stability of Indicators[/i], because its point applies to your code.
[CODE]using System;
using System.Collections.Generic;
using System.Text;
using System.Drawing;
using WealthLab;
using WealthLab.Indicators;

namespace WealthLab.Strategies
{
	public class ikx20120523 : WealthScript
	{
		private StrategyParameter OptVar1, OptVar2, OptVar3;
		
		public ikx20120523()
		{
			OptVar1 = CreateParameter("OptVar1", 5, 10, 500, 10);
			OptVar2 = CreateParameter("OptVar2", 5, 5, 50, 5);
			OptVar3 = CreateParameter("OptVar3", 5, 5, 50, 5);
		}
		
		public DataSeries LogReturns (DataSeries Series, DataSeries Series1, int Period)
		{
			DataSeries fnResult = new DataSeries(Bars,"LogReturns");

int Bar_dup1 = 0;

for (int bar = 0; bar <= Bars.Count - 1; bar++) 
			{
				try 
				{
					fnResult[bar] = (100 * Math.Log( ( Series[bar] / Series1[(bar - Period)]) ));
				} 
				catch
				{
					fnResult[bar] = 100.0;                
				}        
			}
			
			return fnResult;
    
		}
		
		protected override void Execute()
		{
			#region Variables
			
			int GPXL = OptVar1.ValueInt;
			//int EMA5 = OptVar2.ValueInt;
			//int EMA6 = OptVar3.ValueInt;
			EMACalculation m = EMACalculation.Modern;
			LineStyle s = LineStyle.Solid;
			LineStyle d = LineStyle.Dotted;
			Color aqua = Color.Aqua;
			
			#endregion
			
			#region DataSeries
			
			DataSeries Yield = LogReturns(Close, Close, 1); //Yield
			DataSeries Yield1 = LogReturns(High, High, 7); //Yield High
			DataSeries Yield2 = LogReturns(Low, Low, 1); //Variabile
			EMA EMA1 = EMA.Series(Yield, 100, m); //media of the Yield
			EMA EMA3 = EMA.Series(Yield1, 100, m); //media of the Yield High
			EMA EMA4 = EMA.Series(Yield2, 100, m); //media of the Yield Low
			DataSeries Diff = Yield - EMA1; //diff.from price and media of the prices
			DataSeries Diff1 = Yield1 - EMA3;  // High
			DataSeries Diff2 = Yield2 - EMA4;  // Low
			StdDev Deviation = StdDev.Series( EMA1, GPXL, StdDevCalculation.Sample ) ;  //Deviazione EMA Yield
			StdDev Deviation1 = StdDev.Series( EMA3, GPXL, StdDevCalculation.Sample ) ;  // Yield High
			StdDev Deviation2 = StdDev.Series( EMA4, GPXL, StdDevCalculation.Sample ) ;  //Yield Low
			DataSeries GPXL2 = Diff / Deviation;  //Divisione Diff e Deviazione EMA
			DataSeries GPXL3 = Diff1 / Deviation1; //Dev Yield High
			DataSeries GPXL4 = Diff2 / Deviation2; //Dev Yield  Low
			EMA EMA2 = EMA.Series(GPXL2, 6, m); //media ex. of the difference, Variabile 2
			EMA EMA5 = EMA.Series(GPXL3, 20, m); // variabile 2 High
			EMA EMA6 = EMA.Series(GPXL4, 20, m); // variabile 2 Low
			BBandUpper EMA2UpperBB = BBandUpper.Series( EMA2, 50, 2.0 );
			BBandLower EMA2LowerBB = BBandLower.Series( EMA2, 50, 2.0 );
			EMA AvgEMA2BBand = EMA.Series( EMA2, 50, m );
			BBandUpper EMA2UpperBB1 = BBandUpper.Series( EMA5, 50, 2.0 );// banda con high
			BBandLower EMA2LowerBB2 = BBandLower.Series( EMA6, 50, 2.0 );//banda con low
			
			#endregion
			
			#region Plotting
			
			ChartPane Pane = CreatePane( 25, false, false );
			ChartPane Pane1 = CreatePane( 100, false, false);
			PlotSeries( Pane, EMA2, aqua, s, 1 );
			PlotSeries( Pane, EMA2UpperBB, Color.Fuchsia, s, 1 );
			PlotSeries( Pane, EMA2LowerBB, Color.Lime, s, 1 );
			PlotSeries( Pane, AvgEMA2BBand, aqua, d, 1 );
			PlotSeries( Pane1, EMA2, aqua, s, 1 );
			PlotSeries( Pane1, EMA2UpperBB1, Color.Fuchsia, s, 1 );  //  banda high
			PlotSeries( Pane1, EMA2LowerBB2, Color.Lime, s, 1 );    //  banda low
			PlotSeries( Pane1, AvgEMA2BBand, aqua, d, 1 );
			HideVolume();
			EnableTradeNotes( false, true, false );

#endregion
			
			#region Trading
			
			for(int bar = GetTradingLoopStartBar(200); bar < Bars.Count; bar++)
			{
				if (IsLastPositionActive)
				{
					Position p = LastPosition;
					if( p.PositionType == PositionType.Long )
					{
						if( CrossUnder( bar, EMA2, AvgEMA2BBand ) &&( EMA2[bar] > EMA2LowerBB2[bar] ) )
							SellAtMarket( bar+1, p );
						else
						if( CrossUnder( bar, EMA2, EMA2LowerBB2 ) )
							SellAtMarket( bar+1, p );
					}
					else
					{
						if( CrossOver( bar, EMA2, AvgEMA2BBand ) && ( EMA2[bar] < EMA2UpperBB1[bar] ) )
							CoverAtMarket( bar+1, p );
						else
						if( CrossOver( bar, EMA2, EMA2UpperBB1) )
							CoverAtMarket( bar+1, p );
					}
				}
				else
				{
					if( CrossOver( bar, EMA2, EMA2LowerBB2 ) )
						BuyAtMarket( bar+1 );
					if( CrossUnder( bar, EMA2, EMA2UpperBB1 ) )
						ShortAtMarket( bar+1 );
				}
			}
			
			#endregion
		}
	}
}[/CODE]

ikx

#9

5/23/2012 9:56 AM

Thanks, Eugene....!!

Today I download the 30 gg. trial...for the WealthScript Programming Guide where I have to see??

Eugene

#10

5/23/2012 10:00 AM

Under the Help menu.

ikx

#11

5/23/2012 10:06 AM

Ah..ok...I'll study from today....

Please Eugene could you DELETE my/your WL code OR the POST??

Thanks Eugene and a Good day...

Eugene

#12

5/23/2012 10:17 AM

No, I will not delete the code and will not take down the post. This is a public forum, and I'm not going to trash the results of my work that could be helpful to other forum members.

Please review an extract from our website's terms of use that you accepted when signing up for a wealth-lab.com account:

QUOTE:
By transmitting such User Feedback to Wealth-Lab, you are deemed to grant to Wealth-Lab a perpetual, worldwide, royalty-free, irrevocable, non-exclusive license (with rights to sublicense) to use any ideas, concepts, know-how or techniques contained in such User Feedback for any purpose whatsoever, including but not limited to developing, manufacturing and marketing products incorporating such User Feedback.