| 
 | 
 
 
 楼主 |
发表于 2004-5-10 23:32:33
|
显示全部楼层
 
 
 
<FONT color=#990000>【程序95】 
</FONT>题目:家庭财务管理小程序 
1.程序分析: 
2.程序源代码: 
/*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); 
}}}  
 |   
 
 
 
 |