function CopyActorMaterial( actor, material_num)

Returns a material id for a copy of an actor's material