NDDATA
for (p = '0'; p < '0' + NDDATA; p++, dx++) {
for (i = NDDATA - 1; i >= 0; i--)
for (i = 0; (cp = tp) && *cp != '\0' && i < NDDATA;) {