Noob alert! Query regarding entering variable

March 28th, 2014, 12:11 PM

Hi prob with code again, what is wrong? i copied it exactly from forum. gettin this error:

Study: "BM_MoneyMaker" (Signal)
Please wait ....
------ Compiled with error(s): ------
unverified function is used
line 51, column 7
causal study: jthma (Function)

code:

inputs:

smalength ( 200 ),

emalength ( 100 ),

hmalength ( 34 ),

target1 ( 12 ),

target2 ( 12 ),

target3 ( 20 ),

stopsize ( 12 ),

BE2 ( 0 ), // 0=false, 1=true

BE3 ( 0 ); // 0=false, 1=true

vars:

TickSize ( MinMove / PriceScale ),

smav ( 0 ),

emav ( 0 ),

hmav ( 0 ),

t1 ( Target1 * TickSize ),

t2 ( (Target1 + Target2) * TickSize ),

t3 ( (Target1 + Target2 + Target3) * TickSize ),

st1 ( 0 ),

st2 ( 0 ),

st3 ( 0 );

smav = Average(Close, smalength);

emav = XAverage(Close, emalength);

hmav = jtHMA(Close, hmalength);

// open new positions

if MarketPosition = 0 then begin

if smav > smav[1] and emav > emav[1] and hmav > hmav[1] then begin

Buy ("Enter long") 3 Contracts Next Bar At Market;

end;

if smav < smav[1] and emav < emav[1] and hmav < hmav[1] then begin

SellShort ("Enter short") 3 Contracts Next Bar At Market;

end;

end;

// manage open orders

if MarketPosition = 1 then begin

st1 = EntryPrice - (stopsize * TickSize);

st2 = iff(BE2 = 1, EntryPrice, EntryPrice - (stopsize * TickSize));

st3 = iff(BE3 = 1, EntryPrice, EntryPrice - (stopsize * TickSize));

if CurrentContracts = 1 then begin

Sell ("Exit l3-c1 Target") 1 Contracts Next Bar At (EntryPrice + t3) Limit;

Sell ("Exit l3-c1 Stop") 1 Contracts Next Bar At st3 Stop;

end;

if CurrentContracts = 2 then begin

Sell ("Exit l2-c2 Target") 1 Contracts Next Bar At (EntryPrice + t2) Limit;

Sell ("Exit l2-c2 Stop") 1 Contracts Next Bar At st2 Stop;

Sell ("Exit l3-c2 Target") 1 Contracts Next Bar At (EntryPrice + t3) Limit;

Sell ("Exit l3-c2 Stop") 1 Contracts Next Bar At st3 Stop;

end;

if CurrentContracts = 3 then begin

Sell ("Exit l1-c3 Target") 1 Contracts Next Bar At (EntryPrice + t1) Limit;

Sell ("Exit l1-c3 Stop") 1 Contracts Next Bar At st1 Stop;

Sell ("Exit l2-c3 Target") 1 Contracts Next Bar At (EntryPrice + t2) Limit;

Sell ("Exit l2-c3 Stop") 1 Contracts Next Bar At st2 Stop;

Sell ("Exit l3-c3 Target") 1 Contracts Next Bar At (EntryPrice + t3) Limit;

Sell ("Exit l3-c3 Stop") 1 Contracts Next Bar At st3 Stop;

end;

end;

if MarketPosition = -1 then begin

st1 = EntryPrice + (stopsize * TickSize);

st2 = iff(BE2 = 1, EntryPrice, EntryPrice + (stopsize * TickSize));

st3 = iff(BE3 = 1, EntryPrice, EntryPrice + (stopsize * TickSize));

if CurrentContracts = 1 then begin

BuyToCover ("Exit s3-c1 Target") 1 Contracts Next Bar At (EntryPrice - t3) Limit;

BuyToCover ("Exit s3-c1 Stop") 1 Contracts Next Bar At st3 Stop;

end;

if CurrentContracts = 2 then begin

BuyToCover ("Exit s2-c2 Target") 1 Contracts Next Bar At (EntryPrice - t2) Limit;

BuyToCover ("Exit s2-c2 Stop") 1 Contracts Next Bar At st2 Stop;

BuyToCover ("Exit s3-c2 Target") 1 Contracts Next Bar At (EntryPrice - t3) Limit;

BuyToCover ("Exit s3-c2 Stop") 1 Contracts Next Bar At st3 Stop;

end;

if CurrentContracts = 3 then begin

BuyToCover ("Exit s1-c3 Target") 1 Contracts Next Bar At (EntryPrice - t1) Limit;

BuyToCover ("Exit s1-c3 Stop") 1 Contracts Next Bar At st1 Stop;

BuyToCover ("Exit s2-c3 Target") 1 Contracts Next Bar At (EntryPrice - t2) Limit;

BuyToCover ("Exit s2-c3 Stop") 1 Contracts Next Bar At st2 Stop;

BuyToCover ("Exit s3-c3 Target") 1 Contracts Next Bar At (EntryPrice - t3) Limit;

BuyToCover ("Exit s3-c3 Stop") 1 Contracts Next Bar At st3 Stop;

end;

end;

jtHMA function which i copied in separately:

{jtHMA - Hull Moving Average Function}

{Author: Atavachron}

{May 2005}

Inputs: price(NumericSeries), length(NumericSimple);

Vars: halvedLength(0), sqrRootLength(0);

{

Original equation is:

---------------------

waverage(2*waverage(close,period/2)-waverage(close ,period), SquareRoot(Period)

Implementation below is more efficient with lengthy Weighted Moving Averages.

In addition, the length needs to be converted to an integer value after it is halved and

its square root is obtained in order for this to work with Weighted Moving Averaging

}

if ((ceiling(length / 2) - (length / 2)) <= 0.5) then

halvedLength = ceiling(length / 2)

else

halvedLength = floor(length / 2);

if ((ceiling(SquareRoot(length)) - SquareRoot(length)) <= 0.5) then

sqrRootLength = ceiling(SquareRoot(length))

else

sqrRootLength = floor(SquareRoot(length));

Value1 = 2 * WAverage(price, halvedLength);

Value2 = WAverage(price, length);

Value3 = WAverage((Value1 - Value2), sqrRootLength);

jtHMA = Value3;

ABCTG · March 28th, 2014, 12:18 PM

saj1011,

when you post code, please wrap code tags around it. This helps a lot in the visibility.

When you say "jtHMA function which i copied in separately" did you copy it into the same signal code or did you create a separate function?

Regards,
ABCTG

April 3rd, 2014, 03:25 PM

separate function.

ABCTG · April 3rd, 2014, 03:40 PM

saj1011,

I'll upload the code as PLA later, this should work fine then.

Regards,
ABCTG

ABCTG · April 3rd, 2014, 04:25 PM

saj1011,

here you go. This is the exact code like you posted it in this thread.
I did not test it or change it, just took what you posted and pasted it within the signal
and function, compiled it and exported it for you.

Regards,
ABCTG

Noob alert! Query regarding entering variable

Discussion in MultiCharts

Noob alert! Query regarding entering variable