[mcerio]

What I have below is what I had hoped to be the firs step in making VPCI into a PaintBar Study....it will verify, but just paints every bar.

The end result was supposed to be GREEN colored vbars for when VPCI is greater than Ave VPCI (or VPCI Smooth) AND greater than Zero.

RED when VPCI is less than VPCI Smooth AND less than zero.

WHITE or not painted when VPCI and its relation to zero are not in sync.

I am new as can be at this and am hoping someone can point me in the right direction.

Thank You.



inputs:
Price( Close ),
Length1( 5 ),
Length2( 20 ),
VPCIAvgLen( 20 ) ;

variables:
VolValue( 0 ),
VolumeSum1( 0 ),
VolumeSum2( 0 ),
VWMA1( 0 ),
VWMA2( 0 ),
VP( 0 ),
VPR( 0 ),
VM( 0 ),
VPCI( 0 ),
AvgVPCI( 0 ) ;

if BarType >= 2 then { not tick/minute data }
VolValue = Volume
else
VolValue = Ticks ;

VolumeSum1 = Summation( VolValue, Length1 ) ;
if VolumeSum1 > 0 then
VWMA1 = Summation( Price * VolValue , Length1 ) /
VolumeSum1 ;

VolumeSum2 = Summation( VolValue, Length2 ) ;
if VolumeSum2 > 0 then
VWMA2 = Summation( Price * VolValue , Length2 ) /
VolumeSum2 ;

VP = VWMA2 - Average( Price, Length2 ) ;
if Average( Low, Length1) > 0 then
VPR = VWMA1 / Average( Low, Length1 ) ;
if Average( VolValue, Length2 )> 0 then
VM = Average( VolValue, Length1 ) / Average( VolValue, Length2 ) ;
VPCI = VP * VPR * VM ;
AvgVPCI = Average( VPCI, VPCIAvgLen ) ;



If (VPCI > AvgVPCI) and (VPCI > 0)
Then PlotPaintBar (High, Low);

[Tams]

what you need is the rest of the logic...


If (VPCI > AvgVPCI) and (VPCI > 0)
Then PlotPaintBar (High, Low)
ELSE...

[mcerio]

OK, so now the end looks like this:

If (VPCI > AvgVPCI) and (VPCI > 0)
Then PlotPaintBar (High, Low)
Else;

NoPlot( 1 ) ; { unpaint the bar }


It verifies but still nothing...I seem to get all of my attempts at a paintbar to either not paint at all OR paint everything all the time.

Thank you in advance for any wisdom you can lend me.

MC

[Tams]

Originally Posted by mcerio »

OK, so now the end looks like this:

If (VPCI > AvgVPCI) and (VPCI > 0)
Then PlotPaintBar (High, Low)
Else;

NoPlot( 1 ) ; { unpaint the bar }


It verifies but still nothing...I seem to get all of my attempts at a paintbar to either not paint at all OR paint everything all the time.

Thank you in advance for any wisdom you can lend me.

MC

I would suggest you to start from STEP ONE:

go download this book:

"Getting Started with EasyLanguage"
this is the book you need if you're thinking about using EasyLanguage but don't know where to start.

Documentation

lots of useful examples for you to copy-and-paste.

[mcerio]

OK. I took a look at what you wanted me to and have managed to get some paintbars working...now i am on to show me for vpci...it plots points (would really like an arrow at the cross above and below when above or below 0), but it is not doing the simple calculation at all. It cant seem to figure out when a pre-defined value is pos or neg and plot it.

I don't get it.

Here is where I'm at...seems simple enough but not working:

inputs:
Price( Close ),
Length1( 1 ),
Length2( 1 ),
VPCIAvgLen( 1 ) ;

variables:
VolValue( 0 ),
VolumeSum1( 0 ),
VolumeSum2( 0 ),
VWMA1( 0 ),
VWMA2( 0 ),
VP( 0 ),
VPR( 0 ),
VM( 0 ),
VPCI( 0 ),
AvgVPCI( 0 ) ;

if BarType >= 2 then { not tick/minute data }
VolValue = Volume
else
VolValue = Ticks ;

VolumeSum1 = Summation( VolValue, Length1 ) ;
if VolumeSum1 > 0 then
VWMA1 = Summation( Price * VolValue , Length1 ) /
VolumeSum1 ;

VolumeSum2 = Summation( VolValue, Length2 ) ;
if VolumeSum2 > 0 then
VWMA2 = Summation( Price * VolValue , Length2 ) /
VolumeSum2 ;

VP = VWMA2 - Average( Price, Length2 ) ;
if Average( Low, Length1) > 0 then
VPR = VWMA1 / Average( Low, Length1 ) ;
if Average( VolValue, Length2 )> 0 then
VM = Average( VolValue, Length1 ) / Average( VolValue, Length2 ) ;
VPCI = VP * VPR * VM ;
AvgVPCI = Average( VPCI, VPCIAvgLen ) ;


Condition1 = (VPCI is > avgVPCI) ;

{ OPTIONAL STEP: Replace CLOSE with your own formula for the price at which the marker
will be placed. Note that Value1 is a numeric variable, a temporary holding place
for the result of the numeric formula. }

Value1 = (low - .5);

{ Leave the following as is. The plot is not named because there is only one plot, and
the default name Plot1 will be adequate. The alert does not include a description
because the alerting criteria and the plotting criteria are the same, and the
description will be redundant. }

if Condition1 then
begin
Plot1 (value1) ;
Alert ;
end ;

[Tams]

you should wrap your code with the code tag. [code]
it is the # key at the top right of the message window

tagged code looks like this:

Input:
length(20);

Variables:
avg(0);

avg = average( close, length);

[Tams]

you are jumping ahead,
you haven't done these parts yet...

Originally Posted by mcerio »

What I have below is what I had hoped to be the firs step in making VPCI into a PaintBar Study....it will verify, but just paints every bar.

The end result was supposed to be GREEN colored vbars for when VPCI is greater than Ave VPCI (or VPCI Smooth) AND greater than Zero.

RED when VPCI is less than VPCI Smooth AND less than zero.

WHITE or not painted when VPCI and its relation to zero are not in sync.
...

[mcerio]

I’m actually not going to paint the bars based on VPCI….but I do want to eliminate the VPCI indicator from below my chart and simply replace it with a show me that gives me one arrow up or down based on the following info:

If VPCI > AvgVPCI (this is VPCI Smooth) and VPCI > 0 (the “zero” I am referring to is the one represented in the VPCI indicator, NOT on the chart of course) then plot the show me under the bar as an arrow pointing up…ONLY at the initial time that these are true not on every single bar that fits this criteria.

Same thing but pointing DOWN when VPCI < AvgVPCI and VPCI < 0.

This doesn’t seem like it should be so difficult to get to work….but I sure can’t do it.



Any help is SO needed and appreciated fully.