name string. This function should be rewritten to deal with more than 10 units of a given type. Pointed out by: jmf@free-gate.com (Jean-Marc Frailong) (I fixed it slightly differently)