[amibroker] Cycle indicator

[miche1a]

Just starting with amibroker , In metastock I use this cycle indicator 
and want to convert it in amibroker language, one in 9 period and one 
in 15 period , here is the exemple of the 15 period

Period:= 15;
      denom1:= If(HHV(H,Period)-LLV(L,Period)>0, HHV(H,Period)-LLV
(L,Period), 1);
      P1:= Mov(((C-LLV(L,Period))/ denom1)*100,3,E);
      denom2 := If(HHV(P1,Period)-LLV(P1,Period)>0, HHV(P1,Period)-LLV
(P1,Period), 1);
      Mov(((P1-LLV(P1,Period))/denom2)*100,3,E)

Thank's in advance