RE: [amibroker] Tradestation Code converted to AmiBroker

["Steven Perrott" <forex@xxxxxxxxxxxxxx>]

Wrzec,

 

For AmiBroker stuff go to http://finance.groups.yahoo.com/group/amibroker
and look for a guy named Graham who goes by the name Kavemanperth.

He may charge you a bit but not much to tidy your code up.

He is a very helpful and diligent guy.

 

You can also post your question there and likely get your question answered.

 

Hope this helps,

 

Steve AKA Forex5x

  _____  

From: amibroker@xxxxxxxxxxxxxxx [mailto:amibroker@xxxxxxxxxxxxxxx] On Behalf
Of Wrzec
Sent: Thursday, August 03, 2006 5:20 AM
To: amibroker@xxxxxxxxxxxxxxx
Subject: [amibroker] Tradestation Code

 

Hello All,
I came across this Tradestation indicator that I saved from the old 
RealTraders group back in 2001.
Having never owned Tradestation (the seemingly preferred software of 
that group) I have been making an
attempt at coding this indicator in Amibroker. 
AFL does not like the $ symbol in the original code so I substituted
Clever$(0),Clever$$(0),AvgC$$(0) with Clever1(0),Clever2(0),AvgC(0).
The idea and following TS code was generated by Candlestyk. The name of 
his indicator is Clever Money.
What I came up with checks ok on the AFL check but plots 0(zero). 
Any help would be appreciated.

wrzec

I'm never sure who the smart money is or if it changes from day to day 
(I'm just
hoping my money is "above average"), but I took the basic premise that if
the end of day was controlled by smart money, then the close of VIX 
relative
to the open might give a clue to what so called smart money is doing. 
For VIX: C<O = +1 C>O = -1 C=O = 0
Then a 3 day MA of the 13 day sum of closes. } Inputs:
Len1(3),Len2(13),OB(9),OS(-4);Vars: 
Clever$(0),Clever$$(0),AvgC$$(0);

condition1 = C<O;condition2 = C>O;condition3 =
C=O;

If condition1 then Clever$=1;If condition2 then
Clever$=-1;If condition3 then Clever$=0;

Clever$$ = summation(Clever$,Len2);AvgC$$ =
Average(Clever$$,Len1);

<FONT
size=2>Plot1(Clever$$,"Clever$$");Plot2(AvgC$$,"AvgC$$");Plot3(OB,"OB");Plot
4(OS,"OS");
<BLOCKQUOTE
style="BORDER-LEFT: #000000 2px solid; MARGIN-LEFT: 5px; MARGIN-RIGHT: 
0px; PADDING-LEFT: 5px; PADDING-RIGHT: 0px">

This is what I have:
Len1=3;
Len2=13;
OB=9;
OS=-4;
cond1 = C<O;
cond2 = C>O;
cond3 = C=O;
Clever1=0; //I don't think this is right
Clever2=0; //I don't think this is right
AvgC=0; //I don't think this is right
IIf(Cond1,Clever1=1 , 
IIf(Cond2,Clever1==-1,IIf(Cond3,Clever1==0,Clever1=1))); //???
Clever2 = Sum(Clever1,Len2);
AvgC = MA(Clever2,Len1);
Plot(Clever2,"Clever$$",colorRed,4);
Plot(AvgC,"AvgC$$",colorBlue,4);
Plot(OB,"",colorWhite,4);
Plot(Os,"",colorWhite,4);