|
PureBytes Links
Trading Reference Links
|
John,
you have pasted the same AFL code twice.
BTW, there is a copyright there, you should ask Jose permission first.
Dimitris Tsokakis
--- In amibroker@xxxxxxxxxxxxxxx, "John" <jea55129@xxxx> wrote:
> Group,
>
> Some time ago someone asked for the Scaff Trend Cycle in afl. After
> some searching I found this
> MS version:
>
> //MACD oscillator - Schaff Trend Cycle
> //{Stochastic-normalized MACD v1.0, -100~+100%}
> //{©Copyright 2003 Jose Silva}
> //{josesilva22@xxxx}
> pds=Param("Stochastic (cycle) lookback periods",62,2,252,2);
> pds1=Param("short EMA periods",12,2,252,2);
> pds2=Param("long EMA periods",26,2,2520,2);
> pds3=Param("MACD oscillator trigger signal periods",21,1,252,2);
> z=(H+L)/2;
> x=EMA(z,pds1);
> y=EMA(z,pds2);
> ratio=Min(x,y)/Max(x,y);
> Mac=(IIf(x>y,2-ratio,ratio)-1)*100;
> StochMac=(Mac-LLV(Mac,pds))/(HHV(Mac,pds)-LLV(Mac,pds)+.000001)
*100;
> trigger=EMA(StochMac,pds3);
> Hist=StochMac-trigger;
> signals=Cross(StochMac,trigger)+Cross(trigger,StochMac)*-1;
> Plot(Hist,"Scaff Trend Cycle EMA",IIf(Hist <(Ref(Hist,-
> 1)),colorRed,IIf(Hist >
> (Ref(Hist,-1)),colorGreen,16)),2);
> Plot (EMA(Hist,9)," EMA9",colorPaleBlue,1);
>
>
>
>
> //http://users.bigpond.com/prominex/pegasus.htm
> xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
>
> Here is my afl try:
>
> //MACD oscillator - Schaff Trend Cycle
> //{Stochastic-normalized MACD v1.0, -100~+100%}
> //{©Copyright 2003 Jose Silva}
> //{josesilva22@xxxx}
> pds=Param("Stochastic (cycle) lookback periods",62,2,252,2);
> pds1=Param("short EMA periods",12,2,252,2);
> pds2=Param("long EMA periods",26,2,2520,2);
> pds3=Param("MACD oscillator trigger signal periods",21,1,252,2);
> z=(H+L)/2;
> x=EMA(z,pds1);
> y=EMA(z,pds2);
> ratio=Min(x,y)/Max(x,y);
> Mac=(IIf(x>y,2-ratio,ratio)-1)*100;
> StochMac=(Mac-LLV(Mac,pds))/(HHV(Mac,pds)-LLV(Mac,pds)+.000001)
*100;
> trigger=EMA(StochMac,pds3);
> Hist=StochMac-trigger;
> Signals=Cross(StochMac,trigger)+Cross(trigger,StochMac)*-1;
> Plot(Hist,"Schaff Trend Cycle EMA",IIf(Hist <(Ref(Hist,-
> 1)),colorRed,IIf(Hist >
> (Ref(Hist,-1)),colorGreen,16)),2);
> Plot (EMA(Hist,9)," EMA9",colorPaleBlue,1);
>
>
>
>
> //http://users.bigpond.com/prominex/pegasus.htm
> xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
>
> 1)Is this correct?
>
> 2)How would one code this using ama or ama2?
>
> TIA,
>
> John
------------------------ Yahoo! Groups Sponsor ---------------------~-->
Buy Ink Cartridges or Refill Kits for your HP, Epson, Canon or Lexmark
Printer at MyInks.com. Free s/h on orders $50 or more to the US & Canada.
http://www.c1tracking.com/l.asp?cid=5511
http://us.click.yahoo.com/mOAaAA/3exGAA/qnsNAA/GHeqlB/TM
---------------------------------------------------------------------~->
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
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/amibroker/
<*> To unsubscribe from this group, send an email to:
amibroker-unsubscribe@xxxxxxxxxxxxxxx
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
|