char *_path_(char *pn) // to intercept d:\path\ from pathname
{
char ss[P_MAX], *s = ss;
int l = 0;
strcpy(ss, pn);
for(; *s; s++) if(*s == '\\') l++;
if(!l) return N0;
for(; *(--s) != '\\';) *s = Z0; // to delete backward till '\', remain the last '\'
s= ss;
return s;
}