CD Dot
CD Dot 

Ref(Mov(Typical(),3,S),-1); 

CD Envelope 

H1:=Ref((Typical()*2)-L,-1); 
L1:=Ref((Typical()*2)-H,-1); 
Dot:=Ref(Mov(Typical(),3,S),-1); 
Mov(H1,3,S); 
Mov(L1,3,S); 
Dot; 

CD Zones 

H1:=Ref((Typical()*2)-L,-1); 
H2:=Ref(H1,-1); 
H3:=Max(H1,H2); 
H4:=Min(H1,H2); 

L1:=Ref((Typical()*2)-H,-1); 
L2:=Ref(L1,-1); 
L3:=Min(L1,L2); 
L4:=Max(L1,L2); 
H3; 
H4; 
L4; 
L3;