jzwrtstr ( fstr , frow , fcol , fattr )
char *fstr;
int frow,fcol,fattr;
{
  while (*fstr) {
    jzloccur(frow,fcol);
    jzwrtchr(*fstr++,fattr,1);
    ++ fcol;
    if (fcol > 79) {
      fcol = 0;
      if (frow == 24) jzscrlup( 0x100,0x184f,1,fattr);
      else ++ frow;
    }
  }
}
