GUPPY MULTIPLE ESTIMATED MOVING AVERAGE (EMA) is for Trend Trading. This script uses three sets of crosses to give us an indicator of possible trend reversal. Red cross is the first alert, followed by blue and black. Black cross being the strongest, red cross weakest.
More information about Guppy Trading can be found in the link below
More information about Guppy Trading can be found in the link below
study(title="Triple Guppy Cross", overlay=true) short = ema(close, 1) short1 = ema(close, 3) short2 = ema(close, 5) short3 = ema(close, 9) short4 = ema(close, 13) short5 = ema(close, 18) long = ema(close, 100) long1 = ema(close, 110) long2 = ema(close, 130) longl1 = ema(close, 150) longl2 = ema(close, 175) longl3 = ema(close, 200) plot(short, color = silver, linewidth = 3) plot(short1, color = silver, linewidth = 3) plot(short2, color = silver, linewidth = 3) plot(short3, color = silver, linewidth = 3) plot(short4, color = silver, linewidth = 3) plot(short5, color = silver, linewidth = 3) plot(long, color = lime, linewidth = 3) plot(long1, color = lime, linewidth = 3) plot(long2, color = lime, linewidth = 3) plot(longl1, color = aqua, linewidth = 3) plot(longl2, color = aqua, linewidth = 3) plot(longl3, color = aqua, linewidth = 3) plot(cross(short, long) ? short : na, style = cross, color = red, linewidth = 4) plot(cross(short, long1) ? short : na, style = cross, color = red, linewidth = 4) plot(cross(short, long2) ? short : na, style = cross, color = red, linewidth = 4) plot(cross(short, longl1) ? short : na, style = cross, color = red, linewidth = 4) plot(cross(short, longl2) ? short : na, style = cross, color = red, linewidth = 4) plot(cross(short, longl3) ? short : na, style = cross, color = red, linewidth = 4) plot(cross(short1, long) ? short : na, style = cross, color = blue, linewidth = 3) plot(cross(short1, long1) ? short : na, style = cross, color = blue, linewidth = 3) plot(cross(short1, long2) ? short : na, style = cross, color = blue, linewidth = 3) plot(cross(short1, longl1) ? short : na, style = cross, color = blue, linewidth = 3) plot(cross(short1, longl2) ? short : na, style = cross, color = blue, linewidth = 3) plot(cross(short1, longl3) ? short : na, style = cross, color = blue, linewidth = 3) plot(cross(short2, long) ? short : na, style = cross, color = blue, linewidth = 3) plot(cross(short2, long1) ? short : na, style = cross, color = blue, linewidth = 3) plot(cross(short2, long2) ? short : na, style = cross, color = blue, linewidth = 3) plot(cross(short2, longl1) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short2, longl2) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short2, longl3) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short3, long) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short3, long1) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short3, long2) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short3, longl1) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short3, longl2) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short3, longl3) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short4, long) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short4, long1) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short4, long2) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short4, longl1) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short4, longl2) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short4, longl3) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short5, long) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short5, long1) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short5, long2) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short5, longl1) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short5, longl2) ? short : na, style = cross, color = black, linewidth = 3) plot(cross(short5, longl3) ? short : na, style = cross, color = black, linewidth = 3)