Write serveral functions

Hi,I need six functions

1. ZIG(K,N)

When the variation in price over N%,the line changes the direction. And I need some numbers to represent the K‘s member variables.

K: 0-open; 1-highest ; 2-lowest ;  3-close ; others-array information;

 ex:ZIG(3,5)  ZIG’s change of direction on 5% of close.

2. ZIGA(K,X)

 When the variation in price over X,the line changes the direction.

 K: 0-open; 1-highest ; 2-lowest ;  3-close ; others-array information;

3. PEAK(K,N,M)

 The value of the peak which M before that on ZIG(K,N), M>=1.

ex: PEAK(1,5,1)  The value of the peak that 1 before on the ZIG(1,5)

4.PEAKBARS(K,N,M)

 The function will get the period of ZIG(K,N)'s peaks M before ,M>=1.

 ex:PEAK(0,5,1)  The periods of the peak 1 before which on the ZIG(0,5).

5. TROUGH(K,N,M)

The values of  troughs M before which on ZIG, M>=1.

ex:TROUGH(2,5,2)  The value of the troughs 2 before which on the ZIG(2,5) 

6. TROUGHBARS(K,N,M)

The amount of the period that ZIG(K,N)'s troughs M before,M>=1.

ex:TROUGH(2,5,2) The  periods of the troughs 2 before which on the ZIG(2,5) .