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@xxxxxxxxx> wrote:
From: dingo <waledingo@xxxxxxxxx>
Subject: Re: [amibroker] HELP: Code Compaction
To: amibroker@xxxxxxxxxxxxxxx
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);
|