The following AFL will: put the ribbon at the top of the pane; remove the
title which otherwise would obscuring the left-hand part of the ribbon; and
allow you to scale the volume indicator with GraphXSpace function (to avoid
risk of overlap). As always, I am sure there are alternate and more elegant
ways to achieve the same purpose.

 

Regards,

 

Gordon Sutherland

 

_SECTION_BEGIN("Closing Price Ribbon");

upbar = C > Ref(C,-1);

downbar = C < Ref(C,-1);

UDcol = IIf(upbar, colorGreen,IIf(downbar, colorRed, colorYellow));

//Plot( 5, " ",UDcol,styleArea|styleOwnScale|styleNoLabel,0,100);

Plot( 5, " ",UDcol,styleArea|styleOwnScale|styleNoLabel,-20,1);

Title = "\n";

GraphXSpace = Param("GraphXSpace",10,0,20,1);

_SECTION_END();

//////////////////////////////////////////////////

_SECTION_BEGIN("Volume ");

VolCol = (V < Ref(V,-1)); 

O = IIf(VolCol , V, 0); 

C = IIf(VolCol , 0, V);

L = 0;

H = V;

Plot(C, "", colorBlue, styleCandle + styleNoLabel);

_SECTION_END(); 

/////////////////////////////////////////////////////

 

 

 

 

-----Original Message-----
From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf
Of OptionTed
Sent: Sunday, 13 April 2008 9:36 p.m.
To: [email protected]
Subject: [amibroker] I need some coding help please

 

In the code below I would like to draw the volume bars above 

the ribbon strip ( offset to the top edge ) so as not to cover part of the
volume bars.

 

Any help would be appreciated.

Thanks

 

_SECTION_BEGIN("Closing Price Ribbon");

upbar = C > Ref(C,-1);

downbar = C < Ref(C,-1);

UDcol = IIf(upbar, colorGreen,IIf(downbar, colorRed, colorYellow));

Plot( 5, " ",UDcol,styleArea|styleOwnScale|styleNoLabel,0,100);

_SECTION_END();

//////////////////////////////////////////////////

_SECTION_BEGIN("Volume ");

VolCol = (V < Ref(V,-1)); 

O = IIf(VolCol , V, 0); 

C = IIf(VolCol , 0, V);

L = 0;

H = V;

Plot(C, "", colorBlue, styleCandle + styleNoLabel);

_SECTION_END(); 

/////////////////////////////////////////////////////

 

  _____  

I am using the free version of SPAMfighter for private users.
It has removed 1215 spam emails to date.
Paying users do not have this message in their emails.
Try SPAMfighter <http://www.spamfighter.com/len>  for free now!
 

Reply via email to