[color=blue]
[SameTickOpt = True];
[LegacyColorValue = true];
inputs:
Length( 26),
Smooth(5),
DSmooth(5),
Overbought(.1),
Oversold(-.1);
variables:
oDMIPlus( 0 ),
oDMIMinus( 0 ),
oDMI( 0 ),
oADX( 0 ),
oADXR( 0 ),
oVolty( 0 ) ;
Value1 = DirMovement( H, L, C, Length, oDMIPlus, oDMIMinus, oDMI, oADX, oADXR, oVolty ) ;
value2= xaverage((oDMIPlus-oDMIMinus)/(oDMIMinus+oDMIPlus) ,smooth);
Plot1( value2, "SRatio" ) ;
Plot2(xaverage(plot1,dsmooth), "A");
Plot3(Overbought,"OB");
Plot4(oversold,"OS");
If Plot1 > overbought then setplotcolor(1,darkgreen);
if plot1 < oversold then setplotcolor(1,darkred);
[/color]