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@xxxxxxcom> wrote:
From: dingo
<waledingo@xxxxxxcom> 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);
|