void load_socials( void )
{
FILE *fp;
int stat;
char strsave [ MAX_INPUT_LENGTH ];
fclose( fpReserve );
sprintf( strsave, "%s%s", SYSTEM_DIR, SOCIAL_FILE );
if ( !( fp = fopen( strsave, "r" ) ) )
{
bug( "Cannot open SOCIALS.TXT", 0 );
exit( 0 );
}
for ( ; ; )
{
int letter;
char *word;
letter = fread_letter( fp );
if ( letter == '*' )
{
fread_to_eol( fp );
continue;
}
if ( letter != '#' )
{
bug( "Load_socials: # not found.", 0 );
break;
}
word = fread_word( fp, &stat );
if ( !str_cmp( word, "SOCIAL" ) )
{
fread_social( fp );
continue;
}
else
if ( !str_cmp( word, "END" ) )
break;
else
{
bug( "Load_socials: bad section.", 0 );
continue;
}
}
fclose( fp );
fpReserve = fopen( NULL_FILE, "r" );
return;
}
void load_socials( )
{
FILE *fp;
if( ( fp = fopen( SOCIAL_FILE, "r" ) ) != NULL )
{
for( ;; )
{
char letter;
const char *word;
letter = fread_letter( fp );
if( letter == '*' )
{
fread_to_eol( fp );
continue;
}
if( letter != '#' )
{
bug( "Load_socials: # not found.", 0 );
break;
}
word = fread_word( fp );
if( !str_cmp( word, "SOCIAL" ) )
{
fread_social( fp );
continue;
}
else if( !str_cmp( word, "END" ) )
break;
else
{
bug( "Load_socials: bad section.", 0 );
continue;
}
}
fclose( fp );
}
else
{
bug( "Cannot open socials.dat", 0 );
exit( 0 );
}
}
