|
PureBytes Links
Trading Reference Links
|
len=10<FONT
size=2>;//Input("No of
bars",1,100,14);
smooth23=(C+(2<FONT
size=2>*Ref<FONT
size=2>(C,-1<FONT
size=2>))+(2<FONT
size=2>*Ref<FONT
size=2>(C,-2<FONT
size=2>))+Ref<FONT
size=2>(C,-3<FONT
size=2>))/6;
change=ROC<FONT
size=2>(smooth23,1<FONT
size=2>);
cu23=Sum(<FONT
color=#0000ff size=2>IIf(change><FONT
color=#ff00ff size=2>0,change,<FONT
color=#ff00ff size=2>0),len);
cd23=Sum(<FONT
color=#0000ff size=2>IIf(change<<FONT
color=#ff00ff size=2>0,<FONT color=#0000ff
size=2>abs(change),<FONT color=#ff00ff
size=2>0),len);
final=cu23/(cu23+cd23);
Plot(final,<FONT color=#ff00ff
size=2>"",colorRed,styleLine);
<BLOCKQUOTE
>
----- Original Message -----
<DIV
>From:
Keith
Newhouse
To: <A title=amibroker@xxxxxxxxxxxxxxx
href="">amibroker@xxxxxxxxxxxxxxx
Sent: Friday, June 13, 2003 10:47
PM
Subject: [amibroker] Code help,
please
Here is the Metastock code for Ehlers Smoothed RSI and
below is my attempt in AFL. The AFL code is obviously incorrect as
it produces an entirely different result. Could some one correct it
for me, please.KeithMetastock.len:=Input("No of
bars",1,100,14);smooth23:=(C+(2*Ref(C,-1))+(2*Ref(C,-2))+Ref(C,-3))/6;change:=ROC(smooth23,1,$);cu23:=Sum(If(change>0,change,0),len);cd23:=Sum(If(change<0,Abs(change),0),len);cu23/(cu23+cd23)AFLLen=10;smooth23=(C+(2*Ref(C,-1))+(2*Ref(C,-2))+Ref(C,-3))/6;Change=ROC(smooth23,1);cu23=Sum(IIf(Change>0,Change,0),Len);cd23=Sum(IIf(Change<0,b=Change,0),Len);SRSI=Cu23/(Cu23+Cd23);Plot(SRSI,"SRSI",colorRed,styleLine);
Send BUG REPORTS to bugs@xxxxxxxxxxxxxSend SUGGESTIONS to
suggest@xxxxxxxxxxxxx-----------------------------------------Post
AmiQuote-related messages ONLY to: amiquote@xxxxxxxxxxxxxxx (Web page: <A
href="">http://groups.yahoo.com/group/amiquote/messages/)--------------------------------------------Check
group FAQ at: <A
href="">http://groups.yahoo.com/group/amibroker/files/groupfaq.html
Your use of Yahoo! Groups is subject to the <A
href="">Yahoo! Terms of Service.
<BLOCKQUOTE
><FONT
face="Courier New">---Outgoing mail is certified Virus
Free.Checked by AVG anti-virus system (<A
href="">http://www.grisoft.com).Version: 6.0.489
/ Virus Database: 288 - Release Date:
6/10/2003
Yahoo! Groups Sponsor
Send BUG REPORTS to bugs@xxxxxxxxxxxxx
Send SUGGESTIONS to suggest@xxxxxxxxxxxxx
-----------------------------------------
Post AmiQuote-related messages ONLY to: amiquote@xxxxxxxxxxxxxxx
(Web page: http://groups.yahoo.com/group/amiquote/messages/)
--------------------------------------------
Check group FAQ at: http://groups.yahoo.com/group/amibroker/files/groupfaq.html
Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
|