C语言程序设计经典实例之十

/*money management system*/
#include "stdio.h"
#include "dos.h"
main()
{
　FILE *fp;
　struct date d;
　float sum,chm=0.0;
　int len,i,j=0;
　int c;
　char ch[4]="",ch1[16]="",chtime[12]="",chshop[16],chmoney[8];
　pp: clrscr();
　sum=0.0;
　gotoxy(1,1);printf("|----------------------------------------------------|");
　gotoxy(1,2);printf("| money management system(C1.0) 2000.03 |");
　gotoxy(1,3);printf("|----------------------------------------------------|");
　gotoxy(1,4);printf("| -- money records -- | -- today cost list -- |");
　gotoxy(1,5);printf("| ------------------------ |-----------------------------|");
　gotoxy(1,6);printf("| date: -------------- | |");
　gotoxy(1,7);printf("| | | | |");
　gotoxy(1,8);printf("| -------------- | |");
　gotoxy(1,9);printf("| thgs: ------------------ | |");
　gotoxy(1,10);printf("| | | | |");
　gotoxy(1,11);printf("| ------------------ | |");
　gotoxy(1,12);printf("| cost: ---------- | |");
　gotoxy(1,13);printf("| | | | |");
　gotoxy(1,14);printf("| ---------- | |");
　gotoxy(1,15);printf("| | |");
　gotoxy(1,16);printf("| | |");
　gotoxy(1,17);printf("| | |");
　gotoxy(1,18);printf("| | |");
　gotoxy(1,19);printf("| | |");
　gotoxy(1,20);printf("| | |");
　gotoxy(1,21);printf("| | |");
　gotoxy(1,22);printf("| | |");
　gotoxy(1,23);printf("|--------------------------------------------------|");
　i=0;
　getdate(&d);
　sprintf(chtime,"%4d.%02d.%02d",d.da_year,d.da_mon,d.da_day);
　for(;;)
　{
　　gotoxy(3,24);printf(" Tab __browse cost list Esc __quit");
　　gotoxy(13,10);printf(" ");
　　gotoxy(13,13);printf(" ");
　　gotoxy(13,7);printf("%s",chtime);
　　j=18;
　　ch[0　]=getch();
　　if(ch[0]==27)
　　　break;
　　　strcpy　(chshop,"");
　　　strcpy(chmoney,"");
　　if(ch[0]==9)
　　{
　　　mm:i=0;
　　　fp=fopen("home.dat","r+");
　　　gotoxy(3,24);printf(" ");
　　　gotoxy(6,4);printf(" list records ");
　　　gotoxy(1,5);printf("|-------------------------------------|");
　　　gotoxy(41,4);printf(" ");
　　　gotoxy(41,5);printf(" |");
　　　while(fscanf(fp,"%10s%14s%f\n",chtime,chshop,&chm)!=EOF)
　　　{
　　　　if(i==36)
　　　　{
　　　　　getch();
　　　　　i=0;
　　　　}
　　　　if ((i%36)<17)
　　　　{
　　　　　gotoxy(4,6+i);
　　　　　printf(" ");
　　　　　gotoxy(4,6+i);
　　　　}
　　　　else
　　　　if((i%36)>16)
　　　　{
　　　　　gotoxy(41,4+i-17);
　　　　　printf(" ");
　　　　　gotoxy(42,4+i-17);
　　　　}
　　　　i++;
　　　　sum=sum+chm;
　　　　printf("%10s %-14s %6.1f\n",chtime,chshop,chm);}
　　　　gotoxy(1,23);printf("|----------------------------------------------|");
　　　　gotoxy(1,24);printf("| |");
　　　　gotoxy(1,25);printf("|----------------------------------------------|");
　　　　gotoxy(10,24);printf("total is %8.1f$",sum);
　　　　fclose(fp);
　　　　gotoxy(49,24);printf("press any key to.....");getch();goto pp;
　　　}
　　　else
　　　{
　　　　while(ch[0]!='\r')
　　　　{
　　　　　if(j<10)
　　　　　{
　　　　　　strncat(chtime,ch,1);
　　　　　　j++;
　　　　　}
　　　　　if(ch[0]==8)
　　　　　{
　　　　　　len=strlen(chtime)-1;
　　　　　　if(j>15)
　　　　　　{
　　　　　　　len=len+1;
　　　　　　　j=11;
　　　　　　}
　　　　　　strcpy(ch1,"");
　　　　　　j=j-2;
　　　　　　strncat(ch1,chtime,len);
　　　　　　strcpy(chtime,"");
　　　　　　strncat(chtime,ch1,len-1);
　　　　　　gotoxy(13,7);printf(" ");
　　　　　}
　　　　　gotoxy(13,7);printf("%s",chtime);ch[0]=getch();
　　　　　if(ch[0]==9)
　　　　　　goto mm;
　　　　　if(ch[0]==27)
　　　　　　exit(1);
　　　　}
　　　　gotoxy(3,24);printf(" ");
　　　　gotoxy(13,10);
　　　　j=0;
　　　　ch[0]=getch();
　　　　while(ch[0]!='\r')
　　　　{
　　　　　if (j<14)
　　　　　{
　　　　　　strncat(chshop,ch,1);
　　　　　　j++;
　　　　　}
　　　　　if(ch[0]==8)
　　　　　{
　　　　　　len=strlen(chshop)-1;
　　　　　　strcpy(ch1,"");
　　　　　　j=j-2;
　　　　　　strncat(ch1,chshop,len);
　　　　　　strcpy(chshop,"");
　　　　　　strncat(chshop,ch1,len-1);
　　　　　　gotoxy(13,10);printf(" ");
　　　　　}
　　　　　gotoxy(13,10);printf("%s",chshop);ch[0]=getch();}
　　　　　gotoxy(13,13);
　　　　　j=0;　
　　　　　ch[0]=getch();
　　　　　while(ch[0]!='\r')
　　　　　{
　　　　　　if (j<6)
　　　　　　{
　　　　　　　strncat(chmoney,ch,1);
　　　　　　　j++;
　　　　　　}
　　　　　　if(ch[0]==8)
　　　　　　{
　　　　　　　len=strlen(chmoney)-1;
　　　　　　　strcpy(ch1,"");
　　　　　　　j=j-2;
　　　　　　　strncat(ch1,chmoney,len);
　　　　　　　strcpy(chmoney,"");
　　　　　　　strncat(chmoney,ch1,len-1);
　　　　　　　gotoxy(13,13);printf(" ");
　　　　　　}
　　　　　　gotoxy(13,13);printf("%s",chmoney);ch[0]=getch();
　　　　　}
　　　　　if((strlen(chshop)==0)||(strlen(chmoney)==0))
　　　　　　continue;
　　　　　if((fp=fopen("home.dat","a+"))!=NULL);
　　　　　　fprintf(fp,"%10s%14s%6s",chtime,chshop,chmoney);
　　　　　　fputc('\n',fp);
　　　　　　fclose(fp);
　　　　　　i++;
　　　　　　gotoxy(41,5+i);
　　　　　　printf("%10s %-14s %-6s",chtime,chshop,chmoney);
　　　　}
　　　}
　}