Animating with types

Can somebody please tell me how to get this working?

;----------------------------------------------------
Global zomb=LoadAnimMesh("zombiefbx.b3d")

Type zomb

Field x#,y#,z#,rx,ry,rz
Field entit,a ,aniseq,anim
End Type

For i= 1 To 10
dozomb.zomb = New zomb
dozomb\entit = CopyEntity (zomb)
dozomb\x#=Rnd(-10,18)
dozomb\z#=Rnd(8,12)
PositionEntity dozomb\entit,dozomb\x#,0,dozomb\z#
dozomb\a=GetChild (dozomb\entit,1)
dozomb\aniseq=ExtractAnimSeq( dozomb\a,56,120 ) ;Zombie walk
Next

function dozombie()
For animz.zomb = Each zomb

Animate animz\a,1,0.35,animz\aniseq,1 ;play one-shot jump anim
Next
end function
;---------------------------------------------

I'm trying to get my head around types with various test.
Phew! - I'm beginning to think arrays are better and simpler!

Thanks.

Oh forgot to say - the 10 zombies just stand there in their neutral position.