#include <string.h>

#include "extern.h"

bselect()
	{
		int i,j = 0;
		long pfn;

  if ( ! strcmp(cmdopt,"OFF"))
        { if ( stbl[0][0] )
             { strcpy(ssent,"\n\n: ボード選択機能を一時停止させます\n\n"); rsout();
               stbl[0][0] = NULL;
             }
          return(0);
        }
        
		if ( strlen(cmdopt) ) { paraerr(); return(0); }

  strcpy(ssent,"\nMAIN や AUTO で出るボードを選びます\n\n"); rsout();
  strcpy(ynsent,"  実行しますか？ ");
  if ( y_or_n() )  return(0);
  
		strcat(ssent,"ボード名が出ますから､見出しを出すかどうかを返答ください\n");
		rsout();

		for ( i = 0 ; i <= JUNLE_MAX ; i++ ) { stbl[i][0] = NULL; } 
		for ( i = 0 ; i <= JUNLE_MAX ; i++ )
		{   strcpy(wjunle,jtbl[i]);
			if ( ! strlen(wjunle) ) break;
			if ( ! strcmp(wjunle,mainjle) )   continue;
			if ( ! strcmp(wjunle,mailjle) )   continue;
			if ( ! strcmp(wjunle,"SYS     ")) continue;
			sprintf(ynsent,"%s ﾎﾞｰﾄﾞを出しますか? ",wjunle);
			if ( y_or_n() ) { strcpy(stbl[j],wjunle);
							  j++; }
		}

 if ( strcmp(hiscall,guestid) )
	{
		fpw = fopen(SELECT_FIL,"r+");
		if ( fpw != NULL )
			{ while(1)
				{ pfn = ftell(fpw);
				  if ( fgets(fbuff,255,fpw) == NULL ) break;
				  if ( ! strncmp(fbuff,hiscall,6) )
						{ fseek(fpw,pfn,0);
						  fprintf(fpw,"D");
						}
				}
			fclose(fpw);
			}

		if ( stbl[0][0] == NULL )  return(0);
		strcpy(fbuff,hiscall);
		for ( i = 0 ; i <= JUNLE_MAX ; i++ )
			{ if ( stbl[i][0] == NULL ) break;
			  strcat(fbuff,stbl[i]);
			}
		strcat(fbuff,"\n");

		fpw = fopen(SELECT_FIL,"a");
		fputs(fbuff,fpw);
		fclose(fpw);
	}
	return(0);
 }