霍尔磁测速-自行车测距仪-MC68HC908QY4-1601LCD显示-C语言程序-电路图-转载自国外网站

sydz

开发设备来测量距离，骑自行车时。 磁铁和磁传感器（邻近效应）接触被用来检测车轮转动。 项目包括摩托罗拉68HC908QY4来自簧开关的脉冲信号计数的微控制器。 数据显示，在1个16液晶显示模块。

原理很简单，可以重建容易普及的董事会。 软件是用ICC08编译器，可以轻松修改。 主要的修改将调整车轮的直径。

程序：

1. /*
   
2. 
   
3.   lcd.c firmware for Distant Meter V1.0
   
4.   the sensor is simple reed switch with magnet tied
   
5.   to bycycle wheel. Optional 8-bit analog display for
   
6.   user sensor.
   
7.    
   
8.   MC908QY4CP 16-pin MCU
   
9.   compiled with icc08
   
10.      
    
11.   Copyright (c) 2004 Wichit Sirichote
    
12. 
    
13. */
    
14. 
    
15. 
    
16. #include <io908QY4.H>
    
17. 
    
18. #define one_revolution 157 // 2PIr, radius is 25cm
    
19. #define p 1 // scale of ADC reading
    
20. 
    
21. 
    
22. char temp,k;
    
23. unsigned int PV,temp16;
    
24. char i,n,timer1,timer2;
    
25. unsigned char sec;
    
26. char x1,x2,x3;
    
27. 
    
28. long average,length, count;
    
29. 
    
30. char diff,old, now;
    
31. 
    
32. char *title = "DISTANCE METER 1";
    
33. char buffer[10];
    
34. 
    
35. /*   signal for lcd interface
    
36.    E       PTB1
    
37.    RS      PTB0
    
38. 
    
39.    D4      PTB4
    
40.    D5      PTB5
    
41.    D6      PTB6
    
42.    D7      PTB7
    
43.    
    
44.    D0-D3 and R/W# are tied to GND
    
45. */
    
46. 
    
47.         
    
48. void delay(int j)
    
49. {
    
50.    unsigned int i;
    
51.    for (i = 0; i < j; i++)
    
52.    COPCTL = 0;   // clear COP otherwise the cpu itself will be reset           
    
53. }
    
54. 
    
55. void pulseE()
    
56. {
    
57.     PTB |= 2;
    
58.     delay(10);
    
59.         PTB &= ~2;   
    
60. }
    
61. void LCDWI(char c)     /* write instruction to instruction register */
    
62. {
    
63.      temp = c;
    
64.          PTB &= ~3;   // clear RS and E
    
65.          PTB &= 0x0f; // clear high nibbel to low
    
66.          c &= 0xf0; // prepare only high nibble
    
67.          PTB |= c;
    
68.          pulseE();
    
69.          c = temp;
    
70.          c <<=4;
    
71.          PTB &= 0x0f;
    
72.          PTB |= c;
    
73.          pulseE();
    
74.          delay(50);
    
75. }         
    
76. 
    
77. void
    
78. LCDWD(char c)    /* write data to data register */
    
79. {
    
80.     temp = c;
    
81.         PTB |= 1; // set bit RS
    
82.         PTB &= ~2; // clear bit E
    
83.     PTB &= 0x0f; // clear high nibbel to low
    
84.         c &= 0xf0; // prepare only high nibble
    
85.         PTB |= c; // mearge high nibble first
    
86.         pulseE();
    
87.         c = temp;
    
88.         c <<=4;
    
89.         PTB &= 0x0f;
    
90.         PTB |= c;
    
91.         pulseE();
    
92.         delay(50);
    
93. }        
    
94. 
    
95. void i_LCD() /* initialize LCD in accordance with Hitachi 44780 4-bit
    
96. mode */
    
97. {
    
98.     PTB &= ~3;        // clear RS and E
    
99.         PTB |= 0x30;
    
100.         pulseE();
     
101.     delay(200);
     
102.     pulseE();
     
103.     delay(50);
     
104.     pulseE();
     
105.     delay(50);
     
106.     PTB &= 0x0f;
     
107.         PTB |= 0x20;
     
108.         pulseE();
     
109.     pulseE();
     
110.     pulseE();
     
111.     LCDWI(0x28); // set 4-bit bus, 1/16 line, 5*7 dots  
     
112.     LCDWI(0x0c); // display on/off on display,off cursor, no blink
     
113.     LCDWI(0x06); // entry mode DDRAM auto address increment
     
114.     LCDWI(1);    // clear display  
     
115.     delay(50);
     
116. }
     
117. 
     
118. // print LCD text >8
     
119. // the 16x1 line LCD has two blocks start address!
     
120. void print_lcds(char *s)
     
