atoi
int atoi(char *s);
//ENDH
/*****************************************
    emulates the atoi function

    convert a string into an integer

******************************************/
int atoi(char *s)
{
	int rc=0;
	int t;
	for(t=0; t<StrLen(s); t++){
		if (isdigit(s[t])==FALSE) break;
		rc+=(int)s[t]-'0';
		rc=rc*10;
	}
	return(rc/10);
}
