Demand Index
Refine your demand-supply analysis with the Demand Index AFL code for Amibroker. This indicator, complemented by the Amibroker data feed, assists traders in gauging the strength of buying and selling forces. Download this AFL code to enhance your ability to identify potential trend reversals and continuations based on demand and supply dynamics.
/
_SECTION_BEGIN("Demand Index");
//------------------------------------------------------------------
//
// Uses the demand index for a system test.
//
//------------------------------------------------------------------------------
/* Demand Index */
/* Steve Wiser at slwiserr@erols.com */
/* Exploration, System and indicator */
GraphMax=9;
A=(H+L+2*C);
B=EMA((HHV(H,2)-LLV(L,2)),19);
BuyP=
/*{BuyPower}*/
V/EMA(V,19) * ((A>=Ref(A,-1)) +(ARef(A,-1)) / exp((0.375 * (A+Ref(A,-1)) / B ) * (A-Ref(A,-1)) / Ref(A,-1)));
mabp=EMA(BuyP,19);
masp=EMA(SellP,19); /*{smooth Selling Pressure}*/
divsor=IIf(mabp>masp,mabp,masp); /*{BP:SP ratio}*/
divend=IIf(mabpmabp) , -var2 , var2 ) ; /*{range -100 to 100}*/
var4=var3*100;
Graph1 = var4;
Graph1Style=5;
var5=MA(var4,30);
Graph2=var5;;
Graph2Style=5;
Graph2Color=6;
/* Zero Line */
Graph0=0;
Buy=Cross(var4,var5); /* originally var5 was a zero */
Sell=Cross(0,var4);
Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);
Short=Sell;
Cover=Buy;
Filter= (Buy == 1 OR Sell == 1) ;
NumColumns = 7;
Column0 = IIf(Buy == 1, 1, IIf(Sell == 1, -1, 0 ) );
Column0Format = 1.0;
Column0Name = "B/S";
Column1 = C;
Column1Name = "Close ";
Column1Format = 1.2;
Column2 = MA(V,17);
Column2Name = "17 Ma Vol ";
Column2Format = 1.0;
Column3 = MA(C,17)/MA(C,50);
Column3Name = "% 17/50 ";
Column3Format = 1.2;
Column3Format = 1.2;
Column4= MA(C,17);
Column4Name="17 C ma";
Column4Format = 1.2;
Column4= MA(C,50);
Column4Name="50 C ma";
Column4Format = 1.2;
Column5=ROC(var4,2);
Column5Name="ROC DI";
Column5Format=1.2;
Column6=Cum(1);
Column6Name = "#Bars";
Column6Format = 1.0;
/* End of Exploration Code. */
_SECTION_END();