Is this more compact again?
> _SECTION_BEGIN("code
compaction");
> Len = Param("length",21,1,200,1);
>
V1 = MA(C,len)*1618;
V2 = Ref(V1,-5);
dn =
IIf(V1<V2,V1-V2,0);
up = IIf(V1>V2,V1-V2,0);
> Plot(dn,
"", colorRed, styleThick);
> Plot(up, "", colorLime, styleThick);
>
_SECTION_END();
Brian
--- In amibroker@xxxxxxxxxps.com, John
J <j_john66@xx.> wrote:
>
> some slight reduction in
execution time... Hope this is what you mean by compaction...
>
>
> _SECTION_BEGIN("code
compaction");
> Len = Param("length",21,1,200,1);
>
Val1 = MA(C,len);
> dn = IIf( (val1 - (Ref(val1,-5))) * (1000) *
(1.618) < 0,(val1 - (Ref(val1,-5))) * (1000) * (1.618),0);
> up =
IIf( (val1 - (Ref(val1,-5))) * (1000) * (1.618) > 0,(val1 -
(Ref(val1,-5))) * (1000) * (1.618),0);
> Plot(dn, "", colorRed,
styleThick);
> Plot(up, "", colorLime, styleThick);
>
_SECTION_END();
>
>
> Regards,
> John
>
> --- On Mon, 5/11/09, dingo <waledingo@x..>
wrote:
>
> From: dingo <waledingo@x..>
> Subject:
Re: [amibroker] HELP: Code Compaction
> To: amibroker@xxxxxxxxxps.com
>
Date: Monday, May 11, 2009, 2:18 AM
>
>
>
>
>
>
>
>
>
>
Len=Param("length",21,9,200,1) ;
> Plot(IIf((MA( C,len)-(Ref(
MA(C,len) ,-5)))*(1000) *(1.618)<0,(MA(C,len) -(Ref(MA( C,len),-5)
))*(1000) *(1.618), 0),"",colorRed,styleThic k);
> Plot(IIf((MA(
C,len)-(Ref( MA(C,len) ,-5)))*(1000) *(1.618)>0,(MA(C,len) -(Ref(MA(
C,len),-5) ))*(1000) *(1.618), 0),"",colorLime,styleThi ck);
>
> d
>
>
> On Sun, May 10, 2009 at 5:15 PM,
Mubashar Virk <mvirk67@xxxxxx com> wrote:
>
>
>
>
>
>
> Can someone please help in compacting this
code:
> Len = Param("length",21,9,200,1);
> dn = IIf(
(MA(C,len) - (Ref(MA(C,len),-5))) * (1000) * (1.618) < 0,(MA(C,len) -
(Ref(MA(C,len),-5))) * (1000) * (1.618),0);
> up = IIf( (MA(C,len) -
(Ref(MA(C,len),-5))) * (1000) * (1.618) > 0,(MA(C,len) -
(Ref(MA(C,len),-5))) * (1000) * (1.618),0);
> Plot(dn, "", colorRed,
styleThick);
> Plot(up, "", colorLime, styleThick);
>
>
>
>
>