Hi there I just like to plot the total market cap of DAX 30 in billions of euros, the code is below, but I having a bit time stress to grab the nr of shares of each dax stock constituent :s ... thanks.
_SECTION_BEGIN("CAPTESTING");
_N( lista = ParamStr( "Tickers", "BAYN.DE,CON.DE,MUV2.DE,IFX.DE,EOAN.DE,LIN.DE,PSM.DE,DAI.DE,SAP.DE,DPW.DE,FME.DE,CBK.DE,BMW.DE,BAS.DE,BEI.DE,VOW3.DE,DTE.DE,DBK.DE,VNA.DE,SIE.DE,HEN3.DE,HEI.DE,ALV.DE,ADS.DE,DB1.DE,MRK.DE,RWE.DE,FRE.DE,LHA.DE,TKA.DE" ));
_N( nrshares = ParamStr( "Nrshares", "857947808,200005983,145770000,1136450679,2167149433,185638071,228949482,1069837447,1193405243,1229573069,306461371,1252357634,657600600,918478694,226818984,501295263,4742941596,2066402041,511100826,815518880,434278198,198416477,438879929,203893455,186610158,434777878,614745499,554710473,471259644,622531741" ));
_N(Title = StrFormat( " Date : {{DATE}} - {{VALUES}}" ) + "\n" );
SetChartOptions(0,chartShowArrows|chartShowDates);
Buy=Sell=0;
nrcotadas = 0;
StaticVarRemove("~shares*");
StaticVarRemove("~dayvalue");
nshares = 0;
for( j = 0; (nrshares = StrExtract( nrshares, j )) != "" ; j++ )
{
nshares = StrToNum(nrshares);
StaticVarSet("~shares"+j, nshares);
}
for( i = 0; (symbol = StrExtract( lista, i )) != "" ; i++ )
{
setForeign(symbol);
shares = StaticVarGet("~shares"+i);
marketcap = (close*shares);//1000000000 ;
StaticVarAdd("~dayvalue", marketcap);
}
total1 = StaticVarGet("~dayvalue");
Plot( total1, "DAX 30 Market Cap in Billions of Euros", colorOrange, styleLine);
_SECTION_END();