#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include <conio.h>
#define LISTSIZE 80

void HELP();
void freemem(); 
int display();
int EDIT();
int del();
int saveall();
int saveanddisplay(int hang);
int Openfiles();
int insert();

typedef struct text
{char string[80];/* 存儲(chǔ)每一行的元素*/
 struct text *next;/* 指向后一個(gè)節(jié)點(diǎn)的指針*/
 struct text *pre;/* 指向前一個(gè)節(jié)點(diǎn)的指針*/
 int num;/* 每一行元素的長(zhǎng)度*/
 int flat;/* 確定此行是否被刪除的標(biāo)志*/
}text;
FILE *fp,*out;
text *head;
int n=0,sum,delnum,xiugai=0,page=0;
void byebye()
{puts("\t\t\t********    *       *   ********");
 puts("\t\t\t*       *    *     *    *  ");
 puts("\t\t\t*       *     *   *     *  ");
 puts("\t\t\t*      *       * *      *  ");
 puts("\t\t\t********        *       ********");
 puts("\t\t\t*      *        *       *  ");
 puts("\t\t\t*       *       *       *  ");
 puts("\t\t\t*       *       *       *  ");
 puts("\t\t\t********        *       ********");
}

void HELP()
{printf("\n\t*************************************\n");
 printf("\t** 打開文件： o<行號(hào)><文件名><回車>  **\n");
 printf("\t** 行插入格式：i<行號(hào)><回車><文本><回車> **\n");
 printf("\t**  行刪除格式： d<行號(hào)1>[<空格><行號(hào)2>]<回車> **\n");
 printf("\t**  活區(qū)切換格式： n<回車>    **\n");
 printf("\t**  活區(qū)顯示格式： p<回車>    **\n");
 printf("\t**  注意：在執(zhí)行所有命令前必須先用o命令打開文件，并 **\n");
 printf("\t**  用p命令顯示出來(lái)！！！    **\n");
printf("\t********************************************\n");
 system("pause");
 printf("\n\n\n");
 }

void Createlist()
{text *p1,*p2;
 p1=p2=(text *)malloc(sizeof(text));
 head=NULL;
 while(n<10)
 {n=n+1;
  if(n==1) head=p1;
  else 
  {p2->next=p1;
   p1->pre=p2;
   p1->flat=0;
  }
  p2=p1;
  p1=(text *)malloc(sizeof(text));
 }
 p2->next=NULL;
}
void freemem()
{text *p;
 for(p=head;head!=NULL;)
 {head=p->next;
  free(p);
  p=head;
 }
}
int EDIT()
{char cmd;
printf("\n請(qǐng)輸入命令(按E鍵退出)：\n\te:退出\n\to:打開文件\n\tp:活區(qū)顯示格式\n\tn:活區(qū)切換格式\n\td:行刪除格式\n\ti:行插入格式\n");
 do
 {cmd=getchar();
  printf("\nplease input the order: ");
  cmd=getchar();
  switch(cmd)
  {case 'e':
   case 'E':    if(xiugai==1)     saveall();    freemem();    system("cls");    return 0;
   case 'o':
   case 'O':    Openfiles();    break;
   case 'p':
   case 'P':    Createlist();    display();    break;
   case 'n':
   case 'N':    saveanddisplay(10);    break;
   case 'd':
   case 'D':    del();    break;
   case 'i':
   case 'I':    insert();    break;
   default:printf("\n\n\nerror");
  }
 }while(cmd!='e'&&cmd!='E');
 return 0;
}

