Pair Strength AUD NZD GBP USD

study("Pair Strength AUD NZD GBP USD", precision=3)
fast=input(5)
slow=input(15)
v1=security('AUDNZD',period,close)
v2=security('AUDUSD',period,close)
v3=security('GBPAUD',period,close)
v4=security('GBPNZD',period,close)
v5=security('NZDUSD',period,close)
v6=security('GBPUSD',period,close)
AUD=(v1+v2+(100-v3))/3
NZD=((100-v1)+(100-v4)+v5)/3
GBP=(v3+v4+v6)/3
USD=((100-v2)+(100-v5)+(100-v6))/3
aud=tsi(AUD,fast,slow)
nzd=tsi(NZD,fast,slow)
gbp=tsi(GBP,fast,slow)
usd=tsi(USD,fast,slow)
plot(aud,color=#FFD800,title='AUD', linewidth=3)
plot(nzd,color=silver,title='NZD', linewidth=3)
plot(gbp,color=blue,title='GBP')
plot(usd,color=green,title='USD')
hline(0,title='midpoint')
hline(0.5,title='overbought')
hline(-0.5,title='oversell')