#include <string.h>
#include "extern.h"

/* ｻｲ ｶｷｺﾐ */
exerewrite()
    { int i,j = 0;

      if ( chgchk() )  return(0);

      /* ﾒｯｾｰｼﾞ ｼﾞｭｼﾝ */
      strcpy(ssent,"メッセージを入力して下さい ( 終了は 行頭で /E  キャンセルは  行頭で .. )\n");
      if ( exp_flg ) strcpy(ssent,"再入力して下さい (終了は 行頭で /E  キャンセルは 行頭で .. \n");

      rsout();          /* ｶﾞｲﾀﾞﾝｽ ﾋｮｳｼﾞ */
      fpw = fopen(temp_fil,"w");    /* ﾒｯｾｰｼﾞ ﾌｧｲﾙ open */

      fprintf(fpw,"%s\n",fbuff);
                                /* ﾍｯﾀﾞ･ﾃﾞｰﾀ ｶｷﾀﾞｼ */
                
      while(1)    /* ﾎﾞｳｿｳ ﾎﾞｳｼ  ｼﾞｭｼﾝ ﾊﾟｹｯﾄ 1000 ﾏﾃﾞ */
          { rsin(0);
            if ( j == 1 && *(rsent) == '/' && (*(rsent + 1) == 'E' || *(rsent + 1) == 'e' ) && *(rsent + 2) == '\n' ) break;
              /* ﾏｴ ﾉ ｷﾞｮｳ ｶﾞ cr ﾃﾞ ｵﾜﾘ (j==1) ｶﾂ /E ﾃﾞ ｱﾚﾊﾞ ｶｷｺﾐ ｶﾝﾘｮｳ */           
          
            if ( j == 1 && *(rsent) == '.' && *(rsent + 1) == '.' && *(rsent + 2) == '\n')
               { fclose(fpw);
                 sprintf(ssent,"--- 書きこみがキャンセルされました ---\n");
                 if ( exp_flg ) strcpy(ssent,"--- ｷｬﾝｾﾙ\n");
                 rsout(); 
                 return(0);
               }
               
            if ( fputs(rsent,fpw) == EOF ) /* ﾌｧｲﾙ ﾍﾉ ｶｷｺﾐ */
              { fclose(fpw); break;                 }
                        
            j = strlen(rsent) - 1;

            if ( j >= 0 && rsent[j] == '\n') j = 1; else j = 0;
                                        /* cr ﾃﾞ ｼｭｳﾘｮｳ ﾉ ﾊｱｸ */
          }
      fclose(fpw);

	  ledit();

      sprintf(ssent,"*** 書きこみを完了しました ***\n");
      if ( exp_flg ) strcpy(ssent,"*** 書込完了 ***\n");
      rsout();
      fmove(pfna); unlink(temp_fil);
      return(0);
    }