NameLen
if (NameLen(*ip) > maxn) {
maxn = NameLen(*ip);
NameLen(item) = strlen(name);
for (i = MaxName(m) - NameLen(k); i > 0; i--) {