April 2021 TASC Traders Tips Volume Positive Negative Indicator

This is the place to discuss EdgeRater Chart Script

Moderator: Chris White

Post Reply
henry1224
Posts: 457
Joined: Wed Feb 24, 2016 12:04 pm

April 2021 TASC Traders Tips Volume Positive Negative Indicator

Post by henry1224 »

Under the Parameters tab

Pds Double 30 5 100
APds Double 3 0 100

Code: Select all

Apr:= (High + Low + Close)/3;
At:=ATR(pds)*0.1;
Vpd:= If (APR >= (Ref(APR,1) + at),Volume,0);
VNd:= If (APR <= (Ref(APR,1) - at),Volume,0);
VP:= Sum(VPD,Pds);
VN:= Sum(VND,Pds);
VPN: (((VP-VN)/MA(Volume,Pds))/Pds)*100,Width2,Color.Blue;
VPNA: EMA(VPN,APDS),Width2,Color.Red;
MMax:= Max(VPN,VPNA);
MMin:= Min(VPN,VPNA);
FillRGN(MMin > 0,MMin,0),Brush#200000FF;
FillRGN(MMax < 0,MMax,0),Brush#30FF7F50;
FILLRGN(VPN>VPNA,VPN,VPNA),Brush#600000FF;
FILLRGN(VPNA>VPN,VPNA,VPN),Brush#50FF0000;
UpperZone: MA(VPN,34)+(1.3185*Std(VPN,34)),Width1,ColorBlack;
LowerZone: MA(VPN,34)-(1.3185*Std(VPN,34)),Width1,ColorBlack;

Post Reply