Profitunity Indicators
Chaos Balance Lines 

ChaosBlueBL:= 
{Alligator Blue Balance Line - Jaw} 
{13 bar smoothed average offset 8 bars} 
Ref(Wilders(MP(),13),-8); 

ChaosRedBL:= 
{Alligator Red Balance Line - Teeth} 
{8 bar smoothed average offset 5 bars} 
Ref(Wilders(MP(),8),-5); 

ChaosGreenBL:= 
{Alligator Green Balance Line - Lip} 
{5 bar smoothed average offset 3 bars} 
Ref(Wilders(MP(),5),-3); 

ChaosBlueBL; 
ChaosGreenBL; 
ChaosRedBL; 

ChaosBlueBl ChaosGreenBL Difference 

ChaosBlueBL:= 
{Alligator Blue Balance Line - Jaw} 
{13 bar smoothed average offset 8 bars} 
Ref(Wilders(MP(),13),-8); 

ChaosGreenBL:= 
{Alligator Green Balance Line - Lip} 
{5 bar smoothed average offset 3 bars} 
Ref(Wilders(MP(),5),-3); 

A:=ChaosGreenBL-ChaosBlueBL; 
A; 

Chaos Balance Lines Strength 

M1:=MP()- Ref(Wilders(MP(),5),-3); 
M2:=MP()- Ref(Wilders(MP(),8),-5); 
M3:=MP()- Ref(Wilders(MP(),13),-8); 
Mov(Mov(Mov(M1+M2+M3,2,S),2,S),2,S) 

Chaos Balance Osc 

A1:=C-Ref(Wilders(MP(),5),-3); 
A2:=C-Ref(Wilders(MP(),8),-5); 
A3:=C-Ref(Wilders(MP(),13),-8); 
0;A1;A2;A3; 

Chaos Fractal 

{ Chaos Fractal (simple version +1=Up, -1=Dn) } 

High1 := Ref(HIGH,-2); 
High2 := Ref(HIGH,-1); 
High3 := Ref(HIGH,0); 
High4 := Ref(HIGH,1); 
High5 := Ref(HIGH,2); 
Low1 := Ref(LOW,-2); 
Low2 := Ref(LOW,-1); 
Low3 := Ref(LOW,0); 
Low4 := Ref(LOW,1); 
Low5 := Ref(LOW,2); 
Fractal := 
If((High3 > High1) AND (High3 > High2) AND (High3 > High4) AND (High3>High5), +1,0); 
Fractal := 
If((Low3 < Low1) AND (Low3 < Low2) AND 
(Low3 < Low4) AND (Low3 < Low5), 
If(Fractal > 0, 0, -1), Fractal); 

Fractal; 

ACC Blue 

Acc:= 
Mov(MP(),10,S)- Mov(MP(),70,S)- 
Mov(Mov(MP(),10,S)- Mov(MP(),70,S),5,S); 
SIG:=Mov(ACC,5,S); 
Per1:=Input("lookback",10,100,60); 
Perc1:=Input("percent uband",.800,.999,.950); 
Perc2:=Input("percent lband",1.010,1.200,1.050); 
UB:=Ref((HHV(ACC,Per1)*Perc1),-1); 
LB:=Ref((LLV(ACC,Per1)*Perc2),-1); 
MB:=(UB+LB)*.5; 
UB;LB;Sig;ACC; 

ACC Green 

Acc:= 
Mov(MP(),5,S)- Mov(MP(),17,S)- 
Mov(Mov(MP(),5,S)- Mov(MP(),17,S),5,S); 
SIG:=Mov(ACC,5,S); 
Per1:=Input("lookback",10,100,60); 
Perc1:=Input("percent uband",.800,.999,.950); 
Perc2:=Input("percent lband",1.010,1.200,1.050); 
UB:=Ref((HHV(ACC,Per1)*Perc1),-1); 
LB:=Ref((LLV(ACC,Per1)*Perc2),-1); 
UB;LB;SIG;ACC; 

ACC Red 

Acc:=Mov(MP(),5,S)- Mov(MP(),34,S)- 
Mov(Mov(MP(),5,S)- Mov(MP(),34,S),5,S); 
SIG:=Mov(ACC,5,S); 
Per1:=Input("lookback",10,100,60); 
Perc1:=Input("percent uband",.800,.999,.950); 
Perc2:=Input("percent lband",1.010,1.200,1.050); 
UB:=Ref((HHV(ACC,Per1)*Perc1),-1); 
LB:=Ref((LLV(ACC,Per1)*Perc2),-1); 
UB;LB;SIG;ACC;
***** More*****
ACC Blue 

Acc:= 
Mov(MP(),10,S)- Mov(MP(),70,S)- 
Mov(Mov(MP(),10,S)- Mov(MP(),70,S),5,S); 
SIG:=Mov(ACC,5,S); 
Per1:=Input("lookback",10,100,60); 
Perc1:=Input("percent uband",.800,.999,.950); 
Perc2:=Input("percent lband",1.010,1.200,1.050); 
UB:=Ref((HHV(ACC,Per1)*Perc1),-1); 
LB:=Ref((LLV(ACC,Per1)*Perc2),-1); 
MB:=(UB+LB)*.5; 
UB;LB;Sig;ACC; 

ACC Green 

Acc:= 
Mov(MP(),5,S)- Mov(MP(),17,S)- 
Mov(Mov(MP(),5,S)- Mov(MP(),17,S),5,S); 
SIG:=Mov(ACC,5,S); 
Per1:=Input("lookback",10,100,60); 
Perc1:=Input("percent uband",.800,.999,.950); 
Perc2:=Input("percent lband",1.010,1.200,1.050); 
UB:=Ref((HHV(ACC,Per1)*Perc1),-1); 
LB:=Ref((LLV(ACC,Per1)*Perc2),-1); 
UB;LB;SIG;ACC; 

ACC Red 

Acc:=Mov(MP(),5,S)- Mov(MP(),34,S)- 
Mov(Mov(MP(),5,S)- Mov(MP(),34,S),5,S); 
SIG:=Mov(ACC,5,S); 
Per1:=Input("lookback",10,100,60); 
Perc1:=Input("percent uband",.800,.999,.950); 
Perc2:=Input("percent lband",1.010,1.200,1.050); 
UB:=Ref((HHV(ACC,Per1)*Perc1),-1); 
LB:=Ref((LLV(ACC,Per1)*Perc2),-1); 
UB;LB;SIG;ACC; 

The ACC Red is closest to the original AC Osc, but I added a signal line and Upper and lower bands. 

The ACC Green and ACC Blue are based on the ideas from Tom Joseph and advanced get, faster and slower Oscillators 

The chaos Balance lines strength is developed from an idea by John Murphy finding out how far the Balance lines are from a median point