current(start, stop, repeat)
long start, stop, repeat;
{
	long now = time(0);
	
	if (now < start)
		return(0);
	else if (repeat == 0)
		return(start < now && (now < stop || stop == 0));
	else
		return((now-start)%repeat <= stop-start);
}

itoa(n, s)	/* convert n to characters in s */
char s[];
int n;
{
	int i, sign;
	
	if ((sign = n) < 0) /* record sign */
		n = -n;
		i = 0;
	do {		/* generate digits in reverse order */
		s[i++] = n % 10 + '0';    	/* get next digit */
	} while ((n /= 10) > 0);    /* delete it */
	if (sign < 0)
		s[i++] = '-';
	s[i] = '\0';
	reverse(s);
}

ltoa(n, s)	/* convert n to characters in s */
char s[];
int n;
{
	long i, sign;
	
	if ((sign = n) < 0) /* record sign */
		n = -n;
		i = 0;
	do {		/* generate digits in reverse order */
		s[i++] = n % 10 + '0';    	/* get next digit */
	} while ((n /= 10) > 0);    /* delete it */
	if (sign < 0)
		s[i++] = '-';
	s[i] = '\0';
	reverse(s);
}

reverse(s)	/* reverse s in place */
char s[];
{
	int c, i, j;

	for (i=0, j = strlen(s)-1; i<j; i++, j--) {
		c = s[i];
		s[i] = s[j];
		s[j] = c;
	}
}