Oscillator Cycle Highlighter

Cycle Highlighter

{Periods}
P0:=Input("Cycle Wavelength",3,10000,207);
X:=Input("NB, periods in Tri MA = wavelength * 1.5",0,0,0);
P1:=Int(P0*1.5);
P1:=LastValue(If(Frac(P1/2)=0,P1+1,P1));
P2:=Int(p1/2);
P2:=LastValue(If(Frac(P2/2)=0,P2+1,P2));

{Moving Averages}
MA1:=Mov(P,P1,TRI);
MA2:=Mov(P,P2,TRI);

{Centre MAs}
PC1:=LastValue((P1-1)/2);
PC2:=LastValue((P2-1)/2);
CMA1:=Ref(MA1,PC1);
CMA2:=Ref(MA2,PC2);

{Plot}
cyhi:=CMA2-CMA1;
0;cyhi

kaynak
purebytes

matriks için Cycle Highlighter
P0:=Input("Cycle Wavelength",3,10000,207);
X:=Input("NB, periods in Tri MA = wavelength * 1.5",0,0,0);
P1:=Int(P0*1.5);
P11:=LastValue(If(Frac(P1/2)=0,P1+1,P1));
P2:=Int(p11/2);
P22:=LastValue(If(Frac(P2/2)=0,P2+1,P2));

{Moving Averages}
MA1:=Mov(c,P11,TRI);
MA2:=Mov(c,P22,TRI);

{Centre MAs}
PC1:=LastValue((P11-1)/2);
PC2:=LastValue((P22-1)/2);
CMA1:=Ref(MA1,PC1);
CMA2:=Ref(MA2,PC2);

{Plot}
cyhi:=CMA2-CMA1;
0;cyhi