// Downloaded From https://www.WiseStockTrader.com
ard = 100* (14 - (( IIf(Ref(L,-1) == LLV(L, 14 ) ,1 , IIf( Ref(L ,-2 ) == LLV(L, 14 ) ,2 , IIf( Ref(L
,- 3 ) == 
LLV(L, 14 ) ,3 ,IIf( Ref(L ,-4 ) == LLV(L, 14 ) ,4 ,IIf(Ref( L ,-5 ) == LLV(L, 14 ) ,5 ,IIf(Ref(L ,-6 )
== 
LLV(L, 14 ) ,6 ,IIf( Ref(L ,-7 ) == LLV(L, 14 ) ,7 ,IIf(Ref( L ,-8 ) == LLV(L, 14 ) ,8 ,IIf(Ref( L ,-9
) == 
LLV(L, 14 ) ,9 ,IIf( Ref(L,-10) == LLV(L,14 ) ,10 ,IIf(Ref(L ,-11) == LLV(L, 14 ) ,11
,IIf(Ref(L,-12 ) == 
LLV(L ,14) ,12,IIf( Ref(L,-13) == LLV(L ,14 ) ,13 ,IIf( Ref( L,-14) == LLV(L, 14 ) ,14
,0) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) / 14;

aru = 100 * ( 14 - ( ( IIf(Ref(H ,-1) == HHV(H, 14) ,1 ,IIf(Ref(H ,-2 ) == HHV(H, 14) ,2 ,IIf(Ref(H
,- 3 ) == 
HHV(H, 14) ,3, IIf(Ref(H ,-4 ) == HHV(H, 14) ,4 ,IIf(Ref(H ,-5 ) == HHV(H, 14) ,5 ,IIf(Ref(H ,-6 )
== 
HHV(H, 14) ,6 ,IIf(Ref(H,-7 ) == HHV(H, 14) ,7 ,IIf(Ref(H ,-8 ) == HHV(H, 14) ,8 , IIf(Ref(H ,-9 )
== 
HHV(H, 14) ,9 ,IIf(Ref(H ,-10 ) == HHV(H, 14) ,10 ,IIf(Ref(H ,-11 ) == HHV(H, 14) ,11 ,IIf(Ref(H
,-12 ) == 
HHV(H, 14) ,12 ,IIf(Ref(H ,-13) == HHV(H, 14) ,13 ,IIf(Ref(H ,-14 ) == HHV(H, 14) ,14 ,0 ) ) ) ) ) )
) ) ) ) ) ) ) ) ) ) ) / 14;

Plot( aru, "Aroon Up", colorRed);
Plot( ard, "Aroon Down", colorBlue);