#include <string.h>
#include "extern.h"

julans()                         /* ﾎﾞｰﾄﾞ ｱﾝﾅｲ  BBS ｺﾏﾝﾄﾞ */
    {   int  psw , i , j = 1; 
        char wjle[9], wsig[9];

        sprintf(ssent,"--- 当ＢＢＳには次のボードがあります ---\n\n");
        
        for(i = 0; i <= JUNLE_MAX ; i++)
           { if (jtbl[i][0] == NULL)  break;
             
             if ( strcmp(jtbl[i],mainjle) == 0)  continue;
             if ( strcmp(jtbl[i],mailjle) == 0)  continue;
             
             strcat(ssent,jtbl[i]); strcat(ssent,"      ");
             j++;
             if ( j > 4) { strcat(ssent,"\n"); j = 1; rsout(); }
           }
           
        sprintf(fbuff,"\n PLAZA ﾎﾞｰﾄﾞ 以外のボードの内容は MAIN から読むことができます\n\n");
        strcat(ssent,fbuff);
        rsout();
        
        sprintf(ynsent,": ボードの紹介を見ますか? ");
        if ( y_or_n() ) return(0);
         
        fpw = fopen(JUL_FIL,"r");
        while(1)
            {   char wkjul[9];
				
				if ( fgets(fbuff,255,fpw) == NULL)    break;  /* BBS ﾒｲ ﾖﾐｺﾐ */
                psw = 1;

				idcpy(wkjul,fbuff);
                if (! strncmp(wkjul,mainjle,8) )  psw = 0;  /* BBS ﾒｲ MAIN ﾖﾐﾄﾊﾞｼ */
                if (! strncmp(wkjul,mailjle,8) )  psw = 0;  /* BBS ﾒｲ MAIL ﾖﾐﾄﾊﾞｼ */
                idcpy(wjle,fbuff);            /* BBS ﾒｲ ｶｸﾉｳ */

                fgets(fbuff,255,fpw);   
                                                      /* sigop ﾖﾐｺﾐ */
                idcpy(wsig,fbuff);                /* sigop ｶｸﾉｳ */

                fgets(fbuff,255,fpw);
                                                      /* ｶﾞｲﾀﾞﾝｽ ﾖﾐｺﾐ (ﾖﾐﾄﾊﾞｼ) */
                fgets(fbuff,255,fpw);
                                                      /* ｱﾝﾅｲ ﾖﾐｺﾐ */
                sprintf(ssent,"\n---------------------------------------\n: ﾎﾞｰﾄﾞ = %s sigop = %s\n",wjle,wsig);
                                                      /* ﾍﾝｼｭｳ */
				if ( psw ) rsout();
                strcpy(ssent,fbuff);
                if ( psw ) rsout();
				fgets(fbuff,255,fpw);
				if ( fbuff[0] == '0' && psw )
					{ strcpy(ssent,"       (他ＢＢＳには転送しません）");
					  rsout();
					} 
             }
         fclose(fpw);
         fpw = NULL;
	return(0);
     }
     
