Clipper/FiveWin - Aclarar una duda sobre los arrays

Tengo una duda sobre los arrays, el problema es que cada vez que yo hago un arreglo siempre me pongo a igualar cada variable a 0. Por ejemplo
persona:=array(4)
persona[1]:=0
persona[2]:=0
persona[3]:=0
persona[4]:=0
y si yo fuera a hacer eso con un array de 100 elementos entonces me costaria mucho tiempo el ponerme a escribir esas 100 lineas de codigo.
Por eso es que yo quisiera saber si existe un metodo para uno tener que ahorrarse todas esas lineas.

Si esxiste es una funcion que se llama afill
y su uso es
afill(array,valor)

en tu caso seria afill(persona,0)

Aqui van mis 2 centavos

Afill() maneja 4 parametros que son aFiil(aArreglo, uValor , nInicio , nCuantos)

y Explicando que es gerundio...
aArreglo-> Arreglo a tratar
uValor -> Valor a guardar
nInicio -> elemento de inicio para el relleno
nCuantos-> Numero de elementos a Rellenar a partir de nInicio

Supongamos que tenemos un arreglo de 100 donde los primeros 50 deben de tener un valor de 0 , los 25 siguientes un valor de 10 y los siguientes 25 un valor de 20.
Hacemos lo siguiente :
Afill( aArreglo , 0 , 1 , 50 ) // los primeros 50
Afill( aArreglo ,10 , 25 ,25 ) // los 25 siguientes
Afill( aArreglo ,20 , 75 ) // los ultimos 25.
Ojo : Afill() No se puede usar con arreglos multidimensionales.

bueno la opcion que yo usaria y mas facil seria asignandole un cero con un ciclo for al comienzo del programa despues de declarar el array
for i = 1 to n
arreglo(i):=0
next