/* ---------------------------------------------------------------- */
/* ---------------------------------------------------------------- */


#include "readfrd.h"


/* liefert puffer aus string von position a bis b */
void stos(char *string, int a, int b, char *puffer)
{
  register int n, i;

  n=-1;
  for (i=a-1; i<b; i++)
    {
    n++;
    if ((i>=MAX_LINE_LENGTH)||(n>=MAX_LINE_LENGTH)) break;
    puffer[n] = string[i];
  }
  puffer[n+1] = '\0';
}

/* schreibt string in puffer von position a bis b */
void stos_inv(char *string, int a, int b, char *puffer)
{
  register int n, i;

  n=-1;
  for (i=a-1; i<b; i++)
    {
    n++;
    if ((i>132)||(n>132)) break;
    puffer[i] = string[n];
  }
}

