|
PureBytes Links
Trading Reference Links
|
Just some advice, take these lines to outside of the for loop
Buy=Close>R;
Sell=Close<S;
Cump=IIf(Close>R,1,0);
Vanz=IIf(Close<S,1,0);
--
Cheers
Graham
AB-Write >< Professional AFL Writing Service
Yes, I write AFL code to your requirements
http://www.aflwriting.com
On 29/05/07, gnader_2000 <zepplin@xxxxxxxxxxxxxxxx> wrote:
> Is this what you had in mind?
>
> I configured your k and n variables as a parameter so you could adjust
> them in the parameters section of the chart. This way you can see real
> time on the chart what these settings are doing as you adjust them.
>
> Enjoy - George
>
>
>
>
>
>
> _SECTION_BEGIN("ATR Trading System");
> /*Writed & composed by Tudor Marcelin - Art Invest*/
>
> k=Param("Multiplier",1.5,0.1,200,0.1); /* multiplication factor*/
> n=Param("Period",10,1,200,1);/*period*/
> f=ATR(n);
>
>
> R[0] = Close[0];
>
> S[0] = C[0];
> for( i = 11; i < BarCount; i++ )
> {
>
>
> R[i]=R[i-1];
> S[i]=S[i-1];
>
> if ( C[i-1] >R[i-1] )
> {
> r[i] = C[i-1]+k*f[i-1];
> s[i]= C[i-1]-k*f[i-1];
> }
> if ( C[i-1] <S[i-1] )
> {
> r[i] = C[i-1]+k*f[i-1];
> s[i]= C[i-1]-k*f[i-1];
> }
>
>
> Buy=Close>R;
> Sell=Close<S;
>
> Cump=IIf(Close>R,1,0);
> Vanz=IIf(Close<S,1,0);
> }
> Plot(Close,"Close",colorGreen,styleBar);
> Plot(R, "Rez:",colorGreen,styleDots|styleNoLine);
> Plot(S, "Sup:",colorRed,styleDots|styleNoLine);
>
>
> Buy = ExRem( Buy, Sell ); //Elimina semnalele buy consecutive
> Sell = ExRem( Sell, Buy ); //Elimina semnalele sell consecutive
>
> shape = Buy * shapeUpArrow + Sell * shapeDownArrow;
>
> fig=Cump*shapeHollowUpArrow + Vanz*shapeHollowDownArrow;
>
> PlotShapes( fig, IIf( Cump, colorPaleGreen , colorPink), 0, IIf(
> Cump, Low-1, High+1)); //Pentru a vizualiza semnalele consecutive
> eliminate de ExRem
> PlotShapes( shape, IIf( Buy, colorGreen, colorRed ), 0, IIf( Buy, Low-
> 1, High+1));
>
> AlertIf( Buy, "", "Experiment", 1 );
> AlertIf( Sell, "", "Experiment",2);
>
> GraphXSpace = 3;
>
> _N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %
> g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue(
> ROC( C, 1 ) ) ));
>
> Title=EncodeColor(colorBlue)+"Experiment"+EncodeColor(colorBlack)
> + " Open:"+O+" High:"+H+" Low:"+L+" Close:"+C+EncodeColor(colorGreen)
> +" Rez:"+R+EncodeColor(colorRed)+" Sup:"+S+EncodeColor(colorBlue)+
> " \nDate: "+EncodeColor(colorRed)+Date();
> _SECTION_END();
>
>
>
> Please note that this group is for discussion between users only.
>
> To get support from AmiBroker please send an e-mail directly to
> SUPPORT {at} amibroker.com
>
> For NEW RELEASE ANNOUNCEMENTS and other news always check DEVLOG:
> http://www.amibroker.com/devlog/
>
> For other support material please check also:
> http://www.amibroker.com/support.html
>
> Yahoo! Groups Links
>
>
>
>
Please note that this group is for discussion between users only.
To get support from AmiBroker please send an e-mail directly to
SUPPORT {at} amibroker.com
For NEW RELEASE ANNOUNCEMENTS and other news always check DEVLOG:
http://www.amibroker.com/devlog/
For other support material please check also:
http://www.amibroker.com/support.html
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/amibroker/
<*> Your email settings:
Individual Email | Traditional
<*> To change settings online go to:
http://groups.yahoo.com/group/amibroker/join
(Yahoo! ID required)
<*> To change settings via email:
mailto:amibroker-digest@xxxxxxxxxxxxxxx
mailto:amibroker-fullfeatured@xxxxxxxxxxxxxxx
<*> 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/
|