Money Velocity Population Adjusted (MVPA)
// This source code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/
// © EsIstTurnt

//@version=5
indicator("Money Velocity Population Adjusted",shorttitle='MVPA (GDPPC/(M2/POP))')

tf=input.timeframe(defval='1W')



//USA(BLUE)
usgdppc  =(request.security(input.symbol(defval='USGDPPC'),tf,close))
uspop  =(request.security(input.symbol(defval='USGDP'),tf,close))
usm2   =(request.security(input.symbol(defval='USM2'),tf,close))
usv = ta.ema(usgdppc/(usm2/uspop),4)
plot(usv,color=#3244f0,title='USA')
//CANADA(RED)
cagdppc=(request.security(input.symbol(defval='CAGDPPC'),tf,close))
capop  =(request.security(input.symbol(defval='CAGDP'),tf,close))
cam2   =(request.security(input.symbol(defval='CAM2'),tf,close))
cav    = ta.ema(cagdppc/(cam2/capop),4)
plot(cav,color=#ff0000,title='CANADA')
//EUROPE(GREEN)
eugdppc=(request.security(input.symbol(defval='EUGDPPC'),tf,close))
eupop  =(request.security(input.symbol(defval='EUGDP'),tf,close))
eum2   =(request.security(input.symbol(defval='EUM2'),tf,close))
euv    = ta.ema(eugdppc/(eum2/eupop),4)
plot(euv,color=#27f50c,title='EUROPEon UNION')
//CHINA(YELLOW)
cngdppc=(request.security(input.symbol(defval='CNGDPPC'),tf,close))
cnpop  =(request.security(input.symbol(defval='CNGDP'),tf,close))
cnm2   =(request.security(input.symbol(defval='CNM2'),tf,close))
cnv = ta.ema(cngdppc/(cnm2/cnpop),4)
plot(cnv,color=#e3f036,title='CHINA')
//RUSSIA(WHITE)
rugdppc=(request.security(input.symbol(defval='RUGDPPC'),tf,close))
rupop  =(request.security(input.symbol(defval='RUGDP'),tf,close))
rum2   =(request.security(input.symbol(defval='RUM2'),tf,close))
ruv    = ta.ema(rugdppc/(rum2/rupop),4)
plot(ruv,color=#ffffff,title='RUSSIA(distorts chart lol)')
//TURKEY(ORANGE)
trgdppc=(request.security(input.symbol(defval='TRGDPPC'),tf,close))
trpop  =(request.security(input.symbol(defval='TRGDP'),tf,close))
trm2   =(request.security(input.symbol(defval='TRM2'),tf,close))
trv    = ta.ema(trgdppc/(trm2/trpop),4)
plot(trv,color=#f5840c,title='TURKEY')
//AUSTRALIA(PINK)
augdppc=(request.security(input.symbol(defval='AUGDPPC'),tf,close))
aupop  =(request.security(input.symbol(defval='AUGDP'),tf,close))
aum3   =(request.security(input.symbol(defval='AUM3'),tf,close))
auv    = ta.ema(augdppc/(aum3/aupop),4)
plot(auv,color=#d707de,title='AUSTRALIA(M3)')
//GREAT BRITAIN(LIGHT BLUE)
gbgdppc=(request.security(input.symbol(defval='GBGDPPC'),tf,close))
gbpop  =(request.security(input.symbol(defval='GBGDP'),tf,close))
gbm2   =(request.security(input.symbol(defval='GBM2'),tf,close))
gbv    = ta.ema(gbgdppc/(gbm2/gbpop),4)
plot(gbv,color=#07c5de,title='BRITAIN')
//INDIA(BROWN)
ingdppc  =(request.security(input.symbol(defval='INGDPPC'),tf,close))
inpop  =(request.security(input.symbol(defval='INGDP'),tf,close))
inm2   =(request.security(input.symbol(defval='INM2'),tf,close))
inv    = ta.ema(ingdppc/(inm2/inpop),4)
plot(inv,color=#de3404,title='INDIA')