jzsetatr(fstr , fattr)
char *fstr;
int fattr;
{
  union REGS sreg,dreg;
  struct SREGS seg;

  segread(&seg);

  sreg.x.ax = 0x4301;		/* set file attribute */
  sreg.x.dx = (int) fstr;
  sreg.x.cx = fattr;

  intdosx(&sreg,&dreg,&seg);

  if (dreg.x.cflag & 1 == 1) return(dreg.x.ax);
  else return(0);
}