121. {
     
122.     char i;
     
123.         LCDWI(1); // clear display
     
124.         LCDWI(0x80); // start at left most position
     
125.         for(i=0; i<8; i++)
     
126.           LCDWD(*s++);
     
127.           LCDWI(0xc0); // new address for position 9
     
128.            for(i=0; i<8; i++)
     
129.               LCDWD(*s++);
     
130. }               
     
131. 
     
132. char read_ADC()
     
133. {
     
134.           ADSCR = 0; // read channel 0 one time
     
135.          while(!(ADSCR&0x80))
     
136.          ;
     
137.          return ADR;
     
138. }
     
139. // 3-point moving average (digital filtering)
     
140. 
     
141. long read_ADC_filter(){
     
142.    PV = read_ADC();
     
143.    x3 = x2;
     
144.    x2 = x1;
     
145.    x1 = PV;
     
146.    PV = (x1+x2+x3)/3;
     
147.    return PV;
     
148. }                                                         
     
149. 
     
150. int read_adc_scale(){
     
151.   long k;
     
152.   k = read_ADC_filter()*p;
     
153.   return k;
     
154. }
     
155. 
     
156. 
     
157. void print_dec(char d,unsigned int n)
     
158. {
     
159.    buffer[0] = n/10000+48;
     
160.    temp16 = n%10000;
     
161.    buffer[1] = temp16/1000+48;
     
162.    temp16 %=1000;
     
163.    buffer[2] = temp16/100+48;
     
164.    temp16 %=100;
     
165.    buffer[3] = temp16/10+48;
     
166.    buffer[4] = temp16%10+48;
     
167.    LCDWI(d);
     
168.    for(i=0; i<5; i++)
     
169.      LCDWD(buffer[i]);
     
170. }   
     
171.          
     
172. void print_distant()
     
173. {
     
174.           if(++timer1>10)
     
175.          {
     
176.          timer1 = 0;
     
177.          PTA ^= 2; // toggle PA1
     
178.         // count++; // test auto increment
     
179.          length = count*one_revolution; // one revolution = 157cm
     
180.          print_dec(0x80,length/100); // 100cm = 1m
     
181.          LCDWD(' ');
     
182.          LCDWD('m');
     
183.          print_dec(0xc0,read_adc_scale());
     
184.          }
     
185. }         
     
186. 
     
187. void task_led()
     
188. {
     
189.     if(++timer2>50)
     
190.         {
     
191.          timer2 =0;
     
192.      LCDWI(0xc7);
     
193.          k^=1;
     
194.          if (k) LCDWD('-');
     
195.          else LCDWD('_');
     
196.          }
     
197. }
     
198. 
     
199. // PTA2 input bit for reed swicth sensor
     
200. // detect rising edge
     
201. void detect_pulse_input()
     
202. {  
     
203.      now = PTA&4; // read only PTA2
     
204.          diff = old-now;
     
205.          if(diff>4) count++;
     
206.           old = now;
     
207. }         
     
208. 
     
209. void print_average()
     
210. {   
     
211.     average += count;
     
212.         average /= 2;
     
213.     print_dec(0xc0,average);
     
214. }        
     
215. 
     
216. void main()
     
217. {
     
218.          // OCSTRIM = 0x81; // trim internal oscillator
     
219.           delay(1000); // powerup delay for LCD
     
220.          n = k=0;
     
221.           count = 0;
     
222.          average = 0;
     
223.          
     
224.          TMODH = 0x01;
     
225.          TMODL = 0xf4;
     
226.          TSC = 0x06; // run timer
     
227.          DDRA = ~0x1; // PA0 is ADC input
     
228.          DDRB = 0xff; // port B is output port
     
229.          PTB = 0; // clear port B
     
230.          PTAPUE = ~0x81; // osc2 pin is PTA4 I/O
     
231.          ADCLK = 0x40; // ADC clock= fbus/4
     
232.          i_LCD();
     
233.          print_lcds(title);
     
234.          delay(60000);
     
235.          now = old = PTA&4;
     
236.          LCDWI(1); // clear lcd
     
237.          //asm(" cli"); //enable irq interrupt
     
238.                   
     
239.         for(;;)
     
240.         {
     
241.          while(!(TSC&0x80))
     
242.          ;
     
243.          TSC &= ~0x80; // clear TOF
     
244.         // PTA ^= 2; // task running ~60Hz so the loop running is 120Hz or 1/120Hz
     
245.          task_led();
     
246.          print_distant();
     
247.          detect_pulse_input();
     
248.          COPCTL = 0; // clear COP         
     
249.          }
     
250. }         
     

复制代码

下载：
原理图.pdf (28.94 KB, 下载次数: 33)

2011-12-4 15:04 上传

点击文件名下载附件

WWW.SYYYD.COM-C程序.zip (2.13 KB, 下载次数: 23)

2011-12-4 15:04 上传

点击文件名下载附件