?? 108.lst
字號:
1: /*軟件名稱：智能渦輪流量計 *
2: * *
3: *作者：李維平&陳超 *
4: *時間：星期二 2005年4月26日 *
5: * 晶振：640KHZ *
6: * 微處理器：PIC16F877或者PIC16F877A *
7: * 采用澳大利亞HI-TECH公司的PICC編譯器 * * 功能簡介： *
8: *可顯示瞬時流量和累計流量 *
9: *累計量定時存儲于EEPROM *
10: *瞬時量和累計量都可實現精度自動調整（小數點動態移動顯示） *
11: *儀表系數K可以在線置入EEPROM當中，設置同時計量工作仍繼續 *
12: *當第一點K值為0時，可以作為頻率計使用 *
13: *儀表系數的點數可通過修改宏定義中的set 值來改變，范圍3～6點 *
14: *按鍵操作采用中斷方式 *
15: *儀表系數K默認小數部分為零 *
16: * *
17: * */
18: #include <pic.h>
19: #include <pic1687x.h>
20: //#include <pic168xa.h>
21: #include <math.h>
22: #include <stdio.h>
23:
24: #define uchar unsigned char
25: #define uint unsigned int
26: #define ushort unsigned short
27: #define ulong unsigned long
28: #define sleep() asm("sleep")
29: #define nop() asm("nop")
30: #define clrwdt() asm("clrwdt")
31: #define CS RB1
32: #define WR RB2
33: #define DATA RB3
34: #define KEY_SR RB4 //RB4
35: #define KEY_ADD RB6
36: #define KEY_F RB5 //RB6
37:
38: #define set1 3 //set1為儀表系數點數3~6點
39: #define set2 1 //set2為0，無滿度流量，set2為1，有滿度流量
40:
41: void delay(uchar x,uchar y);
42: void delay1(void);
43: void delay2(void);
44: void Lcd_Write_Com(uchar com);
45: void Lcd_Write_Data_Contin_u(uchar addr,uchar j);
46: void Lcd_Write_Data_Contin_n(uchar addr,uchar j);
47: void Lcd_Write_Data_Q_or_P(uchar j);
48: void Lcd_Black();
49: void Lcd_Init(void);
50: void Timer_Init(void);
51: void Eeprom_Initia(void);
52: void interrupt ISR(void);
53: void Read_Fre_K(void);
54: void Caculate_pre();
55: void Caculate();
56: void Caculate_Q3();
57: void Dis_Buf(void);
58: void Lcd_Dispay(void);
59: void Cumulation_to_EEPROM();
60: void Read_Sum_flux();
61: void Parameter_Set();
62: void ccp2_out(void);
63: void Sum_Q_Clear();
64:
65:
66: bank3 uchar i,eeadr,addr,da,time_f_sr=0,time_sr=0,no_f=0,ti;
67: bit flag_tmr0=0,flag_tmr1=0,key_f=0,key_sr=0,key_add=0,key_f_add=0,key_f_sr=0,key_sr_add=0,flag_set=0,flag_out=0,flag_turn,flag_mid;
68: uchar *p1,x[3],y[3],save_time,save_adr,pass_time,ct=0,disp_buf[15],disp;
69: bank2 uchar n1,m1,n2,m2,n3,m3,n4,m4,gdl,jc,jm;
70: bank3 uint x1,x2,F1,F2,F3,F4,F5,F6,Q2d,ff;
71: bank2 float K1,K2,K3,K4,K5,K6,b0,b1,b2,b3,b4;
72: bank1 ulong Q3nd,Q3ud,Q3INT,Qfull;
73: bank1 float Q2,Q3DEC,*p2,fr,K,qqq,Q1,frqian,Qliu,Q3;
74: bank1 uint mm @ 0xA0;
75: bank3 uint gao @ 0x1A0;
76: bank3 uchar cp @ 0x1A2;
77:
78:
79: const char table_up_for_lcd [25][2]={// the digit from "0" to "9" for upper number 1~6
80: {0xe0,0xb0},{0x60,0x00},{0xC0,0x70},{0xe0,0x50},//0~9不帶點
81: {0x60,0xc0},{0xa0,0xd0},{0xa0,0xf0},{0xe0,0x00},
82: {0xe0,0xf0},{0xe0,0xd0},
83: {0xf0,0xb0},{0x70,0x00},{0xd0,0x70},{0xf0,0x50}, //0~9帶點
84: {0x70,0xc0},{0xb0,0xd0},{0xb0,0xf0},{0xf0,0x00},
85: {0xf0,0xf0},{0xf0,0xd0},
86: {0x00,0x00},{0x10,0x00}}; //BLACK,末尾顯Q1可不要 03.10調換后兩位位置
87:
88: const char table_nether_for_lcd[21][2]={ //used nether number 7~14 // segment for character 0~9
89: {0xd0,0x70},{0x00,0x60},{0xe0,0x30},{0xa0,0x70}, //0~3不帶點
90: {0x30,0x60},{0xb0,0x50},{0xF0,0x50},{0x00,0x70}, //4~7
91: {0xf0,0x70},{0xb0,0x70},
92: {0xd0,0xf0},{0x00,0xe0},{0xe0,0xb0},{0xa0,0xf0}, //0~3帶點
93: {0x30,0xe0},{0xb0,0xd0},{0xF0,0xd0},{0x00,0xf0}, //4~7
94: {0xf0,0xf0},{0xb0,0xf0},
95: {0x00,0x00} }; //8,9,.,black
96:
97: const char Ladr[16]={ //液晶字符地址
98: 0x15,0x13,0x11,0x0f,
99: 0x1e,0x1c,0x00,0x02,0x04,0x06,0x08,0x0a,0x19,0x17};
100:
101: //#pragma interrupt_level 1
102: void delay(uchar x,uchar y) //delay time :14+（3*（Y-1）+7）*（X-1）
103: {
104: uchar z;
105: do{
106: z=y;
107: do{;}while(--z);
108: }while(--x);
109: }
110:
111: void delay1() //delay function
112: {
113: nop();
114: }
115:
116: void delay2() //delay function
117: {
118: uchar x;
119: x=250;
120: while(--x){;};
121: }
122:
123: void Lcd_Write_Com(uchar com) //write command to lcd
124: {
125: uchar j;
126: CS=1; // pre-initialize
127: delay1();
128: nop();
129: CS=0; // pre-initialize
130: delay1();
131:
132: DATA=1;
133: delay1();
134: WR=0;
135: delay1();
136: WR=1;
137: delay1(); //d=1 command mode 100
138:
139: DATA=0;
140: delay1();
141: WR=0;
142: delay1();
143: WR=1;
144: delay1(); //d=0
145:
146: DATA=0;
147: delay1();
148: WR=0;
149: delay1();
150: WR=1;
151: delay1(); //d=0
152:
153: for(j=0;j<8;j++) //write 8+1 bit command
154: {
155: if(com&0x80)
156: DATA=1;
157: else
158: DATA=0;
159: delay1();
160: WR=0;
161: delay1();
162: WR=1;
163: delay1();
164: com<<=1;
165: }
166: DATA=0;
167: delay1();
168: WR=0;
169: delay1();
170: WR=1;
171: delay1(); //the last bit of the command 0
172: }
173:
174: //#pragma interrupt_level 1
175: void Lcd_Write_Data_Contin_u(uchar addr,uchar j) //液晶顯示器上排顯示
176: {
177: uchar k,m,da;
178: CS=1; // pre-initialize
179: delay1();
180: CS=0; // pre-initialize
181: delay1();
182:
183: DATA=1;
184: delay1();
185: WR=0;
186: delay1();
187: WR=1;
188: delay1(); //d=1 data mode 101
189:
190: DATA=0;
191: delay1();
192: WR=0;
193: delay1();
194: WR=1;
195: delay1(); //d=0
196:
197: DATA=1;
198: delay1();
199: WR=0;
200: delay1();
201: WR=1;
202: delay1(); //d=1
203: addr<<=2; //surpose that ADDR=8bit
204: for (k=0;k<6;k++)
205: {
206: if (addr&0x80)
207: DATA=1;
208: else
209: DATA=0;
210: WR=0;
211: delay1();
212: WR=1;
213: delay1();
214: addr<<=1;
215: }
216: for(k=0;k<2;k++) //send number
217: {
218: da= table_up_for_lcd [j][k]; //j is determined by other things
219: for(m=0;m<4;m++)
220: {
221: if(da&0x80) //send DATA first ,WR clock second for safety
222: DATA=1;
223: else
224: DATA=0;
225: WR=0;
226: delay1();
227: WR=1;
228: delay1();
229: da<<=1;
230: }
231: }
232: }
233:
234:
235:
236: //#pragma interrupt_level 1
237: void Lcd_Write_Data_Contin_n(uchar addr,uchar j) //液晶顯示器下排顯示
238: {
239: uchar k,m,da;
240: CS=1; // pre-initialize
241: delay1();
242: CS=0; // pre-initialize
243: delay1();
244:
245: DATA=1;
246: delay1();
247: WR=0;
248: delay1();
249: WR=1;
250: delay1(); //d=1 data mode 101
251:
252: DATA=0;
253: delay1();
254: WR=0;
255: delay1();
256: WR=1;
257: delay1(); //d=0
258:
259: DATA=1;
260: delay1();
261: WR=0;
262: delay1();
263: WR=1;
264: delay1(); //d=1
265: // addr=0x19; //the digit 5's address
266: // Lcd_Write_Data_Addr();
267: addr<<=2; //surpose that ADDR=8bit
268: for (k=0;k<6;k++)
269: {
270: if (addr&0x80)
271: DATA=1;
272: else
273: DATA=0;
274: WR=0;
275: delay1();
276: WR=1;
277: delay1();
278: addr<<=1;
279: }
280:
281: for(k=0;k<2;k++) //send number
282: {
283: da= table_nether_for_lcd [j][k]; //j is determined by other things
284: for(m=0;m<4;m++)
285: {
286: if(da&0x80) //send DATA first ,WR clock second for safety
287: DATA=1;
288: else
289: DATA=0;
290: WR=0;
291: delay1();
292: WR=1;
293: delay1();
294: da<<=1;
295: }
296: }
297: }
298:
299: //#pragma interrupt_level 1
300:
301: void Lcd_Write_Data_Q_or_P(uchar j) //K1為0時顯示P，其余情況顯示Q
302: {
303: uchar k,m,da,addr;
304: CS=1; // pre-initialize
305: delay1();
306: CS=0; // pre-initialize
307: delay1();
308:
309: DATA=1;
310: delay1();
311: WR=0;
312: delay1();
313: WR=1;
314: delay1(); //d=1 data mode 101
315:
316: DATA=0;
317: delay1();
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -