一个银行存款本息自动计算程序，或许有人会有用

思一克

网上查了，没有太好用的。银行给出的在线计算都要输入利息，这个要求属于扯淡。

这个自动计算要输入的是本金，存入日期，存入期限（活期，死期0.5年，1，2，3，5年）
和取款日期。

如果不输入取款日期，假设今天取款。
如果输入D为取款日期，则假设以后到期了取款。

我实验了，基本正确。

只能计算活期，或整存整取，不能计算其它灵活的存取类型。

1. //bank interest auto calculation.
   
2. //Coding by SEEKER. 2011.12.15
   
3. 
   
4. #include <stdio.h>
   
5. #include <float.h>
   
6. #define _XOPEN_SOURCE /* glibc2 needs this */
   
7. #include <time.h>
   
8. #include <stdlib.h>
   
9. #include <string.h>
   
10. 
    
11. 
    
12. char *intrests = "\
    
13. 06/10/1999        0.99        2.16        2.25        2.43        2.7        2.88  \n\
    
14. 02/21/2002        0.72        1.89        1.98        2.25        2.52        2.79  \n\
    
15. 10/29/2004        0.72        2.07        2.25        2.7        3.24        3.6   \n\
    
16. 08/19/2006        0.72        2.25        2.52        3.06        3.69        4.14  \n\
    
17. 03/18/2007        0.72        2.43        2.79        3.33        3.96        4.41  \n\
    
18. 05/19/2007        0.72        2.61        3.06        3.69        4.41        4.95  \n\
    
19. 07/21/2007        0.81        2.88        3.33        3.96        4.68        5.22 \n\
    
20. 08/22/2007        0.81        3.15        3.6        4.23        4.95        5.49 \n\
    
21. 09/15/2007        0.81        3.42        3.87        4.5        5.22        5.76 \n\
    
22. 12/21/2007        0.72        3.78        4.14        4.68        5.4        5.85 \n\
    
23. 10/09/2008        0.72        3.51        3.87        4.41        5.13        5.58 \n\
    
24. 10/30/2008        0.72        3.24        3.6        4.14        4.77        5.13 \n\
    
25. 11/27/2008        0.36        2.25        2.52        3.06        3.6        3.87 \n\
    
26. 12/23/2008        0.36        1.98        2.25        2.79        3.33        3.6 \n\
    
27. 10/20/2010        0.36        2.2        2.5        3.25        3.85        4.2 \n\
    
28. 12/26/2010        0.36        2.5        2.75        3.55        4.15        4.55 \n\
    
29. 02/09/2011        0.4        2.8        3        3.9        4.5        5 \n\
    
30. 04/06/2011        0.5        3.05        3.25        4.15        4.75        5.25 \n\
    
31. 07/07/2011        0.5        3.3        3.5        4.4        5        5.5 \n\
    
32. ";
    
33. 
    
34. struct intr_list {
    
35.         time_t  from, to;
    
36.         float        intr_temp;
    
37.         float        intr_half;
    
38.         float        intr_y1;
    
39.         float        intr_y2;
    
40.         float        intr_y3;
    
41.         float        intr_y5;
    
42. 
    
43. } intr_list[20];
    
44. int intr_max;
    
45. 
    
46. char *yasctime(struct tm *t)
    
47. {
    
48. static char buf[32];
    
49.     sprintf(buf, "%d-%d-%d", t->tm_year + 1900, t->tm_mon + 1, t->tm_mday);
    
50.     return buf;
    
51.     /*
    
52.     char *tp;
    
53.     char *cp = asctime(t);
    
54.     tp = strrchr(cp, '\n');
    
55.     if(tp) *tp = 0;
    
56.     return cp;
    
57.     */
    
58. }
    
59. 
    
60. time_t addtime(time_t t, float length)
    
61. {
    
62. struct tm tm;
    
63.    
    
64.     tm = *localtime(&t);
    
65.     if(length >= 1.0) {
    
66.             tm.tm_year += length;
    
67.     } else if(length == 0.5) {
    
68.         tm.tm_year += tm.tm_mon/6; //0-5 keep old, 6-11 inc
    
69.         tm.tm_mon += 6;
    
70.         tm.tm_mon %= 12;
    
71.     }
    
72.     return mktime(&tm);
    
73. }
    
74. 
    
75. float  INTR_TAX = 0; //0.05 previously
    
76. float  deposit_rmb;
    
77. time_t deposit_time;
    
78. float  deposit_period;
    
79. time_t withdraw_time; //if empty, today
    
80. 
    
81. float get_interest(time_t tm, float p)
    
82. {
    
83. int i;
    
84. 
    
85.     if(tm < intr_list[0].from) {
    
86.         printf("error 0. no data\n");
    
87.         return 0;
    
88.     }
    
89.     //if(tm > intr_list[intr_max-1].from) {
    
90.     //        printf("error 1. no data\n");
    
91.     //        return 0;
    
92.     //}
    
93.     if(tm > intr_list[intr_max-1].from) {
    
94.         i = intr_max - 1;
    
95.         goto get_it;
    
96. 
    
97.     }
    
98.    
    
99.     for(i = 0; i < intr_max; i++) {
    
100.                if(tm >= intr_list[i].from && tm < intr_list[i+1].from) {
     
101.         get_it:
     
102.             if(p == 0.0) return intr_list[i].intr_temp;
     
103.             if(p == 0.5) return intr_list[i].intr_half;
     
104.             if(p == 1.0) return intr_list[i].intr_y1;
     
105.             if(p == 2.0) return intr_list[i].intr_y2;
     
106.             if(p == 3.0) return intr_list[i].intr_y3;
     
107.             if(p == 5.0) return intr_list[i].intr_y5;
     
108.        
     
109.             printf("error 2.\n");
     
110.         }
     
111.     }
     
112.     printf("error 3.\n");
     
113. 
     
114. }
     
115. 
     
116. calc_it(time_t dt, float length, time_t wt)
     
117. {
     
118. int last = 0;
     
119. float intr, intr_rmb;
     
120. time_t due_time;
     
121. struct tm tm, *tp;
     
122. float total;
     
123. 
     
124.     total = deposit_rmb;
     
125. loop:
     
126.     if(last) return;
     
127.     //printf(" withdraw %s\n", yasctime(localtime(&wt)));
     
128. 
     
129.     //      if((unsigned long)dt >= (unsigned long)withdraw_time) {
     
130.     //if(difftime(wt, dt) < 0.0)        return;
     
131.     if(difftime(wt, dt) < 3600*24*4) return;
     
132.    
     
133.     printf("> start %s  %.1f year period:\n", yasctime(localtime(&dt)), length);
     
134.     if(length >= 0.5) { //huo qi interest assumed
     
135.         if(difftime(wt, dt) < 3600*24*365*length) {
     
136.            length = -difftime(wt, dt)/3600/24/365;
     
137.              last = 1;
     
138.            printf("last flexible peroid. length year = %.2f\n", -length);
     
139.         }
     
140.     }
     
141.     intr = get_interest(dt, length > 0.0? length: 0.0);
     
142.     printf("base rmb: %.2f\n", total);
     
143.     printf("yearly interest %.2f\n", intr);
     
144. 
     
145.     //tm hold this segment's deadline
     
146.     tm = *localtime(&dt);
     
147.     if(length >= 1.0) {
     
148.             tm.tm_year += length;
     
149.     } else if(length == 0.5) {
     
150.         /*
     
151.         if(tm.tm_mon <= 5)  //1-6 yue
     
152.            tm.tm_mon += 6;
     
153.         else {
     
154.            tm.tm_mon += 6;
     
155.            tm.tm_mon %= 12;
     
156.            tm.tm_year++;
     
157.         }
     
158.         */
     
159.         tm.tm_year += tm.tm_mon/6; //0-5 keep old, 6-11 inc
     
160.         tm.tm_mon += 6;
     
161.         tm.tm_mon %= 12;
     
162.     } else if(length < 0.0) { //last huo qi
     
163.         length = -length;
     
164.         tm = *localtime(&wt);
     
165.     } else if(length == 0.0) { //is huo qi
     
166.         length = difftime(wt, dt)/3600/24/365;
     
167.         tm = *localtime(&wt);
     
168.           last = 1;
     
169.         printf("flexible peroid. length year = %.2f\n", length);
     
170.     } else
     
171.         printf("error of length.\n");
     
172.    
     
173.     due_time = mktime(&tm);         
     
174.     tp = localtime(&due_time);
     
175.     printf("due time %s\n", yasctime(tp));
     
176. 
     
177.     intr_rmb = (total*intr/100.0)*length;
     
178.     printf("initial interest rmb %.2f\n", intr_rmb);
     
179.     if(INTR_TAX > 0.0) {
     
180.         printf("after tax interest %.2f\n", intr_rmb*(1 - INTR_TAX));
     
181.         intr_rmb = intr_rmb*(1-INTR_TAX);
     
182.     }
     
183.     total = total + intr_rmb;
     
184.     printf("interest gain %.2f\n", intr_rmb);
     
185.     printf("base + interest: %.2f\n", total);
     
186.     if(last) return;
     
187. 
     
188.     printf("-------------------------\n");
     
189.     dt = due_time;
     
190.     goto loop;
     
191. }
     
192. 
     
193. main(int argc, char **argv)
     
194. {
     
195. char temp[32];
     
196. int i;
     
197. char *cp;
     
198. struct tm tm, *tp, *tp1;
     
199. struct intr_list l;
     
200. 
     
201.     if(argv[1] == 0) {
     
202.         printf("Usage: \n\
     
203. calc RMBs DEPOSIT_TIME DEPOSIT_LENGTH [WITHDRAW_TIME]\n\
     
204. for example:\n\
     
205. calc 10000 12/30/2009 3 [12/30/2011] or\n\
     
206. calc 10000 2009-12-30 3 2011-12-30\n\
     
207. \n\
     
208. if no WITHDRAW_TIME given, TODAY is assumed.\n\
     
209. if WITHDRAW_TIME is 'd', assuming withdraw will be done in future due time\n");
     
210.         return;
     
211.     }
     
212. 
     
213.     deposit_rmb = atol(argv[1]);
     
214.     argv++;
     
215. 
     
216. 
     
217.     printf("%s", intrests);
     
218. 
     
219. 
     
220.     for(i = 0, cp = intrests; *cp; i++) {
     
221.         cp = strchr(cp, '/');
     
222.         if(!cp) break;       
     
223.         cp -= 2;
     
224.         strncpy(temp, cp, 10);
     
225.         temp[10] = 0;
     
226. 
     
227.         memset(&tm, 0, sizeof(struct tm));
     
228.         strptime(temp, "%m/%d/%Y", &tm);
     
229.         //tm.tm_year -= 1980;
     
230.         cp += 10;
     
231.         sscanf(cp, "%f %f %f %f %f %f", &l.intr_temp, &l.intr_half, &l.intr_y1, &l.intr_y2, &l.intr_y3, &l.intr_y5);
     
232.         //printf("%s %d ---- %f\n", asctime(&tm), tm.tm_year, l.intr_y5);
     
233. 
     
234.         l.from = mktime(&tm);
     
235.         intr_list[i] = l;
     
236.     }   
     
237.     intr_max = i;
     
238. 
     
239.     //get deposit time
     
240.     strcpy(temp, argv[1]);
     
241.     if(strchr(temp, '-')) {
     
242.         strptime(temp, "%Y-%m-%d", &tm);
     
243.     } else if(strchr(temp, '/')) {
     
244.         strptime(temp, "%m/%d/%Y", &tm);
     
245.     } else {
     
246.         printf("date format is 2011-11-29 or 11/29/2011.\n");
     
247.         return;
     
248.     }
     
249.     deposit_time = mktime(&tm);
     
250. 
     
251.     sscanf(argv[2], "%f", &deposit_period);
     
252.    
     
253.     //get withdraw time
     
254.     if(argv[3]) {
     
255.         strcpy(temp, argv[3]);
     
256.         strptime(temp, "%m/%d/%Y", &tm);
     
257.         if(strchr(temp, '-'))
     
258.             strptime(temp, "%Y-%m-%d", &tm);
     
259. 
     
260.         withdraw_time = mktime(&tm);
     
261. 
     
262.         if(!isdigit(argv[3][0])) {  //automatic withdraw at next due time
     
263.             int i;
     
264.             for(i = 0; i < 16; i++) {       
     
265.                 withdraw_time = addtime(deposit_time, i*deposit_period);
     
266.                 if(withdraw_time >= time(0)) break;
     
267.             }       
     
268.             printf("will withdraw in %s\n", yasctime(localtime(&withdraw_time)) );
     
269.         }
     
270. 
     
271.     } else
     
272.         withdraw_time = time(0);
     
273. 
     
274. 
     
275.     printf("deposit in (yyyy-mm-dd) %s\t", yasctime(localtime(&deposit_time)));
     
276.     printf("deposit length (in year) %.1f\t", deposit_period);
     
277.     printf("withdraw in %s\n", yasctime(localtime(&withdraw_time)));
     
278. 
     
279.     printf("interest: %.2f\n", get_interest(deposit_time, deposit_period));
     
280. 
     
281.     calc_it(deposit_time, deposit_period, withdraw_time);
     
282.    
     
283. }

复制代码

思一克

也欢迎网友继续改进

hellioncu

利率表从网上自动获取更好{:3_189:}
不过实际用到这工具的机会很少，不会有谁存一大堆的定期，还计较精确的利息是多少

思一克

回复 3# hellioncu


这个利率表是从工行的网站上获取的。
应该准确。

思一克

回复 3# hellioncu


我昨天去银行取款有这个要求。就是要判断一下一个下一记利息周期还没有到期的存单如果现在取了会损失多少钱，还就是看银行算的总数对不对。
网上查了没有好的。
有一个山东一个老师写的，还要注册。
所以自己写一个。

blackuhlan

总的来说对银行应用一点用都没得。俺就是干这个的，嘎嘎。

hellioncu

回复  hellioncu


我昨天去银行取款有这个要求。就是要判断一下一个下一记利息周期还没有到期的存单如 ...
思一克 发表于 2011-12-15 12:13

    发现代码中直接用==判断浮点数，没有问题么？{:3_184:}

blackuhlan

1.银行计息按自然日期还是对年对月对日各家银行都没扯清楚，你直接除以365太简单了，要扯皮的。
2.利率随时在变，也许明天你这个程序就算错了，这也是各家网上给出的算法要客户输入利率的原因。当然他们明明有利率表还要客户输利率确实也很蛋疼。
3.你的程序是c的，难道你希望每个用户都整一套C编译环境啊。
4.上次收利息税，各家银行都整怕了，估计现在所有银行的计息程序都将利息税保留到的。你没得。
5.分段计息没考虑，历史上有，现在没得，不保证将来没得。
6.利率表不全。
7.应该设计为根据产品类型回调计息模块较有扩展性。

huxk

现在银行利率都是负数 记不记有啥用。

何况小本日子，多级毛少鸡毛没啥好关心的了。

思一克

总的来说对银行应用一点用都没得。俺就是干这个的，嘎嘎。
blackuhlan 发表于 2011-12-15 15:29

对银行无用。因为银行的计算更精确，比如每月天数不同，等。

但对存款人有用。你做这个的，哪个银行给出的这样的计算工具？在线的和离线的都行？
我查了一下午也没有找到一个。