EdgeTalk

Here is my version

OS1:= EMA(Close,3)-EMA(Close,30);
OS2:= EMA(Close,5)-EMA(Close,35);
OS3:= EMA(Close,8)-EMA(Close,40);
OS4:= EMA(Close,10)-EMA(Close,45);
OS5:= EMA(Close,12)-EMA(Close,50);
OS6:= EMA(Close,15)-EMA(Close,60);
OST:= MA(MA(((OS1+OS2*2+OS3*3+OS4*4+OS5*5+OS6*6)/21),2),2);
Con1:= OST >= 0;
Con2:= OST < 0;
Con3:= OST > Ref(OST,1);
Con4:= OST < Ref(OST,1);
BullRise:If(Con1 & Con3,OST,0),ColorLime;
BullFall: If(Con1 & Con4,OST,0),ColorGreen;
BearFall: If(Con2 & Con4,OST,0),ColorRed;
BearRise: If(Con2 & Con3,OST,0),ColorDarkRed;
OSTAvg:MA(OST,N),width2,ColorBlue;
ZeroLine:0,ColorBlack;
UpperZone:MA(OST,34)+(1.3185*Std(OST,34)),width2,colorViolet;
LowerZone:MA(OST,34)-(1.3185*Std(OST,34)),width2,colorViolet;
FillRgn(1,BullRise,0),Brush#5000FF00;
FillRgn(1,BullFall,0),Brush#50006400;
FillRgn(1,BearRise,0),Brush#508B0000;
FillRgn(1,BearFall,0),Brush#50FF0000;

Here are the Guppy MMA's plot them on top of the price

A1: EMA(Close,3),ColorBlue;
A2: EMA(Close,5),ColorBlue;
A3: EMA(Close,8),ColorBlue;
A4: EMA(Close,10),ColorBlue;
A5: EMA(Close,12),ColorBlue;
A6: EMA(Close,15),ColorBlue;
B1: EMA(Close,30),ColorRed;
B2: EMA(Close,35),ColorRed;
B3: EMA(Close,40),ColorRed;
B4: EMA(Close,45),ColorRed;
B5: EMA(Close,50),ColorRed;
B6: EMA(Close,60),ColorRed;