int Openfiles()
{char name[30],outname[30];
 puts("input the name of the file: ");
 scanf("%s",name);
 if((fp=fopen(name,"r+"))==NULL)
 {printf("打不開原文件！ \n");
  exit(0);
 }
 puts("請(qǐng)輸入要寫入的文件名：");
 scanf("%s",outname);
 if((out=fopen(outname,"w+"))==NULL)
 {printf("打不開目標(biāo)文件！\n");
  exit(0);
 }
 return 0;
}
int display()
{int i;
 char conti='y';
 text *p;
 while((!feof(fp))&&(conti=='y'||conti=='Y'))
 {page++;
  printf("\t\t\t第%d頁(yè)\n",page);
for(i=0,p=head,sum=0;(i<10)&&(!feof(fp));i++,p=p->next)
  {fgets(p->string,sizeof(p->string),fp);
   puts(p->string);
   p->flat=1;
   p->num=strlen(p->string);
   sum=sum+p->num;
  }
  puts("Continue?(Y/N):");
  conti=getche();
  if(feof(fp))
  {puts("\n文件已經(jīng)結(jié)束!");
   return 0;
  }
 }
 return 0;
}
int saveanddisplay(int hang)/* 命令n執(zhí)行的函數(shù)*/
{int i,endflat=0;
 char conti='y';
 text *p=NULL;
 page++;
for(i=0,p=head;i<hang;i++,p=p->next) file:/*將活區(qū)寫入文件???????????*/
  if(p->flat==1)
  {fputs(p->string,out);
   p->flat=0;
  }
 if(!feof(fp))
  printf("\t\t\t第%d頁(yè)\n",page); 
for(i=0,p=head,sum=0;(i<10)&&(!feof(fp));i++,p=p->next)/* 從文件讀入活區(qū)*/
  if(fgets(p->string,sizeof(p->string),fp))
  {puts(p->string); 
   p->flat=1;
   p->num=strlen(p->string);
   sum=sum+p->num;
  }
 if(feof(fp))
  printf("文件已經(jīng)結(jié)束！");
 return 0;
}
int saveall()/* 退出編輯函數(shù)后執(zhí)行的函數(shù)，將所有的內(nèi)容存盤*/
{int i,endflat=0;
 char conti='y';
 text *p;
for(i=0,p=head;i<10;i++,p=p->next) file: /*將活區(qū)寫入文件*/
  if(p->flat==1)
  {fputs(p->string,out);
   p->flat=0;
  } 
  fputc(fgetc(fp),out);
  return 0;
}
int del()/* 刪除d命令對(duì)應(yīng)的函數(shù)*/
{text *p1,*p2,*p3;
 int min,max,i;
 xiugai=1;
 scanf("%d %d",&min,&max);
 if(head==NULL)
 {printf("\nlist null!\n");
  return 0;
 }
 p1=p2=head;
 for(i=0;i<min-1;i++)/*找到要?jiǎng)h除的第一行*/
  p1=p1->next;
 for(i=0;i<max;i++)/*找到要?jiǎng)h除的最后一行*/
  p2=p2->next;
  puts("修改后的鏈表：");
 for(delnum=0;p1!=p2;p1=p1->next)/*刪除中間的節(jié)點(diǎn)，將flat賦值0*/
 {p1->flat=0;
  delnum=delnum+p1->num;
 }
 for(i=0,p3=head;i<10;i++,p3=p3->next)/* 顯示刪除后的結(jié)果*/
  if(p3->flat==1)
   puts(p3->string);
 saveanddisplay(10);/* 將刪除后的結(jié)果存盤并顯示下一頁(yè)內(nèi)容（十行）*/
 xiugai=1;
 saveall();
 return 0;
} 

int insert()/* 插入i命令對(duì)應(yīng)的函數(shù)*/
{int hang,i,increhang=1,number=1;
 text *p,*p1,*p2;
 xiugai=1;
 printf("輸入你向第幾行插入");
 scanf("%d",&hang);
 printf("你要向地%d行插入以下內(nèi)容:\n",hang);
 p=p1=NULL;
 for(i=0,p1=head;i<hang-1;i++,p1=p1->next);/* 找到要插入行的前一列*/
 p=(text *)malloc(sizeof(text));/* 為插入行分配空間*/
 p->flat=1;
 p->next=p1->next;/* 從此行向下四行將插入行插入到鏈表中*/
 p->pre=p1;
 p1->next->pre=p;
 p1->next=p;
 p->string[0]=getchar();
 p->string[0]=getchar();
 for(i=1;(i<80)&&(p->string[i-1]!='#');i++)
 {p->string[i]=getchar();
  if((i+1==80)&&(p->string[i]!='#'))/* 如果插入的內(nèi)容超過(guò)一行*/
  {        file:/* 的容量，則分配下一行空間*/
   p1=p;
   p=(text *)malloc(sizeof(text));
   p->flat=1;
   p->next=p1->next;
   p->pre=p1;
   p1->next->pre=p;
   p1->next=p;
   i=0;
   increhang++;
  }
  p->num=i;
 }
 p->string[i-1]='\n';
 p->string[i]='\0';
 puts("修改后的鏈表:");
for(p2=head;p2!=NULL;p2=p2->next)/* 顯示出修改后的鏈表*/
  puts(p2->string);
 saveanddisplay(10+increhang);/* 將修改后的鏈表存盤并顯示下一頁(yè)內(nèi)容*/
 xiugai=1;
 return 0;
} 
int main()
{char cmd;

 do
 {printf("\n\t\t\t**************************\n");
  printf("\t\t\t**      1---操作    \n");
  printf("\t\t\t**      2---幫助   \n");
  printf("\t\t\t**      3---退出    \n");
  printf("\t\t\t**************************\n");
  printf("\n\t選擇操作:\n");
  cmd=getche();
  switch(cmd)
   {case '3' : system("cls"); byebye(); break;
   case '2' : system("cls"); HELP();  cmd=0; break;
   case '1' : EDIT();  cmd=0; break;
   default : printf("\n\n\n!!!輸入錯(cuò)誤!!!\n");
   }
 }while(cmd!='3');
 if(fp) fclose(fp);
 if(out) fclose(out);
 return 0;
}